dkeran Posted October 22, 2015 Posted October 22, 2015 HI all, I'm new to this site - I've searched quite a bit but couldn't find anything so hopefully this hasn't been asked before. I am looking for a LISP that can create 3D pipes but also move them on the z axis by their radius. I am producing a 3D model of underground services within a city for which I've been provided a detailed survey including z values made of 3D polylines. The z values of the surveyed pipe are to the top of pipe - if I sweep a circle down the path the top of pipe will be above the actual top of pipe by the measurement of it's radius. Has anyone produced a LISP that will speed this process up by any chance? Any help is greatly appreciated! Quote
BIGAL Posted October 22, 2015 Posted October 22, 2015 The manual way using rotate3d you align a circle on the end of the pline rotating the circle using the first two points of the pline then extrude using the Path option. Here is a big hint took 10 seconds to find, may be a copy here did you search ? google "3d pipes lisp autocad" returned ;;; CURVE2TUBE -Gilles Chanteau- (gile) ;;; Extrudes a "donut region" along a curve(s) object(s). Quote
dkeran Posted October 22, 2015 Author Posted October 22, 2015 I have hundreds, if not thousands of pipes to create. I am looking for a LISP to save time so the manual options are not really relevant. The CURVE2TUBE lisp which took you 10 seconds to find doesn't have the option I require to move the proposed centreline in the minus z axis by the radius of the proposed pipe. I would have thought that this would be a common enough issue and someone might have created something. If not, I can have a look at creating it myself. Quote
ReMark Posted October 22, 2015 Posted October 22, 2015 Most of the lisp routines I have seen for creating a 3D pipe use the centerline and not the top of pipe as the path for sweeping or extruding. Quote
dkeran Posted October 22, 2015 Author Posted October 22, 2015 No worries, I'll try put some time aside to have a look at producing something. I'll post it here if I can get it sorted. Thanks for the help. Quote
ReMark Posted October 22, 2015 Posted October 22, 2015 If the path is the top of pipe wouldn't you have to sweep a circle representative of the O.D. of the pipe not the I.D.? Quote
dkeran Posted October 22, 2015 Author Posted October 22, 2015 If the path is the top of pipe wouldn't you have to sweep a circle representative of the O.D. of the pipe not the I.D.? Yeah, is this an option? I was thinking of creating a list that will move the top of pipe line in a minus z value which will be the same as the pipe radius. Haven't put a whole lot of thought into it yet, but it should be possible? Quote
ReMark Posted October 22, 2015 Posted October 22, 2015 "Is this an option?" You tell me. Someone previously wrote, "The z values of the surveyed pipe are to the top of pipe." Quote
dkeran Posted October 22, 2015 Author Posted October 22, 2015 "Is this an option?" You tell me. Someone previously wrote, "The z values of the surveyed pipe are to the top of pipe." I just have another look at the sweep command, I see that you can sweep with a base point. Though with what I need to do it'd probably be easier to sweep along the centre and move the 3d solid afterwards. So to answer your question above, yes. Quote
ReMark Posted October 22, 2015 Posted October 22, 2015 I'm not sure I follow your logic but it's your drawing so do what works best for you. Quote
dkeran Posted October 22, 2015 Author Posted October 22, 2015 I'm not sure I follow your logic but it's your drawing so do what works best for you. Just trying to save a headache! I'll sort out a LISP and post it here in the coming days hopefully. Quote
dkeran Posted October 22, 2015 Author Posted October 22, 2015 Very simple Macro that gets me out of a hole until I have the time to sort out a full LISP routine. You might have a better idea of what I was looking at doing. ^C^C_circle;\d;0.125;_sweep;\;mo;so;\_move;\;0,0,0;0,0,-.0625 I want to add in drop down options of diameter size, layer, material, etc. in the LISP. Quote
BIGAL Posted October 23, 2015 Posted October 23, 2015 Remark we often go out dig a hole and find a pipe hence top of pipe is recorded level and yes 100% need OD to do properly as existing invert level takes into account material wall thickness. doesn't have the option thats in Cadtutor speak MODIFY CODE Quote
dkeran Posted October 23, 2015 Author Posted October 23, 2015 A few modifications on the macro makes me think there is no need for a LISP. I've created macros for all sizes of pipes and just need to click the button from the tool palette. Updated macro below in case anybody is looking for something similar. Might go on to try eliminate the need for repeated selections and look at changing the circle to a donut to indicate the material thickness. ^C^C_Laymcur;\_circle;\d;0.125;_sweep;\;mo;so;\_move;\;0,0,0;0,0,-.0625;_layer;Set;0;; Quote
danielk Posted October 26, 2015 Posted October 26, 2015 HI all, I'm new to this site - I've searched quite a bit but couldn't find anything so hopefully this hasn't been asked before. I am looking for a LISP that can create 3D pipes but also move them on the z axis by their radius. I am producing a 3D model of underground services within a city for which I've been provided a detailed survey including z values made of 3D polylines. The z values of the surveyed pipe are to the top of pipe - if I sweep a circle down the path the top of pipe will be above the actual top of pipe by the measurement of it's radius. Has anyone produced a LISP that will speed this process up by any chance? Any help is greatly appreciated! have you tried the xpipe lisp ? Quote
tzframpton Posted October 26, 2015 Posted October 26, 2015 I would suggest an alternative program, such as Civil 3D or AutoCAD MEP. Quote
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.