[an error occurred while processing this directive]
|
Вроде, все элементарно - IIR - текст внизу.
Коэффициенты a[], b[] для Баттерворта, режекторный 2-го порядка.
На низкочастотном участке вместо фильра получается славный генератор,
в середине диапазона - работает идеально, не нарадуешься, на высокочастотном тоже проявляет склонность к генерации, правда, не в такой степени, как в низу. Order=4, длинна массива 512.
for(i=0; i<=Order; i++) OutputData[i]=InputData[i];
for (i=Order; i< (Length); i++)
{
s1=0;
for (k=0; k<=Order; k++) s1=s1+a[k]*InputData[i-k];
s2=0;
for (k=1;k<= Order; k++) s2=s2+b[k-1]*OutputData[i-k];
OutputData[i]=s1-s2;
};
E-mail: info@telesys.ru