HEIDENHAIN iTNC 530 (340 420) - Příručka (Stránka 442)

416 10 Programován : Q parametry
10.11 Př
k
la
dy pr
o
gra
m
ován
20 LBL 10 Podprogram 10: obráběn
21 CYCL DEF 7.0 NULOVÝ BOD Posunut nulového bodu do středu elipsy
22 CYCL DEF 7.1 X+Q1
23 CYCL DEF 7.2 Y+Q2
24 CYCL DEF 10.0 OTOCENI Výpočet natočen v rovině
25 CYCL DEF 10.1 ROT+Q8
26 Q35 = (Q6 Q5) / Q7 Výpočet úhlového kroku
27 Q36 = Q5 Kop rován úhlu startu
28 Q37 = 0 Nastaven č tače řezů
29 Q21 = Q3 * COS Q36 Výpočet souřadnice X bodu startu
30 Q22 = Q4 * SIN Q36 Výpočet souřadnice Y bodu startu
31 L X+Q21 Y+Q22 R0 FMAX M3 Najet do bodu startu v rovině
32 L Z+Q12 R0 FMAX Předpolohován na bezpečnou vzdálenost v ose vřetena
33 L Z Q9 R0 FQ10 Najet na hloubku obráběn
34 LBL 1
35 Q36 = Q36 + Q35 Aktualizace úhlu
36 Q37 = Q37 + 1 Aktualizace č tače řezů
37 Q21 = Q3 * COS Q36 Výpočet aktuáln souřadnice X
38 Q22 = Q4 * SIN Q36 Výpočet aktuáln souřadnice Y
39 L X+Q21 Y+Q22 R0 FQ11 Najet do dalš ho bodu
40 FN 12: IF +Q37 LT +Q7 GOTO LBL 1 Dotaz, zda je hotovo, jestliže ne, pak skok zpět na LBL 1
41 CYCL DEF 10.0 OTOCENI Zrušen otáčen
42 CYCL DEF 10.1 ROT+0
43 CYCL DEF 7.0 NULOVY BOD Zrušen posunut nulového bodu
44 CYCL DEF 7.1 X+0
45 CYCL DEF 7.2 Y+0
46 L Z+Q12 F0 FMAX Najet na bezpečnou vzdálenost
47 LBL 0 Konec podprogramu
48 END PGM ELIPSA MM