I saw this autolisp from Lee Mac on this forum, this lips routine allows to change existing text to anything instantly, i would like to know if any body wants to help me to make this lisp routine to select top text and change it then select bottom text and change it instantly too, thank you very much in advance, I have # at top of pipe reducer and a # at bottom of the reducer too, so I need to type 330 and click on the # top text and change to 3" then click on the bottom # and changed to 300, thank you again
from Mr, Lee Mac but it work only on one text at the time.
(defun c:req ( / ent enx )
(while
(progn (setvar 'errno 0) (setq ent (car (entsel)))
(cond
( (= 7 (getvar 'errno))
(princ "\nMissed, try again.")
)
( (null ent) nil)
( (not (wcmatch (cdr (assoc 0 (setq enx (entget ent)))) "TEXT,MTEXT"))
(princ "\nPlease select a text or mtext object.")
)
( (entmod (subst '(1 . "REQUIRED") (assoc 1 enx) enx)))
)
)
)
(princ)
)