write_enum.m

来自「这是一个关于MATLAB的函数」· M 代码 · 共 29 行

function resp = write_enum(ss,index,data)
% Copyright 2002 The MathWorks, Inc.
%   $Revision: 1.2 $  $Date: 2002/05/14 19:46:58 $

error(nargchk(2,3,nargin));
if ~ishandle(ss),
    error('First Parameter must be an ENUM handle.');
end
if nargin==2,   
    data = index;   
end;

datastr = data;
if ischar(data),
    data = equivalent(ss,data);
elseif iscellstr(data),
    data = equivalent(ss,data{1});
end

if any(isempty(data))
    error(['Input label ''' datastr ''' does not match any defined enumerated value']);
end

if nargin==2,   write_numeric(ss,data);
else            write_numeric(ss,index,data);
end
    
% [EOF] write_enum.m