Основы компьютерной графики для программистов. Казанцев А.В. - 41 стр.

UptoLike

ВУЗ: 

КФУ | Казань

Составители: 

Рубрика: 

Основы компьютерной графики для программистов 41
____________________________________________________________________________________________________________________
http://www.ksu.ru/persons/9134.ru.html
end
else if outcode1[4] then
begin {отбросить левую часть}
y1:=x1+(y2-y1)*(ymin-x1)/(x2-x1);
x1:=xmin;
end;
end;
end;
until done;
if accept then
Line(x1,y1,x2,y2); {нарисовать отрезок}
end;{procedure} 
Основы компьютерной графики для программистов                                                                  41
____________________________________________________________________________________________________________________


   end
else if outcode1[4] then
   begin {отбросить левую часть}
     y1:=x1+(y2-y1)*(ymin-x1)/(x2-x1);
     x1:=xmin;
   end;
  end;
 end;
until done;
  if accept then
   Line(x1,y1,x2,y2); {нарисовать отрезок}
end;{procedure}




http://www.ksu.ru/persons/9134.ru.html

Страницы