dik işlemde açılı dış cap işleme macro ile

Başlatan asigen, Temmuz 20, 2008, 12:37:44 ÖS

« önceki - sonraki »

0 Üyeler ve 1 Ziyaretçi konuyu incelemekte.

VICTOR

tebrıkler.

ama insan çalıştığı tezgahın ismini doğru bılmelı bence..
oku
not al
öğren
uygula
anla

akin

EMEĞE SAYGI ARKADAŞIMIZA PAYLAŞIMI İÇİN TEŞEKKÜRLER !!!!!!!!

asigen


vadaro12

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

casus

#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

casus

GÖNDERDİĞİM MACROYU AÇILI ÇAP İŞLEMEK İÇİN KULLANIN. MACRO KULLANACAKSANIZ BIRAKIN HESAPLAMAYI TEZGAH YAPSIN

casus

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
 

 


Rastlanti

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
Ben türk'üm iliklerime kadar ATATÜRK'üm.....

asigen

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

ATAKÖYLÜ

selam askın butun ustunkarlı ordamı bızım volkanmı o atakoylu (serkan bılgın)

Rastlanti

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
 

 


Ben türk'üm iliklerime kadar ATATÜRK'üm.....

crisis

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[#6LE#3]GOTO10
G0Z200.
M30

bu şekilde hata vermemesi lazım

ercan_3589

''When you are in trouble, do not ever say, Allah! I have a big problem, instead say.. Hey Problem, I have a big Allah!''

ziro302008

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