Cohen – Sutherlandův algoritmus - Cohen–Sutherland algorithm

typedef int OutCode;konst int UVNITŘ = 0; // 0000konst int VLEVO, ODJET = 1;   // 0001konst int ŽE JO = 2;  // 0010konst int DNO = 4; // 0100konst int HORNÍ = 8;    // 1000// Vypočítejte bitový kód bodu (x, y) pomocí klipu// ohraničeno úhlopříčně (xmin, ymin) a (xmax, ymax)// PŘEDPOKLÁDEJTE, ŽE xmax, xmin, ymax a ymin jsou globální konstanty.OutCode ComputeOutCode(dvojnásobek X, dvojnásobek y){	OutCode kód;	kód = UVNITŘ;          // inicializováno jako uvnitř [[okno klipu]]	-li (X < xmin)           // nalevo od okna klipu		kód |= VLEVO, ODJET;	jiný -li (X > xmax)      // napravo od okna klipu		kód |= ŽE JO;	-li (y < ymin)           // pod oknem klipu		kód |= DNO;	jiný -li (y > ymax)      // nad oknem klipu		kód |= HORNÍ;	vrátit se kód;}// Cohen – Sutherlandův algoritmus oříznutí ořízne řádek z// P0 = (x0, y0) až P1 = (x1, y1) proti obdélníku s // úhlopříčka od (xmin, ymin) do (xmax, ymax).prázdnota CohenSutherlandLineClipAndDraw(dvojnásobek x0, dvojnásobek y0, dvojnásobek x1, dvojnásobek y1){	// spočítá kódy pro P0, P1 a jakýkoli bod leží mimo obdélník klipu	OutCode outcode0 = ComputeOutCode(x0, y0);	OutCode outcode1 = ComputeOutCode(x1, y1);	bool akceptovat = Nepravdivé;	zatímco (skutečný) {		-li (!(outcode0 | outcode1)) {			// bitový OR je 0: oba body uvnitř okna; triviálně přijmout a opustit smyčku			akceptovat = skutečný;			přestávka;		} jiný -li (outcode0 & outcode1) {			// bitové AND není 0: oba body sdílejí vnější zónu (LEFT, RIGHT, TOP,			// nebo BOTTOM), takže oba musí být mimo okno; výstupní smyčka (přijmout je nepravdivé)			přestávka;		} jiný {			// selhaly oba testy, takže vypočítejte úsečku, kterou chcete oříznout			// z vnějšího bodu do průsečíku s hranou klipu			dvojnásobek X, y;			// Alespoň jeden koncový bod je mimo obdélník klipu; vyberte to.			OutCode outcodeOut = outcode1 > outcode0 ? outcode1 : outcode0;			// Nyní najděte průsečík;			// použití vzorců:			// sklon = (y1 - y0) / (x1 - x0)			// x = x0 + (1 / sklon) * (ym - y0), kde ym je ymin nebo ymax			// y = y0 + sklon * (xm - x0), kde xm je xmin nebo xmax			// Není třeba se obávat dělení na nulu, protože v každém případě			// testovaný bit outcode zaručuje, že jmenovatel je nenulový			-li (outcodeOut & HORNÍ) {           // bod je nad oknem klipu				X = x0 + (x1 - x0) * (ymax - y0) / (y1 - y0);				y = ymax;			} jiný -li (outcodeOut & DNO) { // bod je pod oknem klipu				X = x0 + (x1 - x0) * (ymin - y0) / (y1 - y0);				y = ymin;			} jiný -li (outcodeOut & ŽE JO) {  // bod je napravo od okna klipu				y = y0 + (y1 - y0) * (xmax - x0) / (x1 - x0);				X = xmax;			} jiný -li (outcodeOut & VLEVO, ODJET) {   // bod je nalevo od okna klipu				y = y0 + (y1 - y0) * (xmin - x0) / (x1 - x0);				X = xmin;			}			// Nyní přesuneme vnější bod do průsečíku a ořízneme jej			// a připravte se na další průchod.			-li (outcodeOut == outcode0) {				x0 = X;				y0 = y;				outcode0 = ComputeOutCode(x0, y0);			} jiný {				x1 = X;				y1 = y;				outcode1 = ComputeOutCode(x1, y1);			}		}	}}