G21 G91 G17
G0 X0 Y0 Z0
O100 call
G0 X2
M30
O100 sub
M73
G90
G0 X10
O100 endsub