11 pr ogrammierbeispiele – HEIDENHAIN TNC 426 (280 476) Instrukcja Obsługi
Strona 425
398
10 Programowanie: Q parametry
10.11 Pr
ogrammierBeispiele
20 LBL 10
Podprogram 10: Obróbka
21 CYKL DEF 7.0 PUNKT ZEROWY
Przesun ć punkt zerowy do centrum elipsy
22 CYKL DEF 7.1 X+Q1
23 CYKL DEF 7.2 Y+Q2
24 CYKL DEF 10.0 OBRÓT
Wyliczyć położenie przy obrocie na płaszczyźnie
25 CYKL DEF 10.1 OBR+Q8
26 Q35 = (Q6 Q5) / Q7
Obliczyć przyrost (krok) k ta
27 Q36 = Q5
Skopiować k t startu
28 Q37 = 0
Nastawić licznik przejść
29 Q21 = Q3 * COS Q36
X współrz dn punktu startu obliczyć
30 Q22 = Q4 * SIN Q36
Y współrz dn punktu startu obliczyć
31 L X+Q21 Y+Q22 R0 F MAX M3
Najechać punkt startu na płaszczyźnie
32 L Z+Q12 R0 F MAX
Pozycjonować wst pnie na odst p bezpieczeństwa w osi
wrzeciona
33 L Z Q9 R0 FQ10
Przemieścić narz dzie na gł bokość obróbki
34 LBL 1
35 Q36 = Q36 + Q35
Zaktualizować k t
36 Q37 = Q37 + 1
Zaktualizować licznik przejść
37 Q21 = Q3 * COS Q36
Obliczyć aktualn X współrz dn
38 Q22 = Q4 * SIN Q36
Obliczyć aktualn Y współrz dn
39 L X+Q21 Y+Q22 R0 FQ11
Najechać nast pny punkt
40 FN 12: IF +Q37 EQU +Q7 SKOK (GOTO)
LBL 1
Zapytanie czy nie gotowy, jeśli tak to skok do LBL 1
41 CYKL DEF 10.0 OBRÓT
Wycofać obrót
42 CYKL DEF 10.1 OBR+0
43 CYKL DEF 7.0 PUNKT ZEROWY
Wycofać przesuni cie punktu zerowego
44 CYKL DEF 7.1 X+0
45 CYKL DEF 7.2 Y+0
46 L Z+Q12 R0 F MAX
Odsun ć narz dzie na odst p bezpieczeństwa
47 LBL 0
Koniec podprogramu
48 END PGM ELIPSA MM
BHB430.BOOK Seite 398 Dienstag, 27. Juni 2006 1:29 13