该程序是关于基于全通滤波器的幅度响应均衡器。在20Hz-20KHz频段有5个通道： f01=62.5Hz,f02=250Hz,f03=1000Hz, f04=4000Hz,f05=16000Hz。可以对每个频段进行校正，查看每个频段的零极点图、相位响应和频率响应。程序还显示总频率响应。可以用真实的音频信号进行测试。

function mainfun() Wp=0.2*pi; Ws=0.4*pi; tr_width=Ws-Wp; %过渡带宽度 N=ceil(6.6*pi/tr_width)+1 %滤波器长度 n=0:1:N-1; Wc=(Ws+Wp)/2; %理想低通滤波器的截至频率 hd=ideal_lp(Wc,N)'; %理想低通滤波器的单位冲激响应 w_ham=(hamming(N)) %海明窗 h=hd.*w_ham; %截取得到实际的单位脉冲响应 [db,mag,pha,w]=freqz_m4(h,[1]); %计算实际滤波器的幅度响应 delta_w=2*pi/1000; Ap=-(min(db(1:1:Wp/delta_w+1))) %实际通带纹波 As=-round(max(db(Ws/delta_w+1:1:501))) %实际阻带纹波