(defun c:acc ()
(setq attc(GETSTRING "\nEnter new attribute color: "))
(command "attedit" "y" "*" "*" "*" "c" PAUSE PAUSE)
(while
(= 1 (logand (getvar "cmdactive") 1))
(command "c" attc "n")
);;; end while
);;; end lisp
This code is not finding attributes to change.
I can list the object,objects.
It always lists attribute definition.
This code can not seem to in order to change attribute colors globally.
I was using 2004, now Autocad 2008.
ideas?