macro ile çok kenar anahtar ağzı açma 3 5 6 8 farketmez

[asigen]

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

[Ressam]

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

[ercan_3589]

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

[asigen]

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

[ercan_3589]

tşkler

[Ressam]

Çok teşekkürler.

Bu site sayesinde bizlerde kendimizi kısa sürede geliştirme şansı buluyoruz.

Emeğinize sağlık....

[reddi]

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.

[tolga28]

kardeş tamam macro hos ama bu zaten hazır macro onemlı olan kendın yapman

[ercan_3589]

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

[fatih_88]

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

[asigen]

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

[asigen]

madem alıntı diyorsun ıispatla bakalım ben de konuyu kaldırayım burdan

[taşkaya]

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

[casus]

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

[CK-53]

       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.