246         PlaySound(sndIllGetYou, CurrentTeam^.voicepack);

   246         PlaySound(sndIllGetYou, CurrentTeam^.voicepack);

   247     ReadyTimeLeft:= 0

   247     ReadyTimeLeft:= 0

   248     end;

   248     end;

   249 

   249 

   250 perfExt_NewTurnBeginning();

   250 perfExt_NewTurnBeginning();

   251 end;

   252 end;

   252 

   253 

   253 function AddTeam(TeamColor: Longword): PTeam;

   254 function AddTeam(TeamColor: Longword): PTeam;

   254 var team: PTeam;

   255 var team: PTeam;

   255     c: LongInt;

   256     c: LongInt;

   289     inc(TeamsNumber)

   290     inc(TeamsNumber)

   290     end;

   291     end;

   291 

   292 

   292 CurrentTeam:= team;

   293 CurrentTeam:= team;

   293 AddTeam:= team;

   294 AddTeam:= team;

   295 end;

   295 end;

   296 

   296 

   297 procedure RecountAllTeamsHealth;

   297 procedure RecountAllTeamsHealth;

   298 var t: LongInt;

   298 var t: LongInt;

   299 begin

   299 begin