TheSwamp
Code Red => AutoLISP (Vanilla / Visual) => Topic started by: diaa.caliph on July 01, 2021, 10:18:40 PM
-
i'm trying to set xdata for all elements in drawing with its layer name
the code gives error bad DXF group: (-1)
i'm not expert in autolisp i'm trying to get it done if anyone can figure it out
(defun c:outline
( / i s str
)
'( -3
( "XXXX"
(1000 . str)
)
)
)
)
)
)
EDIT (John): Added code tags.
-
diaa.caliph,
Odd request if I say so myself, but it would go something like this:
(defun c:OUTLINE
( / ss cnt eg lyr xd
) );if
);repeat
;else
(prompt "\nNO ENTITIES FOUND.") );if
(prompt "\nOUTLINE Complete.") );defun
Hope that helps.
Best,
~DD
-
Superb CodeDing, that's exactly what needed, big thanks