Firstly, I like to thank 3delite for introducing me to BASS, and for his help in figuring the code out (Delphi)
He created a simple media player to show me how to use a VU Meter.
procedure TForm1.FormCreate(Sender: TObject);
begin
//* Never forget to init BASS
BASS_Init(-1, 41000, 0, Self.Handle, 0);
//* Set VU max. values
Gauge1.MaxValue := High(Word);
Gauge2.MaxValue := High(Word);
end;
It then calls a timer when playing a stream
procedure TForm1.Timer1Timer(Sender: TObject);
var
Level: Cardinal;
LeftLevel: Word;
RightLevel: Word;
begin
Level := BASS_ChannelGetLevel(Channel);
//* Separate L & R channel
LeftLevel := LoWord(Level);
RightLevel := HiWord(Level);
//* Set the VUs
Gauge1.Progress := LeftLevel;
Gauge2.Progress := RightLevel;
end;
My question is: does this display the true audio peak levels? 3delite suspects that it does, but suggested that I ask on here.
The reason I'm asking is because the peak levels with the above code and the peak levels when playing the same audio file in Sony SoundForge appears to be different.
This is a screenshot of a peak from the above code
In Sony SoundForge, the peaks at the same point in the audio track are
As you can see, the Sony peaks are almost at the top, hovering between the yellow and red. The BASS peaks are much lower, and never even reach halfway.
If it is not the the true peaks, how do I obtain it?
Thanks in advance.
