Other Audiostreamer possibility of setting the buffersize

Sub Process_Globals
   Private audioStream As AudioStreamer
End Sub

Sub SomeSub
    audioStream.Initialize("AudioStream", 8000, True, 16, audioStream.VOLUME_MUSIC)
   'Fetch AudioStreamer's recording buffer
   Dim r As Reflector
   r.Target = audioStream
   'Let's see what we currently have
   Dim recordBuffer() As Byte = r.GetField("recordBuffer")
   Log($"Record buffer size: ${recordBuffer.Length}"$)
   'Create a new recording buffer and assign it to the AudioStreamer object.
   'For demo purposes, we just make the new size 1/2 of the original size
   Dim newBuffer(bufferLength/2) As Byte
   r.SetField2("recordBuffer", newBuffer)
   'Let's see what we have after the change
   Dim recordBuffer2() As Byte = r.GetField("recordBuffer")
   Log($"New record buffer size: ${recordBuffer2.Length}"$)
End Sub

Dim newBuffer(bufferLength/4) As Byte