79 procedure OnUsedAmmo(Ammo: PHHAmmo);

    79 procedure OnUsedAmmo(Ammo: PHHAmmo);

    80 function  TeamSize(p: PTeam): Longword;

    80 function  TeamSize(p: PTeam): Longword;

    81 procedure RecountTeamHealth(team: PTeam);

    81 procedure RecountTeamHealth(team: PTeam);

    82 

    82 

    83 implementation

    83 implementation

    85 const MaxTeamHealth: integer = 0;

    85 const MaxTeamHealth: integer = 0;

    86 

    86 

    87 procedure FreeTeamsList; forward;

    87 procedure FreeTeamsList; forward;

    88 

    88 

    89 procedure SwitchHedgehog;

    89 procedure SwitchHedgehog;