Вверх ↑
Ответов: 8928
Рейтинг: 823
#1: 2006-11-15 19:28:48 ЛС | профиль | цитата
Валерий, вот здесь
St.Read(_Left,2);St.Read(_Right,2);

происходит чтение отдельно правого и левого каналов,
а в следующей строке - их суммирование
Signal := Signal*_Sglag + (1 - _Sglag)*(abs(_Left) + abs(_Right))/2;

введите ещё одну переменную (например, Signal_2) и по образу и подобию сделайте отдельную обработку.
карма: 19

0