Мне надо бесконечно проигрывать звук если определённая переменная выше нуля.
Попробовал сделать так:
Global speedk1#=0
Global zvdvigk1
Global zvdvigk1z#=0
If zvdvigk1z#=1 Then
zvdvigk1=LoadSound("Data\sound\jet_loop.wav")
LoopSound zvdvigk1
PlaySound zvdvigk1
End If
If speedk1#>0 Then zvdvigk1z#=1
If speedk1#=0 Then zvdvigk1z#=0
Вопщем накладывает звук бесконечно.
Там такой резананс получается, что уши закладывает.
Что неправельно делаю? Как резананс убрать?