twomass_play.m

这是一个用于语音信号处理的工具箱

%Callback function for the Animation menu of the Ribbon Model I
%Author Karthik
%Actual functions for animation were written by Wu
% modified by D. G. Childers 5/20/98

PV = [221 45 472 505];
s2 = 'Animation Window';
% Open analysis window
while exist('anim_display_window')==1
   try1 = 'get(anim_display_window,''position'');';
   eval(try1,catch2);
   if check ==0
      clear anim_display_window;
      check = 1;
      break;
   end
   s1 = get(anim_display_window,'Name');
   if ~strcmp(s1,s2)
      clear anim_display_window;
         break;
      end
      figure(anim_display_window);
      break;
   end;
   
   if exist('anim_display_window')~=1;
      anim_display_window=figure('Position',PV,...
         'Resize','on',...
         'Numbertitle','off',...
         'Color',[0 0 0],...
         'Name',s2 );
   end;
   
   clf;
   
   movie(anim_display_window,MM,20);
   clear MM:
%end;