Mercurial Mercurial > hedgewars / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
allow brief ground touches
authornemo
Mon, 22 Jun 2009 00:27:55 +0000
changeset 2189 bf6eafc3b2e6
parent 2188 6cdf9109cc58
child 2190 cfcad6142d48
allow brief ground touches
hedgewars/GSHandlers.inc file | annotate | diff | comparison | revisions 
--- 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
hedgewars