from ss Text, mtext & block align to a poly or line

[gilsoto13]

My last request for a long time for you guys...

I have been trying to find the perfect routine for my company to achieve this:

I would to have a routine to select a line or polyline segment and then it will prompt me to select objects, and then this routine will filter only text, mtext and blocks, and will align them to previously selected line or polyline segment, each one by its own insertion point, for dummies the objects may be rotated 180 degrees from desired angle, so a prompt - backwards? would be better after the command shows us the result.. to give us the change to choose 180 degrees rotation with the "Y" answer.

I have found all of these things in 5 different files, the best one at this moment for us is the

ta.lsp, (vba) which aligns text, mtext and blocks to a line, but one by one and will not allow polyline segments.

then the rtt.lsp (vba) will allow us to select a polyline segment or a line, but the command will end after aligning only one object. It will not align blocks either...

And then we have the torient (from express tools in acettxt.lsp) which allow us to pick a selection set, but it will require the angle by picking 2 points and will rotate attdefs inside selected blocks, not blocks properly.

Can anyone make Santa Claus and help us increase our productivity reaching the objectives above with a brand new routine?

[gilsoto13]

My last request for a long time for you guys...

I have been trying to find the perfect routine for my company to achieve this:

I would to have a routine to select a line or polyline segment and then it will prompt me to select objects, and then this routine will filter only text, mtext and blocks, and will align them to previously selected line or polyline segment, each one by its own insertion point, for dummies the objects may be rotated 180 degrees from desired angle, so a prompt - backwards? would be better after the command shows us the result.. to give us the change to choose 180 degrees rotation with the "Y" answer.

I have found all of these things in 5 different files, the best one at this moment for us is the

ta.lsp, (vba) which aligns text, mtext and blocks to a line, but one by one and will not allow polyline segments.

then the rtt.lsp (vba) will allow us to select a polyline segment or a line, but the command will end after aligning only one object. It will not align blocks either...

And then we have the torient (from express tools in acettxt.lsp) which allow us to pick a selection set, but it will require the angle by picking 2 points and will rotate attdefs inside selected blocks, not blocks properly.

Can anyone make Santa Claus and help us increase our productivity reaching the objectives above with a brand new routine?

guess what... there is another person called Alan J. Thompson who has been working in this lisp for a long time... he's got exactly what I have been looking for... so, you can forget about this post .... check out this beauty....
-------------------------
What a beatiful lisp Alan.... That's exactly what I've looking for this since this monday....

I've been using the ta.lsp... but this is way better..

This is exactly as I wanted it, you've really worked a lot in this... maybe it will be part of Autocad commands in the future.

That's a lot, I will pass the message to other people... thank you for it. This week I also solved 2 other things our company was struggling with, one of them was to use one abbreviation for printing pdf regardless of current autocad version (I made 3 different abbreviations before) and the other thing was to update the scale of any type of block to current dimscale, now we have all solved thanks to this and other forums.