Prosba o radu pri programovaní (Heidenhain TNC 426)

[Formenn]

Ahojte,
prosím Vás, je možné aby som aby som pri programovaní mohol použiť funkciu LBL nasledovným spôsobom?
Potrebujem vyvŕtať diery 10,2 a následne rezať závit M12x1,75. No aby som nemusel na dva krát zapisovať tie isté súradnice dier aj závitov chcel som použiť cyklus LBL, ktorý by som umiestnil hneď pod vŕtací cyklus. Hneď po ňom by som dal závitový cyklus a vyvolal vlastne ten LBL čím by som si ušetril vypisovanie tých istých súradníc. Moja otázka znie či je to možné pri tom to riadiacom systéme. Viem, že pri TNC 530 to ide ale nie som si istý či to pôjde aj pri TNC 426.

Tu je program.

0 Begin PGM M12N8 MM
1 BLK 0.1 Z X+200 Y+100 Z-20
2 BLK 0.2 X-200 Y-100 Z+0
3 Tool Call 6 Z S3000; Vrtak 10.2
4 Cycl def 200 vrtani
Q 200=7 ;Bezp. vzdalenost
Q 201=-20 ;Hloubka
Q 206=150 ;Posuv na hloubku
Q 202=20 ;Hloubka prisuvu
Q 210=0 ;Čas. prodleva nahore
Q 203=+0 ;Sourad. povrchu
Q 204=7 ;2.Bezp.vzdalenost
5 LBL 1
6 L X+0 Y+0 Z+100 FMAX M13
7 Call LBL 2
8 L X+100 Y+0 FMAX
9 Call LBL 2
10 L Z+100 FMAX
11 L X+300 Y+0 Z+100 FMAX
12 Call LBL 2
13 L X+400 Y+0 FMAX
14 Call LBL 2
15 L Z+100 FMAX
16 LBL 0
17 Tool Call 8 Z S700; ZAVITNIK M12
18 Cycl def 17.0 Rez. zavitu Z/S
19 Cycl def 17.1 vzdal. 7
20 Cycl def 17.2 hloubka -28
21 Cycl def 17.3 stoupn. +1,75
22 Call LBL 1
23 L X-150 Y+200 Z+200 FMAX M30
24 LBL 2
25 L Z+7 FMAX M99
26 L IX+42 FMAX M99
27 LBL 0
28 END PGM M12N8 MM

[raddous]

Zdravím já to programuji takto. LBL1 -LBL0 jsou souřadnice vrtání a zároveň i závitování.

[testone]

já to píšu taky jako kolega raddous
jen s tím rozdílem, že do prvního řádku bloku souřadnic píšu M89
do dalších řádků nic, do posledního M99
asi takhle
.....
.....
L...... M2 (nebo M30)
LBL1
L X0 Y0 R0 FMAX M89
L X0 Y10 R0 FMAX
L.......
L......
L X0 Y111 R0 FMAX M99
LBL0
END PGM 12345 MM

[dodo_mt]

U nas sa to tiez tobi tak ako Formenn - vsetky podprogramy na koniec programu za M30

dodo

[testone]

ještě poznámka
pokud jsem správně pochopil ten původní pgm tazatele, tak to vyvrtá díru - ozávituje - přejede na další - vyvrtá ......
= nesmyslné zbytečné výměny nástrojů
tak jak to navrhuji a dodo_mt potvrzuje, to napřed všechny díry vyvrtá a pak všechny najednou ozávituje

[Formenn]

Sorry testone ale ten program je napísaný tak aby sa najprv urobili diery a až po tom závity.

[testone]

Sorry testone ale ten program je napísaný tak aby sa najprv urobili diery a až po tom závity.

v tom případě jsem to pochopil blbě

[doncarlos]

U nas sa to tiez tobi tak ako Formenn - vsetky podprogramy na koniec programu za M30

Ještě lepší je často užívané podprogramy udělat plně univerzální - parametrické, dát je na stroji do
zvláštního adresáře a volat je z programu jako (příklad) CALL PGM TNC:\PODPROGRAMY\JMENO_PPGM,
mám takto asi 200 podprogramů, s kterými pokryju tak minimálně 90% entit, ale u možná poloviny
výrobků ve firmě takto pokryju 100%, hlavní program pak obsahuje pouze přiřazení hodnot do Q-parametrů,
takže to v editu praskám jako Baťa kecky.
Pokud je třeba podprogram napsat, tak je za M30, všechno pokud to jde jede Z plynule ve spirále,
zápichy v díře se rozjíždí po Archimedově spirále. Parametrů je ve skutečnosti více, ale jsou zadány implicitně, viz LBL 101,
pokud chci zadat jinou hodnotu, přidám do bloku
Dělníci si jiný způsob už ani neumí představit, pokud se dělá něco starého z doby před mým příchodem, tak z toho mají kopřivku

příklad hlavního programu

12 * - *** KUZELOVE OSAZENI D182
13 ;---FREZA SANDVIK D125/R10---
14 TOOL CALL 32 Z S400 DL+0 DR+0
15 CALL LBL 101
42 Q1 = 182;PRUMER PREDNI
52 Q2 = 0;Z1-POCATEK KUZELE
52 Q3 = -32;Z2-KONEC KUZELE
42 Q4 = 40;UHEL KUZELE OD OSY
82 Q5 = 10;RADIUS PLATKU
28 Q6 = 500;POCET KROKU PO OBVODU
02 Q7 = 0.5;Z-KROK(STOUPANI SPIRALY)
12 Q8 = 800;POSUV
24 CALL PGM TNC:\POKUS\PPGM72
25 L Z+500 W+0 R0 FMAX M5
26 STOP ;-------------------------
22 * - ***DIRA D238
23 ;--- FR SECO D80/R6/TRN150
24 TOOL CALL 35 Z S400 DL+0 DR+0
25 CALL LBL 101
26 Q1 = 238;PRUMER DIRY
27 Q2 = 0;Z1-POCATEK OSAZENI
28 Q3 = -103;Z2-KONEC OSAZENI
29 Q7 = 0.7 ;Z-KROK-STOUPANI SPIRALY
30 Q8 = 1000;POSUV
31 Q9 = 200;PRUMER DIRY POLOTOVARU
32 CALL PGM TNC:\POKUS\PPGM2
33 L Z+300 W+0 R0 FMAX M5
34 STOP ;---------------
22 * - ***ZAPICH D262.5/S=50 ODZADU DOPREDU
23 ;--- FR KOTOUC D200/S=14
17 TOOL CALL 32 Z S400 DL+0 DR+0
18 CALL LBL 101
5 Q1 = 262.75;PRUMER ZAPICHU
6 Q2 = -50;Z1-POCATEK ZAPICHU
7 Q3 = -100.1;Z2-KONEC ZAPICHU
8 Q4 = 5;R-KROK
9 Q5 = 14;SIRE FREZY
10 Q6 = 300;POCET KROKU PO OBVODU
11 Q7 = 12 ;Z-KROK LEVELU
12 Q8 = 500;POSUV
88 Q9 = 235;PRUMER DIRY
27 CALL PGM TNC:\POKUS\PPGM99
28 L Z+300 W+0 R0 FMAX M5
29 STOP ;------------------

[dodo_mt]

doncarlos:

Zaujimave citanie. Ale nejako si neviem predstavit vasu skladbu prace ked dokazes pokrit tolko % prace s tolkymi programami... U nas napr. by som vedel nejako takto postupovat napr. pri frez. obvodov, ze by som mal podprogramy a tie vyvolaval ale to je asi vsetko... vsetky ostatne veci treba naovo programovat. Ci uz vychadzaju suradnice z inych miest na kuse alebo su kusy uplne ine alebo napr. drazky vybrania maju kazdy iny tvar atd...

Za dalsie napr. tie spiralove kapsy funguju cez cyklus 208 + suradnice tiez sa mi to zda zbytocne pisat takto "komplikovane" Ale samozrejme kazdy to robime nejako inak
Ja napr. pouzivam tketo parametricke programovanie (kedze mame CAM) na frezovanie zubkov alebo rysiek po obvode napr. inak vsetko generuje cam.

tu je napr. moj program na frezovanie zubkov na polkruhu

0 BEGIN PGM J MM
1 ;
2 BLK FORM 0.1 Z X-100 Y-100 Z-50
3 BLK FORM 0.2 X+100 Y+100 Z+0
4 ;
5 * - VRCHNA STRANA
6 TOOL CALL 1 Z S2000 F1000 DL+0 DR+0 ; FREZA D16 TK - OSTRA - VYLOZENIE ~
90mm
7 M3 M9
8 CALL LBL 100
9 ;
10 Q20 = 68 ; PRVY UHOL
11 Q21 = 0.40118 ; UHOL MEDZI ZUBAMI
12 Q22 = 45 ; UHOL FREZY
13 Q23 = 170 ; POCET ZUBOV -1
14 Q24 = 0 ; UHOL + UHOL FREZY: POMOCNA PREMENNA
15 Q25 = - 46.3 ; TENTO UHOL NESMIE PREKROCIT
16 Q30 = 2000 ; ZAPICHOVACI POSUV
17 Q31 = 650 ; FREZOVACI POSUV
18 ;
19 LBL 1
20 ;
21 Q24 = Q20 - Q22 ; UHOL + UHOL FREZY POMOCNE
22 Q20 = Q20 - Q21 ; ODPOCITA OD UHLA Q20 UHOL MEDZI ZUBAMI
23 ;
11 ; (tu kontroluje ci uhol natocenia A hlavy nepresiahol hodnotu nastavenu v Q25)
24 FN 12: IF +Q24 LT +Q25 GOTO LBL 50
25 ;
26 M126
27 PLANE SPATIAL SPA+Q24 SPB+0 SPC+0 TURN F10000 SEQ+ TABLE ROT
28 CYCL DEF 7.0 NULOVY BOD
29 CYCL DEF 7.1 X+0
30 CYCL DEF 7.2 Y+45.704
31 CYCL DEF 7.3 Z-45.704
32 ;
33 L X+10 Y-9 Z+150 R0 FMAX M3 M9
34 L Z+4 R0 FMAX
35 L Z+0 FQ30
36 L Y+0 RL FQ31 ; (Program na korekciu - Lava)
37 L X-80
38 L Y-9 R0 ; (Program bezkorekcne)
39 L Z+4 FQ30
40 L X-260
41 L Z+0 FQ30
42 L Y+0 RL FQ31 ; (Program na korekciu - Lava)
43 L X-350
44 L Y-9 R0 ; (Program bezkorekcne)
45 L Z+150 R0 FMAX
46 ;
47 ; AK POUZIJES TEN SPODNY CALL LBL 100 TOTO TU NEMUSI BYT
48 CYCL DEF 7.0 NULOVY BOD
49 CYCL DEF 7.1 X+0
50 CYCL DEF 7.2 Y+0
51 CYCL DEF 7.3 Z+0
52 PLANE RESET STAY
53 ;
54 ; VYSKUSAJTE TO BEZ CALL LBL TERAZ SA TO BUDE OTACAT PIRAMO NAD KUSOM
55 ; AK BY TO ROBILO HLUPOSTI TAK TAM POVOL AJ CALL LBL 100
56 ; CALL LBL 100
57 ;
58 CALL LBL 1 REPQ23
59 ;
60 L Z+300 R0 FMAX M5 M9
61 CALL LBL 100
62 M0
63 ;
64 M30
65 ;
66 LBL 50
67 M0 M5
68 LBL 0
69 ;
70 LBL 100
71 ; (RESET ROVINY BEZ NATOCENIA VRETENA)
72 L Z+0 R0 FMAX M92
73 L Y+0 R0 FMAX M92
74 L X+0 R0 FMAX M92
75 CYCL DEF 7.0 NULOVY BOD
76 CYCL DEF 7.1 X+0
77 CYCL DEF 7.2 Y+0
78 CYCL DEF 7.3 Z+0
79 PLANE RESET STAY
80 LBL 0
81 ;
82 LBL 101
83 ; (RESET ROVINY S NATOCENIM VRETENA)
84 L Z+0 R0 FMAX M92
85 L Y+0 R0 FMAX M92
86 L X+0 R0 FMAX M92
87 CYCL DEF 7.0 NULOVY BOD
88 CYCL DEF 7.1 X+0
89 CYCL DEF 7.2 Y+0
90 CYCL DEF 7.3 Z+0
91 PLANE RESET TURN F10000
92 LBL 0
93 ;
94 END PGM J MM

dodo

[doncarlos]

Já dělám ranní směnu, mašiny jedou na 2-3, u způsobu který jsem tu popsal si dělník sám může změnit průměr nástroje, radius plátku, hloubku třísky, směr obrábění,
a řadu dalších parametrů a hned mu to pojede, co si počne s tvým programem z CAMU až o půlnoci zlomí frézu a nebude mít jinou stejnou, až mu to bude drnčet,
protože je moc velká špona v Z, atd., když to bude kvaltovka, tak tě zavolá a pojedeš mu to znova vygenerovat? Samozřejmě nemluvím o obecných
plochách, které nejdou parametrizovat, ale dělat kuželovou díru v CAMU je blbost. Kromě toho jednodušší věci si dělníci z těchto bloků sestaví
snadno sami, takže to jde úplně mimo mne.

[dodo_mt]

Jasne v pohode vravim ze kazdy to robime nejako.

Napr. ten problem co popisujes s opakovanim jednoduchej drahy v osy Z mame osetrene v CAMe tak ze pouzivame klasicke Heidenhain opakovanie CALL LBL1 REP 5 ktore nam generuje priamo CAM takze aka su to neni obecne plochy tak pouzivame zacyklenu jednu drazhu a chlap na masine si to moze upravit podla toho ako potrebuje.

126 *- (VYBRANIE 108+-0.05/65+-0.05 DAL SOM PRID. 0.8mm - R10 OBCHADZAM)
127 TOOL CALL 0 Z S1274 F1000 ; (FRE. D50 R3.2 PL INGERSOLL)
128 CALL LBL 101
129 Q1 = 2000 ; (Zapichovaci posuv)
130 Q2 = 5096 ; (Frezovaci posuv)
131 Q3 = 15000 ; (Max. rychly posuv)
132 ;
133 L X-226.321 Y-77.8 R0 F MAX M3
134 L Z+200 R0 F MAX M8
135 L Z+93.8 R0 F MAX
136 L Z+91.8 F1000
137 LBL 112
138 L IZ-0.5 FQ1
139 L X-867.95 FQ2 ; (Program bezkorekcne)
140 L Y-37.8
141 L X-226.321
142 L Y+2.2
143 L X-867.95
144 L Y+42.2
145 L X-226.321
146 L Y+82.2
147 L X-867.95
148 L IZ+80.0 F8000
149 L X-226.321 Y-77.8 R0 F MAX
150 L IZ-80.0 F8000
151 CALL LBL 112 REP 51
152 L Z+200 R0 F MAX
153 L Z+1200 R0 F MAX M5 M9
154 M0

dodo

[raddous]

logika chápu, ale proč vypisovat q parametr když to jde napsat posuv klasicky dráha jede modálně stačí jen na prví dráhu zadat f5096 a další posuvy prostě do věty na takto jednoduchou dráhu je zbytečné pro mě vypisovat Qčka . Můj názor.



129 Q1 = 2000 ; (Zapichovaci posuv)
130 Q2 = 5096 ; (Frezovaci posuv)
131 Q3 = 15000 ; (Max. rychly posuv)

[dodo_mt]

Jasne v tomto pripade sa nic nevypisuje jednoducho to vygeneruje CAM. Takyto zapis sme inak nepouzivali zacali sme ho pouzivat cca 2r dozadu a len pre to aby si chalani mohli upravit posuv prepisanim jedneho parametru a nemuseli to hladat v programe a prepisovat. jednalo sa hlavne o starsie masiny kde nebola funkcia hladat a nahradit.

dodo

[doncarlos]

Napr. ten problem co popisujes s opakovanim jednoduchej drahy v osy Z mame osetrene v CAMe tak ze pouzivame klasicke Heidenhain opakovanie CALL LBL1 REP 5 ktore nam generuje priamo CAM takze aka su to neni obecne plochy tak pouzivame zacyklenu jednu drazhu a chlap na masine si to moze upravit podla toho ako potrebuje.

No ono jaksi na kuželové díře, která jede ve spirále toho moc nezopakuješ

[dodo_mt]

U nas to ide vsetko z CAMu takze ci je to taky otvor alebo taky tak na to proste spravim kopirku v CAMe chalan to len pusti. Ty spravis napr. program na kazdy kusel osobitne ja spravim na cele tvarove kuzelove zahlbenie. Ma to svoje vyhody a nevyhody.

dodo