0 BEGIN PGM 5X_DRILL_DRILL_5X MM
1 ;STROJ: MCVL1000
2 ;SYSTEM: HEIDENHAIN iTNC530 Dialog
3 ;POSTPROCESOR: M5_H530_MCVL1000
4 ;GPP_VER.: 2016-11-25
5 ;PROGRAMATOR: MACHALA
6 ;Projekt: MODEL1NX7_MCU
7 ;Datum: 24.3.2017
8 ;Cas: 11:03:09
9 ;
10 BLK FORM 0.1 Z X+0 Y+0 Z+0
11 BLK FORM 0.2 X+0 Y+0 Z+0
12 Q629=0 ; reset transformace 4 osy
13 M135 M126
14 ; 
15 ;================================
16 ;...... SEZNAM NASTROJU ......
17 ;T02 - DRILL D3 R118 
18 ;================================
19 ;
20 ;
21 ;==============================
22 ; OPERACE: 5X-Drill-drill-5x
23 ;==============================
24 ; reset 4th axe transform counter
25 Q629 = 0
26 ; ******************************
27 ; NASTROJ: T2 D3 R118 L60 DB24 Z1
28 ; TYP: VRTAK
29 ; UPINAC: 
30 ; ******************************
31 TOOL CALL 2 Z S3500
32 Q601=300 ;pracovni
33 Q602=300 ;najezdovy
34 Q603=1000 ;odjezdovy
35 ;
36 CALL LBL 995; Odjezd Z
37 L B-45 C+45 FMAX
38 L X+223.114 Y-0.327 R0 FMAX M3
39 L Z+271.861 R0 FMAX
40 CALL LBL 992 ;Reset roviny obrabeni
41 L X+223.114 Y-0.327 Z+271.861 C+45 B-45 R0 FMAX
42 L X+147.076 Y-0.327 Z+195.824 C+45 B-45 FMAX
43 CYCL DEF 200 VRTANI ~
    Q200=2 ;BEZPEC. VZDALENOST ~
    Q201=-1 ;HLOUBKA ~
    Q206=300 ;POSUV NA HLOUBKU ~
    Q202=5 ;HLOUBKA PRISUVU ~
    Q210=2 ;CAS.PRODLEVA NAHORE ~
    Q203=193.824 ;SOURADNICE POVRCHU ~
    Q204=2 ;2. BEZPEC.VZDALENOST ~
    Q211=2 ;CAS. PRODLEVA DOLE
44 L X+147.076 Y-0.327 R0 FMAX M99
45 L X+223.114 Y-0.327 Z+271.861 C+45 B-45 FMAX
46 L X+223.114 Y+0 Z+271.861 C+0 B-45 FMAX
47 L X+147.076 Y+0 Z+195.824 C+0 B-45 FMAX
48 CYCL DEF 200 VRTANI ~
    Q200=2 ;BEZPEC. VZDALENOST ~
    Q201=-1 ;HLOUBKA ~
    Q206=300 ;POSUV NA HLOUBKU ~
    Q202=5 ;HLOUBKA PRISUVU ~
    Q210=2 ;CAS.PRODLEVA NAHORE ~
    Q203=193.824 ;SOURADNICE POVRCHU ~
    Q204=2 ;2. BEZPEC.VZDALENOST ~
    Q211=2 ;CAS. PRODLEVA DOLE
49 L X+147.076 Y+0 R0 FMAX M99
50 L X+223.114 Y+0 Z+271.861 C+0 B-45 FMAX
51 L X+223.114 Y+0.514 Z+271.861 C-45 B-45 FMAX
52 L X+147.076 Y+0.514 Z+195.824 C-45 B-45 FMAX
53 L X+147.076 Y+0.514 R0 FMAX M99
54 L X+223.114 Y+0.514 Z+271.861 C-45 B-45 FMAX
55 L X+223.192 Y+0.341 Z+271.783 C-90 B-45 FMAX
56 L X+147.233 Y+0.341 Z+195.824 C-90 B-45 FMAX
57 L X+147.233 Y+0.341 R0 FMAX M99
58 L X+223.192 Y+0.341 Z+271.783 C-90 B-45 FMAX
59 ;
60 CALL LBL 992 ;Reset roviny obrabeni
61 L Z+333 FMAX
62 L B+0 C+0 R0 FMAX
63 PLANE RESET TURN FMAX
64 L M30
65 ;=================================
66 ;=  K O N E C   P R O G R A M U  =
67 ;================================= 
68 ;   Xmin = 147.0762 
69 ;   Xmax = 223.1921 
70 ;   Ymin = -0.3267 
71 ;   Ymax = 0.5139 
72 ;   Zmin = 195.8236 
73 ;   Zmax = 271.8611 
74 ;   Bmin = -45 
75 ;   Bmax = -45 
76 ;   Cmin = -90 
77 ;   Cmax = 45 
78 ;================================= 
79 ;
80 ;===============================
81 ;=  DATA POLOHY NULOVEHO BODU  =
82 ;=============================== 
83 ; 
84 ;Mac 1 Position 1
85 LBL "POLOHA-1"
86 Q623=0 ;Posun X
87 Q624=0 ;Posun Y
88 Q625=0 ;Posun Z
89 Q620=-0 ;rotace SS kolem osy X
90 Q621=0 ;rotace SS kolem osy Y
91 Q622=-0 ;rotace SS kolem osy Z
92 ;C fyzicke: 0 ;fyzicke natoceni osy C
93 ;B fyzicke: 0 ;fyzicke natoceni osy B
94 ;---
95 ;Lokalni posun NB
96 Q626=0.000 ;Posun X
97 Q627=0.000 ;Posun Y
98 Q628=0.000 ;Posun Z
99 LBL 0
100 ;-------------------------------
101 ; 
102 ;Nastavit polohu
103 CALL LBL 992 ;Reset roviny obrabeni
104 Q632=Q622+Q629 ; C osa + transform 4x
105 FN 12: IF +Q620 LT +0. GOTO LBL 996
106 PLANE SPATIAL SPA+Q620 SPB+Q621 SPC+Q632 TURN FMAX SEQ+ TABLE ROT
107 LBL 0
108 LBL 996
109 PLANE SPATIAL SPA+Q620 SPB+Q621 SPC+Q632 TURN FMAX SEQ- TABLE ROT
110 LBL 0
111 ; 
112 ;Reset roviny obrabeni
113 LBL 992
114 L M129
115 PLANE RESET STAY
116 LBL 0
117 ;
118 LBL 994; Odjezd XYZ
119 L Z+333 FMAX M92
120 L X+0 Y+0 FMAX M91
121 LBL 0
122 ;
123 LBL 995; Odjezd Z
124 L Z+333 FMAX
125 LBL 0
126 END PGM 5X_DRILL_DRILL_5X MM