im having trouble setting this lisp to change the needed layer to true color. it works for index colors but just not true color. Can someone please help me out. not sure what im missing. thanks
(and (setq w (car (entsel "\nPick an xref: ")))
(setq x (cdr (assoc 2 (entget w))))
(setq p (tblobjname "block" x))
(findfile (cdr (assoc 1 (entget p))))
(if (= (cdr (assoc 410 (entget w))) (getvar 'ctab) "Model")
(vl-cmdf "_.layer" "_COLOR" 0,0,255 (strcat x "|*") "")
(vl-cmdf "_.vplayer" "_color" 11 (strcat x "|*") "_Current" "")
)
