374                        amTardis: CurAmmoGear:= newGear;

   374                        amTardis: CurAmmoGear:= newGear;

   375                   end;

   375                   end;

   376         if Ammoz[CurAmmoType].Ammo.Propz and ammoprop_NeedTarget <> 0 then

   376         if Ammoz[CurAmmoType].Ammo.Propz and ammoprop_NeedTarget <> 0 then

   377             begin

   377             begin

   378             newGear^.TargetX:= TargetPoint.X;

   378             newGear^.TargetX:= TargetPoint.X;

   381             end;

   380             end;

   382 

   381 

   383         // Clear FollowGear if using on a rope/parachute/saucer etc so focus stays with the hog's movement

   382         // Clear FollowGear if using on a rope/parachute/saucer etc so focus stays with the hog's movement

   384         if altUse then FollowGear:= nil;

   383         if altUse then FollowGear:= nil;

   385 

   384 

   420            if not CurrentTeam^.ExtDriven and

   419            if not CurrentTeam^.ExtDriven and

   421              ((Ammoz[CurAmmoType].Ammo.Propz and ammoprop_Power) <> 0) then SendIPC('a');

   420              ((Ammoz[CurAmmoType].Ammo.Propz and ammoprop_Power) <> 0) then SendIPC('a');

   422            AfterAttack;

   421            AfterAttack;

   423            end

   422            end

   424         end else Message:= Message and not gmAttack;

   423         end else Message:= Message and not gmAttack;

   426 end;

   426 end;

   427 

   427 

   428 procedure AfterAttack;

   428 procedure AfterAttack;

   429 var s: shortstring;

   429 var s: shortstring;

   430     a: TAmmoType;

   430     a: TAmmoType;