hedgewars/uGears.pas
changeset 4197 dad127904958
parent 4182 5240a84df702
child 4198 55814f1ef60a
--- a/hedgewars/uGears.pas	Sun Nov 07 14:24:00 2010 -0500
+++ b/hedgewars/uGears.pas	Sun Nov 07 20:27:05 2010 +0100
@@ -365,9 +365,9 @@
                 gear^.Elasticity:= _0_55;
                 gear^.Friction:= _0_995;
                 if cMinesTime < 0 then
-                    gear^.Timer:= getrandom(6)*1000
+                    gear^.Timer:= getrandom(51)*100
                 else
-                    gear^.Timer:= cMinesTime*1;
+                    gear^.Timer:= cMinesTime*1000;
                 end;
        gtSMine: begin
                 gear^.Health:= 10;
@@ -890,7 +890,7 @@
                 and not isInMultiShoot then
                 begin
                 if (TurnTimeLeft = 5000)
-                    and (cHedgehogTurnTime >= 10000)
+                    and (cHedgehogTurnTime >= 10)
                     and (not PlacingHogs)
                     and (CurrentHedgehog^.Gear <> nil)
                     and ((CurrentHedgehog^.Gear^.State and gstAttacked) = 0) then