Heidenhain iTNC 530

Hier findest Du einige Parameterprogramme für Fräsmaschinen mit der Heidenhain iTNC 530 Steuerung. Für tägliche und sich oft wiederholende Bearbeitungen kann man sich schonmal das Leben erleichtern.

Keilnut (mit Anzug) stossen

Um eine Keilnut auf der Maschine zu stossen, fehlt mir an der iTNC 530 leider der Zyklus, somit habe ich mir selbst einen geschrieben. Da normalerweise Plättchen der Toleranzklasse P9 verwendet werden, hab ich noch um den Eintrag Schichtdicke erweitert, um vor einer etwaigen Oberflächenbehandlung die Nut zu verbreitern.

keilnut_stossen.h

Code eingefügt. Hier klicken zum Ein- / Ausblenden
0  BEGIN PGM Keilnut stossen MM 
1  BLK FORM 0.1 Z  X-100  Y-100  Z-50
2  BLK FORM 0.2  X+100  Y+100  Z+0
3  ;
4  ; Variablen fuer Keilnut definieren
5  ;
6  Q801 = 0 ; X Koordinate
7  Q802 = 0 ; Y Koordinate
8  Q803 = 0 ; Winkel Nut
9  ;
10 Q804 = 2.9 ; Tiefe Nut
11 ;
12 Q805 = 42 ; Dicke Material
13 Q806 = 6 ; Breite Nut / Werkzeug
14 Q807 = 10 ; Radius Bohrung
15 Q808 = 0.015 ; Zugabe Schichtdicke
16 ;
17 ; Variablen fuer Zyklus definieren
18 ;
19 Q810 = 0.02 ; Zustellung Span
20 Q811 = 5000 ; Vorschub
21 Q812 = 38 ; Werkzeug Nummer
22 Q813 = 3.05 ; Exzentermass Schneide
23 Q814 = 6.5 ; Radius WKZ Halter
24 Q815 = 270 ; Winkel Differenz
25 Q816 = 5 ; Sicherheitsabstand Z
26 Q817 = 50 ; 2. Sicherheitsabstand Z
27 Q818 = 0.2 ; Anfahrabstand Schneide
28 ;
29 ; Ab hier nichts mehr aendern!!
30 ;
31 TOOL CALL Q812 Z
32 CYCL DEF 19.0 BEARBEITUNGSEBENE
33 CYCL DEF 19.1  B+0  C+0
34 CYCL DEF 7.0 NULLPUNKT
35 CYCL DEF 7.1  X+Q801
36 CYCL DEF 7.2  Y+Q802
37 Q801 = 0
38 Q802 = 0
39 Q820 = Q815 - Q803
40 Q821 = SQRT ( SQ Q807 - SQ ( Q806 / 2 ) ) - Q818 - Q814 - Q813
41 Q822 = ( 2 * Q807 - SQRT ( 4 * SQ Q807 - SQ Q806 ) ) / 2
42 Q823 = Q801 + Q821
43 Q824 = Q823
44 Q825 = Q801 + Q821 + Q804 + Q818 + Q822 + Q808
45 CYCL DEF 13.0 ORIENTIERUNG
46 CYCL DEF 13.1 WINKELQ820
47 M20
48 CYCL DEF 10.0 DREHUNG
49 CYCL DEF 10.1  ROT+Q803
50 L  X+Q823  Y+Q802 FMAX
51 L  Z+Q816 FMAX M7
52 LBL "CONTINUE"
53 L  Z-Q805 FQ811
54 L  X+Q824 FQ811
55 L  Z+Q816 FMAX
56 FN 9: IF +Q808 EQU +0 GOTO LBL "NEXT"
57 L  X+Q823  Y+Q808 FMAX
58 L  Z-Q805 FQ811
59 L  X+Q824 FQ811
60 L  Z+Q816 FMAX
61 L  X+Q823  Y-Q808 FMAX
62 L  Z-Q805 FQ811
63 L  X+Q824 FQ811
64 L  Z+Q816 FMAX
65 LBL "NEXT"
66 Q823 = Q823 + Q810
67 L  X+Q823  Y+Q802 FMAX
68 FN 12: IF +Q823 LT +Q825 GOTO LBL "CONTINUE"
69 FN 9: IF +Q823 EQU +Q825 GOTO LBL "CONTINUE"
70 FN 11: IF +Q823 GT +Q825 GOTO LBL "ENDE"
71 LBL "ENDE"
72 CYCL DEF 19.0 BEARBEITUNGSEBENE
73 CYCL DEF 19.1  B+0  C+0
74 CYCL DEF 7.0 NULLPUNKT
75 CYCL DEF 7.1  X+0
76 CYCL DEF 7.2  Y+0
77 L  Z+Q817 FMAX M9
78 CYCL DEF 13.0 ORIENTIERUNG
79 CYCL DEF 13.1 WINKEL0
80 M20
81 CYCL DEF 10.0 DREHUNG
82 CYCL DEF 10.1  ROT+0
83 L  Y+0  Z-175 FMAX M91
84 TOOL CALL 48 Z
85 L  Y+0  Z-175 FMAX M91 M30
86 END PGM Keilnut stossen MM

Erklärung einiger Parameter:

Wenn Wert größer 0, Zugabe Schichtdicke in Richtung Nut, links und rechts davon!

Parameter
15 Q808 = 0.015 ; Zugabe Schichtdicke

Hier muss die Differenz von Spindelnullstellung M19 zu ROT 0 Grad eingegeben werden, ich stelle das weiter unten im Programm gleich.

Hintergrund: Beim Spindelwinkel liegt die 0 anders, als im Koordinatensystem und kann nur positiv eingegeben werden.

Parameter
24 Q815 = 270 ; Winkel Differenz

Drehe Spindel auf Koordinatensystem von ROT (X+ Richtung ist Null, aufsteigend nach Y+), somit ist beides synchon, durch die Differenzeingabe oben setze ich beides gleich:

Parameter
45 CYCL DEF 13.0 ORIENTIERUNG
46 CYCL DEF 13.1 WINKELQ820
47 M20

Leicht modifiziert kann das Programm auch für alte Ausführungen der Keilnut, nämlich mit Anzug (und Krawatte Smiley ) genutzt werden.

keilnut_mit_anzug_stossen.h

Code eingefügt. Hier klicken zum Ein- / Ausblenden
0  BEGIN PGM Keilnut mit Anzug stossen MM 
1  BLK FORM 0.1 Z  X-100  Y-100  Z-50
2  BLK FORM 0.2  X+100  Y+100  Z+0
3  ;
4  ; Achtung, hier muss man auf mehrere
5  ; Dinge gleichzeitig achten:
6  ; Sicherheitsabstand Anfang Nut ver-
7  ; groessern, Winkel immer auf 0,
8  ; B Achse schwenkt auf Winkel fuer
9  ; Anzug, C Achse auf +90 Grad drehen
10 ; (= Winkel 0, siehe oben )
11 ; Tiefe muss auch tiefer werden
12 ;
29 ; Variablen fuer Keilnut definieren
30 ;
31 Q801 = 0 ; X Koordinate
32 Q802 = 0 ; Y Koordinate
33 Q803 = 0 ; Winkel Nut
34 ;
35 Q804 = 2.6 ; Tiefe Nut
36 ;
37 Q805 = 50 ; Dicke Material
38 Q806 = 14 ; Breite Nut / Werkzeug
39 Q807 = 22.5 ; Radius Bohrung
40 Q808 = 0 ; Zugabe Schichtdicke
41 ;
42 ; Variablen fuer Zyklus definieren
43 ;
44 Q810 = 0.015 ; Zustellung Span
45 Q811 = 4500 ; Vorschub
46 Q812 = 33 ; Werkzeug Nummer
47 Q813 = 8.22 ; Exzentermass Schneide
48 Q814 = 14.24 ; Radius WKZ Halter
49 Q815 = 270 ; Winkel Differenz
50 Q816 = 5 ; Sicherheitsabstand Z
51 Q817 = 50 ; 2. Sicherheitsabstand Z
52 Q818 = 0.7 ; Anfahrabstand Schneide
53 ;
54 ; Ab hier nichts mehr aendern!!
55 ;
56 TOOL CALL Q812 Z
57 CYCL DEF 7.0 NULLPUNKT
58 CYCL DEF 7.1  X+Q801
59 CYCL DEF 7.2  Y+Q802
60 ;
61 PLANE SPATIAL SPA+0 SPB-0.573 SPC+90 TURN FMAX SEQ- COORD ROT
62 ;
63 Q801 = 0
64 Q802 = 0
65 Q820 = Q815 - Q803
66 Q821 = SQRT ( SQ Q807 - SQ ( Q806 / 2 ) ) - Q818 - Q814 - Q813
67 Q822 = ( 2 * Q807 - SQRT ( 4 * SQ Q807 - SQ Q806 ) ) / 2
68 Q823 = Q801 + Q821
69 Q824 = Q823
70 Q825 = Q801 + Q821 + Q804 + Q818 + Q822 + Q808
71 CYCL DEF 13.0 ORIENTIERUNG
72 CYCL DEF 13.1 WINKELQ820
73 M20
74 CYCL DEF 10.0 DREHUNG
75 CYCL DEF 10.1  ROT+Q803
76 L  X+Q823  Y+Q802 FMAX
77 L  Z+Q816 FMAX M7
78 LBL "CONTINUE"
79 L  Z-Q805 FQ811
80 L  X+Q824 FQ811
81 L  Z+Q816 FMAX
82 FN 9: IF +Q808 EQU +0 GOTO LBL "NEXT"
83 L  X+Q823  Y+Q808 FMAX
84 L  Z-Q805 FQ811
85 L  X+Q824 FQ811
86 L  Z+Q816 FMAX
87 L  X+Q823  Y-Q808 FMAX
88 L  Z-Q805 FQ811
89 L  X+Q824 FQ811
90 L  Z+Q816 FMAX
91 LBL "NEXT"
92 Q823 = Q823 + Q810
93 L  X+Q823  Y+Q802 FMAX
94 FN 12: IF +Q823 LT +Q825 GOTO LBL "CONTINUE"
95 FN 9: IF +Q823 EQU +Q825 GOTO LBL "CONTINUE"
96 FN 11: IF +Q823 GT +Q825 GOTO LBL "ENDE"
97 LBL "ENDE"
98 M0
99 CYCL DEF 19.0 BEARBEITUNGSEBENE
100 CYCL DEF 19.1  A+0  B+0  C+0
101 CYCL DEF 7.0 NULLPUNKT
102 CYCL DEF 7.1  X+0
103 CYCL DEF 7.2  Y+0
/ 104 L  Z+Q817 FMAX M9
105 L  Z-175 FMAX M9 M91
106 ;
107 PLANE RESET TURN FMAX
108 ;
109 CYCL DEF 13.0 ORIENTIERUNG
110 CYCL DEF 13.1 WINKEL0
111 M20
112 CYCL DEF 10.0 DREHUNG
113 CYCL DEF 10.1  ROT+0
114 L  Y+0  Z-175 FMAX M91
115 TOOL CALL 48 Z S100
116 L  Y+0 FMAX M91 M30
117 END PGM Keilnut mit Anzug stossen MM

Zurück