%CONST
global FMCQ_CODEBOOK; 
global Wf;
global ham_win;
global stage1 stage2;
ham_win=hamming(200)';    			            %漢明窗系數(shù)
coeff;
stage;                        					%MSVQ四級(jí)本碼(stage1(128),stage2(64,64,64))               
melp_wf;                      					%傅立葉幅度加權(quán)距離系數(shù)
codebook_fmcq1;	              					%傅立葉譜幅度碼本(256)
codebook_fmcq2;

%source
%changed by jiang
%path=input('Please input drive[C:,D:...]\path..\path\filename(the type is .wav):\n    ','s');
%s=wavread(path)';        %%%%%%%%%%%%%%%
s=wavread('male1.wav')';
s=s*32767;               %%%%%%%%%%%%%%%
FRL=180;             %length of frame
Nframe=fix(length(s)/FRL);  %compute the frame number of the input file
%global sig_in
sig_in(1:FRL*2)=0;          					   %前一幀信號(hào)
%global cheb_s;
cheb_s(1:4)=0;  					               %60Hz四階車比雪夫高通濾波器的初始狀態(tài)

%global sig_1000
sig_1000(1:FRL*2)=0;
butter_s(1:6)=0;

%global melp_bands state_b state_e statet
melp_bands(1:5,1:FRL*2)=0;            		   %前一幀的五個(gè)子帶信號(hào)
state_b(1:5,1:6)=0;                          %帶通濾波器的狀態(tài)
state_e(1:4,1:2)=0;                          %全波整形濾波器的初始狀態(tài)
state_t(1:4,1:6)=0;        				      %包絡(luò)檢波中間過(guò)程的狀態(tài)
%global melp_envelopes
melp_envelopes(1:4,1:FRL*2)=0;              	%前一幀的四個(gè)包絡(luò)信號(hào)
%global pre_intp
pre_intp=40;                  					%前一幀的整數(shù)基音
%pre_intr=0.1;                 					%前一幀的整數(shù)基音對(duì)應(yīng)的相關(guān)系數(shù)
frame_num=320;                 					%取的幀數(shù)
%global buffer
buffer=[50,50,50];                           %最近三個(gè)最強(qiáng)的基音值
%global pavg G2p
pavg=50;                                     %平均基音
G2p=20;                                      %前一幀的第2增益