Имеется работающая программа в Pascal ABC.NET, как переделать её так, что она работала в простом Pascal ABC.

Кусаин Макпал в категроии Информатика, вопрос открыт 11.04.2017 в 10:05

В частности это касается того как задано перо, простой паскаль ругается, исправьте пожалуйста. Вот код: Uses GraphABC;
var x,y:integer;
begin
y:=10;
while y<200 do begin
y:=Y+10;
end;
x:=10;
while x<299 do begin
x:=x+10;
end;
Randomize;
Pen.Color:=clRed;
Pen.Width:=3;
x:=10*Round(x/10);
y:=10*Round(y/10);
MoveTo(x,y);
repeat
case Random(1,4) of
1:LineTo(PenX+10,PenY);
2:LineTo(PenX,PenY-10);
3:LineTo(PenX-10,PenY);
4:LineTo(PenX,PenY+10);
end;
Sleep(100);
until false;
end.