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 NULLPUNKT
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 DREHUNG
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
Bearbeitung aufrufen
Aufmaß rücksetzen
Winkelschritt in der Ebene X/Y fürs Schlichten
Bearbeitung aufrufen
Werkzeug freifahren, Programm-Ende
Unterprogramm 10: Bearbeitung
Z-Koordinate für Vorpositionierung berechnen
Startwinkel Raum (Ebene Z/X) kopieren
Kugelradius korrigieren für Vorpositionierung
Drehlage in der Ebene kopieren
Aufmaß berücksichtigen beim Kugelradius
Nullpunkt ins Zentrum der Kugel verschieben
Startwinkel Drehlage in der Ebene verrechnen
Vorpositionieren in der Spindelachse
Pol setzen in der X/Y-Ebene für Vorpositionierung
Vorpositionieren in der Ebene
Pol setzen in der Z/X-Ebene, um Werkzeug-Radius versetzt
Fahren auf Tiefe
457