AutoCAD • AutoLISP • Programlama • Püfler • Komutlar • Terimler • Eğitim
aLd • TCad • FacadeCAD • Cephe Kot • HQ Library • FreeMUST • Pasdoc.A
Forumlar > İstekleriniz > Polyline çizgilerini toplu fillet yapma
25.04.2019 15:41    
kral87
Merhabalar,
Polyline ile çizilmiş çizgileri toplu olarak dik köşeli veya radüs vererek toplu fillet yapma lispi varmı ?
line için sitede var ama polyline çizgilerde çalışmıyor.
Yardımlarınız için teşekkürler.

kral87 (21.10.2020 09:29 GMT)

25.04.2019 17:26    
alumina
Alıntı
kral87 :

Kod:

(defun c:rd (/ ns rd k)
  (if (and (setq ns (ssget '((0 . "lwpolyline"))))
        (setq rd (getdist "\nEnter the radius:")))
    (progn (setvar 'cmdecho 0)
      (vl-cmdf "._undo" "be") (setvar 'filletrad rd)
      (repeat (setq k (sslength ns))
        (vl-cmdf "._fillet" "p"
          (ssname ns (setq k (1- k)))))
      (vl-cmdf "._undo" "e") (setvar 'cmdecho 1)
    )
  ) (prin1)
)
26.04.2019 08:03    
kral87
Merhabalar
Söylemek istediğim böyle bir komuttan ziyade toplu fillet (TF) komutuna benzer bir lisptir.
5 adet yatay 5 adet dikey çizilmiş polyline çizgilerini toplu fillet yapma lisp varmı ?
TF lispi line çizgilerde çalışıyor fakat polyline çizgilerinde işlem yapmıyor.
İyi çalışmalar.

26.04.2019 08:26    
Travaci
Pedit komutunu girdikten sonra multiple ile bütün çizgileri seç join dedikten sonra fuzz distance için iki çizgi arasındaki max aralığı gir. Daha sonra yukarıkadaki lisp i kullanabilirsin. Buarada tf lisp ini sen biliyorsun sadece.

26.04.2019 11:24    
kral87
toplu fillet lispi de forumdaki mfl lispi ile aynı ikiside polyline çizgilerde işlem yapmıyor.




Linkleri görebilmek için ÜYE olmalısınız.
> 1 <
Copyright © 2004-2022 SQL: 1.454 saniye - Sorgu: 53 - Ortalama: 0.02744 saniye