How to get dimension Start point & End point of arrow head

[Pugazh]

hello dears,

  I want to make line in multiple dimension using start point & end point of dimension.

 

(defun c:makeline ( )
  (setq ss (ssget "_:L" '((0 . "DIMENSION"))))
  (repeat (setq i (sslength ss))
    (setq ent (ssname ss (setq i (1- i))))
     (command "_.line" "_non" (cdr (assoc 10 (entget ent))) "_non" (cdr (assoc 11 (entget ent))) "")
   )
 (princ)
 )

 

Edited March 8, 2020 by Pugazh

[Dayananda]

You can absorb the dimension line by using the NCOPY command.

Type NCOPY and pick on the relevant dimension object and press enter key 3 times.

Now you have a line object joining arrowhead insertion points.

 

But it depend on your dimension style settings.

Edited March 7, 2020 by Dayananda

[Pugazh]

Just now, Dayananda said:

You can absorb the dimension line by using the NCOPY command.

Type NCOPY and pick on the relevant dimension object and press enter key 3 times.

Now you have a line object joining arrowhead insertion points.

 

  please give another idea because i have to-much dimensions   

[Dayananda]

Pick on your dimension and use SELECTSYMILAR  comand. Copy all dimensions with base point 0,0.

Go to new drawing and paste to 0,0 point.

Modify dimstyle in new drawing

Set your dimstyle  arrow size zero. and suppress Extension line 1 and 2

Then select all dimes and explode.

And again using selectsymilar  command select all lines  and copy with base point 0,0

and paste to previous drawing 0,0 point. that is all.

Edited March 7, 2020 by Dayananda