HEIDENHAIN TNC 426B (280 472) ISO programming - Příručka (Stránka 287)

10 Programován : Q parametr 272
N220 G98 L10 *
N230 Q16 = Q6 Q10 Q108
N240 D00 Q20 P01 +1 *
N250 D00 Q24 P01 +Q4 *
N260 Q25 = (Q5 Q4) / Q13
N270 G54 X+Q1 Y+Q2 Z+Q3 *
N280 G73 G90 H+Q8 *
N290 G00 G40 X+0 Y+0 *
N300 G01 Z+5 F1000 M3 *
N310 I+0 K+0 *
N320 G11 R+Q16 H+Q24 FQ11 *
N330 G98 L1 *
N340 G01 G40 Y+Q7 FQ11 *
N350 D01 Q20 P01 +Q20 P02 +1 *
N360 D01 Q24 P01 +Q24 P02 +Q25 *
N370 D11 P01 +Q20 P02 +Q13 P03 99 *
N380 G11 R+Q16 H+Q24 FQ12 *
N390 G01 G40 Y+0 FQ11 *
N400 D01 Q20 P01 +Q20 P02 +1 *
N410 D01 Q24 P01 +Q24 P02 +Q25 *
N420 D12 P01 +Q20 P02 +Q13 P03 1 *
N430 G98 L99 *
N440 G73 G90 H+0 *
N450 G54 X+0 Y+0 Z+0 *
N460 G98 L0 *
N999999 %VALEC G71 *
Podprogram 10: Obráběn
Přepočet př davku a nástroje vzhledem k radiusu válce
Nastaven č tače řezů
Kop rován prostorového startovn ho úhlu (rovina Z/X)
Výpočet úhlového kroku
Posunut nulového bodu do středu válce (osa X)
Přepočet otáčen v rovině
Předpolohován v rovině do středu válce
Předpolohován v ose vřetena
Nastaven pólu v rovině Z/X
Najet na startovn polohu na válci, šikmo se zapichuj c do materiálu
Podélný řez ve směru Y+
Aktualizace č tače řezů
Aktualizace prostorového úhlu
Dotaz, zda je již hotovo, pokud ano, skok na konec
Přejet po přibližném –oblouku… pro dalš podélný řez
Podélný řez ve směru Y
Aktualizace č tače řezů
Aktualizace prostorového úhlu
Dotaz, zda nen ještě hotovo, pokud ano, pak skok na Label 1
Zrušen otáčen
Zrušen posunut nulového bodu
Konec podprogramu
10.10 Přklady pr
ogramován
Mkap10.pm6 27.06.2006, 14:55 272