Тема: Как сделать?
Показать сообщение отдельно
Старый 10.01.2008, 12:22   #10
Данил
Модератор
 
Аватар для Данил
 
Регистрация: 11.07.2007
Сообщений: 2,910
Написано 686 полезных сообщений
(для 1,694 пользователей)
Игровой проект: Создал(а) один игровой проект в рамках форума boolean.name Игровой проект: Создал(а) один игровой проект в рамках форума boolean.name 
Всего наград 8
Ответ: Как сделать?
Global x:Float=640/2 , y:Float=480/2
Global speedx:Float=-.5, speedy:Float=4

Graphics 640,480

While Not KeyDown (Key_escape)
'Cls
Plot X,Y
If SpeedY>-2 Then
X:-SpeedX
Y:-SpeedY
SpeedY:-.05
End If
Flip
Wend
сделал так, как показано на рисунке оО ...
(Offline)
 
 Ответить с цитированием