'Stop Button     Feedhold/stop to check torch
DoButton(1)                 'Feedhold
While IsMoving      'Wait for movement to stop
Sleep(100)
Wend
DoSpinStop                                 ' Turn OFF torch
Sleep(1000)
DoButton(286)            ' Set positions
Sleep(1000)
DoButton(3)      'Set Stop
Sleep(1000)
SetVar(604,GetDro(18))   'SetVar to Feedrate
SetVar(605,GetDro(16))   'SetVar to CurrentLine#
Code"G0 Z1.000"      'Move to a SafeZ
While IsMoving()      
Sleep(1000)
Wend
Code"(Stop Routine Complete)"
End     
'***************************************************************************************************************************************X
'Restart Button to return to work
Code"G1 Z1.000 F#604"             'Go To a SafeZ
While IsMoving()
Sleep(1000)
Wend
SetDro(16,Getvar(605))   'Reset SET NEXT LINE #
Sleep(100)
SetDro(18,GetVar(604))   'Reset Feedrate
Sleep(100)
'************************* Setup TOM to suite machine
'Code"G28.1 Z0.500"    'ReREF Head  to TOM
'While Ismoving()
'Sleep(100)
'Wend
'Code"G92 Z0.000"                    'Reset Dro
"Code"G1 Z0.150"
'Code"G92 Z0.000"
'sleep(100)
'*************************************************
DoOemButton(285)             'Return to stop position
While IsMoving()
Sleep(1000)
Wend
Code"G1 Z#601 F#604"      'Return Z to stop Point
While IsMoving()
Sleep(1000)
Wend
DOSPINCW()      'Refire Torch
Sleep(100)
DoButton(0)       'Resume Program Run from Stop Point
Code"(You are now back ONLINE cutting )"
End