changeset 3100 | 5fe9c4ac4c99 |
parent 3096 | 9330eead14fa |
child 3101 | e128eff95fca |
--- a/hedgewars/GSHandlers.inc Sat Mar 27 05:45:45 2010 +0000 +++ b/hedgewars/GSHandlers.inc Sat Mar 27 08:59:10 2010 +0000 @@ -2909,7 +2909,7 @@ doStepFallingGear(Gear); if (Gear^.State and gstCollision) <> 0 then begin - doMakeExplosion(hwRound(Gear^.X), hwRound(Gear^.Y), 25, EXPLAutoSound); + doMakeExplosion(hwRound(Gear^.X), hwRound(Gear^.Y), 40, EXPLAutoSound + EXPLPoisoned); DeleteGear(Gear); exit end;