diff --git a/src/base/URecord.pas b/src/base/URecord.pas index db71a9900..ea54f6b06 100644 --- a/src/base/URecord.pas +++ b/src/base/URecord.pas @@ -378,9 +378,9 @@ procedure TCaptureBuffer.AnalyzeBuffer; LockAnalysisBuffer(); try - // find maximum volume of first 1024 samples + // find maximum volume across the analysis buffer MaxVolume := 0; - for SampleIndex := 0 to 1023 do + for SampleIndex := 0 to AnalysisBufferSize - 1 do begin Volume := Abs(AnalysisBuffer[SampleIndex]) / -Low(Smallint); if Volume > MaxVolume then