" Z " Value with Leader

[Shibuboss 11]

Hello everybody,

 

How we can pick the value of a point's Z value with a leader like the attached image.

 

A lisp can do this ? Autocad have the commands for this.Please advise

 

Thanks in advance..

Regardso:)

[NBC 10]

Sounds like a job for Multi-leaders and a block/or field

[BearDyugin 10]

Variant the first - the dynamic block

variant_1.dwg

[BearDyugin 10]

The second variant - leader + Lisp

Parametres of leader by default

(defun c:geo_koord_leader (/ pod_z koord sign)
(setvar "DIMZIN" 0)  
(initget "X Y Z")
 (setq
   geo_pod (if geo_pod geo_pod "Z")
   pod_z (getkword (strcat"\nSign [X/Y/Z] <"geo_pod">: "))
   geo_pod (if pod_z pod_z geo_pod)
 )
 (while (and
   (setq koord (getpoint "\nStarting point <Exit>:"))
 )
   (setq
     sign (rtos
     (cond
       ((eq geo_pod "X")(car koord))
       ((eq geo_pod "Y")(cadr koord))
       (T (caddr koord))) 2 3))
   (VL-cmdf "_leader" koord pause "" sign "")
 )
)

(princ "command name: geo_koord_leader")

[Shibuboss 11]

Thanks a lot Geobuilder.I got it.

 

Regards:D