Реферат: Создание игры

line(0,479,0,430);

line(0,430,639,430);

line(639,430,639,479);

line(639,479,0,479);

setfillstyle(7,5);

floodfill(10,470,3);

end;

procedure PVO;{Прорисовка средства ПВО}

begin

setcolor(6);

line(5,37,45,37);line(45,37,47,39);

line(47,40,37,50);line(37,50,7,50);

line(7,50,3,39);line(3,38,5,37);

circle(15,43,6);circle(30,43,6);

circle(6,39,2);circle(44,39,2);

setfillstyle(1,6);

floodfill(41,43,6);floodfill(22,49,6);

floodfill(7,43,6);floodfill(10,39,6);

setcolor(2);

line(3,39,3,34);line(3,34,20,34);

line(21,34,21,23);line(21,23,33,23);

line(33,23,47,36);line(47,36,47,36);

line(47,36,3,36);

line(36,26,29,26);line(29,27,30,30);

line(31,31,42,31);

setfillstyle(1,2);floodfill(26,32,2);

setcolor(9);

line(8,33,8,23);line(9,24,9,13);

line(9,13,11,12);line(11,12,11,9);line(11,12,13,13);