hedgewars/uSound.pas
changeset 2303 f411e9f8e6d4
parent 2262 0dc94341bf42
child 2327 4832b77ec958
equal deleted inserted replaced
2302:0f122917d799 2303:f411e9f8e6d4
    93 	inc(i);
    93 	inc(i);
    94 	TryDo(i <= cMaxTeams, 'Engine bug: AskForVoicepack i > cMaxTeams', true)
    94 	TryDo(i <= cMaxTeams, 'Engine bug: AskForVoicepack i > cMaxTeams', true)
    95 	end;
    95 	end;
    96 
    96 
    97 voicepacks[i].name:= name;
    97 voicepacks[i].name:= name;
    98 addfilelog('================================================ '+inttostr(i));
       
    99 AskForVoicepack:= @voicepacks[i]
    98 AskForVoicepack:= @voicepacks[i]
   100 end;
    99 end;
   101 
   100 
   102 procedure InitSound;
   101 procedure InitSound;
   103 const numSounds = 80;
   102 const numSounds = 80;