hedgewars/uTeams.pas
branchwebgl
changeset 8096 453917e94e55
parent 8026 4a4f21070479
parent 8054 39f8ea1a441f
child 8330 aaefa587e277
equal deleted inserted replaced
8053:2e836bebb518 8096:453917e94e55
   300         if GetRandom(2) = 0 then
   300         if GetRandom(2) = 0 then
   301              AddVoice(sndIllGetYou, CurrentTeam^.voicepack)
   301              AddVoice(sndIllGetYou, CurrentTeam^.voicepack)
   302         else AddVoice(sndJustYouWait, CurrentTeam^.voicepack)
   302         else AddVoice(sndJustYouWait, CurrentTeam^.voicepack)
   303         end
   303         end
   304     else
   304     else
       
   305         begin
       
   306         GetRandom(2); // needed to avoid extdriven desync
   305         AddVoice(sndYesSir, CurrentTeam^.voicepack);
   307         AddVoice(sndYesSir, CurrentTeam^.voicepack);
       
   308         end;
   306     if cHedgehogTurnTime < 1000000 then
   309     if cHedgehogTurnTime < 1000000 then
   307         ReadyTimeLeft:= cReadyDelay;
   310         ReadyTimeLeft:= cReadyDelay;
   308     AddCaption(Format(shortstring(trmsg[sidReady]), CurrentTeam^.TeamName), cWhiteColor, capgrpGameState)
   311     AddCaption(Format(shortstring(trmsg[sidReady]), CurrentTeam^.TeamName), cWhiteColor, capgrpGameState)
   309     end
   312     end
   310 else
   313 else