np.

0 BEGIN PGM SZESCIOKAT MM
1 ; SZESCIOKAT ZEWNETRZNY 30.
2 BLK FORM 0.1 Z X-17.35 Y-16 Z-21
3 BLK FORM 0.2 X+17.35 Y+16 Z+0
4 TOOL CALL 5 Z S3500 F750
5 CYCL DEF 14.0 GEOMETRIA KONTURU
6 CYCL DEF 14.1 PODPR.KONTURU1
7 CYCL DEF 25 KONTUR OTWARTY ~
Q1=-20 ;GLEBOKOSC FREZOWANIA ~
Q3=+0 ;NADDATEK NA STRONE ~
Q5=+0 ;WSPOLRZEDNE POWIERZ. ~
Q7=+25 ;BEZPIECZNA WYSOKOSC ~
Q10=-1 ;GLEBOKOSC DOSUWU ~
Q11= AUTO ;WARTOSC POSUWU WGL. ~
Q12= AUTO ;POSUW PRZY ROZWIERC. ~
Q15=+1 ;RODZAJ FREZOWANIA
8 CYCL CALL M3
9 L Z+200 R0 FMAX M5 M9
10 M30
11 LBL 1
12 CC X+0 Y+0
13 FN 0: Q1 =+30 ; wielkosc szesciokata
14 Q4 = Q1 / 2
15 Q5 = Q4 / COS 30
16 APPR CT X+Q5 Y+0 CCA45 R+7 RL F AUTO
17 LP PA-60
18 LP IPA-60
19 LP IPA-60
20 LP IPA-60
21 LP IPA-60
22 LP IPA-60
23 DEP CT CCA45 R+7
24 LBL 0
25 END PGM SZESCIOKAT MM