17 CALL LBL 10
18 FN 0: Q10 = +0
19 FN 0: Q18 = +5
20 CALL LBL 10
21 L Z+100 R0 FMAX M2
22 LBL 10
23 FN 1: Q23 = +Q11 + +Q6
24 FN 0: Q24 = +Q4
25 FN 1: Q26 = +Q6 + +Q108
26 FN 0: Q28 = +Q8
27 FN 1: Q16 = +Q6 + -Q10
28 CYCL DEF 7.0 NULPUNT
29 CYCL DEF 7.1 X+Q1
30 CYCL DEF 7.2 Y+Q2
31 CYCL DEF 7.3 Z-Q16
32 CYCL DEF 10.0 ROTATIE
33 CYCL DEF 10.1 ROT+Q8
34 LBL 1
35 CC X+0 Y+0
36 LP PR+Q26 PA+Q8 R0 FQ12
37 CC Z+0 X+Q108
38 L Y+0 Z+0 FQ12
HEIDENHAIN TNC 620
Bewerking oproepen
Overmaat terugzetten
Hoekstap in het vlak X/Y voor het nabewerken
Bewerking oproepen
Gereedschap terugtrekken, einde programma
Subprogramma 10: bewerking
Z-coördinaat voor voorpositionering berekenen
Starthoek werkbereik (vlak Z/X) kopiëren
Kogelradius corrigeren voor voorpositionering
Rotatiepositie in het vlak kopiëren
Rekening houden met de overmaat bij de kogelradius
Nulpunt naar het centrum van de kogel verschuiven
Starthoek rotatiepositie in het vlak verrekenen
Voorpositioneren in de spilas
Pool vastleggen in het X/Y-vlak voor voorpositionering
Voorpositioneren in het vlak
Pool vastleggen in het Z/X-vlak, verplaatst met de
gereedschapsradius
Verplaatsen naar diepte
457