mani4.asv

语音信号子带编码源程序

function main4;
% 实现对四个子带的子带编码;
clear;close all;
[x1,fs,nb]=wavread('E:\MATLAB6p5\work\2006\manspeech.wav');
wc=3400;wc=wc/fs;
y=lowpass(x1,wc);
wavwrite(x1,fs/3,nb,'E:\manspeech1.wav');
[x,fs,nb]=wavread('E:\manspeech1.wav');
[y1,y2]=bandpass(x);m1=y1;m2=y2;
[a1,a2]=bandpass(m1);[a3,a4]=bandpass(m2);
y1=code(a1,8);y2=code(a1,8);
y3=code(a2,8);y4=code(a2,4);
dec=decode(y1,8);y1=dec;dec=decode(y2,8);y2=dec;
dec=decode(y3,8);y3=dec;dec=decode(y4,4);y4=dec;
[yy1,yy2]=restructor(y1,y2);[yy3,yy4]=restructor(y3,y4);
f1=result(yy1,yy2);f2=result(yy3,yy4);
[yy1,yy2]=restructor(f1,f2);
re=result(yy1,yy2);
re=re/max(re);
wavwrite(re,fs*3,nb,'E:\manspeech_4.wav');