gif_pr.m

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

%
% Callback function for property button in the GIF
% Author : Minkyu Lee
% Date : 2-Mar-1995
%

gif_frame_len = 256;
% Set position and size of analysis window
PV=[2 65 223 304];
s2 = 'Glottal Inverse Filtering Properties';
% Open analysis window
while exist('gif_pr_win_h')==1
   try1 = 'get(gif_pr_win_h,''position'');';
   eval(try1,catch2);
   if check ==0
      clear gif_pr_win_h;
      check = 1;
      break;
   end
   s1 = get(gif_pr_win_h,'Name');
   if ~strcmp(s1,s2)
      clear gif_pr_win_h;
      break;
   end
   figure(gif_pr_win_h);
   break;
end;

if exist('gif_pr_win_h')~=1;
   gif_pr_win_h=figure('Position',PV,...
      'Resize','on',...
      'Numbertitle','off',...
      'color',BACK_COLOR,...
      'Name',s2);
   
   gif_pr_txt3_fl_h=uicontrol('Style','pushbutton',...
			'Position',[10 270 70 30],...
			'String','Frame length');

	gif_pr_txt4_fl_h=uicontrol('Style','edit',...
			'Position',[90 270 40 30],...
			'String',gif_frame_len,...
			'Callback','gif_pr_fl_ed');

	gif_pr_fl_h=uicontrol('Style','slider',...
			'Position',[150 270 70 30],...
			'Max',12,...
			'Min',4,...
         'Value', (log2(gif_frame_len)),...
         'Callback','gif_pr_fl_sl');

	gif_pr_txt3_ov_h=uicontrol('Style','pushbutton',...
			'Position',[10 220 70 30],...
			'String','Overlap');

	gif_pr_txt4_ov_h=uicontrol('Style','edit',...
			'Position',[90 220 40 30],...
			'String',gif_overlap,...
			'Callback','gif_pr_ov_ed');

	gif_pr_ov_h=uicontrol('Style','slider',...
			'Position',[150 220 70 30],...
			'Max',128,...
			'Min',16,...
			'Value', gif_overlap,...
			'Callback','gif_pr_ov_sl');

      gif_pr_txt1_np_h=uicontrol('Style','pushbutton',...
         'Position',[10 170 70 30],...
         'String','Poles');

      gif_pr_txt2_np_h=uicontrol('Style','edit',...
         'Position',[90 170 40 30],...
         'String',gif_num_poles,...
         'Callback','gif_p_ed');

      gif_pr_np_h=uicontrol('Style','slider',...
         'Position',[150 170 70 30],...
         'Max',max_np,...
         'Min',min_np,...
         'Value', gif_num_poles,...
         'Callback','gif_p_sl');

      gif_pr_txt1_nz_h=uicontrol('Style','pushbutton',...
         'Position',[10 120 70 30],...
         'String','Zeros');
      
      gif_pr_txt2_nz_h=uicontrol('Style','edit',...
         'Position',[90 120 40 30],...
         'String',gif_num_zeros,...
         'Callback','gif_p_ed');

      gif_pr_nz_h=uicontrol('Style','slider',...
         'Position',[150 120 70 30],...
         'Max',max_nz,...
         'Min',min_nz,...
         'Value', gif_num_zeros,...
         'Callback','gif_p_sl');



      gif_pr_sel_h=uicontrol('Style','checkbox',...
         'Position',[10 70 200 30],...
         'String','Between marks',...
         'Value',gif_mark_flag);

      gif_pr_save_h=uicontrol('Style','pushbutton',...
         'Position',[10 20 100 30],...
         'String','Apply',...
         'Callback','gif_p_ok');

      gif_pr_cancel_h=uicontrol('Style','pushbutton',...
         'Position',[120 20 100 30],...
         'String','Cancel',...
         'Callback','gif_p_ca');
   end;