Как заставить рисунок двигаться?

1. Рисуем объект цветом отличным от цвета фона.
2. Рисуем объект цветом фона.
3. Изменяем координаты.
4. Повторяем 1-3 столько раз сколько потребуется.

REM ‘Движущийся круг
SCREEN 1
x = 1
y = 1
REM ‘цвет фона - 0(черный), цвет рисунка - 1
FOR i = 1 TO 150

CIRCLE (x, y), 2, 1                                               Рисуем объект цветом отличным от цвета рисунка.
REM FOR j = 1 TO 250000                                  задержка
NEXT j
CIRCLE (x, y), 2, 0                                                Рисуем объект цветом цветом фона
 x = x + 2                                                                Изменяем координаты
y = y + 1

NEXT i
END

Оператор LOCATE - перемещает курсор на экране в указанную позицию.

- INKEY$ возвращает нулевую строку символов, если нет символа для
возврата.
- Для стандартных клавиш INKEY$ возвращает 1-байтовую строку символов,
содержащую считанный символ.
- Для расширенных клавиш INKEY$ возвращает 2-байтовую строку символов,
состоящую из символа нуля (ASCII 0) и скан-кода клавиатуры.