close_excitation.m

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

% new close window for excitation
% By D. G. Childers
% 5/31/99

% clear and close the figures opened creating the excitation
if exist('exc_sou_h')==1
	eval('close(exc_sou_h);',catch1);
	clear exc_sou_h;
end
if exist('exc_sou1_h')==1
	eval('close(exc_sou1_h);',catch1);
	clear exc_sou1_h;
end
if exist('exc_set_h')==1
	eval('close(exc_set_h);',catch1);
	clear exc_set_h;
end
if exist('jittshim_h')==1
	eval('close(jittshim_h);',catch1);
	clear jittshim_h;
end
if exist('aspino_h')==1
	eval('close(aspino_h);',catch1);
	clear aspino_h;
end
if exist('subglot_h')==1
	eval('close(subglot_h);',catch1);
	clear subglot_h;
end
if exist('voice_h')==1
	eval('close(voice_h);',catch1);
	clear voice_h;
end
if exist('noise_h')==1
	eval('close(noise_h);',catch1);
	clear noise_h;
end
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%