Align tag lisp help

[DC-MWA]

I'm working on a little lisp for tagging aligned surfaces.

It uses the dimalign command. I do not how to edit the dimtext to say "ALIGN" programmatically and I do know how to make the arrow blocks rotate correctly.

Forgive my lack of knowledge, I am slowly learning the art of autolisp.

I have included the lisp and the arrow block it uses.

As always, thanks for your time and assistance.

-dc

[DC-MWA]

I've added an image to clarify what I'm trying to achieve.

[dbhunia · Accepted solution]

Hi,

Try this.....

This is very lightly tested...... You may need to add some "If" Loop.....Hopefully you can manage that if needed......