Lisp istekleri | Forumlar

Forum Menüsü

AutoCAD Genel

AutoCAD Eğitimi

3ds Max

Ziyaretçi: 740, Üye: 4
empati06, mttlp, nidadrms, viper1905

Detaylar »

Forumlar > AutoLISP > Lisp istekleri

Bu başlığı inceleyenler : 21 ziyaretçi, 0 üye : ---

İleti	Yazar
17.04.2013 14:04 72536	Travaci Editör 2392 ileti Teknik Ressam Konstantinopol
Kod: (defun c:pof( / plines ; selection set of polylines ext ; extrnal point dist ; distance to offset poly ; a polyline from plines plist ; the list of poly del ; polyline to delete int ; internal point i) (command "undo" "begin") (princ "select polylines") (setq plines (ssget) i 0 ext (getvar "limmax") dist (getdist "distance")) (repeat (sslength plines) (setq poly (ssname plines i)) (setq plist (entget poly)) (command "offset" dist poly ext "") (setq del (entlast) int (polar (cdr (assoc 10 (entget del))) (angle (cdr (assoc 10 (entget del))) (cdr (assoc 10 plist))) (* 2 (distance (cdr (assoc 10 plist)) (cdr (assoc 10 (entget del))))))) (command "offset" dist poly int "") (entdel del) (setq i (1+ i))) (command "undo" "end") (if (= "Y" (strcase (getstring "\ndelete initial polylines? (Y/N)"))) (command "erase" plines "")) ) Alıntıdır

17.04.2013 14:27 72545	umittaser Kıdemli Girişimci 42 ileti inşaat teknikeri ankara
Çok sağol hocam. ellerin dert görmesin :)

18.04.2013 11:19 72589	asencer Kıdemli Girişimci 25 ileti makina istanbul
arkadaşlar merhaba; Linkleri görebilmek için ÜYE olmalısınız. linkinde yer alan ölçülendirmeyi yapmak istiyorum. Mehmet Şahin hocamızın plgn ve hakan lisplerini kullansam da daha ziyade kesime yönelik bir lispe ihtiyacım var. bu lispin yapılması mümkün mü? saygılarımla.

13.05.2013 05:26 73106	2032223351 Kıdemli Girişimci 44 ileti harita Muhendisi cimkent
Bir lisp gerekli bana yarimci olabilirseniz sevinirim. Lineler ile cizilmis dortgenin kenarlarini secerek bir izgara teli gibi istedigim araliklara sagdan sola ve yukardan assagiya lineler atacak ve sonra her linenin kesisim noktasina ayri bir layer tabakasi acip oralara kotlu nokta atacak bir lisp lazim. Yardimci olursaniz sevinirim.

13.05.2013 05:29 73107	2032223351 Kıdemli Girişimci 44 ileti harita Muhendisi cimkent
travaci hocam bu toplu ofsetin yonunu biz belirtemezmitiz assagi yada yukari gibi ?

13.05.2013 07:36 73108	Travaci Editör 2392 ileti Teknik Ressam Konstantinopol
Lisp alıntıydı ben yapmadım fikrim yok.

14.05.2013 08:08 73148	2032223351 Kıdemli Girişimci 44 ileti harita Muhendisi cimkent
degerli ustatlar ben aslinda sizde suana kadar aciklamalariyla hazirlayip sundugunuz lisp lerin hepsini rar dosyasi halinde paylassaniz cok iyi olacak artik okadar lisp varki burda calisan calismayan diye ayirmak biraz zaman aliyor ve hazirlanan butun lispler gerceklten bugun olmasada yarin isimize yapriyacagini biliyorum. sizin bilgilerinizden ve yaptiginiz calismalardan faydalanmak cok guzel yine cok tesekkur ederim emekleriniz ve herkese yardimci oldugunuz icin ... IYI GUNLER

14.05.2013 09:49 73149	ehya Yönetici 3554 ileti Teknik Ressam Ankara
2032223351 o kadar hazırlı olmak istiyorsunuz yani. buradaki kodları alıp metin belgesine yapıştırmak o kadar zor geliyor dimi?

14.05.2013 14:20 73152	kerem1453 Kıdemli Uzman 111 ileti teknik ressam ankara
lispleri ayırmak bi ayrı sayfa haline getirmek zordur ehya haklı bu konuda biraz emek verip ugraşmak gerekiyo 250 ye yakın lisp mevcut elimde bir kısmı eskiden işim geregi kullandıgım lispler bir kısmı bu siteden degerli insanların emek verip paylaştıgı lispler bunları bir dosyada toplayıp bir excel dosyasına hangi lispin ne için kullanıldıgı şeklinde bir dosya hazırlarsanız lazım oldugu zamanlarda açıp bakmak daha praitk olur.

14.05.2013 15:01 73155	ehya Yönetici 3554 ileti Teknik Ressam Ankara
Burada lispleri liste halinde excel dökümü olarak hazırlamamız mümkün değil. Şuan nasıl mesaj yazıyorsak, lispleri de istek aşamasında o an ki durum itibariyle müsait isek yazıp gönderiyoruz. Kaliteli ve genel kullanıma açık lispleri mümkün mertebe download kısmına ekliyoruz. Bunun haricinde bir liste yada döküm yapılacak ise, bunu kullanıcılar kendine göre yapmalıdır.

14.05.2013 17:06 73156	2032223351 Kıdemli Girişimci 44 ileti harita Muhendisi cimkent
Oyle demedim arkadaslar winrar dosyasina toplayip burada dosya paylasiliyor ya o sekilde demistim.

14.05.2013 20:46 73159	kerem1453 Kıdemli Uzman 111 ileti teknik ressam ankara
ehya zaten senin için excel dosyası gibi hazırla diye bi ibare kullanmadım herkes kendi indirdigi lispleri ne işe yaradıgına dair kendi için liste hazırlayabilir demiştim yanlış anlaşılma var gibi...

16.05.2013 06:27 73180	2032223351 Kıdemli Girişimci 44 ileti harita Muhendisi cimkent
birden cok line lerin kesisim noktalarina nasil nokta attiririz ?

16.05.2013 06:44 73181	CAN123 Kıdemli Uzman 120 ileti Teknik Ressam ANKARA
Merhaba, Attribute içerisinde bir başlık (tag) altında olan textlerin with factor'ünü değiştirmek istiyorum. Bunun bir yöntemi varmıdır? ya da bunu yapacak bir lispe ihtiyacım var. teşekkurler

16.05.2013 06:54 73183	Travaci Editör 2392 ileti Teknik Ressam Konstantinopol
Aynı attribut blocktan birden fazla varsa block editore girip istediğiniz değişikliği uygulayın, daha sonra attsync komutununu girip select daha sonra attribute block unuzu seçip çıkan soruya yes diyin. Bunlar sadece attribut ise zaten hepsini seçip propertiesten değiştirebilirsiniz.

16.05.2013 08:08 73187	CAN123 Kıdemli Uzman 120 ileti Teknik Ressam ANKARA
Cevabınız için tesekkurler, ancak blockeditor e girince BLOCKEDITOR = 0 (read only) uyarısı geliyor.

16.05.2013 08:12 73189	waytooraider Kıdemli Uzman 162 ileti makine mühendisi istanbul
Merhabalar 900x500-2600 l/s Excelce Data valitadionla yukarıdaki yazıyı - den sonrası için iki hücreye ayırabiliyoruz. Autocad textlerinde -'den sonra ayrılacak yada -den sonra olan yazılar silecek hazırda bir isp yada komut varmı. Saygılarımla.

16.05.2013 08:46 73191	Travaci Editör 2392 ileti Teknik Ressam Konstantinopol
Kod: (defun c:cTt (/) (command "_undo" "_group") (setq B (ssget '((0 . "*Text"))) N (sslength B) L 0) (while (< L n) (setq eleman (entget (ssname B L)) mdp (cdr (assoc 1 eleman)) yazi (substr mdp 1 (vl-string-search "-" mdp)) eleman (subst (cons 1 yazi ) (assoc 1 eleman) eleman)) (entmod eleman) (setq L (+ L 1)) ) (command "_undo" "_e") (princ) )

16.05.2013 09:20 73192	waytooraider Kıdemli Uzman 162 ileti makine mühendisi istanbul
Çok Teşekkürler.

16.05.2013 12:17 73195	kerem1453 Kıdemli Uzman 111 ileti teknik ressam ankara
sayın taravacı bu lisp te - işaretinden sonrasını bölmesin istesek yazıyı parçalasa sadece ne gibi değişiklik yapmak gerekir.

Önceki Sayfa

[1] [2] [3] [4] [5] [6] [7] [8] [9] [10] [15] [20] [25] [30] [35] > 39 < [40] [45] [50] [55] [60] [65] [70] [75] [80] [85] [90] [95] [100]

Sonraki Sayfa