jitshm.m

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

% jitshm.m
% modified by D. G. Childers 7/16/98

jittshim_h=figure('Position',[56 435 370 113], 'NumberTitle','off',...
	'Resize','off','Name','Jitter and Shimmer parameter settings', ...
	'color',BACK_COLOR);
axis('off');
ss=sprintf('Jitter:');
text(0.12,0.9,ss,'color',TEXT_COLOR,'FontSize',9);
jitt_h=uicontrol('Style','Slider','Min',0,'Max',100,'Value',60,...
	'Position',[173 88 90 18],'Callback', ...
	'set(jitt_e_h,''String'',round(get(jitt_h,''Value'')))');
jitt_e_h=uicontrol('Style','edit','Position',[125 88 40 18],'Callback', ...
	'set(jitt_h,''Value'',eval(get(jitt_e_h,''String'')))');
ss=sprintf('*0.1%% of F0');
text(0.78,0.9,ss,'color',TEXT_COLOR,'FontSize',9);
set(jitt_e_h,'String',60);

ss=sprintf('Jitter filter:');
text(0.01,0.63,ss,'color',TEXT_COLOR,'FontSize',9);
jitfil_h=uicontrol('Style','Slider','Min',-100,'Max',100,'Value',0,...
	'Position',[173 63 90 18],'Callback', ...
	'set(jitfil_e_h,''String'',round(get(jitfil_h,''Value'')))');
jitfil_e_h=uicontrol('Style','edit','Position',[125 63 40 18],'Callback', ...
	'set(jitfil_h,''Value'',eval(get(jitfil_e_h,''String'')))');
ss=sprintf('*0.01');
text(0.78,0.63,ss,'color',TEXT_COLOR,'FontSize',9);
set(jitfil_e_h,'String',0);

ss=sprintf('Shimmer:');
text(0.03,0.35,ss,'color',TEXT_COLOR,'FontSize',9);
shim_h=uicontrol('Style','Slider','Min',0,'Max',100,'Value',60,...
	'Position',[173 38 90 18],'Callback', ...
	'set(shim_e_h,''String'',round(get(shim_h,''Value'')))');
shim_e_h=uicontrol('Style','edit','Position',[125 38 40 18],'Callback', ...
	'set(shim_h,''Value'',eval(get(shim_e_h,''String'')))');
ss=sprintf('*0.1%% of Av');
text(0.78,0.35,ss,'color',TEXT_COLOR,'FontSize',9);
set(shim_e_h,'String',60);

ss=sprintf('Shimmer filter:');
text(-0.07,0.07,ss,'color',TEXT_COLOR,'FontSize',9);
shimfil_h=uicontrol('Style','Slider','Min',-100,'Max',100,'Value',0,...
	'Position',[173 12 90 18],'Callback', ...
	'set(shimfil_e_h,''String'',round(get(shimfil_h,''Value'')))');
shimfil_e_h=uicontrol('Style','edit','Position',[125 12 40 18],'Callback', ...
	'set(shimfil_h,''Value'',eval(get(shimfil_e_h,''String'')))');
ss=sprintf('*0.01');
text(0.78,0.07,ss,'color',TEXT_COLOR,'FontSize',9);
set(shimfil_e_h,'String',0);