hedgewars/GSHandlers.inc
changeset 2189 bf6eafc3b2e6
parent 2188 6cdf9109cc58
child 2190 cfcad6142d48
--- a/hedgewars/GSHandlers.inc	Mon Jun 22 00:22:42 2009 +0000
+++ b/hedgewars/GSHandlers.inc	Mon Jun 22 00:27:55 2009 +0000
@@ -2241,7 +2241,8 @@
     or (HHGear^.Damage <> 0)
 	or CheckGearDrowning(HHGear)
     or (TurnTimeLeft = 0) 
-    or TestCollisionYwithGear(HHGear, 1)
+    // allow brief ground touches - to be fair on this, might need another counter
+    or (((GameTicks and $1FF) = 0) and TestCollisionYwithGear(HHGear, 1))
 	or ((Gear^.Message and gm_Attack) <> 0) then
 	begin
 	with HHGear^ do