% ex71.m fn=input('Enter WAV filename : ','s'); [x,Fs,nb]=wavread(fn); [b,a]=butter(8,2*1000/Fs); y=filter(b,a,x); soundsc([x' y'],Fs);