equal
deleted
inserted
replaced
95 addfilelog('================================================ '+inttostr(i)); |
95 addfilelog('================================================ '+inttostr(i)); |
96 AskForVoicepack:= @voicepacks[i] |
96 AskForVoicepack:= @voicepacks[i] |
97 end; |
97 end; |
98 |
98 |
99 procedure InitSound; |
99 procedure InitSound; |
100 const numSounds = 200; |
100 const numSounds = 80; |
101 begin |
101 begin |
102 if not isSoundEnabled then exit; |
102 if not isSoundEnabled then exit; |
103 WriteToConsole('Init OpenAL sound...'); |
103 WriteToConsole('Init OpenAL sound...'); |
104 isSoundEnabled:= openal_init(numSounds); |
104 isSoundEnabled:= openal_init(numSounds); |
105 if isSoundEnabled then WriteLnToConsole(msgOK) |
105 if isSoundEnabled then WriteLnToConsole(msgOK) |