Ok. My new isSound method for MONO16LE format:
Now I only have to figure out how to do the SaveAudioSample()
'mono16le format Method isSound%(samplesbank:TBank) Local sound% For Local i% = 0 To BankSize(samplesbank) Step 8 sound = SignedShort(PeekShort(samplesbank, i)) If Abs(sound) > 500 Then Return True Next Return False End Method
Now I only have to figure out how to do the SaveAudioSample()