Witam wywierć otwór i zapodaj ten oto progamik

3 TOOL CALL 4 Z S3000 F2222
4 CYCL DEF 7.0 PUNKT BAZOWY
5 CYCL DEF 7.1 X+0
6 CYCL DEF 7.2 Z+0
7 L Z+100 R0 FMAX M3
8 L X+0 Y+0 R0 FMAX
9 L Z+0 R0 FMAX
10 CALL LBL 1
10 CALL LBL2
11 L Z+100 R0 F MAX M30
13 LBL 1
14 FN 0: Q1 =+50
14 FN0: Q10=50
16 FN 4:Q1 =+Q1 DIV +Q10
17 LBL 0
18 LBL 2
18 L IZ-Q1
19 CC X+0 Y-0
20 L Y+20 RL F1000
21 L X-30 RL F1000
21 CC X-30 Y0
22 CP IPA+180 DR+ RL F1000
24 L X+30 RL F1000
24 CC X+30 Y0
25 CP IPA+180 DR+ RL F1000
27 L X0 RL F1000
27 L Y0 R0
27 FN2:Q10=Q10-+1
27 FN10:IFQ10 NE0 GOTO LBL2
28 LBL0
29 END PGM EX13 MM

[ Dodano: 2016-04-18, 19:20 ]
frez najlepiej fi 20 i bedzie ok

[ Dodano: 2016-04-18, 20:17 ]
Jesli dobrze rozumiem to ja bym takom kieszen napisał tak

TOL CAL 3 Z S1000
L Z 200 RO F MAX M03
L X+100 Y -15 RO F MAX
L Z0 RO F MAX
FN0:Q1=+40
FN0:Q3=-25
FN0:Q10=+40
FN0:Q11=+80
FN0:Q12=+65
FN0:Q13=+10
FN4:Q1=Q1 DIV Q10
LBL1
FN6:Q6=SIN+Q3
FN7:Q7=COS+Q3
FN4:Q5=+Q6 DIVQ7
FN3:Q2=+Q5*+Q1
CALL LBL10 REP
L IZ-Q1 R0 F1000
L X+Q11 RL F1000
RND R10
L Y+Q12
RND RQ13
L X-Q11
RND RQ13
L Y-Q12
RND RQ13
L X+Q11
RND RQ13
L Y+15
RND R10
L IX-70 Y-15 R0
FN1:Q10=+Q10+-1
FN10:IF+Q10 NE+0 GOTO LBL1
LBL10
FN1:Q11=+Q11++Q2
FN1:Q12=+Q12++Q2
LBL0
L Z+150 R0 F MAX M30