hedgewars/uStats.pas
changeset 5638 e35ba2a400d8
parent 5203 b77f28facca6
child 6014 b432c4b9cc9b
--- a/hedgewars/uStats.pas	Sun Aug 21 15:11:00 2011 -0400
+++ b/hedgewars/uStats.pas	Sun Aug 21 19:29:04 2011 -0400
@@ -99,11 +99,11 @@
     inc(CurrentHedgehog^.stats.FinishedTurns);
 
     if (CurrentHedgehog^.stats.DamageGiven = DamageTotal) and (DamageTotal > 0) then
-        PlaySound(sndFirstBlood, CurrentTeam^.voicepack)
+        AddVoice(sndFirstBlood, CurrentTeam^.voicepack)
 
     else if CurrentHedgehog^.stats.StepDamageRecv > 0 then
         begin
-        PlaySound(sndStupid, PreviousTeam^.voicepack);
+        AddVoice(sndStupid, PreviousTeam^.voicepack);
         if CurrentHedgehog^.stats.DamageGiven = CurrentHedgehog^.stats.StepDamageRecv then 
             AddCaption(Format(GetEventString(eidHurtSelf), CurrentHedgehog^.Name), cWhiteColor, capgrpMessage);
         end
@@ -111,32 +111,32 @@
     else if DamageClan <> 0 then
         if DamageTotal > DamageClan then
             if random(2) = 0 then
-                PlaySound(sndNutter, CurrentTeam^.voicepack)
+                AddVoice(sndNutter, CurrentTeam^.voicepack)
             else
-                PlaySound(sndWatchIt, vpHurtSameClan)
+                AddVoice(sndWatchIt, vpHurtSameClan)
         else
             if random(2) = 0 then
-                PlaySound(sndSameTeam, vpHurtSameClan)
+                AddVoice(sndSameTeam, vpHurtSameClan)
             else
-                PlaySound(sndTraitor, vpHurtSameClan)
+                AddVoice(sndTraitor, vpHurtSameClan)
 
     else if CurrentHedgehog^.stats.StepDamageGiven <> 0 then
         if Kills > 0 then
-            PlaySound(sndEnemyDown, CurrentTeam^.voicepack)
+            AddVoice(sndEnemyDown, CurrentTeam^.voicepack)
         else
-            PlaySound(sndRegret, vpHurtEnemy)
+            AddVoice(sndRegret, vpHurtEnemy)
 
     else if AmmoDamagingUsed then
-        PlaySound(sndMissed, PreviousTeam^.voicepack)
+        AddVoice(sndMissed, PreviousTeam^.voicepack)
     else if (AmmoUsedCount > 0) and not isTurnSkipped then
         // nothing ?
     else if isTurnSkipped then
         begin
-        PlaySound(sndBoring, PreviousTeam^.voicepack);
+        AddVoice(sndBoring, PreviousTeam^.voicepack);
         AddCaption(Format(GetEventString(eidTurnSkipped), CurrentHedgehog^.Name), cWhiteColor, capgrpMessage);
         end
     else if not PlacingHogs then
-        PlaySound(sndCoward, PreviousTeam^.voicepack);
+        AddVoice(sndCoward, PreviousTeam^.voicepack);
     end;