%
% check for message indications
%
 _Msys.HasMessages
 {
  _Msys.MsgIndic
  {
%
% message indication already posted
%
  }
  {
%
% message not posted indication yet
% has valid recent message, turn on indicator
%
   "Status:Message;On" ind)@(
   true !Msys.MsgIndic
  } ifelse
 }
 {
%
% valid messages were not detected
% currently not receiving messages
%
  _Msys.MsgIndic
  {
%
% message indication already posted
%
  }
  {
%
% message not posted indication yet
% no valid messages, turn off indicator
%
   "Status:Message;Off" ind)@(
   true !Msys.MsgIndic
  } ifelse
 } ifelse
%
% enforce and react to minimum, maximum and lull gaps
%
 _Device &"\" &_Subscription &"\" ofconn
 empty
 "Md*.*" !wilder
 prevfile
 {
%
% no file present in reception area
%
 }
 {
%
% the last file received is tested for a lull in messaging
% with the current time
%
  dup "_" right$ "." left$
  jsnow from
%%% "lullgap" log)(
  _Msys.MsgLull gt
  {
%
% message lull occurred
%
   _Msys.HasMessages !Msys.MsgIndic
   false !Msys.HasMessages
  }
  {
   _Msys.HasMessages not !Msys.MsgIndic
   true !Msys.HasMessages
  } ifelse
 } ifelse
 filing)