Leaderboard

Quick test and setting the DIMBLK variable as pointed out by @eldon imports the appropriate block. Maybe something like this: (defun _importarrowheadblock (n) (or (tblobjname "block" n) (= 'str (type (vl-catch-all-apply 'setvar (list "DIMBLK" n))))) ) (if (_importarrowheadblock "_BOXFILLED") (vla-put-arrowsymbol newleaderstyle "_BOXFILLED") )

More the reason to take the time to learn. This was precisely the motivator for me and now I don't have to rely on anybody else to solve my problems.

Ok - you got me inspired to give this a try. See the attached LISP file. Still working on it, but it will do what you want for the most part. NOTE: This works - kind of. I have to do a better determination of the direction of the polyline to get CW or CCW I think in order to get all the dims "inside" or "outside". UPDATED: Got everything working, with the help of Gile's (gc:clockwise-p) function and some other edits! try this! AD-Automatic Dimension Autocad (3).LSP