Leaderboard

For any direction (orientation)... (defun c:mike ( / p1 p2 p3 p4 newp1 newp2 ) (setq p1 (getpoint "\nFirst corner of rectangle: ")) (setq p2 (getpoint "\nSecond corner of rectangle: ")) (setq p3 (getpoint "\nThird corner of rectangle: ")) (setq p4 (getpoint "\nFourth corner of rectangle: ")) (setq newp1 (polar p1 (angle p4 p1) 800.0)) (setq newp2 (polar p2 (angle p3 p2) 800.0)) (command "_.pline" "_non" newp1 "_non" newp2 "_non" p3 "_non" p4 "c") (princ) ) HTH., M.R.

Please start a new topic for that issue.

In theory you might be able to analyze the content of each dimension block and thereby determine the presence of extension lines 1 and/or 2. But this would be quite hard as for some bizarre reason the content of the dimension blocks in your dwg is not consistent. In some cases a single dimension block will contain the dimension texts and/or line work for two neighboring dimensions for example. You should follow my earlier advice. And if you really want to see extension lines you can apply 'manual' overrides.