cizimokulu.com - 13.06.2006 21:19
Bu lispi çalıştırmak için make_pl enter objeleri seç bitti hepsi polyline oldu bile...
Buraya tıklayarak açılan pencereden AutoLISP kodlarını Ctrl + C ile kopyalayabilirsiniz
; ///
; /// Birleşebilen tüm çizgileri POLYLINE haline getirir
; ///
; /////////////////////////////////////////////////////////////////
(defun C:makepl( / )
(princ "nElemanlari seciniz: ")
(setq sset (ssget))
; (setq sset (ssget "X" (list (cons 0 "LINE"))))
(setq adet (sslength sset))
(setq syc 0)
(repeat adet
(setq eleman (ssname sset syc))
(setq elmBlg (entget eleman))
(if (= (cdr(assoc 0 elmBlg)) "LINE")
(progn
(command "_PEDIT" eleman "Y" "JOIN" "ALL" "" "X")
)
)
(setq syc (1+ syc))
)
(princ)
)
(PRINC " --> 'cizimokulu.com' Çizim yardımları yüklendi !")
Komut makepl Komutu çalıştır objeleri seç işte hepsi polyline oldu.
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: cizimokulu.com
İçerik: LSP Formatında AutoLISP Kodu
Tag: cizgileri, polyline, yapan, lisp, polyline yapmak
mehoza 29.09.2023 07:49 #16144
seçilen line'ın layerini polyline yapan lisp var mı acaba, bu lispi o şekilde düzenleyebilir miyiz
421691-ply.lsp
cmloz 28.11.2016 19:31 #15730
polyline cizerkken her koseye kotlu nasıl cızebılırım? dosemede kot farkı var ve ben her kot farkının oldugu yere kot girmel istiyorum
FatihOZDAMAR 09.06.2016 08:24 #15689
selamlar arkadaşlar ;
paylaştığım ekran resminde göreceğiniz uzere daha hatları tek bir çizgi ile çizilmiş ve o hattan kac adet kablo gideceği yazılmış
şimdi sorum şu;
mevcut line'ı o hattın uzunluğunda uzerine yazılan kadar çoğaltıp aynı zamanda çoğalttığım çizgilerin görunmemesi için kullanabileceğim bir özellik varmı ?
metraj cıkartmam lazım acilen böyle birseye ihtiyacım var
şimdiden tesekkur ederim
tabusuz 05.06.2015 11:50 #15562
arkadaslar elınıze saglık..kucuk bır soru bunu yukledım claıstı fakat he acılısta yenıden yuklemek zorunda laıyorum..dıger lısplerımı bır kere yuledıkm ve sureklı kulanıyorum..bunuda aynı yapmak ıstıyorum ama beceremedım..nasıl yapacaz acaba?
jahma666 26.02.2012 13:19 #14527
Bende autocad'i kilitlemeye başladı bu lisp yardım lütfen, elimde çok alıştı kullanmaya...