exe1.m

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

% Script:  exe1.m is used to locate the GCIS by c_pb_close in c_win_f.
%
%   speech = the input speech signal        
%    basic = [numf vt sr Order fram_len over_len m_len]
%
%   for details, see exe0.m exe1.m
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%


   %--------------------------------------------------------%
   %     second stage LP analysis                           %
   %                             >>> locate GCIs            %
   %--------------------------------------------------------%

   clear c_win_f c_pb_vtp c_pb_close ;
   set(ana_work_f,'Visible','on');
   set(work_text1,'String','It is working.  Please wait.');
   set(work_text3,'String','');
   pause(1);

   [gci,ir]=lpana2(speech,basic,vctyp,rsd,ntotal,nframe);

   time=toc;
   set(ana_work_f,'Visible','on');
   set(work_text2,'String',['elapsed_time= ' num2str(time)]);
   set(work_text1,'String','GCIs are located.');
   set(work_text3,'String','You may inspect the result');drawnow;

   % create GUI for manual correction

   c_win_f=figure('Unit','normalized',...
           'Position',[0.215 0.50 0.15 0.2],...
           'Resize','off',...
           'Color','white',...
           'Numbertitle','off',...
           'Name','Manual Correction');
   
   c_pb_gci=uicontrol('Style','Pushbutton',...
            'Units','normalized',...
            'Position',[0.05 0.6 0.9 0.3],...
            'String','GCIs Inspection',...
            'CallBack','Gchek;showoff(ana_work_f);');   
    % callback function [Gchek.m]

    c_pb_close=uicontrol('Style','Pushbutton',...
            'Units','normalized',...
            'Position',[0.05 0.1 0.9 0.3],...
            'String','Continue',...
            'Callback','close(c_win_f);showoff(ana_work_f);exe2;');