Global pic = LoadImage("picture.jpg")
; кординаты картинки
x = 400
y = -100
; скорость перемещения
speed = 1
; кординаты куда должна лететь
x_end = 400 ; если будет ровно лететь то Х не менять
y_end = 350
While Not KeyDown(1)
cls
DrawImage pic,x,y
if( x < x_end ) Then x+=speed
if( x > x_end ) Then x-=speed
if( y < y_end ) Then y+=speed
if( y > y_end ) Then y-=speed
Flip
Wend