EncoderWAV Class

[SerializableAttribute]
public sealed class EncoderWAV : BaseEncoder

<SerializableAttribute>
Public NotInheritable Class EncoderWAV
	Inherits BaseEncoder

int stream = Bass.BASS_StreamCreateFile("test.mp3", 0, 0, 
                  BASSFlag.BASS_STREAM_DECODE | BASSFlag.BASS_SAMPLE_FLOAT);
EncoderWAV w = new EncoderWAV(stream);
w.InputFile = null;
w.OutputFile = "test.wav";  // will be a 32-bit IEEE float WAVE file, since the stream is float
w.Start(null, IntPtr.Zero, false);
// do the encoding
Utils.DecodeAllData(stream, true);
w.Stop();

Dim stream As Integer = Bass.BASS_StreamCreateFile("test.mp3", 0, 0, 
                             BASSFlag.BASS_STREAM_DECODE Or BASSFlag.BASS_SAMPLE_FLOAT)
Dim w As New EncoderWAV(stream)
w.InputFile = Nothing
w.OutputFile = "test.wav" ' will be a 32-bit IEEE float WAVE file, since the stream is float
w.Start(Nothing, IntPtr.Zero, False)
' do the encoding
Utils.DecodeAllData(stream, True)
w.Stop()

EncoderWAV w = new EncoderWAV(0);
w.InputFile = "testIn.wav";
w.OutputFile = "testOut.wav";
w.WAV_BitsPerSample = 24;
w.Start(null, IntPtr.Zero, false);
w.Stop();

Dim w As New EncoderWAV(0)
w.InputFile = "testIn.wav"
w.OutputFile = "testOut.wav"
w.WAV_BitsPerSample = 24
w.Start(Nothing, IntPtr.Zero, False)
w.Stop()

private RECORDPROC _recProc;

// init your recording device (we use the default device)
if ( !Bass.BASS_RecordInit(-1) )
  MessageBox.Show(this, "Bass_RecordInit error!" );
_recProc = new RECORDPROC(RecordingHandler);
// start recording at 44.1kHz, stereo (paused)
int recHandle = Bass.BASS_RecordStart(44100, 2, BASSFlag.BASS_RECORD_PAUSE, _recProc, IntPtr.Zero);
if (recHandle == Bass.FALSE)
  MessageBox.Show(this, "BASS_RecordStart error!" );

// setup the encoder
EncoderWAV w = new EncoderWAV(recHandle);
w.InputFile = null;
w.OutputFile = "testrec.wav";
w.Start(null, IntPtr.Zero, true); // start encoder paused
...
// now really start recording and encoding
w.Pause(false);
Bass.BASS_ChannelPlay(recHandle, false);
...
// your recording will be encoded until you call
w.Stop();

private bool RecordingHandler(int handle, IntPtr buffer, int length, IntPtr user)
{
  return true;
}

private RECORDPROC _recProc;

' init your recording device (we use the default device)
If Not Bass.BASS_RecordInit(- 1) Then
  MessageBox.Show(Me, "Bass_RecordInit error!")
End If
_recProc = New RECORDPROC(AddressOf RecordingHandler)
' start recording at 44.1kHz, stereo (paused)
Dim recHandle As Integer = Bass.BASS_RecordStart(44100, 2, BASSFlag.BASS_RECORD_PAUSE, _recProc, IntPtr.Zero)
If recHandle = Bass.FALSE Then
  MessageBox.Show(Me, "BASS_RecordStart error!")
End If 

' setup the encoder
Dim w As New EncoderWAV(recHandle)
w.InputFile = Nothing
w.OutputFile = "testrec.wav"
w.Start(Nothing, IntPtr.Zero, True) ' start encoder paused
...
' now really start recording and encoding
w.Pause(False)
Bass.BASS_ChannelPlay(recHandle, False)
...
' your recording will be encoded until you call
w.Stop()

Private Function RecordingHandler(handle As Integer, buffer As IntPtr, length As Integer, user As IntPtr) As Boolean
  Return True
End Function