Příklad: skupiny děr – HEIDENHAIN TNC 640 (34059x-04) Uživatelská příručka
Stránka 282
Programování: Podprogramy a opakování částí programu
8.6
Příklady programování
8
282
TNC 640 | Uživatelská příručka programování s popisným dialogem HEIDENHAIN | 4/2014
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Č. VZDÁL.
Q201=-10
;HLOUBKA
Q206=250
;PŘÍSUV F DO HL.
Q202=5
;HLOUBKA PŘÍSUVU
Q210=0
;ČAS PRODLEVY NAHOŘE
Q203=+0
;SOUŘ. POVRCHU
Q204=10
;2. BEZPEČNÁ VZDÁLENOST
Q211=0.25
;ČAS. PRODLEVA 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