Показать сообщение отдельно
Старый 27.11.2010, 18:48   #5
WhiteBlack
Нуждающийся
 
Регистрация: 11.07.2010
Сообщений: 61
Написано 3 полезных сообщений
(для 3 пользователей)
Ответ: плавное перемещение по одному нажатию

вот сделал так
flag=0
   
........
repeat
.....
If 
KeyHit(205flag=1
 
TurnTopCubes
()
.....
until keyhit(1)

Function 
TurnTopCubes()
    If 
flag=1 Then
        oldX
=EntityX(cubes(1))
        If 
oldX+20<>EntityX(cubes(1)) Then
            TranslateEntity cubes
(1), .5 00
        
EndIf    
        If 
oldX+20=EntityX(cubes(1)) Then     
            flag
=0
        
EndIf    
    EndIf
End Function 
теперь по нажатию вообще ничего не происходит, блин, где ошибка
(Offline)
 
Ответить с цитированием