changeset 9723 | 31d10d684e90 |
parent 9721 | 1833dadcebf0 |
child 9724 | b3fefde4cff7 |
--- a/hedgewars/uGearsHandlersMess.pas Fri Nov 29 15:53:46 2013 +0400 +++ b/hedgewars/uGearsHandlersMess.pas Fri Nov 29 18:46:32 2013 +0100 @@ -2068,6 +2068,7 @@ for i:= 0 to 3 do begin + AddVisualGear(hwRound(Gear^.X) + hwSign(Gear^.dX) * (10 + 6 * i), hwRound(Gear^.Y) + 12 + Random(6), vgtDust); AmmoShove(Gear, 30, 25); Gear^.X := Gear^.X + Gear^.dX * 5 end;