equal
deleted
inserted
replaced
299 end; |
299 end; |
300 |
300 |
301 procedure PlayNextVoice; |
301 procedure PlayNextVoice; |
302 var i : LongInt; |
302 var i : LongInt; |
303 begin |
303 begin |
304 if (not isSoundEnabled) or fastUntilLag or (LastVoice.snd = sndNone) or (lastChan[LastVoice.snd] = -1) or (Mix_Playing(lastChan[LastVoice.snd]) = 0) then exit; |
304 if (not isSoundEnabled) or fastUntilLag or ((LastVoice.snd <> sndNone) and (lastChan[LastVoice.snd] <> -1) and (Mix_Playing(lastChan[LastVoice.snd]) <> 0)) then exit; |
305 i:= 0; |
305 i:= 0; |
306 while (i<8) and (VoiceList[i].snd = sndNone) do inc(i); |
306 while (i<8) and (VoiceList[i].snd = sndNone) do inc(i); |
307 |
307 |
308 if (VoiceList[i].snd <> sndNone) then |
308 if (VoiceList[i].snd <> sndNone) then |
309 begin |
309 begin |