hedgewars/uSound.pas
changeset 2192 4763a778c033
parent 2191 20c62f787a4d
child 2194 1597710c6118
--- a/hedgewars/uSound.pas	Wed Jun 24 15:59:32 2009 +0000
+++ b/hedgewars/uSound.pas	Wed Jun 24 19:47:32 2009 +0000
@@ -89,6 +89,7 @@
 	end;
 
 voicepacks[i].name:= name;
+addfilelog('================================================ '+inttostr(i));
 AskForVoicepack:= @voicepacks[i]
 end;
 
@@ -157,7 +158,6 @@
 	if infinite then openal_toggleloop(defVoicepack^.chunks[snd]);
 	openal_playsound(defVoicepack^.chunks[snd]);
 	lastChan[snd]:=defVoicepack^.chunks[snd];
-
 end
 end;
 
@@ -203,4 +203,14 @@
 openal_playsound(Mus);
 end;
 
+
+var i: LongInt;
+	c: TSound;
+
+initialization
+for i:= 0 to cMaxTeams do
+	for c:= Low(TSound) to High(TSound) do
+		voicepacks[i].chunks[c]:= -1
+
+
 end.