Stretch (Lengthen) - Hanger Rod "Length" Script for Global Z elevation

[Anonymous]

I have a lisp routine for Autodesk 2012 CADMech. This lisp would allow you to select all the hangers within your drawing and input the desired "Z" elevation of the end of the ATR in inches. It worked on all hangers: Clevis, Roller, Trapeze (Profiled Bearer), etc.. I can't get it to work in 2017 Autodesk Fabrication/Building Data. Does anybody have a script that performs the same type of function and works in 2017 Autodesk Fabrication? Attached old lisp file.

[Anonymous]

First thing I'll say, your pretty much the definition of a piece of crap for putting your name on MY work.....

But, I will tell you this..... If you wanted to actually put in the time to do your own work this round, I have a suggestion....

Change your list setup to report Connector 1 XYZ (which represents current rod node), grab that from the entget 300's properties and simply issue the stretch command from that provided XYZ to a Z replaced version of your choosing. Best of luck...

[Anonymous]

Wow, pretty harsh. I received the lisp from a sheet metal detailer a long time ago and it didn't work right so I had to tweak it a little. Took forever since he, nor I, knew basically nothing about writing lisp routines. Also, I wanted to distribute to all the Detailers within my company, once I got it to work right. Management wouldn't allow it with an Author name within the lisp text, by someone not working for the company. So, it was either place my name on it or the company's name. I chose mine because if I placed the company's name on it, I was told I could be hassled later for distributing it outside the company, especially if I didn't work there anymore. That said, I did state that I was very green in Lisp Routine writing when I posted this issue on Autodesk Forum. I thought it was pretty obvious that I received help. I can understand your issue with it but I just wanted you to know the reason. I will try your suggestion and see if it works. Thanks.

Sincerely,

Eric Botts | BIM Detailer
Pan-Pacific Mechanical
1205 Chrysler Drive, Menlo Park, CA 94025
P: (650) 561-8810 | F: (650) 561-8811 | C: (916) 796-8103
ericb@ppmechanical.com | Pan-Pacific Website| Please Contact Us
[cid:image003.jpg@01D286DB.EFC26520]

________________________________

This e-mail, including any attachments, is the property of Pan-Pacific Mechanical and is meant only for the intended recipient and may be a confidential communication. If you are not one of the named recipients or otherwise have reason to believe that you received this e-mail in error, any review, use, retention, dissemination, distribution, printing or copying of this e-mail is strictly prohibited. Please notify the sender immediately of the error by return e-mail and please delete this message from your system. Thank you in advance for your cooperation.

[Anonymous]

Wow, pretty harsh. I received the lisp from a sheet metal detailer a long time ago and it didn't work right so I had to tweak it a little. Took forever since he, nor I, knew basically nothing about writing lisp routines. Also, I wanted to distribute to all the Detailers within my company, once I got it to work right. Management wouldn't allow it with an Author name within the lisp text, by someone not working for the company. So, it was either place my name on it or the company's name. I chose mine because if I placed the company's name on it, I was told I could be hassled later for distributing it outside the company, especially if I didn't work there anymore. That said, I did state that I was very green in Lisp Routine writing when I posted this issue on Autodesk Forum. I thought it was pretty obvious that I received help. I can understand your issue with it but I just wanted you to know the reason. I will try your suggestion and see if it works. Thanks.

Sincerely,

Eric Botts | BIM Detailer
Pan-Pacific Mechanical
1205 Chrysler Drive, Menlo Park, CA 94025
P: (650) 561-8810 | F: (650) 561-8811 | C: (916) 796-8103
ericb@ppmechanical.com | Pan-Pacific Website| Please Contact Us
[cid:image003.jpg@01D286DB.EFC26520]

________________________________

This e-mail, including any attachments, is the property of Pan-Pacific Mechanical and is meant only for the intended recipient and may be a confidential communication. If you are not one of the named recipients or otherwise have reason to believe that you received this e-mail in error, any review, use, retention, dissemination, distribution, printing or copying of this e-mail is strictly prohibited. Please notify the sender immediately of the error by return e-mail and please delete this message from your system. Thank you in advance for your cooperation.

[Anonymous]

Explanation on Autodesk Forum. Not maliciously done. For good purpose.

[Anonymous]

Well, specifically because your a union hand, I am willing to help you. However, you need be cognoscente of posting something that could potentially help our competition.

I am ALWAYS open to helping ANYBODY who is willing to roll up their sleeves and dive into the world of making things happen. If you want some further direction send me a personal request and I will mentor you as much as you want and of course where I can find time.

To be clear though, I love enabling people to their full potential, but I hate spoon feeding. You'll have to do the work, I'll just keep you from wasting your time.

[MOatman]

You are running a filter for CID 838 in your lisp "(mapfilter "#39=838" 0 0 1)".  In Fabrication 2017 the hanger CID patterns have changed.  Since you are using Building Data it is possible they have updated their content. I would look up the CID being used by your hangers to confirm.