Помогите, пожалуйста, с написанием проги в Paskal ABC

[Quadrider]

Помогите, пожалуйста, набросать программу, которая заставит двигаться круг или линию при нажатии какой-либо кнопки. Хотя бы в одну сторону.
Очень хочу понять, как это работает, но не получается(
Заранее спасибо:3

[ZX Spectrum-128]

http://www.pandia.ru/text/77/412/1221.php

[Quadrider]

Я умею делать просто движение) мне нужно, чтобы он двигался, только когда я на кнопку нажму)
Или я не заметила там?

[ZX Spectrum-128]

http://pascalabc.net/downloads/pabcn..._Help_Web.html
В самом конце. "Движение окна с помощью клавиатуры".

uses GraphABC;
var
  step,x,y:integer;
procedure KeyDown(Key: integer);
begin
   case Key of
  VK_Left:  x:=x-step;
  VK_Right: x:=x+step;
  VK_Up:    y:=y-step;
  VK_Down:  y:=y+step;
   end;
end;    
begin
  // Привязка обработчиков к событиям
  x:=WindowWidth div 2;
  y:=WindowHeight div 2;
  step:=5;
  OnKeyDown := KeyDown;
    begin
      LockDrawing;
      while true do
      begin
        Window.Clear;
        Brush.Color := clGreen;
        Ellipse(x,y,x+100,y+100);
        Redraw;
        Sleep(1);
      end;
    end;
end.

Кстати, с анимацией без мерцания разработчики немножко ... погорячились
Мерцает просто ужасно

[Quadrider]

Спасибо огромное:3
Да с мерцанием может разберусь:D