function statmsg(Fig,Message,Color)
%STATMSG Display status message
%   statmsg(Fig,Message) displays the Message on the Status bar for the  
%   given figure.  statmsg(Fig,Message,Color) sets the foregroundcolor
%   also.                                  

%   Loren Dean
%   Copyright (c) 1984-98 by The MathWorks, Inc.
%   $Revision: 1.5 $ $Date: 1997/11/21 23:49:28 $

if nargin==2,Color=[0 0 0];end

StatusHandle=findall(Fig,'Tag','Status');
set(StatusHandle,'String',Message,'ForegroundColor',Color);
