1

**General Mach Discussion / Mach3 Plasma plate alignment problem.**

« **on:**March 06, 2021, 08:52:02 AM »

Hello,

I am using the code below to align the sheet above on the plasma cutting machine.

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?

I am using the code below to align the sheet above on the plasma cutting machine.

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?