hedgewars/GSHandlers.inc
changeset 5137 b6140f35735f
parent 5128 3c65326bb713
child 5139 090a8b8d1083
--- a/hedgewars/GSHandlers.inc	Sun Apr 10 14:04:56 2011 -0400
+++ b/hedgewars/GSHandlers.inc	Sun Apr 10 17:25:34 2011 -0400
@@ -380,7 +380,7 @@
     dec(Gear^.Timer);
     if Gear^.Timer = 1000 then // might need adjustments
         case Gear^.Kind of 
-            gtBomb: makeHogsWorry(Gear^.X, Gear^.Y, 50);
+            gtGrenade: makeHogsWorry(Gear^.X, Gear^.Y, 47);
             gtClusterBomb: makeHogsWorry(Gear^.X, Gear^.Y, 20);
             gtWatermelon: makeHogsWorry(Gear^.X, Gear^.Y, 75);
             gtHellishBomb: makeHogsWorry(Gear^.X, Gear^.Y, 90);
@@ -404,7 +404,7 @@
     if Gear^.Timer = 0 then
     begin
         case Gear^.Kind of 
-            gtBomb: doMakeExplosion(hwRound(Gear^.X), hwRound(Gear^.Y), 50, Gear^.Hedgehog, EXPLAutoSound);
+            gtGrenade: doMakeExplosion(hwRound(Gear^.X), hwRound(Gear^.Y), 47, Gear^.Hedgehog, EXPLAutoSound);
             gtBall: doMakeExplosion(hwRound(Gear^.X), hwRound(Gear^.Y), 40, Gear^.Hedgehog, EXPLAutoSound);
             gtClusterBomb: 
                 begin