












































































































































































































































AutoCAD Genel
AutoCAD EÄŸitimi
Özel Yazılımlar
- aLd Fonksiyonu
- TCad Metraj
- FacadeCAD
- Cephe Kot
- HQ Library
- FreeMUST
- ALS/Pasdoc.A
- Excele Tablo Aktaran Lisp
- Nokta Koordinat Tablosu
- Plana İç Ölçü Verme
- Toplam Alanı Yazan Lisp
- Alan ve Çevre Yazan Lisp
- Koordinat, Alan ve Çevre Tablo Halinde Yazma
- AutoCAD'de Nokta Dökümü
- Hava Kanalı Metraj Fonksiyonu
- Boru Metrajı Fonksiyonu
- OptiCAD
- Özel Çizgi Tipi Oluşturmak
- AutoCAD te Koni Açılımı Nasıl Yapılır?
- PolyLine & Point Objelerinden Aplikasyon Çizelgesi
- Z değerini sıfırlama
- AutoCAD te Polyline üzerine uzunluk yazdırma
- Sıralı numaralandırma
- Yazı içindeki sayıları toplama
- Karmaşık Path ile Loft Uygulaması
- Çoklu Fillet Fonksiyonu
- Ölçekli Türk Bayrağı çizen lisp
Duvar-Lento-Kapı-Pencere Metraj Programı
Seçilen nesnenin layer ını kapatan lisp-1
admin - 15.09.2005 08:59
Seçtiğiniz nesnenin ait olduğu layer ı kapatır.
Buraya tıklayarak açılan pencereden AutoLISP kodlarını Ctrl + C ile kopyalayabilirsiniz
Bu kodları nasıl kullanacağınızı bilmiyorsanız aşağıdaki linkten;
AutoLISP > Konu Anlatımları > Lisp Dosyalarının oluşturulması ve Yüklenmesi
konusunu inceleyiniz.
Buraya tıklayarak açılan pencereden AutoLISP kodlarını Ctrl + C ile kopyalayabilirsiniz
Kod:
(defun c:lk ()
(setq a 1 test 1)
(setvar "cmdecho" 0)
(setq sset (ssget))
(setq rpt (sslength sset))
(setq z 0)
(repeat rpt
(setq ent (cdr (assoc 8 (entget (ssname sset z)))))
(command"layer" "f" ent "")
(setq z (+ z 1))
)
(setvar "cmdecho" 1)
(princ)
)
(PRINC "--> 'www.autocadokulu.com' Çizim yardımları yüklendi !")
(setq a 1 test 1)
(setvar "cmdecho" 0)
(setq sset (ssget))
(setq rpt (sslength sset))
(setq z 0)
(repeat rpt
(setq ent (cdr (assoc 8 (entget (ssname sset z)))))
(command"layer" "f" ent "")
(setq z (+ z 1))
)
(setvar "cmdecho" 1)
(princ)
)
(PRINC "--> 'www.autocadokulu.com' Çizim yardımları yüklendi !")
Bu kodları nasıl kullanacağınızı bilmiyorsanız aşağıdaki linkten;
AutoLISP > Konu Anlatımları > Lisp Dosyalarının oluşturulması ve Yüklenmesi
konusunu inceleyiniz.
Yazar: internet
İçerik:
Tag:
Yorumlar :

Bende bugün çalışırken böyle bi komut varmıdır diye düşündüm aklıma geldi lisplere bi göz atıyım dedim varmış:) emeğinize sağlık...