Copyright © 2004-2022 SQL: 1.458 saniye - Sorgu: 101 - Ortalama: 0.01444 saniye
15.06.2012 12:19
waytooraider |
Åžahin Hocam,
Farklı layerlarla ebl bloğu oluşturduğumda layoff ve layiso komutları mükemmel çalışyor. Ama herhangi bir layerda oluşturduğum ebl bloğu kopyalayıp layer'ını değiştirdiğimde layoff yada layiso'da hepsi birden gizleniyor. Bu konu benim için çok önemli çünkü şantiye ilerledikçe önceden oluşmuş blokların layerını kendim manuel değiştiriyorum.Mesela yapıldı yapılmadı layer'ı diye. Yapıldı layerını lay iso yapınca yapılmadı layer'ıda lay iso oluyor.Aynı şey layoff içinde geçerli. Umarım sıkıntımı anlatabilmişimdir. Saygılarımla.
|
15.06.2012 13:22
ProhibiT |
Daha bu gün ele aldığımız bir konu var. Block tanımındaki (BLock Definition) objelerin Layer'larını değiştirmeden, yalnızca Insert (bLock Reference) objelerinin yerini değiştirince, ortaya çıkan kargaşa ile ilgili olarak bir fonksiyon paylaşmıştık. Sizin Probleminiz de bundan kaynaklanıyor sanıyorum.
Linkleri görebilmek için ÜYE olmalısınız. linkindeki bLsoL fonksiyonunu kullanarak mevcut ebL blocklarınızın Layer'larını değiştirirseniz bahsettiğiniz problem ortadan kalakacaktır diye düşünüyorum. Bir deneyin, çözüm olmazsa bir yolunu bulmaya çalışırız.
|
15.06.2012 13:55
waytooraider |
Hocam,
Dediğiniz blsol fonksiyonu çalıştırdım ebl bloğuna ait; faklı layerdaki blokları, referans aldığım bloğun layerına çeviriyor. Blsol fonksiyonu bu arada çok başarılı imiş. Ama istediğim sonucu alamadım. Ald fonksiyonunu ile bi tane blok oluşturalım. o bloğu kopyalayıp kopya bloğun layerını değiştirelim. sonra herhangi birini layoff yaptığımızda ikiside gizleniyor.Sadece seçtiğim layerın gizlenmesini istiyorum:) Blokların içindeki nesnelerin layerı 0 olmalı dimi ?.Konuyla alakasız oldu ama neyse:) Sonsuz Saygılarımla.
|
15.06.2012 20:12
ProhibiT |
Her iki fonksiyon için de başlangıçta hiç aklımıza gelmeyen bir durumla karşı karşıyayız.
- BLock definition altındaki Attribute Definition'ların Layer'ını değiştirdiğimizde, BLock Reference (Insert) altındaki Attribute'ün Layer'ı değişmiyor. - bLsoL fonksiyonu seçilen bLock'u ele alıp alt objelerinin Layer'ını değiştirdikten sonra, çizim içindeki aynı isimli tüm bLock referansları (Insert) nın da Layer'ını değiştiriyor. Çözüm; Kod: ;|===========================================================================|; şeklinde yeni bir fonksiyon yazdım. Layer'ını değiştireceğiniz EbL bLock'larının Layer'ını bu fonksiyonu kullanarak değiştirirseniz, Layer açıp kapattığınızda biribirilerine karışmayacaklardır.;| chbaL: Change bLock and Atrribute Layer |; ;| Seçilen Insert objelerini ve bunun altında tanımlı Attribute'lerin |; ;| Layer'ını belirlenen (seçilen) Layer'a değiştirir. |; ;| Hazırlayan: M. Şahin Güvercin www.autocadokulu.com 15.06.2012 |; ;|---------------------------------------------------------------------------|; (defun c:chbaL (/ LyR bLn n PvT) (setvar "cmdecho" 0) (command "_.undo" "group") (vl-load-com) (setq LyR (getstring "\nLayer Name [Enter to Select]: ")) (if (= "" LyR) (setq LyR (cdr (assoc 8 (entget (car (entsel))))))) (princ "\nSelect Reference bLock(s): ") (setq bLn (ssget (list (cons 0 "Insert") (cons 2 "EbL"))) n -1) (while (< (setq n (1+ n)) (sslength bLn)) (setq PvT (ssname bLn n)) (vlax-put-property (vlax-ename->vla-object PvT) 'Layer LyR)(entupd PvT) (while (/= (cdr (assoc 0 (entget (setq PvT (entnext PvT))))) "SEQEND") (vlax-put-property (vlax-ename->vla-object PvT) 'Layer LyR)(entupd PvT))) (command "_.undo" "e") (prin1)) Kolay gelsin.
|
15.06.2012 20:25
waytooraider |
Süper. Tek kelimeyle elinize aklınıza sağlık.
|
04.10.2012 15:40
yesilege |
selamlar. bu komutu 3d polyline için nasıl düzenleyebiliriz?
|
04.10.2012 20:44
ProhibiT |
Yanlış bir yere mi yazdınız sorunuzu?
"Komut" diye bahsettiğiniz nedir? "3dpolyline için düzenlemek" ne demek? Hepsini sürç-ü lisan olarak kabul etsek bile, peki denediniz mi? Yapılabileceğinden eminsiniz de, nasıl yapılacağını soruyorsunuz! O kadar eminseniz yapmış olmanız gerekirdi. Paylaşımlara saygı açısından lutfen sorularınızda özenli olunuz...
|
20.10.2012 08:51
waytooraider |
Åžahin Hocam,
Çok Yoğun bir tempoda çalıştığınızı tahmin edebiliyorum. Ald fonksiyonu ile ilgili bir maruzuatım olacak.Elipsi de ölçsün diye bir istekte bulunmadığım için dolayısıyla elipsi ölçmüyor.Eğr fırsat bulurda bu konuyla ilgilenme gibi bir durumunuz söz konusu olursa müteşekkir olurum. Sonsuz saygılarımla.
|
21.10.2012 06:58
ProhibiT |
(while (setq Czg (ssget":s"(list(cons 0"Line,*polyline,arc,circle,spline")))) yerine
(while (setq Czg (ssget ":s" (list (cons 0 "*line,arc,circle,ellipse")))) yazılırsa istediğiniz işlemi yapabilirsiniz.
|
16.11.2012 13:16
waytooraider |
Hocam,
Komutu çalıştırdıktan sonra ölçüsünü alacağımız çizginin rengi oluşan ebl atribute bloğunun rengine dönebilirmi. Bu şekilde geniş ekrandan bakıldığında bloksuz çizgilerle bloklu çizgiler çok daha net bir şekilde görülebilir. Sonsuz Saygılarımla. waytooraider (22.11.2012 06:52 GMT) |
23.11.2012 18:01
ProhibiT |
- Ellipse objelerini de seçip işlem yapacak şekilde düzenlendi.
- İşleme alınan objelerin Layerları ebL bLock'u ile aynı Layer a geçirecek şekilde düzenlendi. Burada işleme alınan objelerin renginin ByLayer olduğu varsayıyoruz. Diğer renk atamaları için zaten uzun olan fonksiyon kodunu daha da uzatmak mantıklı gelmedi.
|
24.11.2012 09:41
waytooraider |
Hocam,
Elinize,aklınıza sağlık. Nasıl yorum yapacağımı bilemiyorum :) Saygılarımla.
|
13.04.2013 10:22
ozgurayhan |
ProhibiT öncelikle eline sağlık.
bu lispi arc, line, polyline vs.. sadece uzunluklarını çizginin üzerine yazan, ama bunu yaparken de blok olmadan yapabilir mi. Kalıp metrajı yaparken kullanmak istiyorum, özellikle kiriş kanat uzunlukları için, eğik, oval ve düz kirişler mevcut ben önce bu çizgilerin uzunluklarını autocadde çizgi üzerine sonra da başka lisp kullanarak excele atmak istiyorum. " UY" lispi mevcut ama onda sadece line için var. Yadımcı olabilirsen çok sevinirim. Teşekkürler
|
28.11.2013 20:44
ProhibiT |
İstek üzerine yeniden düzenlenen aLd fonksiyonu: 174410-ald-1.rar
Daha önce de bahsettiğimiz gibi, AutoCAD klasörlerinde yeterli erişim yetkisine sahip olmak gerekiyor. aLd fonksiyonunu daha önce kullandıysanız, c:\Program Files\AutoDesk\AutoCAD xxxx\Support klasöründe bulunan aLd.dcL dosyasını sildikten sonra yeni fonksiyonu kullanmalısınız. Kolay gelsin.
|
29.11.2013 06:50
waytooraider |
Öncelikle bu inanılmaz çalışma için çok teşekkür ederim.Her gün acaba o gün bu gün mü diye yolunu beklediğim şahane bir lisp olmuş
Hocam çapın yanındaki ikona tıklayıp sonrada text yada mtexte tıkladığımızda çalışmıyor.Atribute bloğun içindeki yazıya tıkladığımızda lisp gayet güzel çalışıyor.Text yada mtext içinde bu ayarı yapabilirmiyiz.
|
29.11.2013 11:43
ProhibiT |
Gerekli eklemeyi yaptım. Son halini aynı linkten indirip kullanabilirsiniz. Çap belirlemek içilen Text veya Mtext nesnesinin içeriğini olduğu gibi alır. Seçilen nesne içeriği yalnızca çap bilgisinden oluşmalıdır. Başka yazılar da varsa, içlerinden çap değerini seçip almaz.
|
12.06.2014 09:37
kesinhesapci |
Öncelikle Berat kanlinizi kutlar hayırlara vesile olmasını temenni ederim..
Değerli büyüklerim, bir istirhamın olacak; ALn lispi ile alanlarını ve çevrelerini yazdığım mahal bilgilerini DECC lispi ile excele atmak istiyorum.(bunu yaparken m²-m ve A-Ç bilgilerini yazdırmadan yapıyorum) Velhasıl kelam Decc lispi ile seçim yaptığımda işlem gerçekleşmiyor. kuvvetle muhtemel bir yerlerde yanlışlık yapıyorum lakin bulamadım. Engin bilgilerinizde bu sorunun bir açıklaması ola bilir mi? Selam ve saygılarımla. kesinhesapci (12.06.2014 09:44 GMT) |
12.06.2014 11:43
ProhibiT |
_____________________________
ProhibiT : Kod: ;|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~| 174410-decc.rar| DECC: Seçilen Objenin ilgili değeri Aktif Excel Hücresinden başlayarak, | | sütun düzeninde yazılır. ilk Objenin ilgili değeri, Aktif Excel | | Hücresine yazılır. Excel hücrelerinin formatı değiştirilmez, varsa | | mevcut değer veya formül kaybedilecektir. Yeni Obje seçilmeye devam| | edildikçe, bir alt hücreye geçilerek yazmaya devam edilir. Objeler,| | Dimension, Line, Polyline, Lwpolyline veya Arc olabilir. | | Dimension objesi seçilmişse değeri, başka tür objeler seçilmişse, | | uzunluğu Excel hücresine yazılır. Excel Decimal Seperator'ü nokta | | olarak kullanılır. AutoCAD ortamında DIMDSEP sistem değişkeni | | farklı kullanılmış ise oluşan hata kullanıcının sorumluluğundadır. | | Açık Excel Uygulaması yoksa, hata iletisiyle sonlanır. | | M. Şahin Güvercin (ProhibiT) www.cizimokulu.com 27.03.2013 | |--------___________________________________________________________-------|; (defun c:DECC (/ ExcLApp ExcLLs oLc Stn Str) _____________________________ DECC Lisp'ini farklı bir amaçla yazmıştık. Seçilen nesne Dimension ise ölçü değeri, Line, Polyline, Lwpolyline veya Arc ise uzunluğu Excel ortamındaki aktif hücreden başlanarak alt alta yazılır. aLn lisp'i ile mahal bilgilerinizi oluşturduğunuzda Nesne cinsiniz nedir? Text veya Mtext (Field dahil) türü bir nesne ise DECC benzeri bir Lisp yazmak gerekir. Mahal bilgilerinizi tablo şeklinde oluşturmuşsanız, AcxL isimli fonksiyonu kullanmanız daha doğru olabilir.
|
12.06.2014 12:28
kesinhesapci |
Lütfen cehaletimi mazur görünüz..
Göre bileceğiniz en acemi autocad kullanıcısı olduğumu belirterek başlamak istiyorum. Hocam ; "BOUNDARY" komutu ile oluşturulmuş "PLINE"lar üzerinde işlem yapıyoruz. Çalıştığımız projecilerimiz de yabancı uyruklu. Standart layer kullanmak konusunda da malesef başarısızlar. Mahal listesi gibi açıklayıcı bir bilgi beklemek gerçekten imkansız. Her gün önümüze atılan projelerden yaklaşık keşif çıkartmaya çalışıyoruz.(Cebelleşiyoz demek daha doğrusu). Mahçup olmamak için de elimizden geleni yapmaya gayret sarfediyoruz. (Bu ağlama kısmı için de tekrar mazur görün lütfen.)
|
ProhibiT |
Kod: ;|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~| | aLnEx: Seçilen Text nesnelerinin içeriği önek ve soneklerinden sıyrılarak | | sayısal değerleri Aktif Excel Hücresinden başlayarak, sütun | | düzeninde yazılır. Seçilen Objenin ilgili değeri, Aktif Excel | | Hücresine yazılır. Excel hücrelerinin formatı değiştirilmez, varsa | | mevcut değer veya formül kaybedilecektir. Yeni Obje seçilmeye | | devam edildikçe, bir alt hücreye geçilerek yazmaya devam edilir. | | Seçilen nesneler Text olmak zorundadır. Excel Decimal Seperator'ü | | nokta olarak kullanılır. AutoCAD ortamında DIMDSEP sistem değişkeni| | farklı kullanılmış ise oluşan hata kullanıcının sorumluluğundadır. | | Açık Excel Uygulaması yoksa, fonksiyon hata iletisiyle sonlanır. | | M. Şahin Güvercin (ProhibiT) www.cizimokulu.com 12.06.2014 | |--------___________________________________________________________--------|; (defun c:aLnEx (/ ExcLApp ExcLLs onE snE Stn Str) (setvar "cmdecho" 0) (command "undo" "group") (vl-load-com) . . . - 174410-alnex.rar linkinden aLnEx.Fas dosyasını indirin. - AutoCAD komut satırından (Load "aLnEx.fas") girerek veya AppLoad ile bu dosyayı yükleyin. - aLn fonksiyonuyla Kapalı şekillerin içine alanlarını yazdırın. Önek veya Sonek olmasının bir önemi yoktur. Her durumda alanın sayısal değeri Excel'e aktarılacaktır. - Excel uygulamasını çalıştırıp yeni (veya mevcut) bir dosya açın. - Alan değerlerinin yazılmaya başlanacağı hücreye gelin. - AutoCAD komut satırından aLnEx komutunu girin. AutoCAD grafik ekranından alan yazılarını seçmeye devam ettiğiniz sürece seçilen alan değerleri alt alta Excel'e yazılacaktır. Yazdırılacak alan yazıları bittiğinde sağ tuş veya enter girerek işlemi sonlandırın. Kolay gelsin.
|