HEIDENHAIN TNC 640 (34059x-02) - Příručka (Stránka 274)

Programování: Podprogramy a opakování částí programu
8.6 Příklady programování
8
274
TNC 640 | Uživatelská příručka programování s popisným dialogem HEIDENHAIN | 7/2013
Příklad: Skupiny děr
Průběh programu:
Najetí na skupiny děr v hlavním programu
Vyvolání skupiny děr (podprogram 1).
Skupina děr se naprogramuje jen jednou v
podprogramu 1
0 BEGIN PGM UP1 MM
1 BLK FORM 0.1 Z X+0 Y+0 Z-20
2 BLK FORM 0.2 X+100 Y+100 Z+0
3 TOOL CALL 1 Z S5000
Vyvolání nástroje
4 L Z+250 R0 FMAX Odjetí nástroje
5 CYCL DEF 200 VRTAT Definice cyklu vrtání
Q200=2 ;BEZPEČNÁ VZDÁLENOST
Q201=-10 ;HLOUBKA
Q206=250 ;F PŘÍSUV DO HLOUBKY
Q202=5 ;HLOUBKA PŘÍSUVU
Q210=0 ;DOBA PRODLEVY NAHOŘE
Q203=+0 ;SOUŘADNICE POVRCHU
Q204=10 ;2. BEZPEČNÁ VZDÁLENOST
Q211=0.25 ;DOBA PRODLEVY DOLE
6 L X+15 Y+10 R0 FMAX M3 Najetí na bod startu skupiny děr 1
7 CALL LBL 1 Vyvolání podprogramu pro skupinu děr
8 L X+45 Y+60 R0 FMAX Najetí na bod startu skupiny děr 2
9 CALL LBL 1 Vyvolání podprogramu pro skupinu děr
10 L X+75 Y+10 R0 FMAX Najetí na bod startu skupiny děr 3
11 CALL LBL 1 Vyvolání podprogramu pro skupinu děr
12 L Z+250 R0 FMAX M2 Konec hlavního programu
13 LBL 1 Začátek podprogramu 1: Skupina děr
14 CYCL CALL Díra 1
15 L IX+20 R0 FMAX M99 Najetí na díru 2, vyvolání cyklu
16 L IY+20 R0 FMAX M99 Najetí na díru 3, vyvolání cyklu
17 L IX-20 R0 FMAX M99 Najetí na díru 4, vyvolání cyklu
18 LBL 0 Konec podprogramu 1
19 END PGM UP1 MM