--- a/hedgewars/GSHandlers.inc	Sun Nov 07 20:33:34 2010 +0300
+++ b/hedgewars/GSHandlers.inc	Sun Nov 07 20:36:16 2010 +0300
@@ -1769,7 +1769,7 @@
 
     AmmoShove(Gear, 30, 115);
 
-    HHGear^.State := HHGear^.State and not gstNoDamage;
+    HHGear^.State := (HHGear^.State and (not gstNoDamage)) or gstMoving;
     Gear^.Timer := 250;
     Gear^.doStep := @doStepIdle
 end;
@@ -1790,7 +1790,8 @@
         Gear^.X := Gear^.X + Gear^.dX * 5
     end;
 
-    HHGear^.State := HHGear^.State and not gstNoDamage;
+    HHGear^.State := (HHGear^.State and (not gstNoDamage)) or gstMoving;
+
     Gear^.Timer := 250;
     Gear^.doStep := @doStepIdle
 end;