equal
deleted
inserted
replaced
70 procedure RestoreTeamsFromSave; |
70 procedure RestoreTeamsFromSave; |
71 function CheckForWin: boolean; |
71 function CheckForWin: boolean; |
72 procedure SetWeapon(weap: TAmmoType); |
72 procedure SetWeapon(weap: TAmmoType); |
73 |
73 |
74 implementation |
74 implementation |
75 uses uMisc, uStore, uWorld, uIO, uAI, uLocale, uConsole; |
75 uses uMisc, uWorld, uAI, uLocale, uConsole; |
76 const MaxTeamHealth: integer = 0; |
76 const MaxTeamHealth: integer = 0; |
77 |
77 |
78 procedure FreeTeamsList; forward; |
78 procedure FreeTeamsList; forward; |
79 |
79 |
80 function CheckForWin: boolean; |
80 function CheckForWin: boolean; |