equal
deleted
inserted
replaced
117 procedure TeamGone(s: shortstring); |
117 procedure TeamGone(s: shortstring); |
118 procedure TeamGoneEffect(var Team: TTeam); |
118 procedure TeamGoneEffect(var Team: TTeam); |
119 function GetTeamStatString(p: PTeam): shortstring; |
119 function GetTeamStatString(p: PTeam): shortstring; |
120 |
120 |
121 implementation |
121 implementation |
122 uses uMisc, uWorld, uLocale, uAmmos, uChat, uMobile; |
122 uses uMisc, uWorld, uLocale, uAmmos, uChat, uMobile, uVariables; |
123 const MaxTeamHealth: LongInt = 0; |
123 const MaxTeamHealth: LongInt = 0; |
124 |
124 |
125 function CheckForWin: boolean; |
125 function CheckForWin: boolean; |
126 var AliveClan: PClan; |
126 var AliveClan: PClan; |
127 s: shortstring; |
127 s: shortstring; |