even faster and no more warning
authorkoda
Sat, 12 Nov 2011 21:07:53 +0100
changeset 6333 350490edcd11
parent 6331 27b82275dc34
child 6335 f753b290d966
even faster and no more warning
hedgewars/HHHandlers.inc
--- a/hedgewars/HHHandlers.inc	Sat Nov 12 12:41:12 2011 -0500
+++ b/hedgewars/HHHandlers.inc	Sat Nov 12 21:07:53 2011 +0100
@@ -1131,7 +1131,7 @@
 if (Gear^.Message and (gmAllStoppable or gmLJump or gmHJump) = 0) and
    (Gear^.State and (gstHHJumping or gstHHHJump or gstAttacking) = 0) and
    not Gear^.dY.isNegative and
-   (GameTicks mod (100*hwRound(cMaxWindSpeed*2/cGravity)) = 0) and 
+   (GameTicks mod (200*LongWord(hwRound(cMaxWindSpeed/cGravity))) = 0) and 
    (TestCollisionYwithGear(Gear, 1) and lfIce <> 0) then
     begin
     slope:= CalcSlopeBelowGear(Gear);