Blok'a göre secme | Forumlar

Forumdan

99 kategoride 17 binden fazla konu başlatıldı bu konulara yaklaşık 90 bin cevap verildi tüm bunlar yaklaşık 109 milyon kez görüntülendi

Forum Menüsü

AutoCAD Genel

AutoCAD Eğitimi

3ds Max

Ziyaretçi: 1119, Üye: 1
admin

Detaylar »

Forumlar > AutoLISP > Blok'a göre secme

İnceleyenler : 1 ziyaretçi, 0 üye : ---

İleti	Yazar
19.06.2008 09:24 37910	meteyus Yeni üye 46 ileti Makine Mühendisi istanbul
arkadaslar quick select in yaptıgı normalde uzun oluyor benim cizimde secmis oldugum bir blok u otomatık olarak secmıs oldugum alanda ve ıstegıme gore tum cızımde secili hae getiren lisp ihtiyacım var. tesekkur ederim.

19.06.2008 14:21 37953	ehya Yönetici 3589 ileti Teknik Ressam Ankara
Komut ismi BSEC Kod: (defun c:bsec () (setvar "modemacro" "Archme Desing by -->Ehya<--") (setvar "errno" 0) (setq nnil nil) (while (= nnil nil) (setq bsec_ent (entsel "\nReferans bloğu seçin:")) (if (= bsec_ent nil) (progn (if (= (getvar "errno") 7) (progn (setvar "errno" 0) (setq nnil nil))) (if (= (getvar "errno") 52) (progn (setvar "errno" 0) (setq nnil t)))) (progn (setq bs_blokismi (cdr (assoc 2 (entget (car bsec_ent))))) (setq bs_sec_sec (ssget (list (cons 2 bs_blokismi)))) (if (= bs_sec_sec nil) (progn ) (progn (sssetfirst nil bs_sec_sec)))))(setq nnil t))(princ))

19.06.2008 16:10 37958	gurbetci178 Yeni üye 277 ileti
teşekkürler mehmet emeğine sağlık

20.06.2008 06:36 37965	meteyus Yeni üye 46 ileti Makine Mühendisi istanbul
teşekkürler ehya eline sağlık

20.06.2008 06:39 37966	SENDUR Üstad 380 ileti Mak. Res. Konst. Öğrt. & Makina Müh. Ankara
ewet harbiden güzel olmuş

21.06.2008 08:19 38000	nyquist Kıdemli Girişimci 33 ileti mühendis istanbul
ehya bu lispin birde yazı için çizgi için olanı felan varmı? quick properties gibi nesenelerin özelliklerinden yakalayacak bir şey lazım bana Fakir olmak, şerefsiz olmaktan daha küçük bir meseledir. Kızılderili Atasözü

21.06.2008 08:23 38001	ehya Yönetici 3589 ileti Teknik Ressam Ankara
Aşağıdaki komut referans seçilen nesnenin türü ne ise ona göre seçim yapar. Komut ismi SD Kod: (defun c:sd () (setq sd_ent (entsel "\nNesneyi seç:")) (if (= sd_ent nil) (progn ) (progn (redraw (car sd_ent) 3) (setq sd_kat (cdr (assoc 0 (entget (car sd_ent))))) (setq sd_sec (ssget (list (cons 0 sd_kat)))) (if (= sd_sec nil) (progn ) (progn (sssetfirst nil sd_sec) ) ) ) ) (princ) )

26.10.2009 08:03 52800	ademm Kıdemli Girişimci 18 ileti Teknik Ressam istanbul
ben bu lipsleri yukleyemedım yardımcı olurmusunuz lps uzantılı olarak dosya turunu kaydedemıyrm @D€w

01.07.2011 07:50 64879	neden09 Uzman 56 ileti elektrik teknikeri aydın
Süpersin eyha !!!! banada bu lispler gerekliydi ama nasıl anlatıpta isteyeceğimi bilemedim. bana çok kolaylık oldu. emeklerin ve paylaşımların için çok teşekkür ederim.

20.01.2015 08:53 80199	elk21 Gold üye 27 ileti elektrik teknikeri diyarbakır
ARKADAŞLAR BU LİSP NE İŞE YARIYOR BANA ANLATABİLİRMİSİNİZ FORUMDA VE LİSPLERDE ÇOK YENİYİM TEŞEKKÜRLERİM SUNAR SAYGIYLA HEPİNİZİ SELAMLARIM BİLGE ARKADAŞLAR...

20.01.2015 09:06 80200	alumina Editör 771 ileti Insaat Muhendisi Istanbul
Secilen nesnenin adini referans alarak nesneleri secer. Ornegin sectiginiz referans nesne line ise secim yaptiginizda hic bir ozelligine bakılmaksızın line nesnelerini secer. Quick select komutunun kisaltilmis hali gibi dusunebilirsin.

> 1 <