Dim X,Y as Double
Open "C:\Mach3\myFile.txt" For Output As #1
X = GetDRO(0)
Y = GetDRO(1)
Print #1, X
Print #1, Y
Close #1
Dim Answer
Dim newPosX, newPosY As Double
Open "C:\Mach3\myFile.txt" For Input As #2 'Open the file for reading
Line Input #2, newPosX 'Read the first line of the file
Line Input #2, newPosY 'Read the second line of the file
Answer = MsgBox ("Is it OK to move the X axis to: " & newPos & "?", 1)
If Answer = 1 Then 'You pressed OK
Code "G0 X"& newPosX & " Y" & newPosY 'Make the move
End If
Close #2
NOT TESTED