source_main.m

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

%Callback function for the source specifications button
%
% Author: Albert Hsiao    2/97 
%Changes to user interface by Karthik 1/98...Changed interface completely
%Now windows can be opened and closed at will
%Program works without warnings in MATLAB5

if exist('excitation')
   clear excitation;
end

if exist('excitation1')
   clear excitation1;
end

if exist('speech1')
   clear speech1;
end



bg_color = [0.8 0.8 0.8];
file_flag = 0;

% Set position and size of analysis window

PV = [38 39 173 228];
s2 = 'Source Menu';

% Open analysis window
while exist('src_fig_1')==1
   try1 = 'get(src_fig_1,''position'');';
   eval(try1,catch2);
   if check ==0
      clear src_fig_1;
      check = 1;
      break;
   end
   s1 = get(src_fig_1,'Name');
   if ~strcmp(s1,s2)
      clear src_fig_1;
      break;
   end
   figure(src_fig_1);
   break;
end;

if exist('src_fig_1')~=1;
   
   src_fig_1=figure('Position',PV,...
      'Resize','off',...
      'Numbertitle','off',...
      'Color',[0.5 0.5 0.5],...
      'Name',s2);
   
   uicontrol('Style','frame',...
      'Units','Normalized',...
      'Position',[0.03 0.03 0.94 0.94],...
      'BackGroundColor',[0.9 0.9 0.9]);
     
   uicontrol('Style','Pushbutton',...
      'Units','Normalized',...
      'Position',[0.1 0.75 0.8 .12],...
      'String','Specify new excitation',...
      'Callback','new_excitation');

   
   src_MATflag_popup = uicontrol('Style','Popup',...
      'Units','Normalized',...
      'Position',[0.1 0.60 0.8 .12],...
      'String','Load mat file | Load Ascii File | Load Coefficient file(mat)',...
      'Callback','load_file_select');
   
   uicontrol('Style','Pushbutton',...
      'Units','Normalized',...
      'Position',[0.1 0.45 0.8 .12],...
      'String','Modify Specified Source',...
      'Callback','source_modify');

   
   uicontrol('Style','Pushbutton',...
      'Units','Normalized',...
      'Position',[0.1 0.30 0.8 .12],...
      'String','Save Source',...
      'Callback','excitation_save_main');
   
   uicontrol('Style','Pushbutton',...
      'Units','Normalized',...
      'Position',[0.1  0.15 0.8 .12],...
      'String','Cancel',...
      'Callback','source_quit');
   
   
end