bu macro ile çok kenar anahtar ağzı açmak çok basit vereceğim alt programı herhangi bi programa yazın ondan sonra istediğiniz ölçülerde çok kenar anahtar ağzı açmak mümkün 3 5 6 8 farketmez ölçüyü girin takım çapı kaç kenar istiyorsanız yazın derinlik yazınbas gitsin
işte alt program
O5052
Z#18
#2 =360
#2 =#2 /#11
#7 =#7 /2
#4 =#4 /2
#100 =#18
#4 =#7+#4
N10
#101 =#4
#102 =#1
#103 =#2
#104 =#11
#3 =#4003
IF[#3 EQ90]GOTO1
#24 =#5001+#24
#25 =#5002+#25
N1 WHILE[#104 GT-2]DO1
#5 =#24+#101*#21*COS[#102]
#6 =#25+#101*#21*SIN[#102]
G90 G1 X#5 Y#6 Z#100 F#9
#102 =#102+#103
#104 =#104-1
END1
G#3
#100 =#100+#23
IF[#100 GE#26]GOTO10
G0 Z#8
M99
BUDA PROGRAMA YAZILIŞI
G90 G0 G54 X0 Y0 S1500 M3
G43Z5 H1
G65 P5052 Z-10 R1 U1.1416 F1200 I32 D25 H6 A0 E20 W-1
G0 Z200
M30
BU KADAR ŞİMDİ HARFLERİN ANLAMLARI
Z ANAHTAR AĞZININ DERİNLİĞİ
R GÜVENLİ YAKLAŞMA VE İLK TUR HAREKETİ
F İLERLEME
I ANAHTAR AĞZININ İSTENEN TAM ÖLÇÜSÜ
D ÇAKININ TAM ÇAPI
H ANAHTAR AĞZI SAYISI
A ANAHTAR AĞZININ DÖNÜKLÜĞÜNÜ BURDAN AYARLIYABİLİRSİNİZ DERECE OLARAK A45 DERSENİZ ANAHTAR AĞZINI 45 DERECE DÖNÜK İŞLER
E İŞLEM BİTTİKTEN SONRAKİ ÇIKIŞ MESFESİ
W TALAŞI KAÇ KAÇ ALACAĞI
U BURAYA YAZDIĞINIZ DEĞER ÖNEMLİ BUNU HESAPLAMANIZ GEREKLİ BEN KOLAYLIK OLSUN DİYE ALTI KÖŞEYİ HESAPLADIM VE 1.1416 ÇIKTI
DİYELİMKİ ALTI DEĞİLDE 8 KÖŞELİ ANAHTAR AĞZI AÇACAKSINIZ ÖLÇÜSÜ 20 OLACAK 20 DÜZ KENARLARIN ÖLÇÜSÜ BİDE KÖŞELERİN ÖLÇÜSÜ VAR KÖŞELERİN ÖLÇÜSÜNÜ KENARLARIN ÖLÇÜSÜNE BÖLÜN ÇIKAN SONUCU U YA YAZIN BU KADAR bu dediğim ölçüyü autocad kulanan arkadaşlar autocadten rahatlıkla çıkarabilir
arkadaşlar tamamen kendi türettiğim bi macro gece vardiyasında sabaha kadar uğraştım inşaallah işinizi görür alıntı değil kendi emeğim bu site sayesinde macroyuda çözüyorum bu siteyi kurandan sitede emeği geçen herkesten allah bin razı olsun bu site olmasydı yerimde sayacaktım sağolsunlar
Gerçekten güzel görünüyo.
Bende bu günlerde bunun için uğraşıyordum.
Ama henüz excell de benim hesaplarım. Makroya geçmemiştim.
Ama 6 köşenin kenarlar oranı 1.1547 diğer ölçüyü nasıl hesapladın anlayamadım...
Akşama uğraşıcam....
Gerçekten çok sağol..
Dediğin gibi bu site sayesinde bende çok şey öğrendim ve hala öğrenmeye devam ediyorum...
Üstadlara teşekkürler...
Alıntı yapılan: asigen - Ekim 10, 2008, 06:58:41 ÖÖ
bu macro ile çok kenar anahtar ağzı açmak çok basit vereceğim alt programı herhangi bi programa yazın ondan sonra istediğiniz ölçülerde çok kenar anahtar ağzı açmak mümkün 3 5 6 8 farketmez ölçüyü girin takım çapı kaç kenar istiyorsanız yazın derinlik yazınbas gitsin
işte alt program
O5052
Z#18
#2 =360
#2 =#2 /#11
#7 =#7 /2
#4 =#4 /2
#100 =#18
#4 =#7+#4
N10
#101 =#4
#102 =#1
#103 =#2
#104 =#11
#3 =#4003
IF[#3 EQ90]GOTO1
#24 =#5001+#24
#25 =#5002+#25
N1 WHILE[#104 GT-2]DO1
#5 =#24+#101*#21*COS[#102]
#6 =#25+#101*#21*SIN[#102]
G90 G1 X#5 Y#6 Z#100 F#9
#102 =#102+#103
#104 =#104-1
END1
G#3
#100 =#100+#23
IF[#100 GE#26]GOTO10
G0 Z#8 BURADA Z#18 OLMASI GEREKMİYORMU? R çıkış noktası
M99
BUDA PROGRAMA YAZILIŞI
G90 G0 G54 X0 Y0 S1500 M3
G43Z5 H1
G65 P5052 Z-10 R1 U1.1416 F1200 I32 D25 H6 A0 E20 W-1
G0 Z200
M30
EMEĞİNE SAĞLIK
hayır E güvenli yaklaşma olarak yazılı ÇIKIŞTA E ÇIKIŞ OLARAK AYARLADIM E NİN KARŞILIĞIDA #8 DOĞRUSU YANLIŞ DEĞİL ZAMANIM YOKTU AÇIKLAMASINI YAZACAĞIM
tşkler
Çok teşekkürler.
Bu site sayesinde bizlerde kendimizi kısa sürede geliştirme şansı buluyoruz.
Emeğinize sağlık....
teşekkürler asigen tezgahta denedim programı çalışıyor çok süper bu macrolar yavaş yavaş sizlerin sayesinde başlamış oldum 3 yıldır macro öğrenmek istiyordum kısmet bu sene oldu .bende izmirde oturuyorum siz sanırım üstünkarlıda çalışıyorsunuz sizin firmaya başvurmuştum yol sorunu olduhu için anlaşamadık.
kardeş tamam macro hos ama bu zaten hazır macro onemlı olan kendın yapman
tolga28 nerden biliyosun hazır olduğunu herşeye alıntı diyosun medyummusun kardeşim ya.:@
bence buradaki amaç hazır veya kendi yaptığımız değil önemli olan paylaşmak
yok alıntı yok kopya çekmişsin böle şeymi olur ya
o zaman fanuc dökümanlarda kopya yazdığımız örnek programlarda kopya kitaptan alıntı diyelim
böle şeyler düşünmeyin önemli olan paylaşmaak
macro o kadar çok özenilecek program yapısı yok sadece özellik isteyen bir yapı..
SEN GÖZLÜK TAK BENCE....
ADAM ORAYA KOSKOCA KENDİ YAPTIĞIM PROGRAM DEMİŞ...
AŞKIN ABİYE SAYGILAR....
ASİGEN ABİM ELİNE SAĞLIK
TOLGA_28
MADEM ALINTI ISPATLAYABİLİRMİSİN BUNU??
BAŞKALARIN YAPTIĞI PROGRAMI ÇEKEMİYOSUN GALİBA
CAHİLLİĞİNE VERİYORUM BAŞKA BİŞEY DEĞİL
alıntı demişin kardeşim ama emeğe haksızlık ediyorsun sabaha kadar uğraştım macro için sen gelmişin alıntı alıntı falan yok macroyu o hale getiresiye kadar elli kere düzeltim sonunda bu hale geldi ne diyim allah ıslah etsin seni
madem alıntı diyorsun ıispatla bakalım ben de konuyu kaldırayım burdan
asigen kardesım senı bılen bılıyor
kafanı takma
meyve veren ağac taslanır..
paylasımlarının devamını dılerım
adama ne demeye kızıyosunuz...orjinal fanuc kitabındaki açılı delik delme macro programını almış G81 komutunu G01 yapmış bu alıntı değilde nedir.ama bunu akıl edip yapmış olmasıda güzel...
Asigen kardeşimin eline sağlık.
Bu arkadaşın iddaasıda hiç hoş değil. Burada arkadaşlar bir emek veriyor. Bu emeğinide burada herkezle paylaşıyor. Burada yazılan macrolar yüzlerce kez yazılmış ve internette bir yerlerde paylaşılmış olabilir. Hiç akla gelmeyecek şeyler değil. Herkez heryeri, herşeyi araştırıp bulamaz. İnternet kocaa derya.
Ben buraya daha yeni üyeyim ve macro yazmaya yeni başladım. Gece gündüz makro ile uğraşıyorum. Birkaç macro yazdım. Forumlardaki bu tarz diyolagları görünce, paylaşırken bin defa düşünüyorum. Çalıntı, çok basit, gereksiz vs..gibi insanın şevkini kıran sözler oluyor.
Alıntı yapılan: asigen - Ekim 10, 2008, 06:58:41 ÖÖ
O5052
Z#18
#2 =360
#2 =#2 /#11
#7 =#7 /2
#4 =#4 /2
#100 =#18
#4 =#7+#4
N10
#101 =#4
#102 =#1
#103 =#2
#104 =#11
#3 =#4003
IF[#3 EQ90]GOTO1
#24 =#5001+#24
#25 =#5002+#25
N1 WHILE[#104 GT-2]DO1
#5 =#24+#101*#21*COS[#102]
#6 =#25+#101*#21*SIN[#102]
G90 G1 X#5 Y#6 Z#100 F#9
#102 =#102+#103
#104 =#104-1
END1
G#3
#100 =#100+#23
IF[#100 GE#26]GOTO10
G0 Z#8
M99
Paylaşım için teşekkür ederim kardeş Ben bu işlerde yeniyim acaba bu üstde yazdıklarımızıda yazmamız gerekiyormu tezgaha bir yerlerine yoksa direk programı yazınca oluyormu.
Tekrardan teşekkür ediyorum.
Asigen usta eline emeğine sağlık frezeci arkadaşlarımın çok işine yaradı
Bir ricamız da var aynı programın delik içinede altı köşe açması mümkünmü yada böyle bir program yapabilirmisiniz bize
SİTEDEKİ TÜM USTALARIMDAN BEKLİYORUM...