BU PROGRAM DOLU YÜZEYE KONİK KARE CEP AÇIYOR BU İŞLEMİ *X* VE *Y* DE SİZİN YAZACAGINIZ DUVAR PASO ÖLÇÜSÜNDE AÇILARAK VE YAZACAGINIZ ORANDA Z DE GAGALAYARAK KABA BOŞALMAYI YAPIYOR.

KULLANILAN KÜRESEL TAKIMIN *R* SİNİ YAZDIGINIZDA PROGRAM TAKIMIN TELAFİSİNİ YAPABİLİYOR.
EN BÜYÜK KABİLİYETİDE BU TELAFİYİ YAPABİLMESİ ÇÜNKÜ ANCAK CADCAM DA BU TELAFİ
HESAPLANABİLİYORDU..




%
O1728(KARE KONIK MAKRO PRO)

(DEGISKENLER)
(*************)
#1=50 (BUYUK KENAR)
#2=20 (KUCUK KENAR)
#3=50 (DERINLIK)
#4=2 (KABA Z DARBESI)
#5=0.3 (HASSAS Z DARBESI)
#8=5 (KABA KURESEL R )
#9=2 (HASSAS KURESEL R )
#10=3 (KABA DUVAR PASO)
#11=0.5 (HASSAS ICIN STOK)
(*******************)
(******SABIT********)
#6=[[[[#1-#2]/2]/#3]*#:(]
#7=[[[[#1-#2]/2]/#3]*#:(]
#12=ASIN[[[#1-#2]/2]/#:(]
#13=:(-#12
#14=SIN[#13]*#:(


#1=[[#1/2]-#11]
#2=[[#2/2]-#11]

#28=#3
#29=#10
#30=#1
#31=#2
#32=#4
#33=#6
#4=0
#3=#3-#11
#1=#1-#14

N10(KABA)
M6T11
M03S2000
G55
G0B0
G43X0Y0Z100H11M08

N20
#10=0

N30
#1=#1-#:(
#4=#4+#:(
IF[#:(GE#3]THEN#4=#(

N40
#10=#10+#(
IF[#:(GE#1]GOTO:(

N50
G01Z-#4F500
X-#10
Y#10
X#10
Y-#10
GOTO4:(

N60
G01Z-#4F500
X-#1
Y#1
X#1
Y-#1
X-#1
Y0
X0

IF[#4EQ#3]GOTO:(
GOTO:(

N70
#1=#30+#11
#2=#31+#11
#3=#28
#4=#32
#6=#33
#10=#29

N80
G40G01X0Y0
G0Z200
M05
M09

N100(HASSAS)
DEVAMI VAR
M30
%

bu programda eksik var ve bu program başka bir siteden ismeterol isimli şahıstan alıntıdır belirtmeniz gerekmezmiydi

sana katılıyorum pako34 ayrıca bu program bu haliyle çalışmaz ismeterol kardeş en canalıcı yerlerine sembol koyarak iyi yapmış
emeğe saygı

ben ismeterol sizleri tanıdım arkadaşlar hassasiyetiniz için teşekkür ederim benim bu sitedeki kullanıcı adım dekan tekrar teşekkürler..

emeğine sağlık dekan55 ben zigyy cnc operatörüyüm iso kodlarıyla yazılımda iyim ama macro yazılımını bilmiyorum bu yazılımı öğrenmek istiyorum daha açık bilgi verebilirmisin macro üzerine hiç bilgim olmadığı için kodları çözemiyorum ilgilenirsen sevinirim tşk

bu prgram çalışmaz ve alıntıdır biliniz....