o<go_to_g30> sub
; Lathe specific version

M73
G90
G30

o<go_to_g30> endsub

M2