IMAGE

[DenisKretov]

как сделать что бы картинка вылетала на середину экрана сверху?

[Bagration]

Сообщение от DenisKretov

как сделать что бы картинка вылетала на середину экрана сверху?

По типу титров? Дык там кажись во время рисования прибавляешь к Y координате определенное число. И если Y координата дошла до низа экрана, то рисовать заного. Пиши в личку. Где то у меня код был с титрами.

[DRAG]

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

[DenisKretov]

Спасибо!