Хелп ми. этож страх и ужасть.
Компилятор: Паскаль 7.0
KeyDown(key) {KeyDown делает:
if (keypressed) then
key:=ord(readkey);
if key=0
then
key:=ord(readkey);
}
Case key of
left: begin
gotoxy(WhereX+13,wherey);
inc(i);
end;
right:begin
GotoXY(WhereX+13,WhereY);
dec(i);
end;
end;
Ну и так далее, с UP и DOwn ... В кодах клавиш я уверен. вопрос - куда закралась ЛОГИЧЕСКАЯ ошибка.? он компилируется.