See "example: linear, Movements and chamfers with cartesian coordinates, Path contours - cartesian coordinates 6.4 – HEIDENHAIN TNC 640 (34059x-05) ISO programming User Manual
Page 229

Path contours - Cartesian coordinates
6.4
6
TNC 640 | User's ManualDIN/ISO Programming | 1/2015
229
Example: Linear movements and chamfers with
Cartesian coordinates
%LINEAR G71 *
N10 G30 G17 X+0 Y+0 Z-20 *
Define the workpiece blank for graphic workpiece
simulation
N20 G31 G90 X+100 Y+100 Z+0 *
N30 T1 G17 S4000 *
Call the tool in the spindle axis and with the spindle speed S
N40 G00 G40 G90 Z+250 *
Retract the tool in the spindle axis at rapid traverse
N50 X-10 Y-10 *
Pre-position the tool
N60 G01 Z-5 F1000 M3 *
Move to working depth at feed rate F = 1000 mm/min
N70 G01 G41 X+5 Y+5 F300 *
Approach the contour at point 1, activate radius
compensation G41
N80 G26 R5 F150 *
Tangential approach
N90 Y+95 *
Move to point 2
N100 X+95 *
Point 3: first straight line for corner 3
N110 G24 R10 *
Program a chamfer with length 10 mm
N120 Y+5 *
Point 4: 2nd straight line for corner 3, 1st straight line for
corner 4
N130 G24 R20 *
Program a chamfer with length 20 mm
N140 X+5 *
Move to last contour point 1, second straight line for corner
4
N150 G27 R5 F500 *
Tangential exit
N160 G40 X-20 Y-20 F1000 *
Retract the tool in the working plane, cancel radius
compensation
N170 G00 Z+250 M2 *
Retract the tool, end program
N99999999 %LINEAR G71 *