hedgewars/uGears.pas
changeset 4225 ce9e2b05e9c1
parent 4216 184181604092
child 4238 6f1631765ebd
--- a/hedgewars/uGears.pas	Mon Nov 08 22:11:46 2010 -0500
+++ b/hedgewars/uGears.pas	Mon Nov 08 22:26:44 2010 -0500
@@ -365,9 +365,9 @@
                 gear^.Elasticity:= _0_55;
                 gear^.Friction:= _0_995;
                 if cMinesTime < 0 then
-                    gear^.Timer:= getrandom(51)*100
+                    gear^.Timer:= getrandom(6)*1000
                 else
-                    gear^.Timer:= cMinesTime*1000;
+                    gear^.Timer:= cMinesTime*1;
                 end;
        gtSMine: begin
                 gear^.Health:= 10;