okuma alt program çağırma komutu
CALL O... olarak yazılır
alt programa (o) ile başlayan program ismi
program sonunsa ise RTS yazılır
T1M6
CALL O123
G00Z500
M02
O123
G15H4B90
G56H1
S500 M3
M8
G0X-15Y0
Z10
RTS
Alıntı yapılan: biga - Mayıs 01, 2008, 08:07:42 ÖS
okuma alt program çağırma komutu
CALL O... olarak yazılır
alt programa (o) ile başlayan program ismi
program sonunsa ise RTS yazılır
T1M6
CALL O123
G00Z500
M02
O123
G15H4B90
G56H1
S500 M3
M8
G0X-15Y0
Z10
RTS
Ben bu şekilde hiç denemedim ama;
biz firmada,
MX serilerinde CALL OSS10
CALL OSS20 gibi
MA serilerinde CALL OPR10
CALL OPR20 gibi şekillerde alt program çağırıyorduk.
Alıntı yapılan: bora - Mayıs 02, 2008, 11:41:15 ÖS
Alıntı yapılan: biga - Mayıs 01, 2008, 08:07:42 ÖS
okuma alt program çağırma komutu
CALL O... olarak yazılır
alt programa (o) ile başlayan program ismi
program sonunsa ise RTS yazılır
T1M6
CALL O123
G00Z500
M02
O123
G15H4B90
G56H1
S500 M3
M8
G0X-15Y0
Z10
RTS
Ben bu şekilde hiç denemedim ama;
biz firmada,
MX serilerinde CALL OSS10
CALL OSS20 gibi
MA serilerinde CALL OPR10
CALL OPR20 gibi şekillerde alt program çağırıyorduk.
NB001
IF[VPLTK EQ 1]NA001
IF[VPLTK EQ 2]NA002
NA001
CALL O1234
M60
NA002
CALL O1235
M60
NA003 IF[VPLTK EQ 1]NB001
NA004 IF[VPLTK EQ 2]NB001
M02
MX ve MA serisi için örnek olarak.....
okuma da alt prog.cağırmayı bırı ayrıntılı acıklıya bılırse cok sevınırm arkadaslar...mx60hb(okuma)şimdiden teşekkurler
T1
N1 M6(Q16 PARMAK FREZE)
T2
G15 H1
CALL OPR1(ALT PROGRAM ÇAĞIRMA)
G0 Z400
M5
M9
M2
OPR1(ALT POGRAM)
G0 G90 X-100 Y0 S3000 M3
G56 H1 Z3 M8
G1 Z-10 F100
G0 Z200
RTS
O HARFİ İLE BAŞLAYAN VE TOPLAM 4 KARAKTERDEN OLUŞAN BİR İSMİ ALTPROGRAM İLE TANIMLAYABİLİRİZ ANA PROGRAMDA İSE CALL YAZIP ALT PROGAM İSMİNİ GİRMEMİZ BİZİM İÇİN YETERLİ OLACAKTIR YUKARIDA ÖRNEK OLARAKYAZDIM KOLAY GELSİN
ağzınıza sağlık usta.denıycem fakat cekınerek tabıkı..yapa bılecekmıyım oda şuphelı..cunku ılk defa denıycem..eğer yapamazsam tekrar rahatsız edebılırmıyım??bu arada ısmınız neydı??alt prog amacını ve bıze getıre bıleceği kolaylıkları acıklıya bılırmısınz usta???sıze de kolay gelsın
okuma bölümünde bulunan alt program çağırma adı altında 2 ayrı konu bulunmaktaydı bu konuları konuların parçalanmaması ve konuların daha iyi anlaşılması adına brleştirdim . alt programla ilgili mesajlarınızı burada paylaşırsanız daha vermli daha faydalı olabiliriz.
saygılar
bu okuma da alt program tekrarını nasıl belirtiyoruz fanuc=M98 P01 L12 gibi okuma da nasıl oluyoo bu olay biliyormusun? OKUMA=?
H01 P#502 Q5000 (PCD)YARICAP
H01 P#503 Q270 (DELIK DELECEKSEN BASLANGIC DERECESI)
H01 P#504 Q1 (DELİK SAYISI)
H01 P#505 Q10 (ALT PROGRAM OKUMA KODU)alt programa koydugun kod(Q10)GİBİ
alt program tam olarak nerde kullanılıyo biraz acarsanız sevinirim
Alıntı yapılan: yaman - Ekim 26, 2008, 06:13:43 ÖS
alt program tam olarak nerde kullanılıyo biraz acarsanız sevinirim
aynı programı detalarca kullanman gerektiğinde aynı satırları tekrar tekrar yazmak yerine tek bi alt program yazıp istediğin zaman çağırıp kullanabilirsin
sagol burda istetigim herşeyi buluyorum sizler sayenize çok tşk ederim...
diyelim 10 tane parca yapıcaz hepsi aynı paki bunun ofsettleri nasıl oluyo hepsine ayrı ofsetmi vericez...
Alıntı yapılan: yaman - Ekim 29, 2008, 04:38:31 ÖS
diyelim 10 tane parca yapıcaz hepsi aynı paki bunun ofsettleri nasıl oluyo hepsine ayrı ofsetmi vericez...
bir çok yöntemi var istedğini seçersin
ister ayrı ofset ver
ister aynı ofseti kaydırarak kullan
Alıntı yapılan: biga - Ekim 29, 2008, 10:15:13 ÖS
Alıntı yapılan: yaman - Ekim 29, 2008, 04:38:31 ÖS
diyelim 10 tane parca yapıcaz hepsi aynı paki bunun ofsettleri nasıl oluyo hepsine ayrı ofsetmi vericez...
bir çok yöntemi var istedğini seçersin
ister ayrı ofset ver
ister aynı ofseti kaydırarak kullan
ÖRNEK
(https://forum.turkeycnc.com/proxy.php?request=http%3A%2F%2Fwww.uploadgeek.com%2Fuploads456%2F0%2FK.jpg&hash=3cf9a50e0798f87caf35bd4061aa9c41523c2098) (http://www.uploadgeek.com)
Harun abı lafı fazla uzatmayım sozun bıttığı yerı soyleyım
M Ü K E M M E L L L bir anlatım
isminizide bilmiyorum ama kusura bakmayın bu alt programda ofsetleri nasıl belirttiyoz biraz acarsanız sevinirim ....
takım ofsetındenmı soz edıyosn yoksa zero set parca sıfır ofsetlerındenmı???
eğer zero set ten bahsedıyorsan herbır alt program cağirişinda
h1
h2
h3
sııfırlamıs olduğu h ları cağirip tekrarlıyor..
eğer farklı sııf noktası sıfırlamak ıstemıyosan ozaman g11 ile koordınatını kaydırıp işleye bılırsın
g11 x50 y50 gıbı bır noktada kendıne gecıcı sıfır noktası secıpte bu işlemıde yapa bılırsın
not:g10 ile iptal etmeyı unutma...
Mrb arkadaslar ben bugun aranıza katıldımmm
ogrencıyım cnc bolumundee ama biz alt program cagırmayıı boylee gormmedıkk acaba hangısı yanlısss
G90 G21 G97 G94:
x 0 y 0 z 15 :
Go1 z-20 :
m99 P01o1138:
m99 komutuyla alt program cagıryoruzz bız arakdasslar
Ama yanlısta olabılırrr M99 M98
Alıntı yapılan: ugur38 - Kasım 11, 2008, 07:02:56 ÖS
Mrb arkadaslar ben bugun aranıza katıldımmm
ogrencıyım cnc bolumundee ama biz alt program cagırmayıı boylee gormmedıkk acaba hangısı yanlısss
G90 G21 G97 G94:
x 0 y 0 z 15 :
Go1 z-20 :
m99 P01o1138:
m99 komutuyla alt program cagıryoruzz bız arakdasslar
Ama yanlısta olabılırrr M99 M98
ARAMIZA HOŞ GELDİN KARDEŞ
senin yazdıkların fanuc sistem içindir
burada anlatılan okuma osp700m ve u100m serileri içindir
ayrıca alt program çağırma komutu M98 alt program sonu M99
Teşekkür ederimm abicigimm aranıza yenıyımm ve meslektede yenıyımm daha ogrenecegımm cok seyler var sızdeee
ELİMİZDEN GELE BILDIĞINCE SANA YARDIMCI OLURZ GUZEL KARDESIM
YETERKI OĞRENMEK ISTE
sagol taskaya kardeşim denicem dedigini..
yaa arkadaşlar bu alt program çağırma okuma tezgahlarında değişiyomu bana tam olarak güzelce resimli bir programla açıklarmısınız alt programı
bu bolumde sayın bıga abımız okadar guzel anlatmıskı bısey eklemek bıle yapmıs olduğu guzellığı bozabıleceğini dusunuyorm
ıyı ıncele cok guzel anlatmıs ve acıklamıs
ve sonrasında ona ufak bır tesekur edebılırsın.......
harun abi on numarasın abi eline saglık...
yaa hocam benim makina osp-u100 mesela ben bunda 50 mm çapında bir parçanın üzerinde g02 ile gezdirecem 10 mm çapındaki çakıyı ve bunun gibi buna 100 mm uzaklıkta bir daire ve onada 100 mm uzaklıkta bir daire daha var o dairenin üzerindede gezdirecem
bunun programını yazında tam olsun. üç tane daire aralarındaki uzaklık 100 mm dairelerin çapı 50 g02 ile sadece bir tur gezilecek şimdiden saolun
kardeş bu kadar hazırcı olmamak lazım
en azından bişeyler yaz gönder biz bakalım olur yada olmaz sana ondan sonra döneliim bize göndermesende tezghı kilitle grafik ortamda bi test et bişeyler yap
sana göndeereceğim programı ihtiyacım olmamasına rağmen fantazi olsu dite yaptım ama bunun içinde 2 gün uğraştım
hatta hanım ve çocuklar uykumda
vc=1 1+1=vc35 sayılkadığımı söylüyorlardı
biraz çaba biraz emek tamammmı ?
bu program okumalarda paket program olarak var
bende bu programın macrosunu kendimi denemek için yaptım paylaşmak istedim
http://img532.imageshack.us/my.php?image=kareilemeke1.flv
DEF WORK[1]
DIREC V
INDEX B,0
ORIGIN H1
CYLNDR 2P,[-80,-80],[80,80],-50,0
CYLNDR 2P,[-50,-50],[50,50],-10,0
END
VC101=100 (y ekseni kenar uzunluğu)
VC102=100 (x ekseni kenar uzunluğu)
VC103=2 (r yaklaşma)
VC104=-10 (z derinlik)
VC105=1500 (f ilerleme)
VC106=10 (d takım yarıçapı )
VC107=3 ( z de bir seferde gideceği mesafe)
VC108=50 ( z ekseninde f ilerlemesi)
VC109=0 (x ekseni merkezi)
VC110=0 (y ekseni merkezi)
VC111=[VC106*2]-[VC106/3]
VC112=VC107
VC112=VC112-VC107
VC115=0
IF[VC106 GE [VC101/2]]NA9999
IF[VC106 GE [VC102/2]]NA9999
T100M6
G15H1
G90G0G56H1X=VC109Y=VC110Z=[VC03+100]
G90G0X=[VC102/2]-VC106Y=[VC101/2]-VC106
VC100=[VC101/2-VC106]
VC100=[VC100-VC111]
G0Z=VC103
NA001
G01Z=VC112F=VC108
IF[VC115 EQ 0]NL001
IF[VC115 EQ 1]NL002
NL001
G01X=-[VC102/2-VC106]F=VC105
VC115=1
GOTO NL003
NL002
G01X=[VC102/2-VC106]F=VC105
VC115=0
NL003
Y=VC100
VC100=[VC100-VC111]
IF[VC100 LE [-VC101/2+VC106]]NA02
GOTO NA001
NA02
IF[VC100 EQ [-VC101/2+VC106]]NJ02
VC100=[VC100+VC111]
IF[VC115 EQ 1]NR001
IF[VC115 EQ 0]NR002
NR001
G01X=[VC102/2-VC106]F=VC105
VC115=0
GOTO NR003
NR002
G01X=-[VC102/2-VC106]F=VC105
VC115=1
NR003
VC100=[-VC101/2]+[VC106]
GOTO NK001
NJ02
IF[VC115 EQ 1]NZ001
IF[VC115 EQ 0]NZ002
NZ001
G01X=[VC102/2-VC106]F=VC105
VC115=0
GOTO NZ003
NZ002
G01X=-[VC102/2-VC106]F=VC105
VC115=1
NZ003
G90G0Z[VC103+100]
G90G0X=[VC102/2]-VC106Y=[VC101/2]-VC106
G90G0Z[VC112+2]
G90G01Z=VC112F=VC108
X-[VC102/2-VC106]F=VC105
Y-[VC102/2-VC106]
X[VC102/2-VC106]
Y[VC102/2-VC106]
GOTO NY003
NK001
IF[VC115 EQ 1]NY001
IF[VC115 EQ 0]NY002
NY001
Y=VC100
G01X=[VC102/2-VC106]F=VC105
VC115=0
GOTO NY003
NY002
Y=VC100
G01X=-[VC102/2-VC106]F=VC105
VC115=1
NY003
G90G0Z[VC103+100]
G90G0X=[VC102/2]-VC106Y=[VC101/2]-VC106
G90G0Z[VC112+2]
G90G01Z=VC112F=VC108
X-[VC102/2-VC106]F=VC105
Y-[VC102/2-VC106]
X[VC102/2-VC106]
Y[VC102/2-VC106]
VC115=0
VC100=[VC101/2-VC106]
VC100=VC100-VC111
NA03
IF[VC112 EQ VC104]NA05
G90G0Z=VC103
G90G0X=[VC102/2-VC106]Y=[VC101/2-VC106]
G00Z=VC112+3
VC112=VC112-VC107
IF[VC112 LE VC104]NA04
G01Z=VC112F=VC108
GOTO NA001
NA04
VC112=VC104
IF[VC112 LT VC104]NA05
GOTO NA001
GOTO NA05
NA9999
Takim yaricap hatasi(VC106 GE VC101&C102)....
NA05
M02
madem buraya kadar geldin boş gitmemen için sana bi yolunu yazıyım
daire çapı 50mm sen bunu yazmamışın ama ben dıştan dolaşıyım
takım çapı 10mm
t1m6
s1500m3
VZOFX[1]=0.359
callopr1
VZOFX[1]=0.359+100
callopr1
VZOFX[1]=0.359+200
m02
opr1
g15h1
g56h1
g00x55y0z100
z5
g01z0f200
g02x55y0ı-55j0f200
g00z100
rts
!!!! programı iyi incele !!!!!
çok saolasın hocamda vzofx ler noluyo ve bunlara eşittir koyarak (+) işaretiyle sayılar yazmışsın bunlar alt programın gideceği mesafelermi saolasın
Alıntı yapılan: manayh - Ocak 19, 2009, 10:09:28 ÖS
çok saolasın hocamda vzofx ler noluyo ve bunlara eşittir koyarak (+) işaretiyle sayılar yazmışsın bunlar alt programın gideceği mesafelermi saolasın
vzofx ler senin kullanacağın g15 h1 ofsetini 100 mm kaydırarak diğer daireyi yapman içindir
ama sen programı tam anlamıyla incelememişsin
bu haliyle çalıştırırsan istediğini çıkartamazsın
biraz incele bakalım neler göreceksin
hocam şöle yapsak aynısımı bir hata varsa söle
t1m6
g80 g90 g40
g15 h1
callopr1
g15 h2
callopr1
g15 h3
callopr1
m5
m30
opr1
g56 h1 s1500 m3 f100
g00 x55 y0 z100
g00 z2
g01 z-5
g02 x55 y0 R55 f100
g00 z100
rts
buna yorum yaparsanız hocam sevinirim şimdiden saolun çok faydalısınız
Alıntı yapılan: manayh - Ocak 20, 2009, 09:51:31 ÖS
hocam şöle yapsak aynısımı bir hata varsa söle
t1m6
g80 g90 g40
g15 h1
callopr1
g15 h2
callopr1
g15 h3
callopr1
m5
m30
opr1
g56 h1 s1500 m3 f100
g00 x55 y0 z100
g00 z2
g01 z-5
g02 x55 y0 R55 f100
g00 z100
rts
buna yorum yaparsanız hocam sevinirim şimdiden saolun çok faydalısınız
doğru bu şekildede olur
ama 50mm daire için
daire çapı/2+takım yarı çapı olarak yazman gerekir
ok anladım hocam saolun çok faydalı oldunuz
arkadaşlar bilgisi olanlar daha çok alt program yazabilirlerse çok ii olur resimle desteklenirse daha ii ve kalıcı olur şimdiden teşekkürler
http://www.turkeycnc.com/okuma/okuma-alt-program-cagirma-t2452.0.html
ben bundan daha ayrıntılı bır anlatım dusunemıyorm
ayen beyan ortada
bıga ya tesekkur etmeyı unutmayalım bu arada
arkadaşım ben olan programları paylaşalım demiyorum sadece örnek yazan olursa diye dedim ayrıca ben yazılmışları hep okuyorum ilk zamanlar ne çok msj geliyordu çok güzel kullanılıyordu bu dite ama şimdi kimse bişiler yazmıyo mademki burası bilgi paylaşma yeri bende bunu dile getirdim yanlış anlamıyalım lütfen hem ben devamlı teşekkürde ediyorum
eğer onyargılı davranıp dusuncelerıne saygısızlık ettıysem ben ozur dılıyorm kardesım
fanucda nasıl alt program cagırıyoruz acaba...
m98 ile cağiriyosn Yaman ım
ornek
m98p0008L3 (p0008 program numarası L3 tekrar sayısı)
O0008 (alt program)
g17 g90 ...
..
....
...
m99 (tekrar basa doner baslar..L nekadar tekrar sayısı yazdıysan programı okadar calıstırır..her m99 okyusu L yı tamamlar..)
kolayu gelsın yaman ım
çok sagol taşkaya eyvallah sanada kolay gelsin....
Okuma alt programlarla ilgili bir sorun mu vardı. Örnek gönder incelerim.
Öncelikle selamlar arkadaşlar bu siteyi tesadüfen buldum ve çok faydalı bilgiler paylaşıyorsunuz hepinize ve özelikle bu bilgileri bizden esirgemeyen ustalarımıza çok teşekkür ediyorum.Benimde bir sorum olacak 1986 model okuma mc-60H (OSP5000) yatay işleme tezgahında çalışmaya başladım alt programla 100mm çapında 100mm derinliğinde bir deliği D50mm takımla dairesel interpolasyonla nasıl işlerim yeni olduğum için biraz daha açık yazarsanız sevinirim şimdiden teşekkürler...
arkadaşlar osp5000 alt program tekrarı nasıl yardımcı olursanız sevinirim
arkadaslar bır ayrıntıya dıkat cekmek ıstıyorm,,
fanuclarda alt program bıldığımız gıbı farklı program numarası ıcersıen ayrı bır sayfaya yazılmaktadır..
okuma tezgah larda bu farklıdır,,,
alt programı ana programın bitişinın altına yazmak gerekıyor...
orn:
b0
g15 g15
CALL O1234
...
...
g0 z500
m9 m5
m2 (prog.sonu)
o1234
b0
g15 h15
...
...
RTS
hepsı aynı sayfada bulunmalı dır...
bora bey 18 yııllık torna frezeciyim işimde uzmanım ama cnc de degil kara mk nada şimdi ben bu şartlarda cnc yi nasıl ögrenebilirim
meraba kardes,oncelıkle temelının sağlam olduğunu belırtmek ısterım..
bı kursa gıderek baslıya bılırsın..ılk adımını bu sekılde at derım..
yada yakınlarında tanıdık varsa onun yanında da oğrene bılırsın..dahga sonra sıte uzerınden elımızden gelenı de bızler yaparız.....
Alt programı tekrar sayısını nasıl belirtiyoruz acaba???
G15 H1
S3000 M3
G56 H1 D1
G90 G0 X-20 Y48
G0 Z0
CALL OXT Q40
G0 Z200
M30
OXT
G91 Z-0.5 F150
G90 G1 G41 Y28 F1000
G3 X0 Y48 R20
G1 Y88
G2 X8 Y96 R8
G1 X98
G1 Y0
G1 X10
G2 X0 Y10 R10
G1 Y48
G3 X-20 Y68 R20
G40
RTS G90
T1
M6
T2
CALL OS1
M6
CALL OS2
G00 Z150.0
G00Y350.0
M02
BU SEKLİDE BAŞLANGİC YAZİLİYOR
ONDA SONRA
OS1
G15 H
G56 H1 Z150.0S M
.
.
RTS
OS2
G15 H
G56 H2 Z150.0S M
.
.
RTS
BU ALT PROG OLARAK BELİRTİLİR
UYGUNUMUDUR ::)
arkadaslar bu alt programa fanuc takı gıbı tekrar sayısı nasıl yazıyoruz
CALL O--- nin yanına Q tekrar adedini yazarsın.
örnek olak 10 mm derınlıkte bır kontur frezeleyecegım ve bunu 1 paso alarak yapacam Q 10 mu yazıcam ustam
Alıntı yapılan: muco22 - Şubat 22, 2012, 10:43:11 ÖS
örnek olak 10 mm derınlıkte bır kontur frezeleyecegım ve bunu 1 paso alarak yapacam Q 10 mu yazıcam ustam
COPY=kopyalamayı başlat
Q=kopyalama sayısı
P=kopyalama derecesi
COPYE=kopyalamayı bitir
T1M6 (D20 FREZE)
G15H1
COPY Q1 P45
CALL O1234
COPYE
COPY Q1 P90
CALL O4321
COPYE
G15H2
COPY Q1 P180
CALL O1234
COPY Q1 P270
CALL O4321
COPYE
M02
O1234
S1500 M3
M8
G56 H1
G00X15Y150
G00 Z5
G01Z0F200
G01X30 Y110F500
G00Z100
RTS
O4321
S1500 M3
M8
G56 H1
G00X20Y200
G00 Z5
G01Z0F200
G01X50 Y50F500
G00Z100
RTS
ALINTI (BİGA) http://www.turkeycnc.com/okuma/kopyalayarak-isleme(copycopye)/ (http://www.turkeycnc.com/okuma/kopyalayarak-isleme(copycopye)/)
T12 (8 PF)
M6
T13 (10 PF)
CALL OP8
M6
T16(16PF)
CALL OP2
M6
T14 (Q12 KANAL)
CALL OP3
M6
T15 (Q6*30DERECE BILENMIS)
CALL OP4
M6
CALL OP5
G0Y350Z200
M2
OP2
G15 H10
G56 Z200 H13 S4000 M03
G00 X-50.0 Y23.0
G00 Z-17.0
G01 X-39.0 F1500
G01 Y26.0
G01 X37
G01 Y18
G01 X45
G01 Y-30.0
G01 X36.0
G01 Y-37
G01 X0.0
G01 Y-30.0
G01 Y-37
G01 X-37
G01 Y-30.0
G01 X-45
G01 Y26.0
G00 Z50
G00 X15.0 Y-40
G00 Z-17.0
G42 D3
G01 X15.0Y-35.0 F400
G01 X18.4
G03 G17 X43.0 Y-10.4 R24.6
G01 Y-7.759
G03 X25.187 Y19.652 R30.0
G03 X0.0 Y25.0 R62
G03 X-25.187 Y19.652 R62
G3 X-43.0 Y-7.759 R30.0
G01 Y-10.4
G3 X-18.4 Y-35.0 R24.6
G01 X-15.0
G03 X-3.5 Y-23.5 R11.5
G02 X3.5 Y-23.5 R3.5
G03 X15.0 Y-35.0 R11.5
G01 Y-37.0
G40
G00 Z50
G42 D13 (D=-0.07)
G00 X40.9 Y12
G00 Z10 M12
G01 Z-3.88 F550
G1X40.9 Y10.0
G01 Y-10.451F450
G02 X18.4 Y-32.951 R22.5
G01 X15.000 Y-32.951
G02 X5.600 Y-23.551 R9.4
G03 X0.0 Y-17.951 R5.6
G03 X-5.600 Y-23.551 R5.6
G02 X-15.000 Y-32.951 R9.4
G01 X-18.4 Y-32.951
G02 X-40.9 Y-10.451 R22.5
G01 X-40.900 Y10
G40
G00 Z50
RTS
OP3
G15H10
G56H16S6000M3Z150
G00 X36.975 Y21
G00 Z1 M12
G01 Z-0.88 F1100
G01 Y-1.176
G02 X17.025 Y-1.176 R9.975
G01 Y28
G00 Z10
G00 X15.1 Y28
G00 Z1
G01 Z-0.88
G01 Y6.258
G01 X-15.1
G01 Y25.158
G01 X15.1
G00 Z20
G00 X-17.025 Y25
G00 Z1
G01 Z-0.88
G01 Y-1.176
G02 X-36.975 Y-1.176 R9.975
G01 Y28
G40
G00 Z20.0
G00 X-46.0 Y-22.0
G00 Z-0.88
G01 X-14.0 Y-22.0
G01 X-14.0 Y-7.6
G01 X14.0
G01 X14.0 Y-22.0
G01 X46.0
G00 Z50
G00 X24.0 Y26.0
G00 Z0.0
G01 X24.0 Y-13.0
G01 X0.0 F2000
G01 X0.0 Y5.0
G01 X0.0 Y29.0 F600
G00 X-24.0
G01 Y-13.0
G00 Z200
RTS
OP4
G15 H10
G56 Z200 H14 S4500 M03
G00 X40.790Y15
G00 Z1 M12
G01 Z-3.88 F750
G01 Y-10.151
G02 X18.40 Y-32.541 R22.39
G01 X-18.400 Y-32.541
G02 X-40.790Y-10.151 R22.39
G01 Y15
G00 Z20
G00 X40.790Y15
G00 Z1 M12
G01 Z-3.83 F750
G01 Y-10.151
G02 X18.40 Y-32.541 R22.39
G01 X-18.400 Y-32.541
G02 X-40.790Y-10.151 R22.39
G01 Y15
G00 Z200
RTS
OP10
G15 H10
G56 Z200 H16 S4500 M03
G00 X55.000 Y17.0
G00 Z2 M12
G01 X-55 F1000
G01 Y2.0
G01 X55
G01 Y-13
G01 X-55
G01 Y-28
G01 X55.0
G00 Z150
RTS
OP5
G15 H10
G56 Z200 H15
M19 RS=38
G0X9.5 Y15.90
M130
G00 Z1
G1Z-0.88 F500
G01 X-9.5 F500
M131
G00 Z200
RTS
OP7
G15 H10
G56 Z200 H17 S4000 M03
G41 D7 (D=-3.5)
G00 X40.9 Y12
G00 Z1.0M12
G01 Z-1.88 F750
G1X40.9 Y10.0
G01 Y-10.451F450
G02 X18.4 Y-32.951 R22.5
G01 X15.000 Y-32.951
G02 X5.600 Y-23.551 R9.4
G03 X0.0 Y-17.951 R5.6
G03 X-5.600 Y-23.551 R5.6
G02 X-15.000 Y-32.951 R9.4
G01 X-18.4 Y-32.951
G02 X-40.9 Y-10.451 R22.5
G01 X-40.900 Y10
G00 Z20
G40
G41 D8 (D=-4.0)
G00 X33.900 Y15
G00 Z1
G01 Z-0.68
G01 Y-1.125
G02 X20.100 Y-1.125 R6.900
G01 Y15
G00 Z10
G00 X-20.100 Y15
G00 Z1
G01 Z-0.68
G01 Y-1.125
G02 X-33.900 Y-1.125 R6.900
G01 Y15
G00 Z20
G40
G00 Z150
G00 Y350
RTS
OP8
G15 H10
G56 Z200 H12 S4000 M03
G00 X15.0 Y-40
G00 Z-17.0
G01 X15.0Y-35.0 F400
G01 X18.4
G03 G17 X43.0 Y-10.4 R24.6
G01 Y-7.759
G03 X25.187 Y19.652 R30.0
G03 X0.0 Y25.0 R62
G03 X-25.187 Y19.652 R62
G3 X-43.0 Y-7.759 R30.0
G01 Y-10.4
G3 X-18.4 Y-35.0 R24.6
G01 X-15.0
G03 X-3.5 Y-23.5 R11.5
G02 X3.5 Y-23.5 R3.5
G03 X15.0 Y-35.0 R11.5
G01 Y-37.0
G00 Z150
RTS
boyle olur mu acaba :-[
Arkadaşlar herkese kolay gelsin öncelikle okuma vtm-100 torna serisi için alt program uzantıları ssb olacak(O2222. SSb) ana program ör:(O1234. Mın) şeklinde olacak alt programın sonuna RTS yazılacak
Örnek: O1234
N1 G00 x1500 z1500
Call O2222(alt program uzantısı ssb olan)
M02