Placing text

Greetings,

I have a 2D site plan with hundreds of elevation numbers (text elements) scattered all around it. What I want to do is run a script that will read what those bits of text say (like "1173.08", etc.) and paste that value into the Z position of the text element, so that the number actually is what it says it is.

Is there an AutoLisp routine that can do this?

Thanks!

-Geoff

I don't know about a LISP, but I often recommend the EATTEXT command. It will capture the text and its coordinates exportable to excel.

Does this help?

Search here its under co-ord pts couple of different lisp routines to do exactly what you want

Anway here is one soloution

; converts text to a point with xyz 
; z value equal to text
; by Alan H Nov 99

(while (not (setq ss (ssget))))     
(command "layer" "new" "txthts" "")
(setvar "clayer" "txthts")
(setvar "pdsize" 3)
(setvar "pdmode" 35)
(while (setq en (ssname ss 0))
    ; Entity type
    (setq entyp (cdr (assoc 0 (entget en)))) 
   (if (= entyp "TEXT")
   (progn
   (setq xyz (cdr (assoc 10 (entget en))))
   (setq txtht (cdr (assoc 1 (entget en))))
   (setq txtz (atof txtht))
   (setq ptxyz (list (car xyz)(cadr xyz) txtz))
   (command "point" ptxyz)
   )                         
   )                              
   ; Delete each measured entity from set
   (ssdel en ss)
;end while
)