Thread: z axis not working
Threaded View
- 
	26-10-2021 #1have installed a z axis probe for setting tool height on mach3 tested the connection under diagnostics and the digitise light flashes green to prove contact but when i hit auto tool zero nothing happens 
 this is the script i got from the internet
 the only thing i adjusted was plate thickness to 1.57mm
 REM Updated 30 Aug 2018
 REM Auto Tool Zero Z- Metric 2 pass Version
 REM Based On the BigTex script
 REM (09 Feb 2018) Hint added To Material Thickness offset request box.
 REM (20 Feb 2018) Request To touch the touch the touchoff plate To the bit To start probing added. Thanks To Glen Higgs For this addition.
 REM (27 Jul 2018) Minor changes To Error Handling And Grammer correction
 REM (30 Aug 2018) Feedrate override safety Reset And restore added.
 
 PlateThickness = 19.86 'Enter Z-plate thickness here
 DownStroke = -100 'Set the down stroke to find probe
 DownFeedRate = 250 'Set the down FeedRate
 RetractStroke = 10 'Set the retract Stroke
 RetractFeedRate = 1000 'Set the retract FeedRate
 SmallRetractStroke = 1 'Retract 1mm for a 2nd pass
 SmallDownFeedRate = 25 'Set the slow down FeedRate for 2nd pass
 SmallDownStroke = -(SmallRetractStroke *2) 'Set down stroke for 2nd pass as twice the retract distance.
 CurrentFeed = GetOemDRO(818) 'Get the current feedrate to return to later
 CurrentAbsInc = GetOemLED(48) 'Get the current G90/G91 state
 CurrentGmode = GetOemDRO(819) 'Get the current G0/G1 state
 CurrentFeedOverride = GetOEMDRO(821)'Get current Feedrate override setting
 
 REM Request Material Thickness offset
 Offset = InputBox("Enter Material Thickness offset Hint: To probe from the Spoilboard surface, enter the nominal thickness of the material. Enter '0' or leave blank if probing from the material surface", "Material Offset", "")
 
 REM Touch plate To Cutter To Begin probe.
 message "Briefly touch the plate to the bit to start probing for zero."
 Touched_Flag = False
 count = 40
 seconds = 60
 For i = 1 To 600
 If GetOEMLed(825) <> 0 Then
 Beep
 Touched_Flag = True
 Exit For
 End If
 count = count - 1
 If count = 0 Then ' 1 second elapsed
 count = 40
 seconds = seconds -1
 End If
 Sleep 25
 Next i
 If Touched_Flag = False Then
 message "The Auto Zero timed out, no touch detected"
 Exit Sub
 End If
 
 REM 1st Pass at fast rate
 
 sleep 2000 'give time to remove block from tool and position
 REM Code "(Z axis 1st pass)" 'puts this message in the status bar
 If GetOemLed (825)=0 Then 'Check to see if the probe is already grounded or faulty
 DoOEMButton (1010) 'zero the Z axis so the probe move will start from here
 Code "G4 P2" ' this delay gives me time to get from computer to hold probe in place
 SetOEMDRO(821,100) 'Reset feedrate overide to 100% for safety
 Code "G90 G31 Z" &DownStroke &" F" &DownFeedRate 'probing move
 While IsMoving() 'wait while it happens
 Wend
 ZProbePos = GetVar(2002) 'get the exact point the probe was hit
 If Abs(ZprobePos) <= Abs(DownStroke)-0.1 Then 'Check if the probe has been found
 Code "G0 Z" &ZProbePos 'go back to that point, always a very small amount of overrun
 While IsMoving ()
 Wend
 Call SetDro (2, 0) 'set the Z axis DRO to whatever is set as plate thickness less the offset value
 Code "G4 P0.25" 'Pause for Dro to update.
 Code "G1 Z" &SmallRetractStroke &" F" &RetractFeedRate 'retract
 While IsMoving ()
 Wend
 REM Code "(Z axis 2nd pass)" 'puts this message in the status bar
 Else
 Rem Code "G0 Z0" 'retract to start pos
 While IsMoving ()
 Wend
 Code "(Z-Plate not found, check connection or stroke and try again)" 'puts this message in the status bar
 Code "F" &CurrentFeed 'Returns to prior feed rate
 If CurrentAbsInc = 0 Then 'if G91 was in effect before then return to it
 Code "G91"
 End If
 If CurrentGMode = 0 Then 'if G0 was in effect before then return to it
 Code "G0"
 End If
 Exit Sub
 End If
 Else
 Code "(Z-Plate is grounded, check connection and try again)" 'this goes in the status bar if aplicable
 End If
 Code "F" &CurrentFeed 'Returns to prior feed rate
 If CurrentAbsInc = 0 Then 'if G91 was in effect before then return to it
 Code "G91"
 End If
 If CurrentGMode = 0 Then 'if G0 was in effect before then return to it
 Code "G0"
 End If
 
 REM 2nd pass at slow rate
 
 DoOEMButton (1010) 'zero the Z axis so the probe move will start from here
 Code "G4 P1" ' this delay gives me time to get from computer to hold probe in place
 Code "G90 G31 Z" &SmallDownStroke &" F" &SmallDownFeedRate 'probing move
 While IsMoving() 'wait while it happens
 Wend
 ZProbePos = GetVar(2002) 'get the exact point the probe was hit
 If Abs(ZprobePos) <= Abs(SmallDownStroke)-0.1 Then 'Check if the probe has been found
 Code "G0 Z" &ZProbePos 'go back to that point, always a very small amount of overrun
 While IsMoving ()
 Wend
 Call SetDro (2, PlateThickness - offset) 'set the Z axis DRO to whatever is set as plate thickness less the offset value
 Code "G4 P0.25" 'Pause for Dro to update.
 Code "G1 Z" &RetractStroke + PlateThickness &" F" &RetractFeedRate 'retract
 While IsMoving ()
 Wend
 Code "(Z axis is now zeroed)" 'puts this message in the status bar
 Else
 Code "G0 Z0" 'retract to start pos
 While IsMoving ()
 Wend
 Code "(Z-Plate not found, check connection and try again)" 'puts this message in the status bar
 End If
 Code "F" &CurrentFeed 'Returns to prior feed rate
 SetOEMDRO(821,CurrentFeedOverride) 'Return feedrate override to previous value
 If CurrentAbsInc = 0 Then 'if G91 was in effect before then return to it
 Code "G91"
 End If
 If CurrentGMode = 0 Then 'if G0 was in effect before then return to it
 Code "G0"
 End If
 Exit Sub
 
Thread Information
Users Browsing this Thread
There are currently 2 users browsing this thread. (0 members and 2 guests)
Similar Threads
- 
  Axis not working properlyBy Georgehun in forum Gantry/Router Machines & BuildingReplies: 14Last Post: 28-12-2021, 03:39 PM
- 
  FOR SALE: Fadal VMC15 4th axis. VGC . Not working after 6yr storage. sell as is or break ?By spaaz in forum Items For SaleReplies: 3Last Post: 21-11-2019, 08:51 PM
- 
  MPG has stopped workingBy CNCDev in forum CS-Lab (CSMIO)Replies: 2Last Post: 19-12-2018, 06:54 PM
- 
  Z drive not workingBy whensparksfly in forum General ElectronicsReplies: 3Last Post: 14-04-2016, 09:14 PM
- 
  x&z not workingBy cncjohn in forum Linear & Rotary MotionReplies: 5Last Post: 18-08-2013, 12:58 PM
 
                


 
						
					 
					
						 
		 
 
				
				
				
					 Reply With Quote
  Reply With Quote
Bookmarks