o<gtk_probe_yplus> sub

#<y>=#<_y> (save start Y position) 
G91
F #<_hal[probe.ps_searchvel]>
G38.2 Y[#<_hal[probe.ps_probe_max]>]
G1 Y[-#<_hal[probe.ps_probe_latch]>] F#<_ini[TOOLSENSOR]RAPID_SPEED> 
F #<_hal[probe.ps_probevel]>
G4 P0.5
G38.2 Y[#<_hal[probe.ps_probe_latch]>*2]
(print, probe Y=#5062 )
G90
(back to start point)
G1 Y#<y> F#<_ini[TOOLSENSOR]RAPID_SPEED> 

o<gtk_probe_yplus> endsub
M2