230 G98 L10 *
240 D01 Q23 P01 +Q11 P02 +Q6 *
250 D00 Q24 P01 +Q4 *
260 D01 Q26 P01 +Q6 P02 +Q108 *
270 D00 Q28 P01 +Q8 *
280 D01 Q16 P01 +Q6 P02 -Q10 *
290 G54 X+Q1 Y+Q2 Z-Q16 *
300 G73 G90 H+Q8 *
310 I+0 J+0 *
320 G11 G40 R+Q26 H+Q8 FQ12 *
330 G98 L1 *
340 I+Q108 K+0 *
350 G01 Y+0 Z+0 FQ12 *
360 G98 L2 *
370 G11 G40 R+Q6 H+Q24 FQ12 *
380 D02 Q24 P01 +Q24 P02 +Q14 *
390 D11 P01 +Q24 P02 +Q5 P03 2 *
400 G11 R+Q6 H+Q5 FQ12 *
410 G01 G40 Z+Q23 F1000 *
420 G00 G40 X+Q26 *
430 D01 Q28 P01 +Q28 P02 +Q18 *
440 D00 Q24 P01 +Q4 *
450 G73 G90 H+Q28 *
460 D12 P01 +Q28 P02 +Q9 P03 1 *
470 D09 P01 +Q28 P02 +Q9 P03 1 *
480 G73 G90 H+0 *
490 G54 X+0 Y+0 Z+0 *
500 G98 L0 *
999999 %KOGEL G71 *
272
Onderprogramma 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
Pool vastleggen in het X/Y-vlak voor voorpositionering
Voorpositioneren in het vlak
Voorpositioneren in de spilas
Pool vastleggen in Z/X-vlak, verstelt met de gereedschapsradius
Verplaatsen naar diepte
Benaderde „boog" naar boven benaderen
Uitruimhoek actualiseren
Boog klaar ? Nee, dan terug naar Label 2
Eindhoek in het werkbereik benaderen
In de spilas terugtrekken
Voorpositioneren voor volgende boog
Rotatiepositie in het vlak actualiseren
Uitruimhoek terugzetten
Nieuwe rotatiepositie activeren
Niet klaar ? Nee, dan terugspringen naar LBL 1
Rotatie terugzetten
Nulpuntverschuiving terugzetten
Einde onderprogramma
10 Programmeren: Q-parameters