OKUMA ALT PROGRAM ÇAĞIRMA

[taşkaya]

Harun abı lafı fazla uzatmayım sozun bıttığı yerı soyleyım

M Ü K E M M E L L L      bir anlatım

[yaman]

isminizide bilmiyorum ama kusura bakmayın bu alt programda ofsetleri nasıl belirttiyoz biraz acarsanız sevinirim ....

[taşkaya]

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...

[ugur38]

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

[biga]

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

[ugur38]

Teşekkür ederimm abicigimm aranıza yenıyımm ve meslektede yenıyımm daha ogrenecegımm cok seyler var sızdeee

[taşkaya]

ELİMİZDEN GELE BILDIĞINCE SANA YARDIMCI OLURZ GUZEL KARDESIM

YETERKI OĞRENMEK ISTE

[yaman]

sagol taskaya kardeşim denicem dedigini..

[manayh]

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ı

[taşkaya]

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.......

[yaman]

harun abi on numarasın abi eline saglık...

[manayh]

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

[biga]

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


[biga]

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 !!!!! 

[manayh]

ç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