1
Mach4 General Discussion / CNC Plasma THC surface contact finder with Mach4..
« on: May 11, 2017, 04:42:29 PM »
Hello everybody..
CNC Plasma THC surface contact finder with Mach3..
I use this script to THC Surface Contact Finder with Mach3, work excellent, Now im using Mach4 with ESS Card but this script doesn't work. anybody help me please, i want change the code to use it in Mach4.
Here is the code (M Function, M25)
Works perfect in Mach3, but doesn't work in Mach4
CurrentFeed = GetOemDRO(818)
PierceHight = -10.0
ProbeFeed = 1300.0
Code "G90 F" &ProbeFeed
If GetOemLed(825) = 0 Then
Code "G31 Z-117 F" &ProbeFeed
While IsMoving()
Wend
Code "G4 P0.25"
ZprobePos = GetVar(2002)
Message "ProbePos is " &ZprobePos
Code "G0 Z" &ZprobePos
While IsMoving()
Wend
Call SetDRO(2,PierceHight)
While IsMoving()
Wend
Code "G4 P0.6"
Code "G0 Z 0"
Code "G92 Z0.0"
Message "Z at Pierce Hight " & ZprobePos
Code "F" & CurrentFeed
StartTHC()
ZeroTHC()
Else
Code "(ERROR. Plate is Grounded)"
GotoSafeZ()
Exit Sub
End If
CNC Plasma THC surface contact finder with Mach3..
I use this script to THC Surface Contact Finder with Mach3, work excellent, Now im using Mach4 with ESS Card but this script doesn't work. anybody help me please, i want change the code to use it in Mach4.
Here is the code (M Function, M25)
Works perfect in Mach3, but doesn't work in Mach4
CurrentFeed = GetOemDRO(818)
PierceHight = -10.0
ProbeFeed = 1300.0
Code "G90 F" &ProbeFeed
If GetOemLed(825) = 0 Then
Code "G31 Z-117 F" &ProbeFeed
While IsMoving()
Wend
Code "G4 P0.25"
ZprobePos = GetVar(2002)
Message "ProbePos is " &ZprobePos
Code "G0 Z" &ZprobePos
While IsMoving()
Wend
Call SetDRO(2,PierceHight)
While IsMoving()
Wend
Code "G4 P0.6"
Code "G0 Z 0"
Code "G92 Z0.0"
Message "Z at Pierce Hight " & ZprobePos
Code "F" & CurrentFeed
StartTHC()
ZeroTHC()
Else
Code "(ERROR. Plate is Grounded)"
GotoSafeZ()
Exit Sub
End If