Показать сообщение отдельно
Старый 02.02.2010, 23:32   #621
KingMaks
Знающий
 
Аватар для KingMaks
 
Регистрация: 26.11.2009
Сообщений: 313
Написано 35 полезных сообщений
(для 95 пользователей)
Ответ: Вопрос-Ответ (для новичков)

Blender

;------Гравитация
If jump = 0 Then 
If KeyHit(57) Then gravity = 0.1 : gravity2 = 0.03:jump = 1:Animate player,3,1,player_jump,0
End If
If Not EntityCollided(player,typesolid) Then jump = 1
If jump = 1 Then gravity = gravity + gravity2: gravity2 =gravity2 - 0.002:jump = 1

InGround = 0
EntCol = EntityCollided(player,typesolid)
If EntCol <> 0 Then
  For n = 1 To CountCollisions(player)
    If CollisionNY(player,n) > 0.5 Then
      InGround = 1
      If AnimSeq(player) = 4 Then Animate player,1,1,idle,0
      Exit
    End If
  Next
End If

If InGround = 1 Then
 gravity = 0:gravity2 = 0:jump = 0
End If

TranslateEntity player,0,gravity/2,0

End Function
Вот те пример моей гравитации с прыжком, работает отлично
__________________
StimuL
Maks
(Offline)
 
Ответить с цитированием
Эти 4 пользователя(ей) сказали Спасибо KingMaks за это полезное сообщение:
Blender (03.02.2010), Reizel (04.02.2010), Reks888 (03.02.2010), RlexGm (04.02.2010)