Problem, birden fazla konsül oluşturmak için İngilizce versiyonuna rağmen

athanatos

Guest
İyi sabah, herkes!

Bu konuyu birkaç ağ lisp hakkında bilgi sormak için açıklıyorum, bu da daha fazla retinanın kondüklerini yeniden yaratmasına izin vermelidir.

Birçoğundan biri bu

;handy autocad-12 hatch edit 06/08/2009
Yazarlar: alex borodulin
;nyacad, inc. http://www.nyacad.com(defun c:has(/ gp) (setq gp (sget)) (command "-hatchedit" gp "as" duraklama));convert hatch to associativeativeative
(defun c:hbo (/ gp) (setq gp (sget))(command "-hatchedit" gp "b" "p" "y"); hatch'a ek sınır
(defun c:hf(/ gp) (setq gp (sget))(command "-hatchedit" gp "o" "s" duraklama "n"));hatch düzeltme
(defun c:hs(/ gp) (setq gp (sget))(command "-hatch ayrı" gp "h")

oppure Questo reperibile qui
http://forums.autodesk.com/t5/işits...s-poligons-each-in-in-bas-td-p/3290 / Sayfa/1Bu kodların sorunu muhtemelen otocad'ın İngilizce versiyonları ile çalışmaktır.

Aslında (2013'te otocad) İtalyan'daki "silah" komutu "_hatchedit" olur. b p y komutları için bir maç bulamadım.

Herkes lisp önermek veya çalışmak için bir çözüm var mı?

Yardım için tekrar teşekkürler.

Selamlar
 
Onları "İtalya'da Tartışma" yapmak için alt işareti koymak zorundasınız.
Kod:
[COLOR=#333333];handy autocad-12 hatch edit 06/08/2009[/COLOR]
[COLOR=#333333]Yazarlar: alex borodulin[/COLOR]
[COLOR=#333333];nyacad, inc. [/COLOR][URL="http://www.nyacad.com/"]http://www.nyacad.com[/URL]
[COLOR=#333333](defun c:has(/ gp) (setq gp (sget)) (command "_-hatchedit" gp "_as" duraklama));convert hatch to associativeativeative[/COLOR]
[COLOR=#333333](defun c:hbo(/ gp) (setq gp (sget))(command "_-hatchedit" gp "_b" "_p" "_y")[/COLOR]
[COLOR=#333333](defun c:hf(/ gp) (setq gp (sget) (command "_-hatchedit" gp "_o" "_s" duraklama "_n");hatch düzeltme[/COLOR]
[COLOR=#333333](defun c:hs (/ gp) (setq gp (sget) (command "_-hatchedit" gp "_h"));[/COLOR]
 
b = sınır ( _b'den kullanılabilir)
p = poliline (Ben eng ve ita arasında aynı olduğuna inanıyorum)
y = evet (bir açıklamayı hak ediyor mu?)

Tüm durumlarda komut hattını takip edin ve İtalya'daki komut seçeneklerini görün
Ya da alternatif olarak, kontrollerde ve seçeneklerde hem de devam edersen alt bir işarete sahip olacaksınız.
 
Hem yardım için teşekkürler.

Düşük baraj çözümü kullanmaya çalıştım ve aslında işe yarıyor.

Bununla birlikte, sorunum, birçok ağdaki operasyona bağlı: Aslında sadece qgis'den dxf dosyasında bulunan bir dizi örnekden ihraç ettim. Bu nedenle yüzlerce örneği yeniden oluşturmak için sağlamalıyım.

Önceki lisp onu yeniden yaratmasına izin verir, ancak manuel olarak her örneke tıklayarak... Bir çözüm arıyorum çünkü otocad otomatik olarak yapıyor.

Bu liste (İkinci bağlantıdan) benim durumuma yapılacak gibi görünüyor (eğer yanlışsam beni haklı çıkarır)
;; murray clack tarafından yazılmış, november 19, 2010
;; bu rutin, birden çok seçilmiş kapak desenleri etrafında sınırları yeniden yaratacaktır ve desenleri anlamsal hale getirir.
(prompt "\nhatch-recreate-boundaries.lsp yüklenen, 'hatch_recreate_boundaries' to execute")
(defun c:hatch_recreate_boundaries (/eskice sset cnt obj)
(setq oldce (getvar "cmdecho"))
(setvar "cmdecho" 0)
(princ "\nselect hatch objects: ")
(setq sset (sget)
(setq cnt -1)
(O zaman (setq obj (sname sset (setq cnt (1+ cnt)))))
(command "_-hatchedit" obj "_b" "_p" "_y")
(command "_change" cnt "p" "la" "defpoints" "")
)

(setvar "cmdecho" eskice)
(princ)
)
Takedit ve üç mektuptan vazgeçin (İtalya muhabirleri r, rekreasyon için, p, polilinea için, s, si) otomatik olarak çalışmaz (bundan başka bir şey yoktur).

Herhangi bir fikir?

Selamlar ve nezaket için tekrar teşekkürler.
 
İyi sabahlar.
Kendi kendine sorumluyum.

Listeyi okudum ve kodun sınır poliline'ı yeniden yarattığını fark ettim ve sonra katmanları değiştirdim (fark noktalarında, _change örneği ile). Bu olay için kod çizgisini sildim ve kod mükemmel çalıştı!

Bu nedenle, liste çalışması (otomatik 2013'te ortaya çıktı)
;; murray clack tarafından yazılmış, november 19, 2010
;; Medeniyetçi dell'utente athanatos nel forum ka3d, luglio 21, 2016
;; bu rutin, birden çok seçilmiş kapak desenleri etrafında sınırları yeniden yaratacaktır ve desenleri anlamsal hale getirir.
(prompt "\nhatch-recreate-boundaries.lsp caricato, scrivere 'hrb' per eseguire")
(defun c:hatch_recreate_boundaries (/eskice sset cnt obj)
(setq oldce (getvar "cmdecho"))
(setvar "cmdecho" 0)
(princ "\nselect hatch objects: ")
(setq sset (sget)
(setq cnt -1)
(O zaman (setq obj (sname sset (setq cnt (1+ cnt)))))
(command "_-hatchedit" obj "_b" "_p" "_y")
)

(setvar "cmdecho" eskice)
(princ)
)
Sadece emin olmak için deneyin. Yardım için tekrar teşekkürler,

Selamlar ve iyi işler
 
Son düzenleme:

Forum İstatistikleri

Konular
58,521
Mesajlar
499,056
Kullanıcılar
104,110
Son Üye
ChristianR

Çevrimiçi Üyeler

Şu anda çevrimiçi üye yok.
Geri
Üst