LAME MP3 encoder

[Tomxe]

Pure Pascal LAME MP3 encoder, just CBR:
https://github.com/Xelitan/Free-Pascal-port-of-Lame-MP3-encoder/

License: GNU LPGL (like original LAME)

[Thaddy]

The fixed rate (128) in the converter is way too low and has inferior audio quality compared to the default mp3 converter in Windows11 from Fraunhofer, the PCM driver. The code supports up to 320, so make it higher, like 256. As it is it is only usable for game audio.

[cdbc]

Hi
With today's hardware, set fixed bitrate @ 320 kbps, why bother with less 
I was under the impression that the port is a _full_ port of 'lame', is it not?
Regards Benny

[Tomxe]

LAME can do both CBR (constant bitrate) and VBR (variable bitrate). This port can only do CBR. This port comes with a command-line tool to compress WAV to MP3 and this tool has hardcoded bitrate. Soon I will provide some functions to compress WAV to MP3 where bitrate can be set.

[Tomxe]

Now the program accepts bitrate:

wav2mp3 input.wav output.mp3 320

but there is also LameSimple.pas with these 2 functions for easy usage in code:

Code: Pascal  [Select][+][-]

1. function WAVToPCM(const WavBytes: TBytes; out Info: TPCMInfo): TPCMSamples;
2.  
3. function PCMToMP3(const Samples: TPCMSamples; const Info: TPCMInfo; BitrateKbps: Integer): TBytes;

[valdir.marcos]

Now the program accepts bitrate:

wav2mp3 input.wav output.mp3 320

but there is also LameSimple.pas with these 2 functions for easy usage in code:

Code: Pascal  [Select][+][-]

1. function WAVToPCM(const WavBytes: TBytes; out Info: TPCMInfo): TPCMSamples;
2.  
3. function PCMToMP3(const Samples: TPCMSamples; const Info: TPCMInfo; BitrateKbps: Integer): TBytes;

Thanks.