%《MATLAB在電子信息課程中的應用》(第三版)第七章例7.26程序q726
% 用窗函數法設計FIR帶通濾波器
% 電子工業出版社出版  陳懷琛 吳大正 高西全合著 2001年10月

clear;close all;
wls=0.2*pi;wlp=0.35*pi;
whp=0.65*pi;
B=wlp-wls;              % 計算過渡帶寬
N=ceil(12/0.15);        % 計算窗口長度
wc=[wlp/pi-6/N,whp/pi+6/N]; % 設置理想帶通截止頻率
hn=fir1(N-1,wc,blackman(N));% 設計濾波器系數
k=1;
hnwplot(hn,k);      % 調用繪圖函數
title('單位脈沖響應')