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

Programming: Subprograms and program section repeats
8.6 Programming examples
8
248
TNC 640 | User's Manual for DIN/ISO Programming | 5/2013
N170 G98 L1 * Beginning of subprogram 1: Entire hole pattern
N180 G00 G40 G90 X+15 Y+10 M3 * Move to starting point for group 1
N190 L2,0 * Call subprogram 2 for the group
N200 X+45 Y+60 * Move to starting point for group 2
N210 L2,0 * Call subprogram 2 for the group
N220 X+75 Y+10 * Move to starting point for group 3
N230 L2,0 * Call subprogram 2 for the group
N240 G98 L0 * End of subprogram 1
N250 G98 L2 * Beginning of subprogram 2: Group of holes
N260 G79 * Call cycle for 1st hole
N270 G91 X+20 M99 * Move to 2nd hole, call cycle
N280 Y+20 M99 * Move to 3rd hole, call cycle
N290 X-20 G90 M99 * Move to 4th hole, call cycle
N300 G98 L0 * End of subprogram 2
N310 %UP2 G71 *