forum.boolean.name

forum.boolean.name (http://forum.boolean.name/index.php)

- 2D-программирование (http://forum.boolean.name/forumdisplay.php?f=13)

- - IMAGE (http://forum.boolean.name/showthread.php?t=5078)

DenisKretov

20.11.2007 21:56

IMAGE

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

Bagration

20.11.2007 22:10

Re: IMAGE

Цитата:

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

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

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

DRAG	20.11.2007 22:15

Re: IMAGE

Код:

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

21.11.2007 10:43

Re: IMAGE

Спасибо!

Часовой пояс GMT +4, время: 23:26.