%
% see if device is in Engage mode
%
5 *machmaxc
{

%
% check for reaching engagement
%
 _Msg.Status _Devc.Engaged and nonzero
 {
%
% can proceed to monitor engage
%
  "Engaging" false -1 -1 *machisat
  "Listen:Scope;Bright" ind)@(
 }
 {
%
% still waiting for count limit
%
 } ifelse
}
{
%
% past engage wait, reset the device
%
 *macherri
} ifelse