HEIDENHAIN TNC 620 (340 56x-01) - Příručka (Stránka 451)

HEIDENHAIN TNC 620 451
10.13 P
říklady programování
20 L Z+100 R0 FMAX M2 Odjetí nástroje, konec programu
21 LBL 10 Podprogram 10: Obrábění
22 Q16 = Q6 - Q10 - Q108 Započtení přídavku a nástroje vzhledem k rádiusu válce
23 FN 0: Q20 = +1 Nastavení čítače řezů
24 FN 0: Q24 = +Q4 Kopírování prostorového úhlu startu (rovina Z/X)
25 Q25 = (Q5 - Q4) / Q13 Výpočet úhlového kroku
26 CYCL DEF 7.0 NULOVÝ BOD Posunutí nulového bodu do středu válce (osa X)
27 CYCL DEF 7.1 X+Q1
28 CYCL DEF 7.2 Y+Q2
29 CYCL DEF 7.3 Z+Q3
30 CYCL DEF 10.0 NATOČENÍ Započtení natočení v rovině
31 CYCL DEF 10.1 ROT+Q8
32 L X+0 Y+0 R0 FMAX Předpolohování v rovině do středu válce
33 L Z+5 R0 F1000 M3 Předpolohování v ose vřetena
34 LBL 1
35 CC Z+0 X+0 Nastavení pólu v rovině Z/X
36 LP PR+Q16 PA+Q24 FQ11 Najetí do polohy startu na válci se šikmým zapichováním do
materiálu
37 L Y+Q7 R0 FQ12 Podélný řez ve směru Y+
38 FN 1: Q20 = +Q20 + +1 Aktualizace čítače řezů
39 FN 1: Q24 = +Q24 + +Q25 Aktualizace prostorového úhlu
40 FN 11: IF +Q20 GT +Q13 GOTO LBL 99 Dotaz, zda je již hotovo, pokud ano, skok na konec
41 LP PR+Q16 PA+Q24 FQ11 Přejet po aproximovaném “oblouku” pro další podélný řez
42 L Y+0 R0 FQ12 Podélný řez ve směru Y–
43 FN 1: Q20 = +Q20 + +1 Aktualizace čítače řezů
44 FN 1: Q24 = +Q24 + +Q25 Aktualizace prostorového úhlu
45 FN 12: IF +Q20 LT +Q13 GOTO LBL 1 Dotaz zda je hotovo - pokud ne tak skok zpět na LBL 1
46 LBL 99
47 CYCL DEF 10.0 NATOČENÍ Zrušení natočení
48 CYCL DEF 10.1 ROT+0
49 CYCL DEF 7.0 NULOVÝ BOD Zrušení posunutí nulového bodu
50 CYCL DEF 7.1 X+0
51 CYCL DEF 7.2 Y+0
52 CYCL DEF 7.3 Z+0
53 LBL 0 Konec podprogramu
54 END PGM VÁLEC