开云体育

If GetUserLED(1010)=1 Then

SetUserLED(1010 ,0)

End If

?

dx = GetOEMDRO( 800 )

dy = GetOEMDRO( 801 )

Pi = Atn( 1 ) * 4

?

If Abs( dx ) > Abs( dy ) Then ' horizontal, near X axis

angle = Atn( dy / dx )

Else ' vertical, near Y axis

angle = Atn( - dx / dy )

End If

?

angle = angle / Pi * 180

ret = MachMsg("A = " & roun(angle) & "° Confirmar Alinhamento", "Axis Rotation", 4)

If ret = 6 Then ' Yes

SetOEMDRO(118, angle) 'Code("G68X0Y0R" & angle)

Message("A = " & roun(angle) & "°")

SetUserLED(1011,0)

DoButton(17)

While IsMoving()

Wend

angleF = GetOEMDRO( 118 )

Code("G69")

Code("G0 X104.14Y10.15")

While IsMoving()

Sleep(10)

Wend

SetOEMDRO(118, angleF)

While IsMoving()

Sleep(10)

Wend

DoOEmButton(1007)

While IsMoving()

Sleep(10)

Wend

DoOEMButton(170)

Sleep(100)

DoOemButton(160)?

?

End If? ??

?

The code works well but when I need to pause the cut and then cut again the machine loses the position of the axes and presents the error?radius to end of arc differs from radius to start.?

Has anyone experienced this problem, what may be happening, what configuration can I change to solve the problem?