% % check for device out of Initial mode % _Msg.Status _Devc.Initial and zero %%% "endzota" log)( { % % device is now past initial status, check for configured % turn on default device indicators % _Msg.Status _Devc.Configed and nonzero %%% "endzotb" log)( { ind) % % device now configed % "Upload:Gcode;Dim" ind@ "Download:Gcode;Dim" ind@ "Status:Outgoing;On" ind@ "Device is Ready." &; _DevFlags _Setup.Listen and nonzero %%% "endzotc" log)( { &"Auto-Listen is engaged." &; _Msg.Seq 0xFFFF and !DevReport } if % % the sequence number holds the current device configuration % _DevReport _DevFlags eq "devcfg " &_DevReport &" " &_DevFlags log)( { % % equal to stored config, wait for Configed status % _DevFlags _Setup.Listen and nonzero %%% "endzotd" log)( { *machdrnk } { "Configed" true 2000 25000 *machisat } ifelse } { % % have new config, save to flash memory % &"New Config needs saving." &; &"Please manually restart in 60 seconds." "Status:Portal;Quick" ind@ "Save" true 2000 30000 *machisat } ifelse %%% "endzote" log)( ind( *machcomt } { %%% "endzotf" log)( % % not reached configed yet % } ifelse } { %%% "endzotg" log)( % % still initial status % } ifelse %%% "endzoth" log)(