Показать сообщение отдельно
Старый 01.01.2012, 12:36   #1
polopok
ПроЭктировщик
 
Регистрация: 17.07.2009
Сообщений: 182
Написано 51 полезных сообщений
(для 71 пользователей)
Примеры сокращения кода :

Y = ( KeyDown(203) ) - ( KeyDown(205) )
TurnEntity entity_name,0, Y ,0

; мерцание объекта
EntityAlpha entity_name, Sin( MilliSecs() )*0.5+0.5

; прибавление и сброс на 0
if KeyHit(57) and nomer <4 Then nomer = nomer+1 Else if nomer >3 Then nomer =0

;пустой цикл: ожидает нажатие мыши или клавиатуры,завершает программу
Repeat :Until GetMouse()<>0 Or GetKey()<>0 :End

;цвет меняется синусоидально
Color 0,0 , 64 +Sin ( MilliSecs() /10)*32

пока всё...
(Offline)
 
Ответить с цитированием