close_main_vocos.m

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

%
% Callback function for Close button of main window
% Author : Childers
% May 18, 1999


if  exist('v_win_f')
   eval('close(v_win_f);',catch1);
   clear v_win_f;
end;
close all;
clear all;
clc;
disp('Closing vocos windows and the program.');
disp('Please return.  Have a nice day (or night).');

pause(1.);
disp('Returning to main GUI window.');
pause(1.);
clc;
%  create message window and write message in that window also
   message_window=figure('Unit','normalized',...
           'Position',[0.05 0.2 0.5 0.2],...
           'Resize','off',...
           'Color',[1 1 1],...
           'Numbertitle','off',...
           'Name','Message');
axis('off');        
ss=sprintf('Closing vocos windows and the program.');
text(-0.05,1,ss,'color',[0 0 1],'FontSize',10);
ss=sprintf('Thank you and returning to main GUI window.');
text(-0.05,5/6,ss,'color',[0 0 1],'FontSize',10);
pause(4.);        
close(message_window);
clear message_window;

cd ..; %retrun to main folder
main_speechgui;