I made a change to have the parting subroutine set my Z0 so I could cut off several parts before touching off. I set my parting blade so the right edge is at Z0.
Code:
(info: Parting Off)
o<part>sub
#<OD> = #1 (Outside Dia)
#<ID> = #2 (Inside Dia)
#<ZPos> = #3 (Z Position)
#<SFM> = #4 (SFM)
#<IPM> = #5 (Feed IPM)
#<MaxRPM> = #6 (Max RPM)
#<Tool> = #7 (=5 Tool #)
#<Coolant> = #8 (=8 Coolant)
#<NextTool> = #9 (=1 Next Tool)
#<SetZ0> = #10 (=0 Set Z0 Yes 1)
#<BladeWidth> = #11(Blade Width)
G7 G18 G20 G40 G49
T#<Tool> M6 G43
G96 D#<MaxRPM> S#<SFM>
M3 M#<Coolant>
G0 X#<OD> Z#<ZPos>
G1 X[#<ID> + -0.025] F#<IPM>
G0 X#<OD>
M5 M9
o100 if [#<SetZ0> EQ 1]
G10 L20 P1 Z#<BladeWidth>
(MSG,Z0 Set)
o100 endif
G53 G0 X0 Z0
T#<NextTool> M6 G43
o<part>endsub
JT
