nextexcf.m

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

% nextexcf.m
% modified by D. G. Childers 7/15/98

% next source frame

if (sfno + 1) <= stotfno

	figure(exc_sou1_h);
	clf;
	sfno=sfno+1;
	%glott_on;
	if (explace(sfno))==1
		set(exc_vt_h,'Value',1);
      set(exc_glo_h,'Value',0);
      vt_on;
	else
		set(exc_glo_h,'Value',1);
      set(exc_vt_h,'Value',0);
      glott_on;
	end
	if (exmode(sfno)==0)
		set(exc_voi_h,'Value',1);
		set(exc_voi_h,'Enable','on');
      set(exc_unv_h,'Value',0);
      if exist('noise_h')==1
		eval('close(noise_h);',catch1);
		clear noise_h;
		end      
      set(exc_mix_h,'Value',0);
		popvoice;
		lfparset;
	elseif (exmode(sfno)==1)
		set(exc_unv_h,'Value',1);
		set(exc_unv_h,'Enable','on');
      set(exc_voi_h,'Value',0);
      if exist('voice_h')==1
		eval('close(voice_h);',catch1);
   	clear voice_h;
   	end
		set(exc_mix_h,'Value',0);
		popunvoi;
		tnparset;
	elseif (exmode(sfno)==2)
		set(exc_mix_h,'Value',1);
		set(exc_mix_h,'Enable','on');
		set(exc_voi_h,'Value',0);
		set(exc_unv_h,'Value',0);
		popmix;
		lfparset;
		tnparset;
	end
	if get(exc_jitshi_h,'Value')
		set(exc_jitshi_h,'Value',0);
		close(jittshim_h);
	end
	if get(exc_aspira_h,'Value')
		set(exc_aspira_h,'Value',0);
		close(aspino_h);
	end
	if get(exc_subglo_h,'Value')
		set(exc_subglo_h,'Value',0);
		close(subglot_h);
	end
	if (jsaspsg(sfno)==1 | jsaspsg(sfno)==3 | jsaspsg(sfno)==5 | jsaspsg(sfno)==7)
		set(exc_jitshi_h,'Enable','on');
		set(exc_jitshi_h,'Value',1);
		popjtsh;
		jsparset;
	end	
	if (jsaspsg(sfno)==2 | jsaspsg(sfno)==3 | jsaspsg(sfno)==6 | jsaspsg(sfno)==7)
		set(exc_aspira_h,'Enable','on');
		set(exc_aspira_h,'Value',1);
		popaspi;
		asparset;
	end
	if (jsaspsg(sfno)==4 | jsaspsg(sfno)==5 | jsaspsg(sfno)==6 | jsaspsg(sfno)==7)
		set(exc_subglo_h,'Enable','on');
		set(exc_subglo_h,'Value',1);
		popsbglo;
		sbparset;
	end
set(exc_curf_e_h,'String',sfno);
set(exc_totf_e_h,'String',stotfno);
set(exc_beg_e_h,'String',ftime(sfno));
%set(exc_end_e_h,'String',ftime(sfno)+fdur(sfno));
set(exc_end_e_h,'String',fend(sfno));
set(exc_dur_e_h,'String',fdur(sfno));

end