topic Re: Set layer transparency by object selection in Visual LISP, AutoLISP and General Customization Forum

Set layer transparency by object selection

Justin_P_Carr — Wed, 27 Nov 2024 15:24:54 GMT

Afternoon,

Would a lisp expert out there be able to write me a routine whereby I can change the transparency level of a layer by selecting an object on that layer? I have never go round to learning list even though I've used AutoCAD since the 1990's! (If anyone can suggest a good book that teaches lisp I would appreciate that too.)

Thanks in advance

Re: Set layer transparency by object selection

ВeekeeCZ — Wed, 27 Nov 2024 15:32:48 GMT

Try this tool, not specifically for transparency, but for a wider layer setting. You can select multiple objects.

Re: Set layer transparency by object selection

paullimapa — Wed, 27 Nov 2024 15:44:21 GMT

Afralisp website is an excellent starting point to learn

Re: Set layer transparency by object selection

paullimapa — Wed, 27 Nov 2024 17:07:44 GMT

Try this setlyt.lsp:

; defun setlyt change layer tranparency to match with selected object ; OP: ; https://forums.autodesk.com/t5/visual-lisp-autolisp-and-general/set-layer-transparency-by-object-selection/m-p/13177737#M475351 (defun c:setlyt (/ en lyr tra) (while (not en) (setq en(entsel"\nSelect Object: ")) ) (setq en (car en)) (setq tra(getpropertyvalue en "Transparency")) (setq lyr(getpropertyvalue(getpropertyvalue en "LayerID")"Name")) (cond ((= tra -2)(princ"\nCurrent Object Transparency Setting is ByBlock.")) ((= tra -1)(princ"\nCurrent Object Transparency Setting is ByLayer.")) (t (setpropertyvalue(tblobjname "LAYER" lyr)"Transparency" tra) (princ(strcat"\nLayer Transparency Changed to Match Object as: " (itoa tra))) ) ) ; cond (princ) ; clean exit ) ; defun

Re: Set layer transparency by object selection

Sea-Haven — Thu, 28 Nov 2024 00:09:01 GMT

Have a look at Kindle has some books at very reasonable prices. 4 books by

Togores, Reinaldo N.. Advanced Programming Techniques (AutoCAD expert's Visual LISP Book 4) (Kindle Location 4). . Kindle Edition.

Nice thing is can copy and paste code from book.