Offset text

[gazzalp]

All, does anyone know of a way to offset text below a selected text by a certain measurement? First off please do not mention Mtext - i and most others in my company dont like it. Sure it would help in this situation but im hoping i can achieve what i want using single line text. So what i want is a lisp that will offset a selected text by a certain measurement. IE: 4mm offset for 3mm high text, 8mm offset for 6mm high text etc. Rather than just "copy" and move the cursor down and type in my measurement (which everyone in my office would therefore have to learn) i would like a lisp that i will make into a button so when i click it, i then select the text and it will auotmatically copy down the correect amount, therefore i can do it 5 times or so for each bit of text giving me 6 lines. If someone could provide the code for say 3mm high text to copy down 4mm, im sure i can work out how to change it to do other heights of text.

 

Thanks

[jalucerol]

Does it matter to much if it's developed in vba?

[gazzalp]

No, that would be fine, thanks

[gazzalp]

Does anyone know how to achieve this? i thought it would be quite simple.... maybe im wrong though.

[ReMark]

Hmmm....don't give me what I ask for give me what I need. Gotcha.

 

OFFTX.LSP by Tim Webb Tip #1634 01-Jul-2000. Find it at the CAD Tips section of Cadalyst magazine.

 

http://cadtips.cadalyst.com/notestext/offset-text

[alanjt]

This is a rewrite I did of an old Land Desktop routine. I use it for copying various objects along a specified angle, allowing me to change the distance each time. Might give you some ideas, or give you want you want.

 

[gazzalp]

Thanks Remark, that nearly exactly what i need! Would anyone know how to modify the lisp slightly so that, for example 2.5mm high text is at an offset of 4mm? When i first used the lisp it was to an offset of about 5.3mm, when i keep going it offsets to roughly where i want (4mm). I have found it is not always offsetting to the same amount. Also is there a way to get rid of the option of "new text" because i will only ever want to create offset text.

 

Thanks everyone

[ReMark]

Open the lisp routine with a text editor and make the corrections to the offset distance. I cannot advise you on deleting the portion re: new text as I have not looked at the routine.