All,
Can someone help me with getting rid of the "ERROR" that happens when i hit enter or return to end the routine. Basically this give me the chance to reset my titleblocks so they print in order.
(defun c:TRESET()
(vl-load-com)
(while
(and(vl-cmdf "_.copybase" pause (ssget "_:S") "")
(vl-cmdf "_.pasteclip"(getvar "LASTPOINT"))
(vl-cmdf "_.erase" "_p" ""))
)
(princ)
); end of c:TRESET
Thanks,
Brian