%《MATLAB及在電子信息課程中的應用》第七章繪圖子程序
% 幅頻特性繪圖程序
% 電子工業出版社出版  陳懷琛 吳大正 高西全合著 2001年10月初版，2003年7月第二版
%
function y=Hwplot(hn,l)
hw=fft(hn,1024);
k=[0:1023]*2/1024;
subplot(3,3,l);
set(gcf,'color','w')                    % 將圖形背景色設為白色
plot(k,20*log10(abs(hw)));grid;
axis([0,max(k)/2,-40,5]);
xlabel('w/pi');ylabel('Magnitude(dB)')