writenano2.m

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

function writeNANO2
%WRITENANO2 Write the image in a nano2 file format

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

global H I savepath 

[name, path] = uiputfile([savepath '*']);

if ~isempty(name) & name ~= 0
        f=watchon;
        statusbar('Writing NANO2 file...');
        NANO2name = [path name];
		
        nano2write(NANO2name, H, height2ind(H, I));
        
        watchoff(f);
        clearstatusbar;
end

return