changing dimension defaults

[aenriquez]

I need to find a lisp or VBA that would keep the dimension text in inches up to 18" anything above that to remain the default (feet and inches)

Thanks in advance

[Mike_R]

Do you need this to work on existing dimensions or is it for dimensions which are to be created?

[aenriquez]

this is for new dimension to be created.