hedgewars/uTeams.pas
changeset 1669 b709e061577e
parent 1657 dde8f60d3e07
child 1678 c8deca7b1e3c
equal deleted inserted replaced
1668:ceee3f20c784 1669:b709e061577e
   222 {$IFDEF DEBUGFILE}AddFileLog('Wind = '+FloatToStr(cWindSpeed));{$ENDIF}
   222 {$IFDEF DEBUGFILE}AddFileLog('Wind = '+FloatToStr(cWindSpeed));{$ENDIF}
   223 ApplyAmmoChanges(CurrentHedgehog^);
   223 ApplyAmmoChanges(CurrentHedgehog^);
   224 
   224 
   225 if not CurrentTeam^.ExtDriven then SetBinds(CurrentTeam^.Binds);
   225 if not CurrentTeam^.ExtDriven then SetBinds(CurrentTeam^.Binds);
   226 
   226 
   227 SetVoicePack(CurrentTeam^.voicepack);
       
   228 
       
   229 bShowFinger:= true;
   227 bShowFinger:= true;
   230 
   228 
   231 if (CurrentTeam^.ExtDriven or (CurrentHedgehog^.BotLevel > 0)) then
   229 if (CurrentTeam^.ExtDriven or (CurrentHedgehog^.BotLevel > 0)) then
   232 	PlaySound(sndIllGetYou, false)
   230 	PlaySound(sndIllGetYou, false, CurrentTeam^.voicepack)
   233 else
   231 else
   234 	PlaySound(sndYesSir, false);
   232 	PlaySound(sndYesSir, false, CurrentTeam^.voicepack);
   235 
   233 
   236 TurnTimeLeft:= cHedgehogTurnTime
   234 TurnTimeLeft:= cHedgehogTurnTime
   237 end;
   235 end;
   238 
   236 
   239 function AddTeam(TeamColor: Longword): PTeam;
   237 function AddTeam(TeamColor: Longword): PTeam;