hedgewars/uSound.pas
changeset 8471 7681d14b9f01
parent 8370 0c79946e96f8
child 8678 fb62d23c70f8
--- a/hedgewars/uSound.pas	Sat Feb 02 14:33:35 2013 +0100
+++ b/hedgewars/uSound.pas	Tue Feb 05 17:28:12 2013 -0500
@@ -105,12 +105,13 @@
 function  AskForVoicepack(name: shortstring): Pointer;
 
 
+var Volume: LongInt;
+    SoundTimerTicks: Longword;
 implementation
 uses uVariables, uConsole, uCommands, uDebug, uPhysFSLayer;
 
 const chanTPU = 32;
-var Volume: LongInt;
-    cInitVolume: LongInt;
+var cInitVolume: LongInt;
     previousVolume: LongInt; // cached volume value
     lastChan: array [TSound] of LongInt;
     voicepacks: array[0..cMaxTeams] of TVoicepack;
@@ -712,6 +713,7 @@
     isAudioMuted:= false;
     isSEBackup:= isSoundEnabled;
     Volume:= 0;
+    SoundTimerTicks:= 0;
     defVoicepack:= AskForVoicepack('Default');
 
     for i:= Low(TSound) to High(TSound) do