|
|
 |
Thread milling
#1=25(DİŞ ÇAPI)
#2=25(BOY)
#3=10(TAKIM ÇAPI)
#4=10(GİRİŞ ÇIKIŞ RADÜSÜ)
#5=200(İLERLEME)
#6=3(HATVE)
#7=0
T1 M6
G0 G90 X0 Y[[[#1+#3]/2]+#4]
G43 H1 Z0
G1 Z-#2 F#5
G3 G91 X[[#1+#3]/2] Y0 J[[[#1+#3]/2]+#4] I-#4 Z[#6/4]
N10 X-[#1+#3] Z[#6/2] I-[[#1+#3]/2] J0
X[#1+#3] Z[#6/2] I[[#1+#3]/2] J0
#7=[#7+#6]
IF[#7LE#2]GOTO10
G0 G28 Z0
M30
ELİPS
#101 = 80 ; X EKSENİNDE BOY
#102 = 40 ; Y EKSENİNDE BOY
#103 = 10.0 ; DALMA HIZI
#104 = 20.0 ; KESME HIZI
#105 = 3 ; Z EMNİYET MESAFESİ
#106 = -5. ; Z KESME DERİNLİĞİ
#107 = 5.0 ; BAŞLANGIÇ AÇISI
#108 = -1.0 ; X MERKEZ
#109 = 1.0 ; Y MERKEZ
O9100(ALT PROGRAM)
G1 X[#101 * cos[#110] / 2.0 + #108] Y[#102 * sin[#110] / 2.0 + #109]
#110 = #110 + #107
M99
G0 X[#101/2.0+#108] Y#109 Z#105
G1 F#103 Z#106
F#104
#110 = #107
M98 P9100 L[360.0/#107]8ALT PROGRAM TEKRAR ADETİ)
G0 Z#105
G40
G32 DİŞ ÇEKME
#111=0
#112=0
WHILE[#112LT5]DO1
G0X[3.7+[2.8-#111]]
G32U1.Z24.5F2.75
G32X10.W2.F2.75
G1Z[#100+0.5]
#111=#111+.2
#112=#112+1.
END1
M01
#111=0
#112=0
WHILE[#112LT10]DO1
G0X[3.7+[1.8-#111]]
G32U1.Z24.5F2.75
G32X10.W2.F2.75
G1Z[#100+0.5]
#111=#111+.1
#112=#112+1.
END1
M01
#111=0
#112=0
WHILE[#112LT16]DO1
G0X[3.7+[.8-#111]]
G32U1.Z24.5F2.75
G32X10.W2.F2.75
G1Z[#100+0.5]
#111=#111+.05
#112=#112+1.
END1
M01
G83
#100= 2
#101=15
#102=0.5
#103=3
#104= #100
#105=30
WHILE [#104 LT #101] DO 1
G1 Z-#104 F#105
G0 Z#103
Z –[#104-#102]
#104=#104+#100
END 1
G1 Z-#101
G0 Z#103
#100=#17
#101=ABS [#26]
#102=#6
#103=#18
#104=#100
#105=#9
WHILE [#104LT#101] DO1
G1 Z-#104 F#105
G0 Z#103
Z- [#104-#102]
#104=#104+#100
END1
G1 Z-#101
G0 Z#103
M99
|
|
 |
|
|
|
|