[x,Fs,bits]=wavread('C:\Documents and Settings\Administrator\桌面\voice.wav');     
% 讀出信號，采樣率和采樣位數。    
sound(x,Fs,bits);
y0=x(:,1);% 只取單聲道作分析
b=[1 zeros(1,m) 0.7];
y1=conv(y0,b);% 產生回聲
subplot(3,1,1),plot(y0); grid;title('原聲');
subplot(3,1,2),plot(y1); grid;title('混合聲');
y2=filter(1,b,y1);
subplot(3,1,3),plot(y2);% 畫出過濾后的原聲
grid;title('濾除回聲后的原聲');
Distance=m/fs*340/2;% 求反射物的距離