オーディオプログラミング言語のfaustでK特性フィルタを作ってみました。
これを利用してラウドネスメーターが作れるかもしれません。
使い方
process=_:kfil;
ソースコード
import("stdfaust.lib");
//k wighted filter
kfil_h= fi.iir(bcoeffs,acoeffs)
with{
b0=1.53512485958697;
a1=-1.69065929318241;
b1=-2.69169618940638;
a2=0.73248077421585;
b2=1.19839281085285;
bcoeffs=(b0,b1,b2,0);
acoeffs=(a1,a2,0);
};
kfil_b= fi.iir(bcoeffs,acoeffs)
with{
b0=1.0;
a1=-1.99004745483398;
b1=-2.0;
a2=0.99007225036621;
b2=1.0;
bcoeffs=(b0,b1,b2,0);
acoeffs=(a1,a2,0);
};
kfil=kfil_h:kfil_b;