www.gusucode.com > mbctools 工具箱 matlab 源码程序 > mbctools/@mdev_local/SweepNotes.m

    function [out,Color]= SweepNotes(mdev,SNo,NewNotes,NewColor)
%SWEEPNOTES

%  Copyright 2000-2004 The MathWorks, Inc. and Ford Global Technologies, Inc.



if size(mdev.Notes,2)==1
   mdev= i_MakeColors(mdev);
end
if nargin== 1
   if isempty(mdev.Notes)
      mdev.Notes= cell(size(mdev.AllModels,2),2);
      [mdev.Notes{:,2}]= deal([0 0 0]);
      pointer(mdev);
   end
   
   out= mdev.Notes(:,1);
   Color= mdev.Notes(:,2);
elseif nargin < 3
   if ~isempty(mdev.Notes)
      out= mdev.Notes{SNo,1};
      Color= mdev.Notes{SNo,2};
   else
      out='';
      Color= [0 0 0];
   end
else
   mdev.Notes{SNo,1}= NewNotes;
   if nargin>3
      mdev.Notes{SNo,2}= NewColor;
   end
   if ~isempty(NewNotes) & all(mdev.Notes{SNo,2}==0);
      % default colours to orange
      mdev.Notes{SNo,2} = [1 0.5 0];
   elseif isempty(NewNotes) & all(mdev.Notes{SNo,2}==[1 0.5 0])
      mdev.Notes{SNo,2} = [0 0 0];
   end
   pointer(mdev);
   out=mdev;
end


function mdev= i_MakeColors(mdev);

col= zeros(length(mdev.Notes),3);
ci= ~cellfun('isempty',mdev.Notes);
col(ci,:)= repmat([1 0.5 0],sum(ci),1);

mdev.Notes = [mdev.Notes num2cell(col,2)];
pointer(mdev);