svdatmod.m

来自「这是一个用于语音信号处理的工具箱」· M 代码 · 共 62 行

% Script : save the corrected and/or analysis result into a file 
%          by "c_pb_save" in figure(c_win_f) or "m_pb_sv" in figure(m_win_f)

 pathname=cd;
 pathname1=[pathname '\anadata'];
 
 %set(file_edit,'String',in_file);

 if exist('vctyp3')==1
    vctyp=vctyp3;
 end
 
 if exist('gci3')==1
    gci=gci3;
 end

 if exist('cofa3')==1
    cofa=cofa3;
 end

 if exist('gm3')==1
    gm=gm3;
 end

 if exist('gpcf3')==1
    gpcf=gpcf3;
 end

 if exist('nidx3')==1
    nidx=nidx3;
 end

 if exist('ngm3')==1
    ngm=ngm3;
 end

 if exist('speech2')==1  % voice conversion case
    speech=speech2;
    ir=ir2;
 end

 if vt==1
      str=[' speech basic vctyp gci ir cofa gm gpcf nidx ngm'];
 elseif vt==2

       if exist('FF3')==1
          FF=FF3;
       end
       if exist('FB3')==1
          FB=FB3;
       end

      str=[' speech basic vctyp gci ir cofa FF FB gm gpcf nidx ngm'];
 end
 in_file=get(mod_file_edit,'String');

 eval(['cd ' pathname1]);
 eval(['save ' in_file str]);
 eval(['cd ' pathname]);

 disp(['The result is saved as ',pathname1,'\',in_file]);