%
% monitor initialize requirements
%
_Tsrv.Machines
{

_Mach.Mode
<
|Init
%
% start message lapse timer and a message counter
%
 0 !Mach.MsgCount
 false !Mach.Timeout
%
% clearing all messages for status
%
% post the current js msec to ignore messages to current time
%
 jsnow !Mach.PostTime
 "Starting" !Mach.Mode
/*
 "*machtimo"
 "lapse" "Machine" _Mach.Lapse *timeract
 !Mach.Ltimer
*/

|Reinit
%
% restart the device
%
 0 !Mach.MsgCount
 false !Mach.Timeout
 *machcand
%
% clearing all messages for status
%
% post the current js msec to ignore messages to current time
%
 jsnow !Mach.PostTime
 "Starting" !Mach.Mode
%
% restart the lapse period, if it was initially started
%
 "Machine" "lapse" _Mach.Lapse *timerstx

> pop

} if