hedgewars/uTeams.pas
changeset 14053 084db65b3657
parent 14047 006f97a6f6a7
child 14078 ff6e67066fd0
equal deleted inserted replaced
14052:321bc980fcaa 14053:084db65b3657
   433         TurnTimeLeft:= cHedgehogTurnTime;
   433         TurnTimeLeft:= cHedgehogTurnTime;
   434         TagTurnTimeLeft:= 0;
   434         TagTurnTimeLeft:= 0;
   435         NextClan:= false;
   435         NextClan:= false;
   436         end;
   436         end;
   437 
   437 
   438     if (GameFlags and gfSwitchHog) <> 0 then
   438     if ((GameFlags and gfSwitchHog) <> 0) and not(CurrentTeam^.hasGone) then
   439         begin
   439         begin
   440         g:= AddGear(hwRound(CurrentHedgehog^.Gear^.X), hwRound(CurrentHedgehog^.Gear^.Y), gtSwitcher, 0, _0, _0, 0);
   440         g:= AddGear(hwRound(CurrentHedgehog^.Gear^.X), hwRound(CurrentHedgehog^.Gear^.Y), gtSwitcher, 0, _0, _0, 0);
   441         CurAmmoGear:= g;
   441         CurAmmoGear:= g;
   442         lastGearByUID:= g;
   442         lastGearByUID:= g;
   443         end
   443         end