Import LinuxCNC source tree
This commit is contained in:
23
nc_files/probe/gtk_probe/gtk_probe_down.ngc
Normal file
23
nc_files/probe/gtk_probe/gtk_probe_down.ngc
Normal file
@@ -0,0 +1,23 @@
|
||||
o<gtk_probe_down> sub
|
||||
|
||||
O<down-if> IF [#<_hal[probe.set_zero]> EQ 5]
|
||||
(cancel Z offsets)
|
||||
G92.1
|
||||
G49
|
||||
G10 L20 P0 Z[#<_hal[axis.z.pos-cmd]>]
|
||||
O<down-if> ENDIF
|
||||
|
||||
#<z>=#<_z> (save current Z position)
|
||||
G91
|
||||
F #<_hal[probe.ps_searchvel]>
|
||||
G38.2 Z[-#<_hal[probe.ps_probe_max]>]
|
||||
G1 Z[#<_hal[probe.ps_probe_latch]>] F#<_ini[TOOLSENSOR]RAPID_SPEED>
|
||||
F #<_hal[probe.ps_probevel]>
|
||||
G4 P0.5
|
||||
G38.2 Z[-#<_hal[probe.ps_probe_latch]>*2]
|
||||
G90
|
||||
(back to start point)
|
||||
G1 Z#<z> F#<_ini[TOOLSENSOR]RAPID_SPEED>
|
||||
|
||||
o<gtk_probe_down> endsub
|
||||
M2
|
||||
Reference in New Issue
Block a user