EncoderAIFF Class

[SerializableAttribute]
public sealed class EncoderAIFF : BaseEncoder

<SerializableAttribute>
Public NotInheritable Class EncoderAIFF
	Inherits BaseEncoder

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

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

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

Dim a As New EncoderAIFF(0)
a.InputFile = "testIn.wav"
a.OutputFile = "testOut.aif"
a.WAV_BitsPerSample = 24
a.Start(Nothing, IntPtr.Zero, False)
a.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
EncoderAIFF a = new EncoderAIFF(recHandle);
a.InputFile = null;
a.OutputFile = "testrec.aif";
a.Start(null, IntPtr.Zero, true); // start encoder paused
...
// now really start recording and encoding
a.Pause(false);
Bass.BASS_ChannelPlay(recHandle, false);
...
// your recording will be encoded until you call
a.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 a As New EncoderAIFF(recHandle)
a.InputFile = Nothing
a.OutputFile = "testrec.aif"
a.Start(Nothing, IntPtr.Zero, True) ' start encoder paused
...
' now really start recording and encoding
a.Pause(False)
Bass.BASS_ChannelPlay(recHandle, False)
...
' your recording will be encoded until you call
a.Stop()

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