HEIDENHAIN TNC 620 Programming Station, User Manual

Page: 383 / 695

Programming examples 9.12
9
HEIDENHAIN | TNC 620 | ISO Programming User's Manual | 9/2016
383
N320 G11 G40 R+Q26 H+Q8 FQ12*
Pre-position in the plane
N330 I+Q108 K+0*
Set pole in the Z/X plane, offset by the tool radius
N340 G01 Y+0 Z+0 FQ12*
Move to working depth
N350 G98 L2*
N360 G11 G40 R+Q6 H+Q24 FQ12*
Move upward in an approximated "arc"
N370 D02 Q24 P01 +Q24 P02 +Q14*
Update solid angle
N380 D11 P01 +Q24 P02 +Q5 P03 2*
Inquire whether an arc is finished. If not finished, return to
LBL 2
N390 G11 R+Q6 H+Q5 FQ12*
Move to the end angle in space
N400 G01 G40 Z+Q23 F1000*
Retract in the spindle axis
N410 G00 G40 X+Q26*
Pre-position for next arc
N420 D01 Q28 P01 +Q28 P02 +Q18*
Update rotational position in the plane
N430 D00 Q24 P01 +Q4*
Reset solid angle
N440 G73 G90 H+Q28*
Activate new rotational position
N450 D12 P01 +Q28 P02 +Q9 P03 1*
Unfinished? If not finished, return to LBL 1
N460 D09 P01 +Q28 P02 +Q9 P03 1*
N470 G73 G90 H+0*
Reset the rotation
N480 G54 X+0 Y+0 Z+0*
Reset the datum shift
N490 G98 L0*
End of subprogram
N99999999 %SPHERE G71 *