Реферат: Программ-игра «Морской бой», с использованием анимированных графических объектов и возможностью управлять их движением с помощью клавиатуры

Str(old_score,s_score);

OutTextXY(70,460,s_score);

old_score:=score;

end;

SetColor(white);

SetTextJustify(LeftText,BottomText);

OutTextXY(20,460,'Score');

Str(score,s_score);

OutTextXY(70,460,s_score);

delay(150); {Временная задержка главного цикла}

until keypressed;

{Обработка нажатия клавиш}

c:=readkey;

case c of

#75: begin {влево}

if tarx>220 then begin

oldx:=tarx;

tarx:=tarx-5;

b:=true;

end;

end;

#77: begin {вправо}

if tarx<420 then begin

oldx:=tarx;

tarx:=tarx+5;

b:=true;

end;

end;

#32: begin {пробел "Выстрел"}