For i=1 To CountCollisions(player) If CollisionEntity( player,i ) cy#=CollisionNY( player,i) If cy#<=0 Gravity=0 EndIf Else Gravity=1 EndIf Next