--- a/hedgewars/uGearsList.pas	Mon May 04 17:48:57 2015 +0300
+++ b/hedgewars/uGearsList.pas	Mon May 04 17:49:15 2015 +0300
@@ -237,7 +237,8 @@
                 end;
   gtMelonPiece: begin
                 gear^.AdvBounce:= 1;
-                gear^.Density:= _2
+                gear^.Density:= _2;
+                gear^.Radius:= 4
                 end;
     gtHedgehog: begin
                 gear^.AdvBounce:= 1;
@@ -467,8 +468,11 @@
                 gear^.Tint:= gear^.Hedgehog^.Team^.Clan^.Color shl 8 or $FF
                 end;
      gtAirBomb: begin
+                gear^.AdvBounce:= 1;
                 gear^.Radius:= 5;
                 gear^.Density:= _2;
+                gear^.Elasticity:= _0_55;
+                gear^.Friction:= _0_995
                 end;
    gtBlowTorch: begin
                 gear^.Radius:= cHHRadius + cBlowTorchC;