Lisp istekleri | Forumlar

Forum Menüsü

AutoCAD Genel

AutoCAD Eğitimi

3ds Max

Ziyaretçi: 508, Üye: 1
sulecik

Detaylar »

Forumlar > AutoLISP > Lisp istekleri

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

İleti	Yazar
31.10.2013 09:25 74955	umittaser Kıdemli Girişimci 42 ileti inşaat teknikeri ankara
Merhaba arkadaşlar, yapmak istediğim lisp %%138 (fi) yazısının önündeki yazıların silinmesi ,seçtiğim yazıların karakterinin wtürkçe stiline gelmesi ve ƒ karakterinin %%138 ile değişmesi. Buna benzer bir lisp varsa onuda değiştirebilirim veya elinizde böyle bir lisp var mı acaba? yardımlarınız için teşekkürler..

31.10.2013 10:03 74957	Travaci Editör 2392 ileti Teknik Ressam Konstantinopol
Alıntı umittaser : Bir dosya paylaşırsanız bakabilirim.

31.10.2013 11:03 74960	umittaser Kıdemli Girişimci 42 ileti inşaat teknikeri ankara
Alıntı Travaci : Bir dosya paylaşırsanız bakabilirim. Ekledim, saın Travaci. Ham olarak bir sta çıktısı bu isteklerim zaten yukarıda belliydi. Saygılarımla. 301018-kontrol.dwg

31.10.2013 11:08 74961	Travaci Editör 2392 ileti Teknik Ressam Konstantinopol
Adetlerimi sildirmek istiyorsunuz ? Birde içinde wtürkçe sitili olan dosyayla paylaşın.

31.10.2013 11:12 74962	umittaser Kıdemli Girişimci 42 ileti inşaat teknikeri ankara
Evet adetleri sildirmek istiyorum. SOnjuçta ilk gönderdiğim dosya 2. gönderdiğim gibi olsun istiyorum. 301018-new-block.dwg

31.10.2013 21:00 74969	Travaci Editör 2392 ileti Teknik Ressam Konstantinopol
umittaser İstediğim lisp ƒ yazısının önündeki yazıların silinmesi "adet kısmı" ve ƒ karakterinin %%138 ile değişmesi... Kod: (defun c:Adelf (/ got ent n nme) (setq got (ssget (list (cons 0 "text"))) n 0) (setvar "cmdecho" 0) (vl-load-com) (command "_.undo" "be") (if got (repeat (sslength got) (setq ent (entget (ssname got n)) nme (cdr (assoc 1 ent)) n (1+ n)) (if (vl-string-search "ƒ" nme) (entmod (subst (cons 1 (strcat "%%138" (substr nme (+ 2 (vl-string-position (ascii "ƒ") nme))))) (assoc 1 ent) ent))))) (command "_.undo" "end") (princ) ) (terpri) (write-line "Hazırlayan: Erkan Travaci") Travaci (15.08.2014 12:58 GMT)

01.11.2013 08:34 74986	umittaser Kıdemli Girişimci 42 ileti inşaat teknikeri ankara
Teşekkür ederim ellerinize sağlık :)

04.11.2013 08:38 75003	onder55 Girişimci 2 ileti harita müh istanbul
Arkadaşlar merhaba öncelikle böyle bir siteyi kuranlara ve emeği geçen herkese çok teşekkürler. şöyle bir lispe ihtiyacımız var bir polyline düşünün yay ve doğrulardan oluşan ve bu polyline üzerinde pointler var. Bu bu pointlerin yakalama noktasıyla aynı yerde olacak z değerleri yazılacak yazı açısı doğruya yada yaya dik olacak şekilde olacak ayrıca yazı yükseklği kullanıcı tarafından belirlenecek...Lisp yazan arkadaşlar çok mu saçma birşey istiyorum bilmiyorum ama eğer bu lispi yazarsanın siteyi takip eden haritacılar size minnettar kalacaktır.Şimdiden teşekkürler...

06.11.2013 12:11 75017	boratensa Girişimci 6 ileti İnşaat Mühendisi İstanbul
Cevap alamadığım için yineliyorum. Benim çok basit bir isteğim olacak. bir polyline ı ya da polyline grubunu seçtiğimde bu polylineları aralıkları ve boylarını kendim belirleyebileceğim kesiklik çizgilere çeviren ya da ayrı bir layerda polylinelar üzerine kesikli çizgiler atabileceğim bir lisp ricasında bulunabilir miyim? Örnek olarak: 10birim uzunluğunda bir polyline ın üzerine 1 er birim uzunluğunda ve belirli aralıklarda line lar atıp bu line nesnelerinin seçtiğim layerın altında olmasını sağlamak istiyorum. Yardım edebilecek arkadaşlarımıza şimdiden teşekkür ediyorum.

06.11.2013 12:52 75019	Travaci Editör 2392 ileti Teknik Ressam Konstantinopol
boratensa 1 birimlik çizgini block haline getirip measure komutunu kullanabilirsin.

07.11.2013 06:27 75023	ynskalkan Yeni üye 1 ileti harita teknikeri kocaeli
Merhabalar , acil olarak bir lisp lazim ve burdaki bir tanesini denedim sorunum suki Netcad 5.2 de autocad noktalari sirali attigim zaman netcadde de sirali nokta olarak tanimliyor problem yok fakat bunu lisp ile daha hizli hale getirmem gerek Civil 3d kullanan arkadaslar bilirler auto nokta olusturma var ve kiriklara atiyor bana bunun gibi bir lisp lazim saat yonunde nokta adi verecek sirasi ile nokta aticak ornegin denedigim lispte line ile cizilmis bir kare uzerinde ust ve alt line i tikladigim zaman tamam problem yok 4 tane noktam olmus oluyor ama saat yonunde degil bir duzen cercevesinde olursa en azindan sistematik bundan sonrasi icin devam edebilicem yardimlariniz icin simdiden cok tesekkur ederim.

07.11.2013 07:54 75026	alirizasahin Kıdemli Uzman 118 ileti Makina Mühendisi
Değerli arkadaşlar, sıhhi tesisatta kullanılan PVC boru çizimi yapan bir lispe ihtiyaç duyuyorum, yardımcı olacak var mı acaba?

07.11.2013 09:13 75029	miyatu Kıdemli Uzman 142 ileti Tekniker ISTANBUL
Alıntı alirizasahin : Değerli arkadaşlar, sıhhi tesisatta kullanılan PVC boru çizimi yapan bir lispe ihtiyaç duyuyorum, yardımcı olacak var mı acaba? pvc borunun neyini cizecek, nasil cizecek vs ... Kendini gelistirmeyen insanlar, bildiklerini paylasmaya korkarlar...

07.11.2013 09:52 75031	alirizasahin Kıdemli Uzman 118 ileti Makina Mühendisi
PVC borulara belirli yerlerde fittings ekleyen (aşağıda verdiğim linkteki parçalar) ve bu fittinglere uygun boru çizimi yapan lispi kasdetmiştir. 22132-pvc-fittings.dwg

07.11.2013 12:29 75032	boratensa Girişimci 6 ileti İnşaat Mühendisi İstanbul
Alıntı Travaci : boratensa 1 birimlik çizgini block haline getirip measure komutunu kullanabilirsin. dediğiniz durum isteğime tam olarak cevap vermiyor. Measure ile sadece 1 obje seçilebiliyor. ve yapacağım işlem çizgi üzerine el ile çizmekten daha az zahmetli değil. Bir de align ı tam olarak yapamıyor. Benim istediğim toplu olarak seçtiğim çizgilerin üzerine baş ve sonuna 1er tane olmak üzere aralık değerini verebileceğim küçük çizgiler atmak. Ya da var olan çizgileri hidden line tarzı kesikli çizgiye çevirebilmek. Çizim içerisinde onlarca adet farklı boyda ve farklı pozisyonda olan çizgileri bahsettiğiniz yöntem ile bölmem imkansız. yine de teşekkür ederim ilgilendiğiniz için.

08.11.2013 09:01 75042	miyatu Kıdemli Uzman 142 ileti Tekniker ISTANBUL
Alıntı alirizasahin : PVC borulara belirli yerlerde fittings ekleyen (aşağıda verdiğim linkteki parçalar) ve bu fittinglere uygun boru çizimi yapan lispi kasdetmiştir. 22132-pvc-fittings.dwg Autocad mep kullanmanizi tavsiye ediyorum. Istediginiz lispi yazmak tabiki mumkun ama cok zahmetli bir is. Kendini gelistirmeyen insanlar, bildiklerini paylasmaya korkarlar...

15.11.2013 08:14 75102	boratensa Girişimci 6 ileti İnşaat Mühendisi İstanbul
Tamam galiba biraz zor birşey istedim ki cevap gelmedi. peki daha basit birşey isteyeyim o zaman. Seçtiğim çizgilerin boyları belirlediğim değer ile başlangıçlarını sabit tutarak değiştirebileceğim bir lisp. örneğin farklı uzunluklarda 10 adet çizgi seçtim ve bu 10 adet çizginin uzunluğunun da 5 birim olarak aynı anda değiştiriyim. çizgilerin başlangıç noktaları sabit kalacak şekilde kısaltması ya da uzatması lazım bu önemli.

15.11.2013 12:32 75103	Harbi65 Üstad 428 ileti İnş.Tekn. Teknik Ressam KASTAMONU
Alıntı boratensa : örneğin farklı uzunluklarda 10 adet çizgi seçtim ve bu 10 adet çizginin uzunluğunun da 5 birim olarak aynı anda değiştiriyim. çizgilerin başlangıç noktaları sabit kalacak şekilde kısaltması ya da uzatması lazım bu önemli. Kod: (defun c:CZBOY (/ Grp:Sec Yn:Boy Cz:tk Cz:dt Cz:ang Cz:11 i) (setvar "CMDECHO" 0) (command "UNDO" "GROUP") (if (setq Grp:Sec (ssget (list (cons 0 "LINE")))) (if (setq Yn:Boy (getreal "\n Çizgi boyunu girin:")) (progn (setq i -1) (repeat (sslength Grp:Sec) (setq Cz:tk (ssname Grp:Sec (setq i (1+ i)))) (setq Cz:dt (entget Cz:tk) Cz:ang (angle (cdr (assoc 10 Cz:dt)) (cdr (assoc 11 Cz:dt)))) (setq Cz:11 (polar (cdr (assoc 10 Cz:dt)) Cz:ang Yn:Boy)) (setq Cz:dt (subst (cons 11 Cz:11) (assoc 11 Cz:dt) Cz:dt)) (entmod Cz:dt) ) ) ) ) (command "UNDO" "END") (setvar "CMDECHO" 0) (princ) )

15.11.2013 13:35 75104	asencer Kıdemli Girişimci 25 ileti makina istanbul
herkese merhaba; bir lisp e ihtiyacım var. çizimim de bulunan çok sayıda birbiri ile ilişkisiz olan kapalı polylineları ayrı ayrı bir dosyaya kaydetmek mümkün mü? biraz daha açıklamam gerekirse; bir dwg dosyasında 200 adet üçgen çizimi var. her biri polyline ve hiçbirisi birbirini kesmiyor. bir komutla bunları bir klasöre ayrı isimlerde mesela (1 2 3 ..) kaydetmek mümkün mü? herkese teşekkür ederim. saygılarımla.

18.11.2013 20:37 75126	given Girişimci 20 ileti Teknik Ressam Ankara
Herkese selamlar, Cizim uzerinde B.B.K. ile baslayan textleri secip bunlarin width factorlerini veya olursa layerlarini da degistirmeye yarayacak bir lispe ihtiyacim var. Simdiden tesekkurler.

Önceki Sayfa

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

Sonraki Sayfa