HEIDENHAIN TNC 620 (340 56x-03) - Instrukcja (Strona 228)

228 Programowanie: podprogramy i powtórzenia części programów
7.6 Przyk
łady programowania
7 L Z+250 R0 FMAX M6 Zmiana narzędzia
8 TOOL CALL 2 Z S4000 Wywołanie narzędzia wiertło
9 FN 0: Q201 = -25 Nowa głębokość dla wiercenia
10 FN 0: Q202 = +5 Nowy dosuw dla wiercenia
11 CALL LBL 1 Podprogram 1 dla kompletnego rysunku wiercenia wywołać
12 L Z+250 R0 FMAX M6 Zmiana narzędzia
13 TOOL CALL 3 Z S500 Wywołanie narzędzia rozwiertak
14 CYCL DEF 201 ROZWIERCANIE Definicja cyklu rozwiercania
Q200=2 ;ODSTĘP BEZPIECZEŃSTWA
Q201=-15 ;GŁĘBOKOŚĆ
Q206=250 ;F GŁĘBOKOŚĆ WCIĘCIA
Q211=0.5 ;C.ZATRZ.U DOŁU
Q208=400 ;F POWROTU
Q203=+0 ;WSPÓŁ.POWIERZ.
Q204=10 ;2. BEZP.ODLEGŁ.
15 CALL LBL 1 Podprogram 1 dla kompletnego rysunku wiercenia wywołać
16 L Z+250 R0 FMAX M2 Koniec programu głównego
17 LBL 1 Początek podprogramu 1: kompletny rysunek wiercenia
18 L X+15 Y+10 R0 FMAX M3 Dosunąć narzędzie do punktu startu grupy odwiertów 1
19 CALL LBL 2 Wywołać podprogram 2 dla grupy wiercenia
20 L X+45 Y+60 R0 FMAX Dosunąć narzędzie do punktu startu grupy odwiertów 2
21 CALL LBL 2 Wywołać podprogram 2 dla grupy wiercenia
22 L X+75 Y+10 R0 FMAX Dosunąć narzędzie do punktu startu grupy odwiertów 3
23 CALL LBL 2 Wywołać podprogram 2 dla grupy wiercenia
24 LBL 0 Koniec podprogramu 1
25 LBL 2 Początek podprogramu 2: grupa wierceń
26 CYCL CALL Odwiert 1 z aktywnym cyklem obróbki
27 L IX+20 R0 FMAX M99 Dosunąć narzędzie do odwiertu 2, wywołanie cyklu
28 L IY+20 R0 FMAX M99 Dosunąć narzędzie do odwiertu 3, wywołanie cyklu
29 L IX-20 R0 FMAX M99 Dosunąć narzędzie do odwiertu 4, wywołanie cyklu
30 LBL 0 Koniec podprogramu 2
31 END PGM UP2 MM