lf_voice.m

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

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

voice_h=figure('Position',[66 100 360 275], 'NumberTitle','off',...
	'Resize','off','Name','Voiced Parameters Window', ...
	'color',BACK_COLOR);

axis('off');

fundf0_h = uicontrol('Style','slider','Position', ...
		[200 243 90 20],'Min',25,'Max',1000,'Value',100, ...
 		'Callback','set_f01');
fundf0_e_h=uicontrol('Style','edit','Position', ...
		[150 243 45 19],'Callback','set_f0');
set(fundf0_e_h,'String',100);
ss=sprintf('Funda. Freq. (F0) :');
text(-0.08,0.99,ss,'color',TEXT_COLOR,'FontSize',10);
ss=sprintf('Hz');
text(0.91,0.99,ss,'color',TEXT_COLOR,'FontSize',10);

pitch_h = uicontrol('Style','slider','Position', ...
		[200 218 90 20],'Min',10,'Max',400,'Value',100, ...
 		'Callback','set_t01');
pitch_e_h=uicontrol('Style','edit','Position', ...
		[150 218 45 19],'Callback','set_t0');
set(pitch_e_h,'String',100);
ss=sprintf('Pitch per. (T0) :');
text(-0.01,0.88,ss,'color',TEXT_COLOR,'FontSize',10);
ss=sprintf('*0.1 ms');
text(0.91,0.88,ss,'color',TEXT_COLOR,'FontSize',10);

ss=sprintf('LF model parameter settings :');
text(-0.08,0.75,ss,'color',TEXT_COLOR,'FontSize',10);

lftp_h = uicontrol('Style','slider','Position', ...
		[135 166 100 20],'Min',0,'Max',100,'Value',50,'Callback', ...
	'set(lftp_e_h,''String'',round(get(lftp_h,''Value'')))');
lftp_e_h=uicontrol('Style','edit','Position',[80 166 45 19],'Callback', ...
	'set(lftp_h,''Value'',eval(get(lftp_e_h,''String'')))');
set(lftp_e_h,'String',50);
ss=sprintf('Tp :');
text(0.0,0.65,ss,'color',TEXT_COLOR,'FontSize',10);
ss=sprintf('%% of T0');
text(0.73,0.65,ss,'color',TEXT_COLOR,'FontSize',10);


lfte_h = uicontrol('Style','slider','Position', ...
		[135 142 100 20],'Min',0,'Max',100,'Value',70,'Callback', ...
	'set(lfte_e_h,''String'',round(get(lfte_h,''Value'')))');
lfte_e_h=uicontrol('Style','edit','Position',[80 142 45 19],'Callback', ...
	'set(lfte_h,''Value'',eval(get(lfte_e_h,''String'')))');
set(lfte_e_h,'String',70);
ss=sprintf('Te :');
text(0.0,0.54,ss,'color',TEXT_COLOR,'FontSize',10);
ss=sprintf('%% of T0');
text(0.73,0.54,ss,'color',TEXT_COLOR,'FontSize',10);

lftc_h = uicontrol('Style','slider','Position', ...
		[135 118 100 20],'Min',0,'Max',100,'Value',100,'Callback', ...
	'set(lftc_e_h,''String'',round(get(lftc_h,''Value'')))');
lftc_e_h=uicontrol('Style','edit','Position',[80 118 45 19],'Callback', ...
	'set(lftc_h,''Value'',eval(get(lftc_e_h,''String'')))');
set(lftc_e_h,'String',100);
ss=sprintf('Tc :');
text(0.0,0.43,ss,'color',TEXT_COLOR,'FontSize',10);
ss=sprintf('%% of T0');
text(0.73,0.43,ss,'color',TEXT_COLOR,'FontSize',10);

lfta_h = uicontrol('Style','slider','Position', ...
		[135 94 100 20],'Min',0,'Max',300,'Value',21,'Callback', ...
	'set(lfta_e_h,''String'',round(get(lfta_h,''Value'')))');
lfta_e_h=uicontrol('Style','edit','Position',[80 94 45 19],'Callback', ...
	'set(lfta_h,''Value'',eval(get(lfta_e_h,''String'')))');
set(lfta_e_h,'String',21);
ss=sprintf('Ta :');
text(0.0,0.32,ss,'color',TEXT_COLOR,'FontSize',10);
ss=sprintf('0.1%% of T0');
text(0.73,0.32,ss,'color',TEXT_COLOR,'FontSize',10);


lfee_h = uicontrol('Style','slider','Position', ...
		[135 70 100 20],'Min',1,'Max',200,'Value',40,'Callback', ...
	'set(lfee_e_h,''String'',round(get(lfee_h,''Value'')))');
lfee_e_h=uicontrol('Style','edit','Position',[80 70 45 19],'Callback', ...
	'set(lfee_h,''Value'',eval(get(lfee_e_h,''String'')))');
set(lfee_e_h,'String',40);
ss=sprintf('Ee :');
text(0.0,0.210,ss,'color',TEXT_COLOR,'FontSize',10);

lfga_h = uicontrol('Style','slider','Position', ...
		[159 45 100 20],'Min',0,'Max',100,'Value',60,'Callback', ...
	'set(lfga_e_h,''String'',round(get(lfga_h,''Value'')))');
lfga_e_h=uicontrol('Style','edit','Position',[104 45 45 19],'Callback', ...
	'set(lfga_h,''Value'',eval(get(lfga_e_h,''String'')))');
set(lfga_e_h,'String',60);
ss=sprintf('Gain (Av) :');
text(-0.08,0.10,ss,'color',TEXT_COLOR,'FontSize',10);
ss=sprintf('dB');
text(0.81,0.10,ss,'color',TEXT_COLOR,'FontSize',10);


lfg0_h = uicontrol('Style','slider','Position', ...
		[159 20 100 20],'Min',0,'Max',1000,'Value',1,'Callback', ...
	'set(lfg0_e_h,''String'',round(get(lfg0_h,''Value'')))');
lfg0_e_h=uicontrol('Style','edit','Position',[104 20 45 19],'Callback', ...
	'set(lfg0_h,''Value'',eval(get(lfg0_e_h,''String'')))');
set(lfg0_e_h,'String',1);
ss=sprintf('g0 (scale) :');
text(-0.08,-0.01,ss,'color',TEXT_COLOR,'FontSize',10);