N210 G00 G40 Z+250 M2 *
N220 G98 L10 *
N230 Q16 = Q6 - Q10 - Q108
N240 D00 Q20 P01 +1 *
N250 D00 Q24 P01 +Q4 *
N260 Q25 = (Q5 - Q4) / Q13
N270 G54 X+Q1 Y+Q2 Z+Q3 *
N280 G73 G90 H+Q8 *
N290 G00 G40 X+0 Y+0 *
N300 G01 Z+5 F1000 M3 *
N310 G98 L1 *
N320 I+0 K+0 *
N330 G11 R+Q16 H+Q24 FQ11 *
N340 G01 G40 Y+Q7 FQ12 *
N350 D01 Q20 P01 +Q20 P02 +1 *
N360 D01 Q24 P01 +Q24 P02 +Q25 *
N370 D11 P01 +Q20 P02 +Q13 P03 99 *
N380 G11 R+Q16 H+Q24 FQ11 *
N390 G01 G40 Y+0 FQ12 *
N400 D01 Q20 P01 +Q20 P02 +1 *
N410 D01 Q24 P01 +Q24 P02 +Q25 *
N420 D12 P01 +Q20 P02 +Q13 P03 1 *
N430 G98 L99 *
N440 G73 G90 H+0 *
N450 G54 X+0 Y+0 Z+0 *
N460 G98 L0 *
N999999 %CILIN G71 *
HEIDENHAIN iTNC 530
Gereedschap terugtrekken, einde programma
Onderprogramma 10: bewerking
Overmaat en gereedschap gerelateerd aan cilinderradius verrekenen
Teller voor het aantal sneden vastleggen
Starthoek werkbereik (vlak Z/X) kopiëren
Hoekstap berekenen
Nulpunt naar het midden van de cilinder (X-as) verschuiven
Rotatiepositie in het vlak verrekenen
Voorpositioneren in het vlak naar het midden van de cilinder
Voorpositioneren in de spilas
Pool vastleggen in het Z/X-vlak
Startpositie op cilinder benaderen, schuin in het materiaal instekend
Snede in lengterichting Y+
Teller voor het aantal sneden actualiseren
Ruimtelijke hoek actualiseren
Klaar ? Ja, dan naar het einde springen
Langs benaderde "boog" verplaatsen voor volgende snede in
lengterichting
Snede in lengterichting Y–
Teller voor het aantal sneden actualiseren
Ruimtelijke hoek actualiseren
Niet klaar ? Nee, dan terugspringen naar LBL 1
Rotatie terugzetten
Nulpuntverschuiving terugzetten
Einde onderprogramma
449