08.08.2008 12:28

40100    

sağ ol bu auto lisp hangi programda yazılıyor bide mantığı ne dir acaba paskal mantığı gibi geldi bana

08.08.2008 15:26

40116    

Soruda iki türlü soru var. Birincisi sld dosyasını dcl'de kullanmak, diğeri ise sld dosyalarını kütüphane haline çevirip menülerde kullanmak.
1ncisinde, MSLIDE ile slide görüntüsünü oluşturun. Bu resim her zamanki gibi autocad'in tanımlı yollarında olmalı.

Dcl dosyasına yazmanız gereken bölüm;




Burada örnek bi dcl den satırı kopyaladım. key adı slide görüntüsünün alt fon rengi, yüksekliği genişliği v.s.
istediğiniz gibi değiştirebilirsiniz.

Lisp bölümüne gelince;




Yukarıdaki kodları da kendinize göre revize edin. Burada değişecek 2 yer var. birincisi key adları, diğeri ise slide dosyasının yeri.
Lispinize de bu bölümü eklediğinizde slide olarak hazırladığınız görüntüler dcl dosyanızda görünecektir.

2nci ise,
Bu tür nesneleri hazırlarken, öncelikle slide görüntüsünü almak istediğiniz dosyaları tek tek açıp MSLIDE komutu ile slide görüntülerini alın. Daha sonra bu dosyaları bir klasör de toplayın. Daha sonra kolaylık olması açısından C:\Program Files\AutoCAD *** klasörünün altında bulunan slidelib.exe dosyasını da bu klasörün içine kopyalayın.

Şimdi, text tabanlı bir dosya oluşturacağız. Bu dosyada her bir satırda slide dosyalarının ismi olacak. İster elle hazırlayın ister dos komutu kullanın.
Ben dos komutu kullanmanızı tavsiye ediyorum. Tekrar msdos penceresine son kaldığınız yere (slide ların olduğu klasöre) dönün.
"dir *.sld /b > liste.txt" komutunu çalıştırın.

Bu işlem, klasör içinde tüm sld dosyalarının ismini liste.txt dosyasınım içine yazacaktır.

Tekrar msdos penceresine dönün.
"slidelib.exe tefris < liste.txt" komutunu çalıştırın. Daha sonra klasör içine bakın. tefris.slb isimli dosya var mı? Eğer varsa slide kütüphanenizi başarıyla oluşturdunuz demektir.

Bu SLB dosyasını ve bloklarınızı uygun ve yeri değişmeyecek bir yere taşıyın. Ardından menü dosyanızı açın.
Mevcut bir menü dosyanız yok ise, yeni bir menü dosyası oluşturmalısınız.
Bu aşamadan sonra slide kütüphanesinin menü içinde nasıl görüntüleneceğine dair işlemlerimiz var. Bunun için, kendi örnek slide kütüphanemden bir bölümü ekleyip tek tek tarif edeyim.

***MENUGROUP=Archme

***POP1
**Archme
ID_MnArchme [&Archme]
[--]
ID_ArchmeFerf [Ferforje]$I=Ferforje $I=*

Menü dosyası olmayanlar mavi bölüm dahil tamamını bir TXT dosyasına yapıştırıp dosyanın uzantısını MNU olarak değiştirmeleri gerekir. Menü dosyası olanlar kırmızı bölümü almaları yeterlidir.

Aşağıdaki bölüm ise slide kütüphanesindeki slide ların görüntülenmesi ile ilgili bölümdür. Üstteki menü bölümü tamamlandıktan sonra aşağıdaki bu bölüm eklenmelidir.

***image
**ferforje
[Ferforjeler]
[tefris(ferforje_01,Ferforje 01)]^c^c-INSERT;ferforje_01;
[tefris(ferforje_02,Ferforje 02)]^c^c-INSERT;ferforje_02;
[tefris(ferforje_03,Ferforje 03)]^c^c-INSERT;ferforje_03;
[tefris(ferforje_04,Ferforje 04)]^c^c-INSERT;ferforje_04;
[tefris(ferforje_05,Ferforje 05)]^c^c-INSERT;ferforje_05;
[tefris(ferforje_06,Ferforje 06)]^c^c-INSERT;ferforje_06;

Tefris ismi bu listenin oluşumundan sonra SLB uzantılı oluşturacağımız dosya adı.
(ferforje_01,Ferforje 01) bölümü, ilk ferforje_01 ismi oluşturulan slide (SLD) dosyasının adı, ikinci bölüm ise slide kütüphanesi açıldığında menünün solunda görüntülenen isim
^c^c-INSERT;ferforje_02; bölümü ise, komut iptalinin yapılıp insert komutu aracılığı ile ferforje_02 adlı dosyayı çağırır.
Unutulmaması gereken, SLB dosyası ile insert edilecek blok dosyalarının yeri Autocad'in tanımlı yollarında kayıtlı olmalıdır.
Tools --> Options --> Files --> Support File Search Path

Txt dosyasına doğru bir şekilde bu girdileri sağladıktan sonra;

Bu satırı tarif etmek gerekirse, Menü tanım ismini ID_ArchmeFerf olarak tanıttım. Daha sonra [Ferforje] bölümü ile menüde görünen ismi belirttim. $I=Ferforje $I=* ismi ile slide kütüphanesinde Ferforje bölümünün okunmasını sağladım.
Bu işlemi yaptıktan sonra autocad'i açıp menü dosyasınızı güncellediğinizde aşağıdaki gibi bir görüntü elde edeceksiniz.




Bayağı uzun bi ders oldu. İnşallah işinize yarar.

ehya (09.08.2008 18:52 GMT)

09.08.2008 19:26

40159    

daha detaylı bilgi versen...
while döngüsü içinde harfe nasıl basmayı düşünüyorsun?

10.08.2008 11:40

40161    

teşekkürler...birde lip kitabını elde edersek fena olmayacak.sitede flash player olarak var ama.tasımak istiyorum

insan olmak için zengin olmak gerekmez.yeterki yüreğin olsun ;)
Bu alemin kralı gurbetci178 (Sİnan)

15.08.2008 08:04

40301    

wolf bilip bilmemekle alakası yok.
senin dediğini anlamadım.. daha detaylı söylermisin?

15.08.2008 08:51

40306    

wolf ya sende ya da autocad'inde sorun var :P

iki seçenekte de denedim. ve iki seçenekte de seçimi yaptı..
sanırım group adını yanlış giriyorsun.

15.08.2008 11:44

40312    

anladım senin ne yapmak istediğini.
müsait bi zaman kodlamasına bakarım.

16.08.2008 09:18

40352    

Oldu mu acaba? :)

(defun c:lsf ()
(setq lf (getstring "\n Las Files ismini girin:"))
(command "-layer" "a" "s" lf "" "ex" lf "" "" "")
(princ)
)

16.08.2008 09:58

40357    

haklısın wolf....
senin cevap vermen gereken yere yazmışım....:D

ama nerden bileyim.... senin bilemediğini düşünmüştüm:D

18.08.2008 14:17

40393    

Lisp de handent komutu ne işe yarar?