rmeddis@28: % ---------------------------------------------------------- addToMsg
rmeddis@28: function addToMsg(message,append, warning)
rmeddis@28: % 'message' is posted to the message board
rmeddis@28: % if append==1, message is appended to the current message
rmeddis@28: global experiment expGUIhandles
rmeddis@28: 
rmeddis@28: if nargin<3
rmeddis@28:     % this is not a warning screen
rmeddis@28:     warning=0;
rmeddis@28: end
rmeddis@28: 
rmeddis@28: if append
rmeddis@28: msg=get(expGUIhandles.textMSG,'string');
rmeddis@28: [r c]=size(msg);
rmeddis@28:     if length(message)<=c
rmeddis@28:         y=[message blanks(c-length(message))];
rmeddis@28:         msg(r+1,:)=y;
rmeddis@28:     else
rmeddis@28:         msg=message;
rmeddis@28:     end
rmeddis@28: else
rmeddis@28:     msg=message;
rmeddis@28: end
rmeddis@28: 
rmeddis@28: try
rmeddis@28:     set(expGUIhandles.textMSG,'string', msg,'fontSize', experiment.msgFontSize)
rmeddis@28:     if warning
rmeddis@28:         % flash red to signal a warning
rmeddis@28:         set(expGUIhandles.textMSG,'backgroundcolor','r', 'ForegroundColor', 'w'	)
rmeddis@28:     else
rmeddis@28:         set(expGUIhandles.textMSG,'backgroundcolor','w', 'ForegroundColor', 'b')
rmeddis@28:     end
rmeddis@28: catch
rmeddis@28:     error(message)
rmeddis@28: end