diff -r 266fe9f1e5a9 -r c8aba48f38dc hedgewars/GSHandlers.inc --- a/hedgewars/GSHandlers.inc Mon Oct 29 14:32:54 2012 +0400 +++ b/hedgewars/GSHandlers.inc Mon Oct 29 09:35:16 2012 -0400 @@ -5254,8 +5254,8 @@ // Gear is shrunk so it can actually escape the hog without carving into the terrain if (Gear^.Radius = 6) and (Gear^.CollisionMask = $FFFF) then Gear^.Radius:= 16; if Gear^.Damage > 100 then Gear^.CollisionMask:= 0 - else if Gear^.Damage > 20 then - if GetRandom(max(2,10-Gear^.Damage div 10)) = 0 then Gear^.CollisionMask:= 0; + else if Gear^.Damage > 30 then + if GetRandom(max(4,18-Gear^.Damage div 10)) < 3 then Gear^.CollisionMask:= 0; Gear^.Damage:= 0; if Gear^.Timer > 0 then dec(Gear^.Timer); if (Gear^.State and gstMoving <> 0) and (Gear^.State and gstCollision = 0) then