TheSwamp
Code Red => AutoLISP (Vanilla / Visual) => Topic started by: craig.petersen on August 08, 2018, 04:07:09 PM
-
I want a lisp to find all objects with center assigned to it and set color to by layer, layer to E-CEN, linetype to BYlayer and Lineweight to by layer
(setq LT_LIST (list "CENTER" "CENTER2" "CENTERX2"))
(foreach LT_NAME LT_LIST
(command "._chprop" (ssget "X" '((6 . "CENTER"))) "" "C" "bylayer" "LT" "bylayer" "LW" "bylayer" "la" "E-CEN" "")
(command "._chprop" (ssget "X" '((6 . "CENTER2"))) "" "C" "bylayer" "LT" "bylayer" "LW" "bylayer" "la" "E-CEN" "")
(command "._chprop" (ssget "X" '((6 . "CENTERX2"))) "" "C" "bylayer" "LT" "bylayer" "LW" "bylayer" "la" "E-CEN" "")
)
I also want it to work in blocks
-
just google "change linetype in blocks" should take about 10 seconds to find the answer or just search here 1st.
-
Try this:
;; RJP » 2018-08-10
)
)
)
)
)
)
)
)