12 p říklady programování – HEIDENHAIN iTNC 530 (340 49x-06) Uživatelská příručka
Stránka 347
HEIDENHAIN iTNC 530
347
9.12 P
říklady programování
18 L Z+100 R0 FMAX M2
Odjetí nástroje, konec programu
19 LBL 10
Podprogram 10: Obrábění
20 CYCL DEF 7.0 NULOVÝ BOD
Posunutí nulového bodu do středu elipsy
21 CYCL DEF 7.1 X+Q1
22 CYCL DEF 7.2 Y+Q2
23 CYCL DEF 10.0 NATOČENÍ
Započtení natočení v rovině
24 CYCL DEF 10.1 ROT+Q8
25 Q35 = (Q6 - Q5) / Q7
Výpočet úhlového kroku
26 Q36 = Q5
Kopírování úhlu startu
27 Q37 = 0
Nastavení čítače řezů
28 Q21 = Q3 * COS Q36
Výpočet souřadnice X výchozího bodu
29 Q22 = Q4 * SIN Q36
Výpočet souřadnice Y výchozího bodu
30 L X+Q21 Y+Q22 R0 FMAX M3
Najetí do výchozího bodu v rovině
31 L Z+Q12 R0 FMAX
Předpolohování na bezpečnou vzdálenost v ose vřetena
32 L Z-Q9 R0 FQ10
Najetí na hloubku obrábění
33 LBL 1
34 Q36 = Q36 + Q35
Aktualizace úhlu
35 Q37 = Q37 + 1
Aktualizace čítače řezů
36 Q21 = Q3 * COS Q36
Výpočet aktuální souřadnice X
37 Q22 = Q4 * SIN Q36
Výpočet aktuální souřadnice Y
38 L X+Q21 Y+Q22 R0 FQ11
Najetí do dalšího bodu
39 FN 12: IF +Q37 LT +Q7 GOTO LBL 1
Dotaz zda je hotovo - pokud ne tak skok zpět na LBL 1
40 CYCL DEF 10.0 NATOČENÍ
Zrušení natočení
41 CYCL DEF 10.1 ROT+0
42 CYCL DEF 7.0 NULOVÝ BOD
Zrušení posunutí nulového bodu
43 CYCL DEF 7.1 X+0
44 CYCL DEF 7.2 Y+0
45 L Z+Q12 R0 FMAX
Najetí na bezpečnou vzdálenost
46 LBL 0
Konec podprogramu
47 END PGM ELIPSA MM