Управление автомобилем клавишами. Необходимы исправления - Pascal ABC

Формулировка задачи:

Всем привет. Вот нужна помощь, движение картинкой идет не так как надо... вот к примеру когда машинку влево двигаю... получается только с третьего нажатия сдвинуть... вот собственно пока все))

uses crt,graphabc,abcobjects;
var
Car:pictureabc;
x,y,k,img,img2,img3,img4,img5,img6,img7,img8,g:integer;
begin
car:=pictureabc.create(360,340,'bollid.png');
x:=60;y:=370;
line(300,0,300,500);
line(475,0,475,500);
repeat
if (readkey=#75) and (x<120) then begin car.moveon(50,0);x:=x+60; end else
if (readkey=#77) and (x>0) then begin car.moveon(-50,0);x:=x-60;end;
until readkey=#27;
end.

Решение задачи: «Управление автомобилем клавишами. Необходимы исправления»

Листинг программы

uses crt,graphabc,abcobjects;
var
Car:pictureabc;
x,y,k,img,img2,img3,img4,img5,img6,img7,img8,g:integer;
c: char;
begin
car:=pictureabc.create(360,340,'bollid.png');
x:=60;y:=370;
line(300,0,300,500);
line(475,0,475,500);
repeat
c:=readkey;
if (c=#75) and (x<120) then begin car.moveon(50,0);x:=x+60; end else
if (c=#77) and (x>0) then begin car.moveon(-50,0);x:=x-60;end;
until c=#27;
end.

Объяснение кода листинга программы

Установка начального положения автомобиля
Создание объекта pictureabc для отображения автомобиля
Задание координат начальной позиции автомобиля (x,y)
Отображение автомобиля на экране
Проверка нажатия клавиш #75 и #77
Если нажата клавиша #75 и x меньше 120, то автомобиль двигается вперед на 50 пикселей и x увеличивается на 60
Если нажата клавиша #77 и x больше 0, то автомобиль двигается назад на 50 пикселей и x уменьшается на 60
Пока не нажата клавиша #27, повторять шаги 5-7
Завершение работы программы