19 lines
442 B
Plaintext
19 lines
442 B
Plaintext
o<gtk_probe_xminus> sub
|
|
|
|
#<x>=#<_x> (save start X position)
|
|
(PRINT, position #<_x> )
|
|
G91
|
|
F #<_hal[probe.ps_searchvel]>
|
|
G38.2 X[-#<_hal[probe.ps_probe_max]>]
|
|
G1 X[#<_hal[probe.ps_probe_latch]>] F#<_ini[TOOLSENSOR]RAPID_SPEED>
|
|
F #<_hal[probe.ps_probevel]>
|
|
G4 P0.5
|
|
G38.2 X[-#<_hal[probe.ps_probe_latch]>*2]
|
|
(print, probe X=#5061 )
|
|
G90
|
|
(PRINT, back to start point #<x>)
|
|
G1 X#<x> F#<_ini[TOOLSENSOR]RAPID_SPEED>
|
|
|
|
o<gtk_probe_xminus> endsub
|
|
M2
|