%例程4－20   利用布拉克曼窗設計Ⅱ型數字帶通濾波器

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(11*pi/tr_width)+1                %濾波器長度
n=0:1:N-1;
Wcl=(Wsl+Wpl)/2;                        %理想低通濾波器的截止頻率
Wch=(Wsh+Wph)/2;
hd=ideal_bp1(Wcl,Wch,N);               %理想低通濾波器的單位沖激響應
w_bman=(blackman(N))';                 %布拉克曼窗
h=hd.*w_bman;                          %截取得到實際的單位脈沖響應
[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_bman)
title('布拉克曼窗w(n)')
subplot(223)
stem(n,h)
title('實際單位脈沖響應hd(n)')
subplot(224)
plot(w/pi,db)
title('幅度響應(dB)')
axis([0,1,-100,10])