HEIDENHAIN TNC 640 (34059x-02) ISO programming - Manual (Page 213)

Path contours – Polar coordinates 6.5
6
TNC 640 | User's Manual for DIN/ISO Programming | 5/2013
213
Example: Linear movement with polar coordinates
%LINEARPO G71 *
N10 G30 G17 X+0 Y+0 Z-20 *
Definition of workpiece blank
N20 G31 G90 X+100 Y+100 Z+0 *
N30 T1 G17 S4000 *
Tool call
N40 G00 G40 G90 Z+250 * Define the datum for polar coordinates
N50 I+50 J+50 * Retract the tool
N60 G10 R+60 H+180 * Pre-position the tool
N70 G01 Z-5 F1000 M3 * Move to working depth
N80 G11 G41 R+45 H+180 F250 * Approach the contour at point 1
N90 G26 R5 * Approach the contour at point 1
N100 H+120 * Move to point 2
N110 H+60 * Move to point 3
N120 H+0 * Move to point 4
N130 H-60 * Move to point 5
N140 H-120 * Move to point 6
N150 H+180 * Move to point 1
N160 G27 R5 F500 * Tangential exit
N170 G40 R+60 H+180 F1000 * Retract the tool in the working plane, cancel radius
compensation
N180 G00 Z+250 M2 * Retract in the spindle axis, end of program
N99999999 %LINEARPO G71 *