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.

Ablängen

Dieses Programm nutze ich sehr oft, da ich immer an Plattenmaterial die Nullkanten / Stirnseiten fräsen muss.

ablaengen.h

Code eingefügt.
0  BEGIN PGM Ablaengen MM 
1  ;
2  ; Variablen fuer Werkstueck definieren
3  ;
4  Q522 = 0 ; 0 = RL / 1 = RR
5  ;
6  Q501 = - 1490 ; Koordinate X-
7  Q502 = 0 ; Koordinate X+
8  Q503 = - 35 ; Koordinate Y-
9  Q504 = 0 ; Koordinate Y+
10 Q505 = - 15 ; Tiefe Z
11 ;
12 ; Variablen fuer Fraesen definieren
13 ;
14 Q506 = 5 ; Sicherheitsabstand Z
15 Q507 = 50 ; 2. Sicherheitsabstand Z
16 Q508 = 1000 ; Vorschub Zustellung
17 Q509 = 1500 ; Vorschub Schruppen
18 Q510 = 1000 ; Vorschub Schlichten
19 Q511 = 1 ; Werkzeug Schruppen
20 Q512 = 250 ; Vc Schruppen
21 Q513 = 2 ; Werkzeug Schlichten
22 Q514 = 250 ; Vc Schlichten
23 Q515 = 0.3 ; Aufmass Laenge
24 Q516 = 0.3 ; Aufmass Radius
25 ;
26 ; Ab hier nichts mehr aendern!!
27 ;
28 Q523 = 1
29 TOOL CALL Q511 Z S( VC = Q512 ) ~
    FQ509 DL+Q515 DR+Q516
30 M17
31 FN 9: IF +Q522 EQU +0 GOTO LBL "KONTUR_RL"
32 FN 9: IF +Q522 EQU +1 GOTO LBL "KONTUR_RR"
33 LBL "SCHLICHTEN"
34 FN 11: IF +Q523 GT +2 GOTO LBL "ENDE"
35 LBL "PLACEHOLDER"
36 ;
37 ; zusaetzliche Bearbeitung (Stirn)
38 ;
39 CYCL DEF 19.0 BEARBEITUNGSEBENE
40 CYCL DEF 19.1  B+0  C+0
41 CYCL DEF 7.0 NULLPUNKT
42 CYCL DEF 7.1  X-1490
43 CYCL DEF 7.2  Z-8
44 L  X-500 FMAX
45 CYCL DEF 304 ~
    Q1994=-75 ~
    Q1998=+1 ~
    Q1999=+1
46 L  X-20  Y+20  Z+100 FMAX M3
47 L  Z+10 FMAX
48 L  Z-10 F1000
49 L  X+0 RR F AUTO
50 L  Y-55 RR F AUTO
51 L  Z+50 R0 FMAX
52 CYCL DEF 19.0 BEARBEITUNGSEBENE
53 CYCL DEF 19.1  B+0  C+0
54 CYCL DEF 7.0 NULLPUNKT
55 CYCL DEF 7.1  X+0
56 CYCL DEF 7.2  Z+0
57 LBL 0
58 TOOL CALL Q513 Z S( VC = Q514 ) ~
    FQ510
59 M7 M8
60 FN 9: IF +Q522 EQU +0 GOTO LBL "KONTUR_RL"
61 FN 9: IF +Q522 EQU +1 GOTO LBL "KONTUR_RR"
62 LBL "KONTUR_RL"
63 Q517 = Q501 - ( Q108 * 2 ) ; 2x Radius X-
64 Q518 = Q504 + ( Q108 * 2 ) ; 2x Radius Y+
65 Q519 = Q505 + ( Q505 * 0.075 ) ; 7.5% tiefer Z-
66 Q520 = Q503 - ( Q108 * 2 ) ; 2x Radius Y-
67 Q521 = Q502 + ( Q108 * 2 ) ; 2x Radius X+
68 CYCL DEF 301 ~
    Q1998=+1
69 L  X+Q521  Y+Q518 FMAX M3
70 L  Z+Q506 FMAX
71 L  Z+Q519 FQ508
72 L  X+Q502 RL F AUTO
73 L  Y+Q520 RL F AUTO
74 L  Z+Q507 R0 FMAX
75 L  X+Q517 FMAX
76 L  Z+Q506 FMAX
77 L  Z+Q519 FQ508
78 L  X+Q501 RL F AUTO
79 L  Y+Q518 RL F AUTO
80 L  Z+Q507 R0 FMAX
81 Q523 = Q523 + 1
82 FN 9: IF +0 EQU +0 GOTO LBL "SCHLICHTEN"
83 LBL "KONTUR_RR"
84 Q517 = Q501 - ( Q108 * 2 ) ; 2x Radius X-
85 Q518 = Q504 + ( Q108 * 2 ) ; 2x Radius Y+
86 Q519 = Q505 + ( Q505 * 0.075 ) ; 7.5% tiefer Z-
87 Q520 = Q503 - ( Q108 * 2 ) ; 2x Radius Y-
88 Q521 = Q502 + ( Q108 * 2 ) ; 2x Radius X+
89 CYCL DEF 301 ~
    Q1998=+1
90 L  X+Q517  Y+Q518 FMAX M3
91 L  Z+Q506 FMAX
92 L  Z+Q519 FQ508
93 L  X+Q501 RR F AUTO
94 L  Y+Q520 RR F AUTO
95 L  Z+Q507 R0 FMAX
96 L  X+Q521 FMAX
97 L  Z+Q506 FMAX
98 L  Z+Q519 FQ508
99 L  X+Q502 RR F AUTO
100 L  Y+Q518 RR F AUTO
101 L  Z+Q507 R0 FMAX
102 Q523 = Q523 + 1
103 FN 9: IF +0 EQU +0 GOTO LBL "SCHLICHTEN"
104 LBL "ENDE"
105 CALL LBL "PLACEHOLDER"
106 TOOL CALL 0 Z S100
107 L  X+250 IY-250 FMAX M30
108 END PGM Ablaengen MM

Zurück