%《MATLAB在電子信息課程中的應用》第七章繪圖子程序
% 幅頻特性繪圖程序
% 電子工業出版社出版  陳懷琛 吳大正 高西全合著  2001年10月

function y=Hwplot(hn,l)
hw=fft(hn,1024);
k=[0:1023]*2/1024;
subplot(3,3,l);
plot(k,20*log10(abs(hw)));grid;
axis([0,max(k)/2,-40,5]);
xlabel('w/pi');ylabel('Magnitude(dB)')