Sub Main()
Line# = GetDro(16) 'GetCurrent line#
DoSpinCW() 'Start Spindle
Sleep(3000) 'Wait for spindle to spool
If GetOemDro(11) = 1 And Isactive(input2) Then GoTo 2 'Check inputs if good then else
Message" Spindle Failed To SPOOL UP"
GoTo 3
2:
Message"Spindle Good for M3 start"
GoTo 4
3:
DOButton(1) 'Feedhold
While Ismoving()
Sleep(1000)
Wend
DoButton(3) 'Stop
DoButton(2) 'Rewind
MSGBOX ("Spindle Failed To Spool Up On Line#") & Line# 'Message to
Goto4
4:
End Sub
End
(;-) GOOD catch Hood , yep need to WAIT until the feedhold stops motion.