twomass_glottal_area.m

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

%Callback function for the Glottal Area button in the two mass model controls
%window

%This program calls the glottal area function and then plots the 
%different waveforms for observation

twomass_go;
[UG,garea1,garea2,x1,x2] = garea_calculate(MODEL_PARAMETERS); 

PV =[8 29 366 519];
s2 = 'Glottal Area Waveforms';
% Open analysis window
while exist('twomass_output_window_3')==1
   try1 = 'get(twomass_output_window_3,''position'');';
   eval(try1,catch2);
   if check ==0
      clear twomass_output_window_3;
      check = 1;
      break;
   end
   s1 = get(twomass_output_window_3,'Name');
   if ~strcmp(s1,s2)
      clear twomass_output_window_3;
      break;
   end
   figure(twomass_output_window_3);
   break;
end;

if exist('twomass_output_window_3')~=1;
   twomass_output_window_3=figure('Position',PV,...
      'Resize','on',...
      'Numbertitle','off',...
      'Name',s2 );
end
clf;

%subplot 111
plot(garea1,'b');
hold on;
plot(garea2,'r');
hold off;
title('Glottal Area waveforms for the two masses');
%subplot 212
%plot(UG(2:length(UG)));
%axis([-100 3000 min(UG)*1.1 max(UG)*1.1]);
%title('Glottal Flow waveforms for the two masses');