CAD Fórum : presun hladín (aj v bloku) https://www.cadforum.cz/forum/ Sat, 08 Aug 2026 13:51:45 +0000 Tue, 03 Mar 2020 11:48:40 +0000 http://blogs.law.harvard.edu/tech/rss Web Wiz Forums 12.04 360 https://www.cadforum.cz/forum/RSS_post_feed.asp?TID=30128 <![CDATA[CAD Fórum]]> https://www.cadforum.cz/forum/forum_images/web_wiz_forums.png https://www.cadforum.cz/forum/ <![CDATA[presun hladín (aj v bloku) : Merge layers je jasná volba. Velmi...]]> https://www.cadforum.cz/forum/forum_posts.asp?TID=30128&PID=119424&title=presun-hladin-aj-v-bloku#119424 Autor: johny
Předmět: 30128
Zasláno: 03.bře.2020 v 11:48

Merge layers je jasná volba. Velmi silný nástroj, dobré znát.
V novějších verzích je tento i v kontextovém menu správce hladin... 


]]> Tue, 03 Mar 2020 11:48:40 +0000 https://www.cadforum.cz/forum/forum_posts.asp?TID=30128&PID=119424&title=presun-hladin-aj-v-bloku#119424 <![CDATA[presun hladín (aj v bloku) : Dobrý denNa to existuje příkaz...]]> https://www.cadforum.cz/forum/forum_posts.asp?TID=30128&PID=119419&title=presun-hladin-aj-v-bloku#119419 Autor: Petr75
Předmět: 30128
Zasláno: 03.bře.2020 v 08:17

Dobrý den
Na to existuje příkaz "SLUČHL". V prvním kroku vyberete hladiny, z kterých chcete objekty přesouvat, v druhém kroku vyberete cílovou hladinu.]]> Tue, 03 Mar 2020 08:17:13 +0000 https://www.cadforum.cz/forum/forum_posts.asp?TID=30128&PID=119419&title=presun-hladin-aj-v-bloku#119419 <![CDATA[presun hladín (aj v bloku) : &#034;_laymrg&#034;alternativně...]]> https://www.cadforum.cz/forum/forum_posts.asp?TID=30128&PID=119418&title=presun-hladin-aj-v-bloku#119418 Autor: deedea96
Předmět: 30128
Zasláno: 03.bře.2020 v 08:12

"_laymrg"

alternativně lisp:

(defun laymerge (orig dest / ss1 i_ss ss2 i_ss2 e edata )
(if (tblsearch "layer" orig)
(progn
(if (not(tblsearch "layer" dest))
(command "_layer" "_n" dest "")
)
(setvar "_clayer" "0")
(if (setq ss1 (ssget "_X" (list(cons 8 orig))))
(progn
(setq i_ss 0)
(while (< i_ss (sslength ss1))
(setq edata (entget (ssname ss1 i_ss)))
(setq edata (subst (cons 8 dest) (cons 8 orig) edata))
(entmod edata)
(setq i_ss (1+ i_ss))
(princ)
)
)
)
;bloky
(setq ss2 (ssget "_X" (list(cons 0 "INSERT"))))
(setq i_ss2 0)
(while (< i_ss2 (sslength ss2))
(setq edata (entget (ssname ss2 i_ss2)))
(setq e (entnext (tblobjname "BLOCK" (cdr (assoc 2 edata)))))
(setq edata (entget e))
(if (equal (cdr(assoc 8 (entget e))) orig)
(progn
(setq edata (subst (cons 8 dest) (assoc 8 edata) edata))
(entmod edata)
(princ)
)
)
(while (setq e(entnext e))
(setq edata (entget e))
(if (equal (cdr(assoc 8 edata)) orig)
(progn
(setq edata (subst (cons 8 dest) (assoc 8 edata) edata))
(entmod edata)
(princ)
)
)
)
(setq i_ss2 (1+  i_ss2))
(princ)
)
(command "_purge" "_la" orig "_n")
(princ)
)
)
(princ)
)




Upravil deedea96 - 03.bře.2020 v 08:17]]> Tue, 03 Mar 2020 08:12:22 +0000 https://www.cadforum.cz/forum/forum_posts.asp?TID=30128&PID=119418&title=presun-hladin-aj-v-bloku#119418 <![CDATA[presun hladín (aj v bloku) : ahojte :)Existuje príkaz alebo...]]> https://www.cadforum.cz/forum/forum_posts.asp?TID=30128&PID=119415&title=presun-hladin-aj-v-bloku#119415 Autor: cvirikovec
Předmět: 30128
Zasláno: 03.bře.2020 v 07:21

ahojte :)
Existuje príkaz alebo Lisp ktorý dokáže:
Presuň všetky entity vo výkrese (aj v blokoch) z hladiny xxx do hladiny yyy.
Teda niečo podobné ako je pre farby 2bb. 
dá sa to s časti robiť cez filter ale je to zdlhave. 

]]> Tue, 03 Mar 2020 07:21:03 +0000 https://www.cadforum.cz/forum/forum_posts.asp?TID=30128&PID=119415&title=presun-hladin-aj-v-bloku#119415