Amaliy matematika va intellektual texnologiyalar

Ko'pburchak va murakkab sohalarni bo'yash (Rendering) 
Kompyuter grafikasida soha 
2 ta usul 
bilan berilishi mumkin:
1.
Sohani tashkil etuvchi tashqi nuqtalari bilan, ya’ni sohani ichida yotuvchi har 
bir piksel biror bir rang (oldcolor) bilan beriladi (chegaradagi piksellar bu qiymatga 
ega emas).
2.
Soha chegarasi bilan berilishi mumkin , ya’ni chegaradagi piksellar biror bir 
rang bilan (bcolor) beriladi (chegara ichidagi piksellar bu qiymatga ega emas). Shu 
sababli sohani bo'yash, algoritmlari ikki turga bo'linadi. Bundan tashqari 4 va 8 
bog'lanishlik sohalar uchun algoritmlar mavjud. Ichki oldcolor rang bilan berilgan 
yangi newcolor rang bilan 4-bog'lanishlik sohani bo'yash oddiy rekursiya algoritmini 
keltiramiz:
Procedure fill4(x, y: integer;
Newcolor, oldcolor: word);
Begin if (GetpPixel(x,y)=oldcolor)
Then begin
PutPixel (x,y,newcolor);
Fill4(x, y-1, newcolor, oldcolor);
fll4(x, y+1, newcolor, oldcolor);
Fill4(x-1, y, newcolor, oldcolor);
Fill4(x+1, y, newcolor, oldcolor);
End;
End;
{fill}
Bu yerda, (x,y) ixtiyoriy sohani ichida yotuvchi nuqta, oldcolor qiymatiga ega 

---

8 
piksel. Chegaradagi rangi bilan berilgan (bcolor) sohani bo'yash algoritmi 
quyidagicha:
Procedure
bfill4(x, y: integer; Bcolor, newcolor: word);
Begin
If GetPixel(x, y)<>bcolor and
GetPixel(x, y)<>newcolor
Then begin
PutPixel (x, y, newcolor);
Bfill4(x, y-1, bcolor, newcolor);
Bfill4(x, y+1, bcolor, newcolor);
Bfill4(x-1, y, bcolor, newcolor);
Bfill4(x+1, y, bcolor, newcolor);
End;
End;
{bfill4}
Bu yerda, (x,y) - sohani ichida yotuvchi biror bir nuqta (piksel), 
newcolor 
bo'yash 
rangi. Keltirilgan algoritmlarni 8-bog'lanishlik sohalarga 4-ta yo'nalishni 8-ta 
yo'nalishga almashtirish orqali osongina o'tkazish mumkin.