﻿#VB
'rem Modified november/24/2022 by CNC4PC
'for screen CNC4PC_Plasma_V1
Dim Z_Top
exec.Stopspin()
If AS3.GetLED(66) = True Then 
exec.Callbutton(521) 

End If
Z_Top = AS3.Getfield(20001)
exec.Wait(100)
exec.Code ("G91")
exec.Code ("G0Z"& Z_Top)
While (exec.IsMoving())
exec.Wait(100)
End While
exec.Code ("G90")