#PB_Sound_MultiChannel|#PB_Sound_Loop or %11 doesn't work!
while each constant works separately
Code: Select all
InitSound()
LoadSound(0,"La.wav") ;sample rate= 44100Hz, mono. A 10 seconds A 440Hz
Global Dim canal.i(2)
For i = 0 To 2
;#PB_Sound_MultiChannel = %10 (OK)
;#PB_Sound_Loop = %01 (OK)
;#PB_Sound_MultiChannel|#PB_Sound_Loop = %11
canal(i) = PlaySound(0,#PB_Sound_MultiChannel|#PB_Sound_Loop) ; seul #PB_Sound_Loop est effectif dans cette combinaison!?
SoundVolume(0,50,canal(i))
SoundFrequency(0,44100*Pow(2,i*4/12),canal(i)) ; accord de A5+
Debug canal(i)
Next
MessageRequester("Hello!", "Click to stop")
Thanks in advance for your replies.
Link to the wave file :
http://domi.data.free.fr/La.wav