exitalex.m

来自「matlab处理图像的一些基本方法。其中有一部分mex程序需要安装编译」· M 代码 · 共 45 行

function exitalex(how)
%EXITALEX  Quit Alex
%
%	EXITALEX(HOW)
%
%	if HOW is not 0 exit alex only else quit matlab;
%
%

%
% Copyright (c) 1995 by Claudio Rivetti and Mark Young
% [e-mail],    [e-mail]
%

global Clipboard TempDir

if nargin==0
  how=1;
end

if exist(Clipboard) == 2
  delete(Clipboard);
  setclipboard([]);
end
if exist([TempDir 'map.tmp']) == 2
  delete([TempDir 'map.tmp']);
end
if exist([TempDir 'newmap.tmp']) == 2
  delete([TempDir 'newmap.tmp']);
end
if exist([TempDir 'alexclip.tmp']) == 2
  delete([TempDir 'alexclip.tmp']);
end

if closeimage
  save_setup;
  if how==0
    quit;
  end
  close all;
  clear all;
end

return;