Sonraki Sayfa
Copyright © 2004-2022 SQL: 1.27 saniye - Sorgu: 107 - Ortalama: 0.01187 saniye
 |
 |
 |
 |
|
|
|
|
17.09.2021 06:18
eemree 
|
|
Arkadaşlar merhaba.
Ekteki lisp ile line, polyline ve arc'ların uzunluklarını, layer'ına göre excel'e tablo olarak aktarabiliyorum fakat circle ve spline'ları aktarmıyor. Mevcut lisp'e circle ve spline uzunluklarını da ekleyebilir miyiz? Buna ek olarak aynı excel dosyasına alan bilgilerini de yazdırmamız mümkün mü? Yardımcı olabilirseniz çok sevinirim. eemree (17.09.2021 18:59 GMT) |
|
17.09.2021 07:02
 Travaci
|
|
Merhaba,
Özel istekler ücret karşılığında mümkün, yazdırmak isterseniz özelden iletişime geçebilirsiniz.
|
|
17.09.2021 19:01
eemree
|
|
Yabancı bir forumda istediğime yakın bir lisp buldum. Yine de teşekkürler.
|
|
08.10.2021 08:13
hamdiatay
|
|
(defun c:kapak ()
(setq mal_sahibi (entsel "\n Mal Sahibi Giriniz : ")) (setq mal_sahibi (cdr (assoc 1 (entget (car mal_sahibi))))) (setq muteahhit (entsel "\n Müteahhit Giriniz : ")) (setq muteahhit (cdr (assoc 1 (entget (car muteahhit))))) (setq mimar (entsel "\n Mimar Giriniz : ")) (setq mimar (cdr (assoc 1 (entget (car mimar))))) (setq ilce (entsel "\n İlçe Giriniz : ")) (setq ilce (cdr (assoc 1 (entget (car ilce))))) (setq mahalle (entsel "\n Mahalle Giriniz : ")) (setq mahalle (cdr (assoc 1 (entget (car mahalle))))) (setq pafta (entsel "\n Pafta No Giriniz : ")) (setq pafta (cdr (assoc 1 (entget (car pafta))))) (setq ada (entsel "\n Ada No Giriniz : ")) (setq ada (cdr (assoc 1 (entget (car ada))))) (setq parsel (entsel "\n Parsel No Giriniz : ")) (setq parsel (cdr (assoc 1 (entget (car parsel))))) (setq insaat_alani (entsel "\n İnşaat Alanı Giriniz : ")) (setq insaat_alani (cdr (assoc 1 (entget (car insaat_alani))))) (setq metraj_dosya (strcat (getvar "dwgprefix") (substr (getvar "dwgname") 1 (- (strlen (getvar "dwgname")) 4 )) " - Kapak_Bilgileri.xls")) (setq mahal_bilgileri (open metraj_dosya "a")) (write-line (strcat mal_sahibi "\t" muteahhit "\t" mimar "\t" ilce "\t" mahalle "\t" pafta "\t" ada "\t" parsel "\t" (vl-string-translate "." "," insaat_alani) ) mahal_bilgileri ) (close mahal_bilgileri) ) Yukarıdaki lispte mimari projeden kapak bilgilerini almaya çalışıyorum. Burada boş geçmem gereken seçimi (mahalle , ada, parsel vs. gibi) nasıl yapabilirim.
|
|
11.10.2021 08:16
423542
|
|
Merhaba bir lisp e ihtiyacım var.
Doğrusal olmayan bir polyline a belirleyeceğim kot artışı ile ( yani nokta kot farkları 20 cm olacak şekilde) point atmak istiyorum bu mümkün mü? (Divide komutu mesafe olarak bölüyor ben kot olarak bölmek istiyorum)
|
|
11.10.2021 11:01
 ehya
|
|
423542
Measure komutu ile seçilen çizgiyi istenilen mesafede point atılmasını sağlar. Bu komutu denediniz mi?
|
|
11.10.2021 19:16
423542
|
Alıntı Onunla olmuyor. Örneğin Z aksında 45 derecelik bir polyline ı mesafe olarak değilde her 20 cm kot artışında bölmesi lazım.
|
|
08.11.2021 16:06
 k005
|
|
Lisp istek silinmiş... Kim tarafından ve neden silindiğini öğrenebilirmiyim ?
-------------------- Sitedeki Güncellemeden kaynaklanmış... ok. k005 (08.11.2021 17:43 GMT) |
|
10.11.2021 07:52
esatcumali
|
|
Öncelikle herkese merhaba. Ben lisp konusunda tecrübesizim. Bir lisp konusunda tecrübeli hocalarımızın desteğine ihtiyacım var. Yardımcı olabilirseniz memnun olurum. Daha önce benzer bir lisp bulmuştum ama bilgisayarım değiştiğinden dolayı kaybettim. İhtiyacım olan lisp; Kablo metrajlarını sıralı numara vererek metraj ve layer adını atribute blok yada mleader içine yazdırabileceğim bir lisp. Yardımlarınız için şimdiden teşekür ederim
|
|
25.01.2022 08:28
lord535353
|
Alıntı Öncelikle değerli paylaşımlarınız için, siz ve arkadaşlarınıza teşekkürü bir borç bilirim. Bome lipsinde birinci ve ikinci noktayı seçerek çizginin uzunluğunu buluyoruz. Benim ricam nokta seçmeden sadece çizgiyi seçerek uzunluğunu nasıl aktarabiliriz. bome lipsi ile uy lipsini karıştırarak bir sonuç almayı denedim. Lakin başarısız oldum. Vakit bulur revizyon yapabilirseniz; Bome lipsi Borunun çapını seçilecek Boru seçilecek Uzunluk otomatik tayin edilecek Sonrasında bunlar excele aktarılacak. Şeklinde çalış olacak. Şimdiden teşekkür ederim. İyi günler dilerim. Bunu neden istediğimi de izninizle kısaca açıklıyım. Boru metrajı sırasında daha önce sizin yazdığınız cRtbLk lipsi ile tüm kesişen çizgileri kesebiliyorum. Gerekli yerlerinden kesilmiş çizgileri bome ile başlangıç ve bitiş noktasında seçmek takdir edersiniz ki uğraştırıyor :) bunun yerine direk çizgiyi seçmeyi istiyorum.
|
|
25.01.2022 16:20
mttlp
|
Alıntı
|
|
26.01.2022 15:49
lord535353
|
Alıntı
|
|
02.02.2022 08:07
 asamet
|
|
Merhaba,
Oluşturduğum attribute bloklarda baştan sona sırasıyla faz numarası veriyorum. L1, L2, L3, L1, L2, L3... şeklinde bütün armatürlerime faz numarası veriyorum. Bunu elle girmek uzun hatlarda yoruyor. Acaba attribute bloklardaki text kısmına her tıkladığımda "L1" "L2" "L3" (L3'ten sonra tekrar L1'e dönecek) şekilde değişen bir sayaç yapmak mümkün müdür?
|
|
02.02.2022 08:34
Travaci
|
Alıntı Kod: (defun c:test (/ n pt)
(setq n 0) (while (setq pt (getpoint "\nSpecify a point:")) (command "_.text" pt "" "" (setq n (+ n (if (= n 3) -2 1)))) ) (princ) ) Travaci (02.02.2022 11:42 GMT) 
|
|
02.02.2022 12:04
asamet
|
|
Attribute bloklara tıkladığımızda değişecek şekilde yapmak zor mudur?
 407838-ornek-1.dwg
|
|
02.02.2022 12:10
asamet
|
|
YDEG diye bir lispiniz vardı sanırım. Orada Attribute seçeneği var mesela. Orada istenilen sayıdan başlayarak sonsuza kadar sıralı kodlama yapabiliyoruz. Oradaki gibi attribute seçiliymiş gibi sürekli tıklayıp L1, L2, L3 yazabileceğim bir lisp arıyorum.
|
|
02.02.2022 12:36
mttlp
|
Alıntı Ön ek son ek başlangıç sayısı istediğin gibi olsun yazı attribute text mext değiştirebilir lisp mevcuttur.
|
|
06.02.2022 22:34
mmert61
|
|
freemust kot işini çözebilen var mı
|
|
06.02.2022 22:35
mmert61
|
|
kot kısmı attribute atıyor değeri elle girdiriyor
|
|
hbuludag
|
|
iyi günler .Asansör kuyusu donatı detaylanıdrması ve çizimi yapan lisp var mıdır acaba ?
|