Offset Text Lisp

[Anonymous]

Hi All,

Can someone please help or provide a Lisp routine that will offset text (or Mtext) from a line / polyline. 

For example, I want to offset road chainages a user input distance from the centreline (line/pline) along which they correspond. Ideally this would be offsetting the text/mtext from its chosen justification grip point, perpendicular to their alignment (based on the CL). Please refer below example:

I wish to have both pieces off text (Ch520 & Ch540) be selected and shifted by their RHS grip point to the offset line position. I note that I can simply copy and move them in this instance because the line is straight... however I want to be able to apply this for when the alignment is curving etc.

Any and all assistance is appreciated. 

Thanks and kind regards

[RobDraw]

There's a LISP and Customization forum where your request should be.