hedgewars/uGears.pas
changeset 4748 ce9b48de1f52
parent 4706 fea3b34cf9b0
child 4780 8571151411b3
equal deleted inserted replaced
4745:b9a9f70948da 4748:ce9b48de1f52
   793                 begin
   793                 begin
   794                 if (TotalRounds = cSuddenDTurns) and not SuddenDeathDmg and not isInMultiShoot then
   794                 if (TotalRounds = cSuddenDTurns) and not SuddenDeathDmg and not isInMultiShoot then
   795                     begin
   795                     begin
   796                     SuddenDeathDmg:= true;
   796                     SuddenDeathDmg:= true;
   797                     AddCaption(trmsg[sidSuddenDeath], cWhiteColor, capgrpGameState);
   797                     AddCaption(trmsg[sidSuddenDeath], cWhiteColor, capgrpGameState);
   798                     playSound(sndSuddenDeath)
   798                     playSound(sndSuddenDeath);
       
   799                     MusicFN:= SDMusic;
       
   800                     ChangeMusic
   799                     end
   801                     end
   800                 else if (TotalRounds < cSuddenDTurns) and not isInMultiShoot then
   802                 else if (TotalRounds < cSuddenDTurns) and not isInMultiShoot then
   801                     begin
   803                     begin
   802                     i:= cSuddenDTurns - TotalRounds;
   804                     i:= cSuddenDTurns - TotalRounds;
   803                     s:= inttostr(i);
   805                     s:= inttostr(i);