changeset 10125 | 7a77a819a94d |
parent 10123 | 64e72781d344 |
child 10131 | 4b4a043111f4 |
--- a/hedgewars/uGearsHandlersMess.pas Sun Feb 09 00:44:29 2014 +0400 +++ b/hedgewars/uGearsHandlersMess.pas Sun Feb 09 18:35:11 2014 +0100 @@ -1248,10 +1248,12 @@ Gear^.Tag := 0; if Gear^.Damage > 5 then + begin if Gear^.AmmoType = amDEagle then AmmoShove(Gear, 7, 20) - else - AmmoShove(Gear, Gear^.Timer, 20); + else + AmmoShove(Gear, Gear^.Timer, 20); + end; CheckGearDrowning(Gear); dec(i) until (i = 0) or (Gear^.Damage > Gear^.Health) or ((Gear^.State and gstDrowning) <> 0);