açılı yüzey işleme için
O0001
#[#1+1*2]=1
G65P9012L1A0B0.1C4I100J3K0
M30
makrosu
G54 G90 G00 X[#3] Y0 Z100
S500 M3
G01 Z0 F300
WHILE[#1LE10]DO1
#7= #1/TAN[#5]+#3
G1Z-#1 X#7(burayı 5 yaparsanız kanal açma olarak kulanabilirsiniz)
#8=#6/2-ROUND[#6/2]
IF[#8EQ0]GOTO10
G1Y0
GOTO20
N10 Y#4
N20#1=#1+#2
#6=#6+1
END1
G0
Z100
:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
dikdiörgen şeklinde merkeze doğru açı ile cep işliyor
#102=0.
N3#100=0.
#101=0.
#103=200.
#104=400.
G91G28Z0.
G0G90G54X0.Y0.
G43H1Z20.
M3S2000.
N4G0X#100Y#101
G01Z#102F200.
#102=#102-2.
IF[#102EQ-50.]GOTO1
GOTO2
N2
N4X#104F500.
Y#103
X#100
Y#101
#100=#100+10.
#101=#101+10.
#103=#103-10.
#104=#104-10.
IF[#100EQ100.]GOTO3
GOTO4
N3
N1
M5
M9
G91G28Z0.
G28Y0.
M30
::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
erkek küre üstüne finiş geçmek için
G90G0G54X-10.Y0M3S4500
G43Z50.H1M8
#1=0.5
WHILE[#1LE50.]DO1
#2=50.-#1
#3=SQRT[2500.-[#2*#2]]
G1Z-#1F20
X-#3F500
G2I#3
#1=#1+0.5
END1
G0Z50.M5
M30
:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
buda surfACE ile işlenebilecek tür çif radüslü bir parçaya finiş geçiyor
M03S500
G54
M06T01
#1=0
#2=0
G0Z15
X150Y0
N11
#2=30*SIN[#1]
#3=30+30*[1-COS[#1]]
G01Z-#2F40
G41X#3D01
G03I-#3
G40G01X150Y0
#1=#1+1
IF[#1LE90]GOTO11
G0Z30
M30
sscn den alıntıdır işine yarayan olursa buyursun
alıntı olsa bile paylasmak güzeldir
tesekkur ederim sinan
gün olur lazım olur
emegine saglık ...............