%例程4－21   利用三角窗設計Ⅲ型數字帶通濾波器

clear all;                     
Wpl=0.4*pi;
Wph=0.6*pi;
Wsl=0.2*pi;
Wsh=0.8*pi;
tr_width=min((Wpl-Wsl),(Wsh-Wph));     %過渡帶寬度
N=ceil(6.1*pi/tr_width)               %濾波器長度
n=0:1:N-1;
Wcl=(Wsl+Wpl)/2;                      %理想低通濾波器的截止頻率
Wch=(Wsh+Wph)/2;
hd=ideal_bp2(Wcl,Wch,N);            %理想低通濾波器的單位沖激響應
w_tri=(triang(N))';                   %三角窗
h=hd.*w_tri;                         %截取得到實際的單位脈沖響應
[db,mag,pha,w]=freqz_m2(h,[1]);        %計算實際濾波器的幅度響應
delta_w=2*pi/1000;
Ap=-(min(db(Wpl/delta_w+1:1:Wph/delta_w+1)))      %實際通帶紋波
As=-round(max(db(Wsh/delta_w+1:1:501)))           %實際阻帶紋波
subplot(221)
stem(n,hd)
title('理想單位脈沖響應hd(n)')
subplot(222)
stem(n,w_tri)
title('三角窗w(n)')
subplot(223)
stem(n,h)
title('實際單位脈沖響應hd(n)')
subplot(224)
plot(w/pi,db)
title('幅度響應(dB)')
axis([0,1,-100,10])