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