6 - heidenhain

N200 G98 L10 *
Unterprogramm 10: Bearbeitung
N210 G54 X+Q1 Y+Q2 *
Nullpunkt ins Zentrum der Ellipse verschieben
N220 G73 G90 H+Q8 *
Drehlage in der Ebene verrechnen
N230 Q35 = (Q6 - Q5) / Q7
Winkelschritt berechnen
N240 D00 Q36 P01 +Q5 *
Startwinkel kopieren
N250 D00 Q37 P01 +0 *
Schnittzähler setzen
N260 Q21 = Q3 * COS Q36
X-Koordinate des Startpunkts berechnen
N270 Q22 = Q4 * SIN Q36
Y-Koordinate des Startpunkts berechnen
N280 G00 G40 X+Q21 Y+Q22 M3 *
Startpunkt anfahren in der Ebene
N290 Z+Q12 *
Vorpositionieren auf Sicherheits-Abstand in der Spindelachse
N300 G01 Z-Q9 FQ10 *
Auf Bearbeitungstiefe fahren
N310 G98 L1 *
N320 Q36 = Q36 + Q35
Winkel aktualisieren
N330 Q37 = Q37 + 1
Schnittzähler aktualisieren
N340 Q21 = Q3 * COS Q36
Aktuelle X-Koordinate berechnen
N350 Q22 = Q4 * SIN Q36
Aktuelle Y-Koordinate berechnen
N360 G01 X+Q21 Y+Q22 FQ11 *
Nächsten Punkt anfahren
N370 D12 P01 +Q37 P02 +Q7 P03 1 * Abfrage ob unfertig, wenn ja dann Rücksprung zu Label 1
N380 G73 G90 H+0 *
Drehung rücksetzen
N390 G54 X+0 Y+0 *
Nullpunkt-Verschiebung rücksetzen
N400 G00 G40 Z+Q12 *
Auf Sicherheits-Abstand fahren
N410 G98 L0 *
Unterprogramm-Ende
N999999 %ELLIPSE G71 *
10.10 Programmier-Beispiele
HEIDENHAIN TNC 410, TNC 426, TNC 430 359