вторник, 20 марта 2012 г.

Улитка

Текст программы:
Timer.Interval = 50
Timer.Tick = tickle
x=10
y=10
Sub tickle
  GraphicsWindow.DrawImage("C:\Documents and Settings\Pupil\Мои документы\Мои рисунки\ul1.gif", x,y)
  x=x+1
  y=y+1
EndSub

Комментариев нет:

Отправить комментарий