hedgewars/uAIMisc.pas
changeset 7426 55b49cc1f33a
parent 7385 4acb5c021cb9
child 7432 6dc7ccc0b043
--- a/hedgewars/uAIMisc.pas	Tue Jul 24 18:53:42 2012 -0400
+++ b/hedgewars/uAIMisc.pas	Wed Jul 25 10:56:14 2012 -0400
@@ -645,7 +645,7 @@
         Gear^.Y:= Gear^.Y + Gear^.dY;
         if (not Gear^.dY.isNegative) and (TestCollisionYwithGear(Gear, 1) <> 0) then
             begin
-            Gear^.State:= Gear^.State and not (gstMoving or gstHHJumping);
+            Gear^.State:= Gear^.State and (not (gstMoving or gstHHJumping));
             Gear^.dY:= _0;
             case JumpType of
                 jmpHJump:
@@ -709,7 +709,7 @@
         if TestCollisionYwithGear(Gear, 1) <> 0 then
             begin
             inc(GoInfo.Ticks, 410);
-            Gear^.State:= Gear^.State and not (gstMoving or gstHHJumping);
+            Gear^.State:= Gear^.State and (not (gstMoving or gstHHJumping));
             Gear^.dY:= _0;
             // try ljump instead of fall
             HHJump(AltGear, jmpLJump, GoInfo);