pcxwrite.m

来自「有关matlab的电子书籍有一定的帮助希望有用」· M 代码 · 共 35 行

function pcxwrite(X,map, filename);
%PCXWRITE Write a PCX (ZSoft Paint Format) file to disk.
%   Note: PCXWRITE has been grandfathered; use IMWRITE instead.
%
%   PCXWRITE(X,MAP,'filename') writes a PCX file containing the
%   indexed image X and colormap MAP to a disk file called 
%   'filename'. If no file extension is given with the filename,
%   the extension '.pcx' is assumed.
%
%   See also IMFINFO, IMREAD, IMWRITE.

%   Mounil Patel 7/20/93
%   updated to call IMWRITE, Chris Griffin 8/18/96.
%   Copyright 1993-1998 The MathWorks, Inc.  All Rights Reserved.
%   $Revision: 5.5 $  $Date: 1997/11/24 15:36:03 $

if (nargin~=3)
    error('Requires three arguments.');
end;

if (isstr(filename)~=1)
    error('Requires a string filename as an argument.');
end;

if (isempty(findstr(filename,'.'))==1)
    filename=[filename,'.pcx'];
end;

if isa(X, 'uint8')
    error('PCXWRITE doesn''t support UINT8 images, use IMWRITE.');
end

imwrite(X,map,filename,'pcx');