changeset 2431 | 23242609c44b |
parent 2376 | ece7b87f1334 |
child 2579 | e5e4ebf528b5 |
--- a/hedgewars/uTeams.pas Mon Oct 12 16:50:42 2009 +0000 +++ b/hedgewars/uTeams.pas Mon Oct 12 16:53:01 2009 +0000 @@ -208,7 +208,10 @@ procedure AfterSwitchHedgehog; var g: PGear; begin +inc(CurrentTeam^.Clan^.TurnNumber); + SwitchNotHeldAmmo(CurrentHedgehog^); + with CurrentHedgehog^ do begin with Gear^ do @@ -222,8 +225,6 @@ FollowGear:= Gear end; -inc(CurrentTeam^.Clan^.TurnNumber); - ResetKbd; cWindSpeed:= rndSign(GetRandom * cMaxWindSpeed);