%
O975(ACI HESAPLAMA PRG)
#1=50.(BOY)
#2=5(FARK)
#3=10.(ACI)
#4=3(BOY=1 FARK=2 ACI=3)
(SONUC 50 NOLU OFFSETTE)
(*****PARAMETRE SONU*****)
IF[#4EQ1]GOTO1
IF[#4EQ2]GOTO2
IF[#4EQ3]GOTO3
N1#500=[#2/[TAN[#3]]]
GOTO10
N2#500=TAN[#3]*#1
GOTO10
N3#500=ATAN[#2]/[#1]
N10
#3000=1(SONUC MACRO 500 DE)
M30
%
BU PROGRAMDA İSE 3 GEREKLİ ÖLÇÜDEN VERİLMEYENİN ÖLÇÜSÜNÜ BULABİLİRİZ...AÇI BOY FARK SEÇENEKLERİNDEN BİZE LAZIM OLANINI #4 ÜN KARŞISINA YAZARAK SONUCA ULAŞABİLİRİZ
SONUÇLAR MACRO 500 DEDİR
MACRO 500 Ü AÇMAK İÇİN OFFSET SETTİNG TUŞUNA BASIN SONRA EKRAN SAĞ OK TUŞUNA BASIN SONRA MACRO SEÇENEGİNE BASIN VE 500 NUMARAYI BULUN. ORADA YAZAN RAKAM SONUÇTUR.....
2 çapı ve derinliği bilinen yani 3 bilinen için bu program kullanılmaz
boy bilirsin bir çap bilirsin açı lazım olur o zaman onu sorarsın veya
açı bilirsin çap bilirsin farkı sorarsın yada
farkı bilirsin açıyı bilirsin boyu sorgularsın
bu programda elinizde olan verileri yazınız
#4 satırına ise elinizde olmayanı sorgulayın 1-2-3 ten herhangi birini yazarak
mesela
#4=3 yazdığınızı var sayarsak 3 no ya yazdıklarını tezgah okumaz. 1 ve 2 noyu hesaplayıp 500 nolu ofset sayfasına sizin sonucu görmeniz için atar.....
DAHA FAZLA PROGRAM İÇİN MÜRACAAT
http://fanucmacro.tr.gg/ (http://fanucmacro.tr.gg/)
RESİM ÇIKMAMIŞ BİR DAHA GÖNDERİYORUM
güzel bir çalışma. eline sağlık.
teşekkürler emeğine sağlık
eline saglık macro çok güzel programlama metodu iyi ögrenmek gerekir içinde boguluyon çünkü bilmeyince benim biraz zayıf ama genede bazı terimlerini kullanıyorum...