Вращение треугольника
| Категория реферата: Рефераты по информатике, программированию
| Теги реферата: дипломная работа по юриспруденции, реферат по физкультуре
| Добавил(а) на сайт: Karachjov.
Предыдущая страница реферата | 1 2 3 4 5
DrawText(155,75,Str2(x_c+ctr[1][3]));
DrawText(155,90,Str2(x_c+ctr[2][3])); end;
begin
RegisterBgiDriver(@vgaDrv);
K:=-1;
Time2W := 15;
SetCenter(320,240);
Angle := 0.1; grDriver := Detect; grMode:=VGAHi; {video mode VGA 640x480x16colors}
InitGraph(grDriver, grMode,'');
ErrCode := GraphResult; if ErrCode = grOk then begin
OutTextXY(1,10,'Speed : '+Str2(100-Time2W));
OutTextXY(10,60,' Corn. 1 X Y');
OutTextXY(10,75,' Corn. 2 X Y');
OutTextXY(10,90,' Corn. 3 X Y');
SetTextStyle(TriplexFont, HorizDir, 2);
OutTextXY(10,425,'(((((((((((((((((((((((((((((((((((((((((((((((((((((((((
(((((((((((((((((((((');
OutTextXY(10,415,'(((((((((((((((((((((((((((((((((((((((((((((((((((((((((
(((((((((((((((((((((');
SetColor(Black);
OutTextXY(10,420,' -Exit -Freeze '+
' -Speed -Direction ');
SetColor(LightRed);
OutTextXY(10,420,' ESC Enter Up/Down TAB
');
SetTextStyle(DefaultFont, HorizDir, 1);
Repeat ShowD Until Event.KeyCode = kbEsc;
CloseGraph; end else Writeln('Graphics error : ', GraphErrorMsg(ErrCode));
end.
Скачали данный реферат: Jakuhin, Янгосяров, Plakida, Sulimov, Тамахин, Junevich, Волков.
Последние просмотренные рефераты на тему: игра реферат, договор дипломная работа, сочинение рассуждение, образ реферат.
Категории:
Предыдущая страница реферата | 1 2 3 4 5