SoundAbs:=abs(SoundL);
if SoundMaxL<SoundAbs then SoundMaxL:=SoundAbs;//Запоминаем максимальный сигнал левый
SoundAbs:=abs(SoundR);
if SoundMaxR<SoundAbs then SoundMaxR:=SoundAbs;//Запоминаем максимальный сигнал
if SoundMaxL<SoundAbs then SoundMaxL:=SoundAbs;//Запоминаем максимальный сигнал левый
SoundAbs:=abs(SoundR);
if SoundMaxR<SoundAbs then SoundMaxR:=SoundAbs;//Запоминаем максимальный сигнал
А чего так не хотите сделать? https://disk.yandex.ru/d/FHCwQK2-ruJHPQ
https://forum.hiasm.com/topic/57675