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.
more turn-based-y
authornemo
Wed, 21 Jan 2015 16:00:08 -0500
changeset 10806 02ef8815ec9d
parent 10805 a96a69841653
child 10807 66cde98f8cbe
more turn-based-y
hedgewars/uGearsHandlersMess.pas file | annotate | diff | comparison | revisions 
--- a/hedgewars/uGearsHandlersMess.pas	Sun Jan 18 22:48:23 2015 -0500
+++ b/hedgewars/uGearsHandlersMess.pas	Wed Jan 21 16:00:08 2015 -0500
@@ -1771,7 +1771,10 @@
         Gear^.dY:= Gear^.dY*airFriction
         end;
     doStepFallingGear(Gear);
-    if (Gear^.Angle = 0) or (Gear^.Hedgehog = nil) or (Gear^.Hedgehog^.Gear = nil) then
+    if (TurnTimeLeft = 0) and ((Gear^.dX.QWordValue + Gear^.dY.QWordValue) > _0_02.QWordValue) then
+        AllInactive := false;
+
+    if (TurnTimeLeft = 0) or (Gear^.Angle = 0) or (Gear^.Hedgehog = nil) or (Gear^.Hedgehog^.Gear = nil) then
         begin
         Gear^.Hedgehog:= nil;
         targ:= nil;
hedgewars