вначале бы вроде всё прекрасно...
For i=1 To CountCollisions(player)
If CollisionEntity( player,i )
cy#=CollisionNY( player,i)
If cy#<=0
Gravity=0
Else
Gravity=1
EndIf
EndIf
Next
но когда прыгаеш, гравитация срабатывает только когда столкнёшся с потолком, а иногда и вовсе прилипаешь к потолку.
