delik büyütme

[cncexpert]

S.A arkadaslar sizinle yaptıgım bu programı paylasmak istedim

M6 T1 (U Drill 24)
G0 G90 G54 X0 Y0 M3 S1500
G43 H1 Z50
G98 G83 Z-19.9 R1 Q3 F100 M8
X60
X120
X180
X240
G80
G0 Z150 M9
M1


M1
M6T2(D20)
#5=0 (work ofset extr)
#4=10 (delik capı 40 eksi takım capı bolu iki)
N6
G0G90G54X#4Y0M3S4500
G43H2Z50
Z5
G1Z0F1500M8
#1=0,25
#2=20
#3=0,25
WHILE[#1LE#2]DO1
G2I-#4Z-#1F1800
#1=#1+#3
END1
G2I-#4
G1X0
Z150
#5=#5+60(her defada ofsete 60mm eklemek için)

G10P0L2 X#5

IF[#5LE240]GOTO6 (240 mm ulasana kadar programı tekrarlar n6 satırından baslar)

G10 P0 L2 X0 (work ofsetteki olusan degerleri sıfırlar   x0.000)
M9
M1


M6T2(D20)
#5=0
#4=13 (havsa  büyük çapı 46 -20 bolu takım capı =13)
N7
G0G90G54X#4Y0M3S4500
G43H2Z50
Z5
G1Z0F1500M8
#1=0,25
#2=3
#3=0,25
WHILE[#1LE#2]DO1
G1Z-#1F1500
G1X#4
G2I-#4
#4=#4-#3
#1=#1+#3
END1
G0Z150
#5=#5+60
G10P0L2X#5
IF[#5LE240]GOTO7
G0Z200M9
G91G28Y0
G10 P0 L2 X0
M30

s.a herkese iyi çalışmalar.....

[cncexpert]

Arkadaşlar  teşekkür edelim lütfen