hedgewars/uTeams.pas
changeset 6904 a7e40e8a8e6f
parent 6898 344b0dbd9690
child 6905 cdfb2bf05bbd
equal deleted inserted replaced
6903:5f66f3d3e131 6904:a7e40e8a8e6f
   287     begin
   287     begin
   288     if CurrentTeam^.ExtDriven then
   288     if CurrentTeam^.ExtDriven then
   289         AddVoice(sndIllGetYou, CurrentTeam^.voicepack)
   289         AddVoice(sndIllGetYou, CurrentTeam^.voicepack)
   290     else
   290     else
   291         AddVoice(sndYesSir, CurrentTeam^.voicepack);
   291         AddVoice(sndYesSir, CurrentTeam^.voicepack);
   292     if PlacingHogs or (cHedgehogTurnTime < 1000000) then
   292     if HedgehogTurnTime < 1000000 then
   293         ReadyTimeLeft:= cReadyDelay;
   293         ReadyTimeLeft:= cReadyDelay;
   294     AddCaption(Format(shortstring(trmsg[sidReady]), CurrentTeam^.TeamName), cWhiteColor, capgrpGameState)
   294     AddCaption(Format(shortstring(trmsg[sidReady]), CurrentTeam^.TeamName), cWhiteColor, capgrpGameState)
   295     end
   295     end
   296 else
   296 else
   297     begin
   297     begin