hedgewars/uGearsHedgehog.pas
changeset 7598 f06d8603097c
parent 7597 1ef520fea21c
child 7602 a620319d377e
--- a/hedgewars/uGearsHedgehog.pas	Sat Aug 25 08:39:52 2012 -0400
+++ b/hedgewars/uGearsHedgehog.pas	Sat Aug 25 09:17:42 2012 -0400
@@ -636,7 +636,7 @@
                                 end;
                             gi := gi^.NextGear
                             end;
-                        ag:= AddGear(hwRound(Gear^.X), hwRound(Gear^.Y), gtAddAmmo, gstInvisible, _0, _0, GetRandom(100)+10);
+                        ag:= AddGear(hwRound(Gear^.X), hwRound(Gear^.Y), gtAddAmmo, gstInvisible, _0, _0, GetRandom(125)+25);
                         ag^.Pos:= Gear^.Pos;
                         ag^.Power:= Gear^.Power
                         end;