%
O0406(MACRO KOSE PAH)
(PARCA SIFIRI ORTAYA GORE)
#1=45(ACI)
#2=5(DERINLIK)
#3=1(PASO)
#4=100(PARCA X BOYU)
#5=150(PARCA Y BOYU)
#7=50(TAKIM CAPI)
#8=2000(DEVIR)
#9=3000(ILERLEME)
#10=4(PAH YAPILACAK BOLUM)
(Y-ISE/#10=1)
(Y+ISE/#10=2)
(X-ISE/#10=3)
(X+ISE/#10=4)
(BURDN SONRSINI DEGISTRME)
#1=[90-#1]
#11=[#2/#3]
#12=TAN[#1]*[#2]
#13=[#12/#11]
#20=[#7/2]
#21=[#2]*[-1]
#22=[[#5+#7]/2](Y)
#23=[[#4+#7]/2](X)
IF[#7LT#12]GOTO100
#3006=1(TAKIM BOYU H50,DE)
IF[#10LE0]GOTO101
IF[#10GT4]GOTO101
IF[#10EQ1]GOTO10
IF[#10EQ2]GOTO20
IF[#10EQ3]GOTO30
IF[#10EQ4]GOTO40
N10
M3S#6
G0G90G43G54H50X-#23Y-#22Z75
G0Z2.
G0Y[#5002+#12]
G1Z-#3F#9
G1X[#5001+#4+#7]
N2G1Y[#5002-#13]
#25=[#5003-#3]
IF[#25LE#21]THEN#25=#21
G1Z#25
G1X-#23
IF[#25EQ#21]GOTO8
G1Y[#5002-#13]
#25=[#5003-#3]
IF[#25LE#21]THEN#25=#21
G1Z#25
G1X[#5001+#4+#7]
IF[#25EQ#21]GOTO8
GOTO2
N8G0G91G28Z0.
G0G91G28Y0.
#3006=1(MADE IN FIRTINA)
M30
N20
M3S#6
G0G90G43G54H50X-#23Y#22Z75
G0Z2.
G0Y[#5002-#12]
G1Z-#3F#9
G1X[#5001+#4+#7]
N12G1Y[#5002+#13]
#25=[#5003-#3]
IF[#25LE#21]THEN#25=#21
G1Z#25
G1X-#23
IF[#25EQ#21]GOTO18
G1Y[#5002+#13]
#25=[#5003-#3]
IF[#25LE#21]THEN#25=#21
G1Z#25
G1X[#5001+#4+#7]
IF[#25EQ#21]GOTO18
GOTO12
N18G0G91G28Z0.
G0G91G28Y0.
#3006=1(MADE IN FIRTINA)
M30
N30
M3S#6
G0G90G43G54H50Y-#22X-#23Z75
G0Z2.
G0X[#5001+#12]
G1Z-#3F#9
G1Y[#5002+#5+#7]
N22G1X[#5001-#13]
#25=[#5003-#3]
IF[#25LE#21]THEN#25=#21
G1Z#25
G1Y-#22
IF[#25EQ#21]GOTO28
G1X[#5001-#13]
#25=[#5003-#3]
IF[#25LE#21]THEN#25=#21
G1Z#25
G1Y[#5002+#5+#7]
IF[#25EQ#21]GOTO28
GOTO22
N28G0G91G28Z0.
G0G91G28Y0.
#3006=1(MADE IN FIRTINA)
M30
N40
M3S#6
G0G90G43G54H50Y-#22X#23Z75
G0Z2.
G0X[#5001-#12]
G1Z-#3F#9
G1Y[#5002+#5+#7]
N32G1X[#5001+#13]
#25=[#5003-#3]
IF[#25LE#21]THEN#25=#21
G1Z#25
G1Y-#22
IF[#25EQ#21]GOTO38
G1X[#5001+#13]
#25=[#5003-#3]
IF[#25LE#21]THEN#25=#21
G1Z#25
G1Y[#5002+#5+#7]
IF[#25EQ#21]GOTO38
GOTO32
N38G0G91G28Z0.
G0G91G28Y0.
#3006=1(MADE IN FIRTINA)
M30
N100#3006=1(TAKIM CAPI KUCUK)
M99
N101#3006=1(#10 HATALI YAZILDI)
M99
%
merhaba ben bu işde yeniyim ama birsey sormak isdiyorum arkadaşlar ben malzemenin arka kısmına keserken kure R27 radus yapmak isdiyorum nasıl yapabilirm ?
Muhammet kardeşimin isteği üzerine 4 köşeyede uygulanacak şekilde tekrardan düzenlenmiştir.güle güle kullanın.