hedgewars/uGears.pas
changeset 4248 e127b3d26248
parent 4240 4e81670e52aa
child 4254 47515c926984
--- a/hedgewars/uGears.pas	Fri Nov 12 14:54:53 2010 +0100
+++ b/hedgewars/uGears.pas	Fri Nov 12 15:20:54 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;