# HG changeset patch # User unc0rr # Date 1171304051 0 # Node ID 933ed65b55d1da5282b643efce327dda85072a5e # Parent 3f806cadb4e3e5f74d5b93b06340c316afa9b184 Follow bombs and mines thrown by plane diff -r 3f806cadb4e3 -r 933ed65b55d1 hedgewars/GSHandlers.inc --- a/hedgewars/GSHandlers.inc Sun Feb 11 22:10:35 2007 +0000 +++ b/hedgewars/GSHandlers.inc Mon Feb 12 18:14:11 2007 +0000 @@ -1024,8 +1024,8 @@ begin dec(Gear^.Health); case Gear^.State of - 0: AddGear(hwRound(Gear^.X), hwRound(Gear^.Y), gtAirBomb, 0, Gear^.Tag * cBombsSpeed, 0, 0); - 1: AddGear(hwRound(Gear^.X), hwRound(Gear^.Y), gtMine, 0, Gear^.Tag * cBombsSpeed, 0, 0); + 0: FollowGear:= AddGear(hwRound(Gear^.X), hwRound(Gear^.Y), gtAirBomb, 0, Gear^.Tag * cBombsSpeed, 0, 0); + 1: FollowGear:= AddGear(hwRound(Gear^.X), hwRound(Gear^.Y), gtMine, 0, Gear^.Tag * cBombsSpeed, 0, 0); end; Gear^.dX:= Gear^.dX + Gear^.Tag * cBombsDistance end;