fanuc macro parametre örnek programlar

[ismeterol]

%
O8222(1,2,3,4,5,,,,,,ŞEKLİNDE TÜRETEBİLECEGİNİZ BİR ÖRNEK PROGRAM)

(BEN 80 E KADAR TÜRETTİM)

G17G90G40G49G80
(ELK. KESINTISI VEYA RESET YAPTIGIMIZDA)
(DIKKAT EN SON YAZILAN KALIP)
( NOSUNU #33= ORNEK '2' DIYE MDI OKUTUN)

#33=[#33+1](SABIT )

#1=1.15  (YAZI BUYUKLUGU)(BURAYA YAZILAN DEGER PROGRAM *7* İLE ÇARPARAK YAZI BOYUNU OLUŞTURUR)
#5=49.5  (RADYUS)
#6=71    (X0 DAKİ Y+,Y- DOGRULTUSUNA OLAN AÇI)
#9=0.6   (YAZI DERINLIGI)
#10=5    (Z FATURA FARKI)(NO YAZILAN YÜZEYDE VAR SA ÇIKINTI)

(ASAGIYI DEGISTIRMEYIN)
(X)#7=#5*SIN[#6]
(Y)#8=#5*COS[#6]

(X)#17=[[#5*SIN[#6]]-2.8](BURADAKİ İŞLEM 2 BASAMAKLI RAKAMLARDA)
(X)#19=[[#5*SIN[#6]]+2.8](SOL RAKAM SOLA SAG RAKAM SAGA KAÇIRMAKTIR )
(-2.8 VE +2.8DEGİŞTİRİLEBİLİR)

G80G40G49G17G90
N222T09M06
S5000M03
G55
G0B0.
G04X1
G0G43H9X#7Y#8Z#10
GOTO#33

N1(1)(SATIR NUMARALARI YAZACAGI NUMARALARDIR)
G0G43X[#7+[1/#1]]Y[#8-[3/#1]]Z#10H9
G01Z-#9F1000
G01X[#7-[1/#1]]
G01X#7
G01Y[#8+[3/#1]]
G01X[#7-[1/#1]]Y[#8+[2/#1]]
G0Z#10

G0G43X[#7+[1/#1]]Y-[#8+[3/#1]]Z#10H9
G01Z-#9
G01X[#7-[1/#1]]
G01X#7
G01Y-[#8-[3/#1]]
G01X[#7-[1/#1]]Y-[#8-[2/#1]]
G0Z#10
GOTO300

N2(2)
G0G43X[#7-[2/#1]]Y[#8+[1.5/#1]]Z#10H9
G01Z-#9F1000
G02X#7Y[#8+[3/#1]]R[1.5/#1]
G02X[#7+[2/#1]]Y[#8+[1.5/#1]]R[1.5/#1]
G01X[#7-[2/#1]]Y[#8-[2.5/#1]]
G03X[#7-[1/#1]]Y[#8-[3/#1]]R[0.5/#1]
G01X[#7+[2/#1]]
G0Z#10

G0X[#7-[2/#1]]Y-[#8-[1.5/#1]]
G01Z-#9F1000
G02X#7Y-[#8-[3/#1]]R[1.5/#1]
G02X[#7+[2/#1]]Y-[#8-[1.5/#1]]R[1.5/#1]
G01X[#7-[2/#1]]Y-[#8+[2.5/#1]]
G03X[#7-[1/#1]]Y-[#8+[3/#1]]R[0.5/#1]
G01X[#7+[2/#1]]
G0Z#10
GOTO300

N3(3)
G0G43H9X[#7-[2/#1]]Y[#8+[1.5/#1]]Z#10
G01Z-#9
G02X#7Y[#8+[3/#1]]R[1.5/#1]
G02X[#7+[2/#1]]Y[#8+[1.5/#1]]R[1.5/#1]
G02X#7Y#8R[1.5/#1]
G01X[#7-[0.5/#1]]
G01X#7
G02X[#7+[2/#1]]Y[#8-[1.5/#1]]R[1.5/#1]
G02X#7Y[#8-[3/#1]]R[1.5/#1]
G02X[#7-[2/#1]]Y[#8-[1.5/#1]]R[1.5/#1]
G0Z#10

G0G43H9X[#7-[2/#1]]Y-[#8-[1.5/#1]]Z#10
G01Z-#9
G02X#7Y-[#8-[3/#1]]R[1.5/#1]
G02X[#7+[2/#1]]Y-[#8-[1.5/#1]]R[1.5/#1]
G02X#7Y-#8R[1.5/#1]
G01X[#7-[0.5/#1]]
G01X#7
G02X[#7+[2/#1]]Y-[#8+[1.5/#1]]R[1.5/#1]
G02X#7Y-[#8+[3/#1]]R[1.5/#1]
G02X[#7-[2/#1]]Y-[#8+[1.5/#1]]R[1.5/#1]
G0Z#10
GOTO300


N4(4)

G0G43H9X[#7+[1.5/#1]]Y[#8-[3/#1]]Z#10
G01Z-#9
G01X#7
G01X[#7+[0.75/#1]]
G01Y[#8+[3/#1]]
G01X[#7-[2/#1]]Y[#8-[1/#1]]
G01X[#7+[2/#1]]
G01Y[#8-[1.5/#1]]
G01Y[#8-[0.5/#1]]
G0Z#10

G0G43H9X[#7+[1.5/#1]]Y-[#8+[3/#1]]Z#10
G01Z-#9
G01X#7
G01X[#7+[0.75/#1]]
G01Y-[#8-[3/#1]]
G01X[#7-[2/#1]]Y-[#8+[1/#1]]
G01X[#7+[2/#1]]
G01Y-[#8+[1.5/#1]]
G01Y-[#8+[0.5/#1]]
G0Z#10

GOTO300


N5(5)
G0G43H9X[#7+[1.8/#1]]Y[#8+[3/#1]]Z#10
G01Z-#9
G01X[#7-[1.8/#1]]
G01Y#8
G02X[#7-[1/#1]]Y[#8+[0.5/#1]]R[0.5/#1]
G01X[#7+[1/#1]]
G02X[#7+[1.8/#1]]Y#8R[0.5/#1]
G01Y[#8-[2.5/#1]]
G02X[#7+[1/#1]]Y[#8-[3/#1]]R[0.5/#1]
G01X[#7-[1/#1]]
G02X[#7-[1.8/#1]]Y[#8-[2.5/#1]]R[0.5/#1]
G0Z#10

G0X[#7+[1.8/#1]]Y-[#8-[3/#1]]
G01Z-#9
G01X[#7-[1.8/#1]]
G01Y-#8
G02X[#7-[1/#1]]Y-[#8-[0.5/#1]]R[0.5/#1]
G01X[#7+[1/#1]]
G02X[#7+[1.8/#1]]Y-#8R[0.5/#1]
G01Y-[#8+[2.5/#1]]
G02X[#7+[1/#1]]Y-[#8+[3/#1]]R[0.5/#1]
G01X[#7-[1/#1]]
G02X[#7-[1.8/#1]]Y-[#8+[2.5/#1]]R[0.5/#1]
G0Z#10

GOTO300

N14(14)
G0G43X[#17+[1/#1]]Y[#8-[3/#1]]Z#10H9
G01Z-#9F1000
G01X[#17-[1/#1]]
G01X#17
G01Y[#8+[3/#1]]
G01X[#17-[1/#1]]Y[#8+[1.5/#1]]
G0Z#10

G0X[#19+1.5]Y[#8-[3/#1]]
G01Z-#9
G01X[#19+0.5]
G01X[#19+[1/#1]]
G01Y[#8+[3/#1]]
G01X[#19-[2/#1]]Y[#8-[1/#1]]
G01X[#19+[2/#1]]
G01Y[#8-[1.5/#1]]
G01Y[#8-[0.5/#1]]
G0Z#10

G0X[#17+[1/#1]]Y-[#8+[3/#1]]
G01Z-#9
G01X[#17-[1/#1]]
G01X#17
G01Y-[#8-[3/#1]]
G01X[#17-[1/#1]]Y-[#8-[2/#1]]
G0Z#10
G0X[#19+1.5]Y-[#8+[3/#1]]
G01Z-#9
G01X[#19+0.5]
G01X[#19+[1/#1]]
G01Y-[#8-[3/#1]]
G01X[#19-[2/#1]]Y-[#8+[1/#1]]
G01X[#19+[2/#1]]
G01Y-[#8+[1.5/#1]]
G01Y-[#8+[0.5/#1]]
G0Z#10
GOTO300




N300

G0Z200
M05
M09

M99

%(SAYGILARIMLA)
(AYNEN DEVAM)

[VICTOR]

forumda bir ilki baslattın. kımse bu işi ne sordu nede lafını etti.elıne sağlık.
dur bi tahmın edeyim ankarada çalışıyon.
makro yazma genelde ankarada yaygın.

brawoooooo

[ismeterol]

EVET BU SİTEDE BANA BİŞİ SORAN OLMADI.......

CNC ÜZERİNE BÜTÜN SİTELERDE SÖZDE PAYLAŞIM VAR SÖZDE DEDİM ÇÜNKÜ KENDİNE USTA DİYEN AMA USTALIGIN BİRŞEYLER ÖGRETMEKLE BAŞLADIGINI BİLMEYEN TANIDIKLARIM VEYA YAZILARINI OKUDUGUM ARKADAŞLKAR BİLDİKLERİ BİRKAÇŞEYİ DE GİZLEYEREK YA DEGERLENDİKLERİNİ SANIYORLAR YADA KÜSTAHLIGI ALIŞKANLIK EDİNMİŞLER........

EN KIZDIGIM ŞEY YAPTIKLARI PROGRAMLARI YAYINLIYIPTA PROGRAMI DEŞİFRE EDECEK EN CAN ALICI KARAKTERLERİN YERİNE  :) İNTERNET GÜLÜCÜĞÜ KOYULMASI 
:-X :-X :-X :-X :-X
BU SİTEYİ SEVDİGİM İÇİN BU SİTEYİ TERCİH ETTİM
UMARIM BİR TATSIZLIKLA KARŞILAŞMAYACAM BU SİTEDE ;)

[VICTOR]

eline sağlık. çok güzel.

[crisis]

gercekten bende bi cok yere bakındım ama bu programlamaya dair hem bişey bulamadım hemde ilk defa görüyorum
kendi ustam bahsetmişti o bile zamanında çalıştığı yerde öğrenememiş göstermemişler
bunu öğrenmeyi çok isterim gerçekten hem güzel hemde özel bir paylaşım bu
teşekkürler

[kadır kıran]

banada  ogretırsenız cok sevınırım..!

[AutoCAD]

çok gerekli ve önemli bilgiler benimde ihtiyacım var öğrenmeye

[fixxer]

Herkeze kolay gelsin arkadaşlar,aranıza yeni katılıyorum kendime bir makina yaptım bunu bir cnc programı yardımıyla kontrol ediyorum.
g-code da basit bir macro oluşturmam lazım bana bu konuda yardım edermisiniz ?

G00 Z-2.5
G00 Y290
G00 X89
G00 X-5
G00 Y0
G00 Z0
G00 X0

Bu kodları nasıl 5 kere tekrarlatacak macroyu oluşturabilirim ? bir if then yada  for next ama :(:(
yardım ederseniz çok sevinirim kolay gelsin herkeze

[scorpionteam]

#1=5

N10
#1=[#1-1]

G00 Z-2.5
G00 Y290
G00 X89
G00 X-5
G00 Y0
G00 Z0
G00 X0

IF[#1NE0]GOTO10
EĞER ALT PROGRAM İSTEMİYORSAN BÖYLE TEKRAR EDER
ben denemedim denedikten sonra problem olursa  tekrar yaz

[fixxer]

hocam aynı yazdığınız şekilde denedim fakat sonuç alamadım.
Benim kullandığım programın kodları farklı olabilirmi diye düşünmeye başladım.( Mach3)
Buraya msj attıktan sonra aşşağıdaki programda arttırabiliyormuyum diye denedim programım 1 artıyor fakat if döngüsüne girmiyor:(
if döngüsüne girse sayım 4 olduğunda n12 ye dallanıp  Y'yi 50 ye çekmesi lazım. ama olmuyor ?

%
N1
G00 Z-2.5
G00 Y2
#1=[#1+1]
G00 X#1
G00 Z-5
G00 Y0
G00 Z0
IF[#1EQ4]GOTO12
M99
N12
G00 Y50
%

[scorpionteam]

ordan M99 u kaldırıp bir denesen bakalım olacakmı

[fixxer]

Hocam M99 kaldırınca hiç tekrar etmiyor   a=a+1 bu çalışıyor fakat ne denediysem if komutunu çalıştıramadım sayı şu ise şunu yap ı çalıştıramadım bir türlü

[fixxer]

Makinacı kardeş bunları zaten inceledim benim problemim örnekler değil sadece programa uyum şekli. normalde çalışması gereken codelar benim kullandığım programda çalışmıyor sorunum burda  ne biliyim bir çok şey denedim köşeli parantezsiz normal parantezli buna benzer bişeyler olması lazım aklıma gelen eklentileri deniyorum hala.yapacağım iş sonuçta 10 değişik şekilde yapılır.
mach3 kullanan varmı aranızda ?

[ismeterol]

hocam aynı yazdığınız şekilde denedim fakat sonuç alamadım.
Benim kullandığım programın kodları farklı olabilirmi diye düşünmeye başladım.( Mach3)
Buraya msj attıktan sonra aşşağıdaki programda arttırabiliyormuyum diye denedim programım 1 artıyor fakat if döngüsüne girmiyor:(
if döngüsüne girse sayım 4 olduğunda n12 ye dallanıp  Y'yi 50 ye çekmesi lazım. ama olmuyor ?

%
#1=0 ;)
N1
G00 Z-2.5
G00 Y2
#1=[#1+1]
G00 X#1
G00 Z-5
G00 Y0
G00 Z0
IF[#1EQ4]GOTO12
GOTO1 ;)
N12
G00 Y50
***buraya***(ALT PROGRAMSA BU M99 ++++ DEGİLSE DİGER OPERASYONLARINA DEVAM EDER YADA M30 İLE BİTİRİRSİN)
%

selam hala bu problem devam ediyorsa yardım etmek istedim araya girdimse pardon....
düzeltmeyi üst tarafta yaptım programa *4* yazdıgın için şu hali *4* tekrar olacak

eger tezgahın bu macro kavramları algılamaz ise buradan bana ulaşırsan bu programı birkaç degişik şekildede çalıştırabiliriz .......hayırlı çalışmalar...........

[ABDULLAH KAYMAZ]

BEN BİRAZ ARAŞTIRMA YAPTIM İSTANBULDAN AŞKIM KOPARAN DİYE BİR ABİMİZ VARDI BANA BİRAZ YARDIM ETTİ MANTIĞI BİLİYORUM BİRAZ FAKAT HENÜZ MAKRODA Bİ İŞLEME YAPMADIM YANLIZ İK  ŞEKİLDE KULLANMAK İSTİYORUM MESELA İŞLEME MERKEZİ İÇİN DÜŞÜNELİM ALTTA
OBRANT BİR YARIK VAR
UZUNLUK 12
GENİŞLİK 6
KÖŞE RADÜSLERİ 2.5 DİYELİM BUNUN ÇİZİM MANTIĞINDA 25 MM ÜZERİNDE 30 MM ÇAPINDAKİ DAİREYE LOFT YAPTIĞIMIZI DÜŞÜNELİM BİZ İŞTE O BÖLÜMÜ İŞLİYORUZ LOFT YAPILAN BÖÜM FAKAP BİZİM İŞTE BUNDAN BİRTANE İKİNCİ PARÇANIN ÖLÇÜSÜ FARKLI VE HER PARÇA BİRBİRİNDEN FARKLI DOLAYISI İLE MAKRODA BİRKAÇ KÜÇÜK DEĞİŞİKLİKLE BUNLARI YAPMAK MÜMKÜN YOKSA  HER PARÇA İÇİN CAM PROGRAMI YAPIYORUZ BUNUN İÇİN ÇİZİM YÜKLEYEYİM İLGİLENİRMİSİNİZ BANA HANGİ FORMATTA İSTEDİĞİNİ SÖYLE ONA GÖRE EKLEYEYİM YARDIMCI OLURSAN SEVİNİRİM KARDEŞİM