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  ;
21 ; Variablen fuer Keilnut definieren
22 ;
23 Q801 = 0 ; X Koordinate
24 Q802 = 0 ; Y Koordinate
25 Q803 = 0 ; Winkel Nut
26 ;
27 Q804 = 2.35 ; Tiefe Nut
28 ;
29 Q805 = 35 ; Dicke Material
30 Q806 = 5 ; Breite Nut / Werkzeug
31 Q807 = 8 ; Radius Bohrung
32 Q808 = 0.0075 ; Zugabe Schichtdicke
33 ;
34 ; Variablen fuer Zyklus definieren
35 ;
36 Q810 = 0.02 ; Zustellung Span
37 Q811 = 5000 ; Vorschub
38 Q812 = 57 ; Werkzeug Nummer
39 Q813 = - 0.95 ; Exzentermass Schneide
40 Q814 = 5 ; Radius WKZ Halter
41 Q815 = 270 ; Winkel Differenz
42 Q816 = 5 ; Sicherheitsabstand Z
43 Q817 = 50 ; 2. Sicherheitsabstand Z
44 Q818 = 0.2 ; Anfahrabstand Schneide
45 ;
46 ; Ab hier nichts mehr aendern!!
47 ;
48 TOOL CALL Q812 Z
49 PLANE RESET STAY
50 CYCL DEF 7.0 NULLPUNKT
51 CYCL DEF 7.1  X+Q801
52 CYCL DEF 7.2  Y+Q802
53 Q801 = 0
54 Q802 = 0
55 Q820 = Q815 - Q803
56 Q821 = SQRT ( SQ Q807 - SQ ( Q806 / 2 ) ) - Q818 - Q814 - Q813
57 Q822 = ( 2 * Q807 - SQRT ( 4 * SQ Q807 - SQ Q806 ) ) / 2
58 Q823 = Q801 + Q821
59 Q824 = Q823
60 Q825 = Q801 + Q821 + Q804 + Q818 + Q822 + Q808
61 CYCL DEF 13.0 ORIENTIERUNG
62 CYCL DEF 13.1 WINKELQ820
63 M20 M35
64 CYCL DEF 10.0 DREHUNG
65 CYCL DEF 10.1  ROT+Q803
66 L  X+Q823  Y+Q802 FMAX
67 L  Z+Q816 FMAX M7
68 LBL "CONTINUE"
69 L  Z-Q805 FQ811
70 L  X+Q824 FQ811
71 L  Z+Q816 FMAX
72 FN 9: IF +Q808 EQU +0 GOTO LBL "NEXT"
73 L  X+Q823  Y+Q808 FMAX
74 L  Z-Q805 FQ811
75 L  X+Q824 FQ811
76 L  Z+Q816 FMAX
77 L  X+Q823  Y-Q808 FMAX
78 L  Z-Q805 FQ811
79 L  X+Q824 FQ811
80 L  Z+Q816 FMAX
81 LBL "NEXT"
82 Q823 = Q823 + Q810
83 L  X+Q823  Y+Q802 FMAX M20
84 FN 12: IF +Q823 LT +Q825 GOTO LBL "CONTINUE"
85 FN 9: IF +Q823 EQU +Q825 GOTO LBL "CONTINUE"
86 FN 11: IF +Q823 GT +Q825 GOTO LBL "ENDE"
87 LBL "ENDE"
88 PLANE RESET STAY
89 CYCL DEF 7.0 NULLPUNKT
90 CYCL DEF 7.1  X+0
91 CYCL DEF 7.2  Y+0
92 L  Z+Q817 FMAX M9
93 CYCL DEF 13.0 ORIENTIERUNG
94 CYCL DEF 13.1 WINKEL0
95 M20
96 CYCL DEF 10.0 DREHUNG
97 CYCL DEF 10.1  ROT+0
98 L  Y+0  Z-5 FMAX M92
99 TOOL CALL 100 Z
100 M30
101 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 PLANE RESET STAY
58 CYCL DEF 7.0 NULLPUNKT
59 CYCL DEF 7.1  X+Q801
60 CYCL DEF 7.2  Y+Q802
61 ;
62 PLANE SPATIAL SPA+0 SPB-0.573 SPC+90 TURN FMAX SEQ- COORD ROT
63 ;
64 Q801 = 0
65 Q802 = 0
66 Q820 = Q815 - Q803
67 Q821 = SQRT ( SQ Q807 - SQ ( Q806 / 2 ) ) - Q818 - Q814 - Q813
68 Q822 = ( 2 * Q807 - SQRT ( 4 * SQ Q807 - SQ Q806 ) ) / 2
69 Q823 = Q801 + Q821
70 Q824 = Q823
71 Q825 = Q801 + Q821 + Q804 + Q818 + Q822 + Q808
72 CYCL DEF 13.0 ORIENTIERUNG
73 CYCL DEF 13.1 WINKELQ820
74 M20 M35
75 CYCL DEF 10.0 DREHUNG
76 CYCL DEF 10.1  ROT+Q803
77 L  X+Q823  Y+Q802 FMAX
78 L  Z+Q816 FMAX M7
79 LBL "CONTINUE"
80 L  Z-Q805 FQ811
81 L  X+Q824 FQ811
82 L  Z+Q816 FMAX
83 FN 9: IF +Q808 EQU +0 GOTO LBL "NEXT"
84 L  X+Q823  Y+Q808 FMAX
85 L  Z-Q805 FQ811
86 L  X+Q824 FQ811
87 L  Z+Q816 FMAX
88 L  X+Q823  Y-Q808 FMAX
89 L  Z-Q805 FQ811
90 L  X+Q824 FQ811
91 L  Z+Q816 FMAX
92 LBL "NEXT"
93 Q823 = Q823 + Q810
94 L  X+Q823  Y+Q802 FMAX
95 FN 12: IF +Q823 LT +Q825 GOTO LBL "CONTINUE"
96 FN 9: IF +Q823 EQU +Q825 GOTO LBL "CONTINUE"
97 FN 11: IF +Q823 GT +Q825 GOTO LBL "ENDE"
98 LBL "ENDE"
99 PLANE RESET STAY
100 CYCL DEF 7.0 NULLPUNKT
101 CYCL DEF 7.1  X+0
102 CYCL DEF 7.2  Y+0
103 L  Z-5 FMAX M9 M92
104 PLANE RESET TURN FMAX
105 CYCL DEF 13.0 ORIENTIERUNG
106 CYCL DEF 13.1 WINKEL0
107 M20
108 CYCL DEF 10.0 DREHUNG
109 CYCL DEF 10.1  ROT+0
110 L  Y+0  Z-5 FMAX M92
111 TOOL CALL 100 Z
112 M30
113 END PGM KEILNUT MIT ANZUG STOSSEN MM

Zurück