【正文】 ack(hObject, eventdata, handles)axes()cla。global B3。global ba3。global aa3。global Omgp。global Omgs。fp=5000。ft=25000。%取抽樣頻率fs=4800。Rp=1。As=100。wp=2*pi*fp/ft。%通帶頻率ws=2*pi*fs/ft。%截止頻率Omgp=2*ft*tan(wp/2)。Omgs=2*ft*tan(ws/2)。[n,Omgc]=ellipord(Omgp,Omgs,Rp,As,39。s39。)。 %計算階數(shù)n和截止頻率[z,p,k]=ellipap(n,Rp,As)。B3=k*real(poly(z))。A3=real(poly(p))。[b3,a3]=lp2hp(B3,A3,Omgc)。[ba3,aa3]=bilinear(b3,a3,ft)。[Ha,w]=freqz(ba3,aa3)。plot(w/pi,abs(Ha))。title(39。IIR高通濾波器39。)。function pushbutton11_Callback(hObject, eventdata, handles)axes()cla。global signal。global b21。global Si。z21=fftfilt(b21,Si)。sound(z21)m21=fft(z21)。plot(z21)。title(39。濾波后的信號波形39。)。axes()cla。plot(abs(m21),39。r39。)。title(39。濾波后信號頻譜39。)。function pushbutton12_Callback(hObject, eventdata, handles)axes()cla。global signal。global b。global Si。z22=fftfilt(b,Si)。sound(z22)m22=fft(z22)。plot(z22)。title(39。濾波后的信號波形39。)。axes()cla。plot(abs(m22),39。r39。)。title(39。濾波后信號頻譜39。)。function pushbutton13_Callback(hObject, eventdata, handles)axes()cla。global signal。global b22。global Si。z23=fftfilt(b22,Si)。sound(z23)m23=fft(z23)。plot(z23)。title(39。濾波后的信號波形39。)。axes()cla。plot(abs(m23),39。r39。)。title(39。濾波后信號頻譜39。)。function pushbutton14_Callback(hObject, eventdata, handles)axes()cla。global signal。global b1。global ba1。global aa1。global Si。z11=filter(ba1,aa1,Si)。sound(z11)。m11=fft(z11)。plot(z11)。title(39。濾波后的信號波形39。)。axes()cla。plot(abs(m11),39。r39。)。title(39。濾波后信號頻譜39。)。function pushbutton15_Callback(hObject, eventdata, handles)axes()cla。global signal。global B2。global ba2。global aa2。global Si。z12=filter(ba2,aa2,Si)。sound(z12)。m12=fft(z12)。plot(z12)。title(39。濾波后的信號波形39。)。axes()cla。plot(abs(m12),39。r39。)。title(39。濾波后信號頻譜39。)。function pushbutton16_Callback(hObject, eventdata, handles)axes()cla。global signal。global B3。global ba3。global aa3。global Si。z13=filter(ba3,aa3,Si)。sound(z13)。m13=fft(z13)。plot(z13)。title(39。濾波后的信號波形39。)。axes()cla。plot(abs(m13),39。r39。)。title(39。濾波后信號頻譜39。)。function edit1_Callback(hObject, eventdata, handles)global wp。global ws。f1=str2double(get(,39。string39。))。wp=f1。function edit1_CreateF(hObject, eventdata, handles)if ispc set(hObject,39。BackgroundColor39。,39。white39。)。else set(hObject,39。BackgroundColor39。,get(0,39。defaultUicontrolBackgroundColor39。))。endfunction edit2_Callback(hObject, eventdata, handles)global wp。global ws。f2=str2double(get(,39。sting39。))。ws=f2。function edit2_CreateF(hObject, eventdata, handles)if ispc set(hObject,39。BackgroundColor39。,39。white39。)。else set(hObject,39。BackgroundColor39。,get(0,39。defaultUicontrolBackgroundColor39。))。end function pushbutton17_Callback(hObject, eventdata, handles)axes()cla。global signal。[filename,pathname]=uigetfile(39。*.wav39。,39。pick a file39。)file=strcat(pathname,filename)。signal=wavread(file)。function pushbutton18_Callback(hObject, eventdata, handles)close(gcbf)。quit。運行后得到的界面為：圖——17附件：圖——1圖——2圖——3圖——4圖——5 圖——6圖——7圖——8圖——9圖——10圖——11圖——9——1圖——10——1圖——11——1圖——12 圖——13圖——14圖——15 圖——16圖——17