[sidiakin]

Я наверно плохо объяснил. Вот код:

var
keyCode: integer;

x,y: integer;

dir_y: integer;
begin

repeat

if dir_y = 0 then y := y + 1;
if dir_y = 1 then y := y - 1;
SetColor(255, 255, 255);
FillRect(0, 0, GetWidth, GetHeight);
SetColor(0, 0, 0);
DrawText('Hello world', x, y);
Repaint;
Delay(50);
until (keyCode = KE_KEY0);

Я не пойму, за счет чего происходит движение иконки.
dir_y=0, как это работает? Я не понял, как можно осуществить анимацию при помощи 0 и 1??? Пробовал на других языках не получается, а здесь получается. Как это работает?