expected ENTITYNAME at [layerstate-restore]
In BricsCAD I get this message:
Error: bad argument type ; expected ENTITYNAME at [layerstate-restore]
; LISP execution error : inside
Here is the code:
;;;LeeMac
;;;http://www.theswamp.org/index.php?action=post;quote=586162;topic=53969.0;last_msg=586168
(defun layerstate-callback ( rtr arg / las )
(if
(setq las
(cdr
(assoc (strcase (car arg))
'(
("A0-0 COVER" . "ALL-ON")
("A1-0 SITE" . "SITE")
("A1-1 DRIVE-THRU" . "DRIVE-THRU")
("A2-0 PHOTO" . "PHOTO-FLOOR")
("A3-0 FLOOR" . "FP")
("A3-1 CEILING" . "CEILING")
("A4-0 EXT ELEVS" . "ELEVATIONS")
("K2-0 KITCHEN" . "KITCHEN")
("K2-1 KITCH ELEVS" . "ELEVATIONS")
("Z1-0 FIELD NOTES" . "DETAIL")
)
)
)
)
(progn
(layerstate-restore "ALL-ON" nil 255)
(layerstate-restore las nil 255)
(vla-zoomextents (vlax-get-acad-object))
(vla-regen (layerstate-doc) acallviewports)
)
)
(princ)
)
( (lambda ( )
(vl-load-com)
(foreach rtr (cdar (vlr-reactors :vlr-miscellaneous-reactor))
(if (= "layerstate-reactor" (vlr-data rtr))
(vlr-remove rtr)
)
)
(vlr-set-notification
(vlr-miscellaneous-reactor "layerstate-reactor" '((:vlr-layoutswitched . layerstate-callback)))
'active-document-only
)
(eval (list 'defun 'layerstate-doc nil (vla-get-activedocument (vlax-get-acad-object))))
(princ)
)
)
Comments
-
At the Swamp page you linked to, Lee Mac says to file a support request.
That can be done at https://www.bricsys.com/en-us/support/0
