Leaderboard

HAHAHA .. I did not even go to the link. Well .. it's a little bit different with the cmdecho and regenall.

(defun c:foo nil (setvar 'cmdecho 0) (foreach l (layoutlist) (setvar 'ctab l) (setvar 'psltscale 0) (command "_.regenall")) (setvar 'cmdecho 1) (princ) )

Admin please join to other post re this task You should have asked me, this is to do with the bottom right dim in your sample dwg, the answer is yes work out which is shorter then swap pt1 and pt2. An example (setq d1 (distance p1 p3) d2 (distance p2 p3) ) (if (> d1 d2) (progn (setq temp p1) (setq p1 p2) (setq p2 temp) ) )

Are you saying that you want the horizontal dimension to "rotate" to be a vertical dimension? If so, it's possible, but it's out of the scope of the original intention of the program. I will not modify the program to go off scope. It's purely for the intention of aligning every "point" along a direction. It's possible, but I opt that out since it can lag quite a lot when working with drawings containing many objects of high density. Originally it's not possible, but with Lee Mac's help, it's doable. I'll implement the distance restriction feature, and then setting a distance of 0 should work similar to snapping.