AÇILI DIŞ ÇAP İŞLEME
G90G0G54X0Y-10.S1500M3
G43Z5.H1
#1=-10(Y) (y olarak başlayacağı yarıçap)
#2=+10(J) (j olarak başlayacağı yarıçap )
#3=-0(Z) (z olarak başlayacağı derinlik)
N10G3Y#1J#2Z#3F1500
#1=#1-1 (Y olarak yarı çapta her turda büyüme)
#2=#2+1 (j olarak yarı çapta her turda büyüme))
#3=#3-1 (z olarak her turda ineceği derinlik)
IF[#3GE-20]GOTO10 (Z olarak toplam derinlik)
G0Z200.
M3
denedim çalışıyor
arkadaşlar ilk paylaşım belki işinize yarar
özellikle raslantı kardeş
TEŞEKKÜRLER ASİGEN KARDEŞ ÇOK GÜZEL BİR ÇALIŞMA
Asigen kardeş eğer kızmazsan programında bir kaç değişiklik yaptım. sence böyle nasıl olur?
daha fazla örnek bekliyorum senden. böyle örnekler üzerinde konuşursak daha faydalı olacağını düşünüyorum
AÇILI DIŞ ÇAP İŞLEME
G90G0G54X0Y[[#2/2]+#1]S1500M3
G43Z5.H1
G1Z0 F500
#1=10 (BAŞLANGIÇ YARI ÇAPI)
#2=10 (TAKIM ÇAPI )
#3=20 (Z BOYU)
#4=1 (HER TURDA BÜYÜMESİNİ İSTEDİĞİMİZ DEĞER)
#5=1 (Z DALMA)
#6=0
N10 G3 Y[[#2/2]+#1]J-[[#2/2]+#1] Z-#6 F1500
#1=[#1+#4] (Y olarak yarı çapta her turda büyüme)
#6=[#6+#5] (z olarak her turda ineceği derinlik)
IF[#6EQ#3]GOTO10 (Z olarak toplam derinlik)
G0Z200.
M30
vaala süpersin ben daha yeniyim macroda sağol basit olarak yazdım fazla bilgim yok denedim bu kadar oldu sizden öğrencez
Alıntı yapılan: asigen - Temmuz 21, 2008, 03:16:29 ÖS
vaala süpersin ben daha yeniyim macroda sağol basit olarak yazdım fazla bilgim yok denedim bu kadar oldu sizden öğrencez
sen sürekli bu sitede ol;bildiğini paylaş,bilmediğini sor, bu işte kendine ve forumdaki diğer arkadaşlara büyük yarar sağlarsın.
AÇILI DIŞ ÇAP İŞLEME
#1=10 (BAŞLANGIÇ YARI ÇAPI)
#2=10 (TAKIM ÇAPI )
#3=20 (Z BOYU)
#4=1 (HER TURDA BÜYÜMESİNİ İSTEDİĞİMİZ DEĞER)
#5=1 (Z DALMA)
#6=0
bu arada macrolar böyle yukarda olsa daha iyi olur.y pozisyonlarken doğru değere gitsin
G90G0G54X0Y[[#2/2]+#1]S1500M3
G43Z5.H1
G1Z0 F500
N10 G3 Y[[#2/2]+#1]J-[[#2/2]+#1] Z-#6 F1500
#1=[#1+#4] (Y olarak yarı çapta her turda büyüme)
#6=[#6+#5] (z olarak her turda ineceği derinlik)
IF[#6EQ#3]GOTO10 (Z olarak toplam derinlik)
G0Z200.
M30
pako aynı şirketin elemanıyız asigen ile... vardiya arkadaşı :D cnc borverk
selam rastlantı vardiya arkadaşım
slm asıgen slm raslantı ben vardıya arkadaşınız volkan
Alıntı yapılan: vadaro12 - Temmuz 26, 2008, 09:38:40 ÖS
slm asıgen slm raslantı ben vardıya arkadaşınız volkan
SELAM ARKADAŞLAR BENDE VARDİYA AMİRİNİZ]
ortam güzel olunca bir espiri yapmak istedim.galiba sayenizde tüm fabrika siteye abone olacak.
Alıntı yapılan: pako34 - Temmuz 26, 2008, 09:45:00 ÖS
Alıntı yapılan: vadaro12 - Temmuz 26, 2008, 09:38:40 ÖS
slm asıgen slm raslantı ben vardıya arkadaşınız volkan
SELAM ARKADAŞLAR BENDE VARDİYA AMİRİNİZ]
ortam güzel olunca bir espiri yapmak istedim.galiba sayenizde tüm fabrika siteye abone olacak.
üye sayısı artıkça paylaşım artar bilgiler çoğalır ne güzel
Alıntı yapılan: asigen - Temmuz 26, 2008, 09:52:37 ÖS
Alıntı yapılan: pako34 - Temmuz 26, 2008, 09:45:00 ÖS
Alıntı yapılan: vadaro12 - Temmuz 26, 2008, 09:38:40 ÖS
slm asıgen slm raslantı ben vardıya arkadaşınız volkan
SELAM ARKADAŞLAR BENDE VARDİYA AMİRİNİZ]
ortam güzel olunca bir espiri yapmak istedim.galiba sayenizde tüm fabrika siteye abone olacak.
üye sayısı artıkça paylaşım artar bilgiler çoğalır ne güzel
güzel tabiki bizde bunun için uğraşıyoruz.bu forum gerçekten farklı ,ortam çok güzel.
asigen tezgahın femco mu
Alıntı yapılan: astarabistaa - Temmuz 29, 2008, 04:10:06 ÖS
asigen tezgahın femco mu
mitsubishi fanuc18m mht16/18 modeli
asigen ben artık okuma da çalışıyorum haberin olsun yatay işlem + bileme :D işi çözdüm fanucdan hiç farkı yok bir kaç şey değişik sadece hım birde siemens var onada el attım oda yatay işlem onunda işi tamam okuma ve siemens de macro boşaltma delik v.s programlar yaptım mühendis arkadaşlar her gün kahvaltı alıyorlar bir görsen halimi gülmekden çatlarsın.... muahahhahaaa :)
slm arkadaşlar bende artık kalıpcıda calısıyorum.bıde hardvol tezgahında calışıyorum mıtsubısh programlı va aynı zamanda okumadayım ınsan azımle gercekten cok ıyı yere gelıyor tesekkurler
tebrıkler.
ama insan çalıştığı tezgahın ismini doğru bılmelı bence..
EMEĞE SAYGI ARKADAŞIMIZA PAYLAŞIMI İÇİN TEŞEKKÜRLER !!!!!!!!
sağol kardeşim
aşkın kardesım acılı cap ısleme programını tezgaha aynısını yazdım ama calışmadı tezgah radus ıstıyopr sorun sence nerde
#1=30
#2=40
#3=-1
#4=0
#5=0.2
#10=[[#2-#1]/2]
#11=1
#6=ATAN[#10]/[#11]
#7=[#5*TAN[#6]]
WHILE[#1LE#2]DO1
#1=#1+#7
G1X#1
G3I-#1
IF[#4LE#3]GOTO20
#4=#4-#5
G1Z#4
END1
N20 G90 G00 Z200
M30
GÖNDERDİĞİM MACROYU AÇILI ÇAP İŞLEMEK İÇİN KULLANIN. MACRO KULLANACAKSANIZ BIRAKIN HESAPLAMAYI TEZGAH YAPSIN
KONİK DIŞ ÇAP İŞLEME
#1=#1+#7 BURDA YAZILI OLAN DEĞİŞKENLERİ #1=#1-#7 OLARAK DEĞİŞTİRİRSENİZ DİŞİ KONİK ÇAP İŞLERSİNİZ
#1=30
#2=40
#3=-1
#4=0
#5=0.2
#10=[[#2-#1]/2]
#11=1
#6=ATAN[#10]/[#11]
#7=[#5*TAN[#6]]
WHILE[#1LE#2]DO1
#1=#1+#7
G1X#1
G3I-#1
IF[#4LE#3]GOTO20
#4=#4-#5
G1Z#4
END1
N20 G90 G00 Z200
M30
Alıntı yapılan: pako34 - Temmuz 21, 2008, 12:18:35 ÖÖ
Asigen kardeş eğer kızmazsan programında bir kaç değişiklik yaptım. sence böyle nasıl olur?
daha fazla örnek bekliyorum senden. böyle örnekler üzerinde konuşursak daha faydalı olacağını düşünüyorum
AÇILI DIŞ ÇAP İŞLEME
G90G0G54X0Y[[#2/2]+#1]S1500M3
G43Z5.H1
G1Z0 F500
#1=10 (BAŞLANGIÇ YARI ÇAPI)
#2=10 (TAKIM ÇAPI )
#3=20 (Z BOYU)
#4=1 (HER TURDA BÜYÜMESİNİ İSTEDİĞİMİZ DEĞER)
#5=1 (Z DALMA)
#6=0
N10 G3 Y[[#2/2]+#1]J-[[#2/2]+#1] Z-#6 F1500
#1=[#1+#4] (Y olarak yarı çapta her turda büyüme)
#6=[#6+#5] (z olarak her turda ineceği derinlik)
IF[#6EQ#3]GOTO10 (Z olarak toplam derinlik)
G0Z200.
M30
KARDES BUNDA BIR HATA VAR YANLIS YAY VERISI DIYE ALRM VERIYOR BI INCELERMISN.. HATAYI BULDUM FAKAT BIDE SEN BAK MAZAK...MATRIX
rastlantı z-#6 tek satırda yazıp dene bazı tezgahlar j ile z eksen hareketini aynı satırda kabul etmiyor bayadır görünmüyon katıl artık aramıza
selam askın butun ustunkarlı ordamı bızım volkanmı o atakoylu (serkan bılgın)
Alıntı yapılan: casus - Şubat 08, 2009, 02:04:36 ÖSKARDESIM ELINE SAGLIK GUZEL YAZMISSIN FAKAT SENDEN BIREY ISTEYECEGIM BUNLARIN ANLAMALRINIDA YAZARMISIN
KONİK DIŞ ÇAP İŞLEME
#1=#1+#7 BURDA YAZILI OLAN DEĞİŞKENLERİ #1=#1-#7 OLARAK DEĞİŞTİRİRSENİZ DİŞİ KONİK ÇAP İŞLERSİNİZ
#1=30
#2=40
#3=-1
#4=0
#5=0.2
#10=[[#2-#1]/2]
#11=1
#6=ATAN[#10]/[#11]
#7=[#5*TAN[#6]]
WHILE[#1LE#2]DO1
#1=#1+#7
G1X#1
G3I-#1
IF[#4LE#3]GOTO20
#4=#4-#5
G1Z#4
END1
N20 G90 G00 Z200
M30
Alıntı yapılan: Rastlanti - Şubat 26, 2009, 08:37:19 ÖS
Alıntı yapılan: pako34 - Temmuz 21, 2008, 12:18:35 ÖÖ
Asigen kardeş eğer kızmazsan programında bir kaç değişiklik yaptım. sence böyle nasıl olur?
daha fazla örnek bekliyorum senden. böyle örnekler üzerinde konuşursak daha faydalı olacağını düşünüyorum
AÇILI DIŞ ÇAP İŞLEME
G90G0G54X0Y[[#2/2]+#1]S1500M3
G43Z5.H1
G1Z0 F500
#1=10 (BAŞLANGIÇ YARI ÇAPI)
#2=10 (TAKIM ÇAPI )
#3=20 (Z BOYU)
#4=1 (HER TURDA BÜYÜMESİNİ İSTEDİĞİMİZ DEĞER)
#5=1 (Z DALMA)
#6=0
N10 G3 Y[[#2/2]+#1]J-[[#2/2]+#1] Z-#6 F1500
#1=[#1+#4] (Y olarak yarı çapta her turda büyüme)
#6=[#6+#5] (z olarak her turda ineceği derinlik)
IF[#6EQ#3]GOTO10 (Z olarak toplam derinlik)
G0Z200.
M30
KARDES BUNDA BIR HATA VAR YANLIS YAY VERISI DIYE ALRM VERIYOR BI INCELERMISN.. HATAYI BULDUM FAKAT BIDE SEN BAK MAZAK...MATRIX
AÇILI DIŞ ÇAP İŞLEME
#1=10
#2=10
#3=20
#4=1
#5=1
#6=0
G90G0G54X0Y[[#2/2]+#1]S1500M3
G43Z5.H1
G1Z0 F500
N10
G1 Y[[#2/2]+#1]G3 Y[[#2/2]+#1]J-[[#2/2]+#1] Z-#6 F1500
#1=[#1+#4]
#6=[#6+#5]
IF[#6
LE#3]GOTO10
G0Z200.
M30
bu şekilde hata vermemesi lazım
ELİNİZE EMEĞİNİZE SAĞLIK...
arkadaşlar ellerinize yureginize saglık yalnız fanuk 18imb ye yukledim ama macro hatası veriyo neden ola bilir yanıtlarsanız sevinirim şimdiden teşekurler