HEIDENHAIN ITNC 530 - 6-2010 DIN-ISO PROGRAMMING User Manual page 300

N400 G11 R+Q6 H+Q5 FQ12 *
N410 G01 G40 Z+Q23 F1000 *
N420 G00 G40 X+Q26 *
N430 Q28 = Q28 + Q18 *
N440 Q24 = +Q4 *
N450 G73 G90 H+Q28 *
N460 D12 P01 +Q28 P02 +Q9 P03 1 *
N470 D09 P01 +Q28 P02 +Q9 P03 1 *
N480 G73 G90 H+0 *
N490 G54 X+0 Y+0 Z+0 *
N500 G98 L0 *
N99999999 %SPHERE G71 *
300
Move to the end angle in space
Retract in the tool axis
Pre-position for next arc
Update rotational position in the plane
Reset solid angle
Activate new rotational position
Unfinished? If not finished, return to label 1
Reset the rotation
Reset the datum shift
End of subprogram
Programming: Q Parameters