--- a/hedgewars/GSHandlers.inc	Sun Sep 11 11:45:01 2005 +0000
+++ b/hedgewars/GSHandlers.inc	Sun Sep 11 21:02:11 2005 +0000
@@ -637,6 +637,6 @@
 if Gear.Damage > 0 then
    begin
    DeleteGear(Gear);
-   doMakeExplosion(round(Gear.X), round(Gear.Y), 50, EXPLAutoSound)
+   doMakeExplosion(round(Gear.X), round(Gear.Y), 20, EXPLAutoSound)
    end
 end;