(Pocket Mill - Y/Z Plane G19) G0 G49 G40.1 G19 G80 G50 G90 G98 G20 (Inch) (Center Pocket = Y0.0) (Width = 2.0 + ball mill dia.) (Radius of Arc = 1.00") (Parameter #11 = X step incr.) G00 X0 Y0 M6 T4 (M03 S800) G00 G43 H4 Z.1 #11=[0] G00 X0 Y0 Z.1 G01 Z0.0 F20 M98 p1000 L5 G00 Z.1 G4 P2 G00 Z.5 M5 M30 (Cutting subroutine) O1000 G0 Y-1 X#11 F40 G19 G3 Y1 J0 K0 #11=[#11+.1] G01 X#11 G19 G2 Y-1 J0 K0 #11=[#11+.1] m99