Wiki Markup |
---|
h1. Inlet Pipe Drawing Script - layout 1 *viewtops* \- Adjust workspace so that the object is being viewed from the top. viewtops <\- viewtop1 *layerthawc* \- [Layer{~}thaw~|AutoCAD Basics Layer] unlocks the layer "channel" so that it can be edited. layerthawc <\- layer{~}thaw~("channel") *layersetc* \- [Layer{~}set~|AutoCAD Basics Layer] selects the layer "channel". layersetc <\- layer{~}set~("channel") {float:left|border=2px solid black} [!cylinder1.bmp|width=500px!|AutoCAD Channel Program] Northeast Isometric View {float} *cylinder1* \- [CylinderA|AutoCAD Basics Cylinders] creates a cylinder based on three dimensions. cylinder1 <\- cylinderA(sedtankpipe1{~}origin~,outerradius(ND{~}SedPipeEntrance~),-T{~}ChannelWall~) sedtankpipe1{~}origin~ = * x: tank{~}origin0~ \- L{~}Sed~ + W{~}Channel~/2 * y: tank{~}origin1~ + W{~}Sed~/2 + outerradius(ND{~}SedLaunder~) + 3*(W{~}Sed~/2 - outerradius(ND{~}SedLaunder~))/4 * z: tank{~}origin2~ + H{~}Sed~ \- H{~}Channel~ \\ \\ {float:left|border=2px solid black} [!cylinder2.bmp|width=500px!|AutoCAD Channel Program] Northeast Isometric View {float} *cylinder2* \- [CylinderA|AutoCAD Basics Cylinders] creates a cylinder based on three dimensions. cylinder2 <\- cylinderA(sedtankpipe2{~}origin~,outerradius(ND{~}SedPipeEntrance~),-T{~}ChannelWall~) sedtankpipe2{~}origin~ = * x: tank{~}origin0~ \- L{~}Sed~ + W{~}Channel~/2 * y: tank{~}origin1~ + W{~}Sed~/2 + outerradius(ND{~}SedLaunder~) + 1*(W{~}Sed~/2 - outerradius(ND{~}SedLaunder~))/4 * z: tank{~}origin2~ + H{~}Sed~ \- H{~}Channel~ \\ \\ {float:left|border=2px solid black} [!cylinder3.bmp|width=500px!|AutoCAD Channel Program] Northeast Isometric View {float} *cylinder3* \- [CylinderC|AutoCAD Basics Cylinders] creates a cylinder based on three dimensions. cylinder3 <\- cylinderC(sedtankpipe3{~}origin~,outerradius(ND{~}SedPipeEntrance~),-T{~}ChannelWall~) sedtankpipe3{~}origin~ = * x: tank{~}origin0~ \- L{~}Sed~ + W{~}Channel~/2 * y: tank{~}origin1~ + W{~}Sed~/2 - outerradius(ND{~}SedLaunder~) - 1*(W{~}Sed~/2 - outerradius(ND{~}SedLaunder~))/4 * z: tank{~}origin2~ + H{~}Sed~ \- H{~}Channel~ \\ \\ {float:left|border=2px solid black} [!cylinder4.bmp|width=500px!|AutoCAD Channel Program] Northeast Isometric View {float} *cylinder4* \- [CylinderA|AutoCAD Basics Cylinders] creates a cylinder based on three dimensions. cylinder4 <\- cylinderA(sedtankpipe4{~}origin~,outerradius(ND{~}SedPipeEntrance~),-T{~}ChannelWall~) sedtankpipe4{~}origin~ = * x: tank{~}origin0~ \- L{~}Sed~ + W{~}Channel~/2 * y: tank{~}origin1~ + W{~}Sed~/2 - outerradius(ND{~}SedLaunder~) - 3*(W{~}Sed~/2 - outerradius(ND{~}SedLaunder~))/4 * z: tank{~}origin2~ + H{~}Sed~ \- H{~}Channel~ \\ \\ *subtract1* \- [SubtractH|AutoCAD Basics Subtractions] subtracts a selected object based on three specified points. subtract1 <\- subtractH(channel{~}origin~,p1,p2) channel{~}origin~ = * if layout 1-3: ** x: tank{~}origin0~ \- L{~}Sed~ + W{~}Channel~ ** y: tank{~}origin1~ \- T{~}PlantWall~ ** z: tank{~}origin2~ + H{~}Sed~ \- H{~}Channel~ * if layout4: ** x: tank{~}origin0~ \- L{~}Sed~ \-T{~}ChannelWall~ ** y: tank{~}origin1~ \- T{~}PlantWall~ ** z: tank{~}origin2~ + H{~}Sed~ \- H{~}Channel~ p1 = * x: sedtankpipe1{~}origin0~ + outerradius(ND{~}SedPipeEntrance~) * y: sedtankpipe1{~}origin1~ + outerradius(ND{~}SedPipeEntrance~) * z: sedtankpipe1{~}origin2~ p2 = * x: sedtankpipe4{~}origin0~ \- outerradius(ND{~}SedPipeEntrance~) * y: sedtankpipe4{~}origin1~ \- outerradius(ND{~}SedPipeEntrance~) * z: sedtankpipe4{~}origin2~ *holes2* \- holes2 <\- concat(cylinder1,cylinder2,cylinder3) *holes3* \- holes3 <\- concat(cylinder4,subtract1) *layerset* \- [Layer{~}set~|AutoCAD Basics Layer] selects the layer "0". layerset <\- layer{~}set~("0") *layerfreeze* \- [Layer{~}freeze~|AutoCAD Basics Layer] locks the layer "channel" so that it cannot be edited. layerfreeze <\- layer{~}freeze~("channel") *layer3* \- [Layer{~}new~|AutoCAD Basics Layer] creates a new blue layer "pipe". layer3 <\- layer{~}new~("pipe",blue) {float:left|border=2px solid black} [!pipe1.bmp|width=300px!|AutoCAD Channel Program] Northeast Isometric View {float} *pipe1* \- Calls the [Pipe Program|AutoCAD Pipe Program] to create a pipe. pipe1 <\- Pipe(sedtankpipe1{~}origin~,ND{~}SedPipeEntrance~,-sedtankpipe1{~}length~,EN{~}PipeSpec~) sedtankpipe1{~}origin~ = * x: tank{~}origin0~ \- L{~}Sed~ + W{~}Channel~/2 * y: tank{~}origin1~ + W{~}Sed~/2 + outerradius(ND{~}SedLaunder~) + 3*(W{~}Sed~/2 - outerradius(ND{~}SedLaunder~))/4 * z: tank{~}origin2~ + H{~}Sed~ \- H{~}Channel~ ND{~}SedPipeEntrance~ = Nominal diameter of entrance pipe from the inlet channel to the sedimentation tank. sedtankpipe1{*}{*}{~}length~ = H{~}Sed~ \- H{~}InletChannel~ \- (W{~}Sed~/2 * tank(AN{~}SedBottom~) + ElbowRadius(ND{~}SedPipeEntrance~))-ElbowRadius(ND{~}SedPipeEntrance~) EN{~}PipeSpec~ = enumerated pipe schedule type. Each schedule of pipe is represented by a specific number within our code. \\ \\ {float:left|border=2px solid black} [!pipe2.bmp|width=300px!|AutoCAD Channel Program] Northeast Isometric View {float} *pipe2* \- Calls the [Pipe Program|AutoCAD Pipe Program] to create a pipe. pipe2 <\- Pipe(sedtankpipe2{~}origin~,ND{~}SedPipeEntrance~,-sedtankpipe1{~}length~,EN{~}PipeSpec~) sedtankpipe2{~}origin~ = * x: tank{~}origin0~ \- L{~}Sed~ + W{~}Channel~/2 * y: tank{~}origin1~ + W{~}Sed~/2 + outerradius(ND{~}SedLaunder~) + 1*(W{~}Sed~/2 - outerradius(ND{~}SedLaunder~))/4 * z: tank{~}origin2~ + H{~}Sed~ \- H{~}Channel~ ND{~}SedPipeEntrance~ = Nominal diameter of entrance pipe from the inlet channel to the sedimentation tank. sedtankpipe1{*}{*}{~}length~ = H{~}Sed~ \- H{~}InletChannel~ \- (W{~}Sed~/2 * tank(AN{~}SedBottom~) + ElbowRadius(ND{~}SedPipeEntrance~))-ElbowRadius(ND{~}SedPipeEntrance~) EN{~}PipeSpec~ = enumerated pipe schedule type. Each schedule of pipe is represented by a specific number within our code. \\ \\ {float:left|border=2px solid black} [!pipe3.bmp|width=300px!|AutoCAD Channel Program] Northeast Isometric View {float} *pipe3* \- Calls the [Pipe Program|AutoCAD Pipe Program] to create a pipe. pipe3 <\- Pipe(sedtankpipe3{~}origin~,ND{~}SedPipeEntrance~,-sedtankpipe1{~}length~,EN{~}PipeSpec~) sedtankpipe3{~}origin~ = * x: tank{~}origin0~ \- L{~}Sed~ + W{~}Channel~/2 * y: tank{~}origin1~ + W{~}Sed~/2 - outerradius(ND{~}SedLaunder~) - 1*(W{~}Sed~/2 - outerradius(ND{~}SedLaunder~))/4 * z: tank{~}origin2~ + H{~}Sed~ \- H{~}Channel~ ND{~}SedPipeEntrance~ = Nominal diameter of entrance pipe from the inlet channel to the sedimentation tank. sedtankpipe1{*}{*}{~}length~ = H{~}Sed~ \- H{~}InletChannel~ \- (W{~}Sed~/2 * tank(AN{~}SedBottom~) + ElbowRadius(ND{~}SedPipeEntrance~))-ElbowRadius(ND{~}SedPipeEntrance~) EN{~}PipeSpec~ = enumerated pipe schedule type. Each schedule of pipe is represented by a specific number within our code. \\ \\ {float:left|border=2px solid black} [!pipe4.bmp|width=200px!|AutoCAD Channel Program] Northeast Isometric View {float} *pipe4* \- Calls the [Pipe Program|AutoCAD Pipe Program] to create a pipe. pipe4 <\- Pipe(sedtankpipe4{~}origin~,ND{~}SedPipeEntrance~,-sedtankpipe1{~}length~,EN{~}PipeSpec~) sedtankpipe4{~}origin~ = * x: tank{~}origin0~ \- L{~}Sed~ + W{~}Channel~/2 * y: tank{~}origin1~ + W{~}Sed~/2 - outerradius(ND{~}SedLaunder~) - 3*(W{~}Sed~/2 - outerradius(ND{~}SedLaunder~))/4 * z: tank{~}origin2~ + H{~}Sed~ \- H{~}Channel~ ND{~}SedPipeEntrance~ = Nominal diameter of entrance pipe from the inlet channel to the sedimentation tank. sedtankpipe1{*}{*}{~}length~ = H{~}Sed~ \- H{~}InletChannel~ \- (W{~}Sed~/2 * tank(AN{~}SedBottom~) + ElbowRadius(ND{~}SedPipeEntrance~))-ElbowRadius(ND{~}SedPipeEntrance~) EN{~}PipeSpec~ = enumerated pipe schedule type. Each schedule of pipe is represented by a specific number within our code. \\ \\ {float:left|border=2px solid black} [!pipe5.bmp|width=400px!|AutoCAD Channel Program] Northeast Isometric View {float} *pipe5* \- Calls the [Pipe Program|AutoCAD Pipe Program] to create a pipe. pipe5 <\- Pipe(sedtankpipe5{~}origin~,ND{~}SedPipeEntrance~,-sedtankpipe5{~}length~,EN{~}PipeSpec~) sedtankpipe5{~}origin~ = * x: tank{~}origin0~ \- L{~}Sed~ + W{~}Channel~/2 + ElbowRadius(ND{~}SedPipeEntrance~) * y: tank{~}origin1~ + W{~}Sed~/2 + outerradius(ND{~}SedLaunder~) + 3*(W{~}Sed~/2 - outerradius(ND{~}SedLaunder~))/4 * z: tank{~}origin2~ + W{~}Sed~/2*tan(AN{~}SedBottom~) + ElbowRadius(ND{~}SedPipeEntrance~) ND{~}SedPipeEntrance~ = Nominal diameter of entrance pipe from the inlet channel to the sedimentation tank. sedtankpipe5{~}length~ = ((5L{~}Sed~/8 - W{~}InletChannel~/2)^2^ + (outerradius(ND{~}SedLaunder~) + 3*(W{~}Sed~/2 - outerradius(ND{~}SedLaunder))/4)~{~}{^}2{^}{~}~)~{~}{^}1/2{^}~ ~\- 2ElbowRadius(ND{~}SedPipeEntrance~) EN{~}PipeSpec~ = enumerated pipe schedule type. Each schedule of pipe is represented by a specific number within our code. \\ \\ {float:left|border=2px solid black} [!rotatepipe5.bmp|width=550px!|AutoCAD Channel Program] Northeast Isometric View {float} *rotatepipe5* \- [Rotate{~}3d~|AutoCAD Basics Rotate] turns the object based on a given axis and degree angle. rotatepipe5 <\- rotate{~}3d~(p1,sedtankpipe5{~}origin~,"y",90) p1 = * x: sedtankpipe5{~}origin0~ + innerD(ND{~}SedPipeEntrance~,EN{~}PipeSpec~)/2 * y: sedtankpipe5{~}origin1~ * z: sedtankpipe5{~}origin2~ sedtankpipe5{~}origin~ = * x: tank{~}origin0~ \- L{~}Sed~ + W{~}Channel~/2 + ElbowRadius(ND{~}SedPipeEntrance~) * y: tank{~}origin1~ + W{~}Sed~/2 + outerradius(ND{~}SedLaunder~) + 3*(W{~}Sed~/2 - outerradius(ND{~}SedLaunder~))/4 * z: tank{~}origin2~ + W{~}Sed~/2*tan(AN{~}SedBottom~) + ElbowRadius(ND{~}SedPipeEntrance~) "y" - specifies axis that object will be rotated about. \\ \\ {float:left|border=2px solid black} [!rotate2a.bmp|width=500px!|AutoCAD Channel Program] Northeast Isometric View {float} *rotate2a* - [Rotate{~}3d~|AutoCAD Basics Rotate] turns the object based on a given axis and degree angle. *rotate2a* \- rotate{~}3d~(p1,sedtankpipe1{~}origin~,"z",sedtankpipe5{~}angle~) sedtankpipe1{~}origin~ = * x: tank{~}origin0~ \- L{~}Sed~ + W{~}Channel~/2 * y: tank{~}origin1~ + W{~}Sed~/2 + outerradius(ND{~}SedLaunder~) + 3*(W{~}Sed~/2 - outerradius(ND{~}SedLaunder~))/4 * z: tank{~}origin2~ + H{~}Sed~ \- H{~}Channel~ p1 = * x: sedtankpipe5{~}origin0~ * y: sedtankpipe5{~}origin1~ + innerD(ND{~}SedPipeEntrance~,EN{~}PipeSpec~)/2 * z: sedtankpipe5{~}origin2~ + innerD(ND{~}SedPipeEntrance~,EN{~}PipeSpec~)/2 "z" - specifies axis that object will be rotated about. *sedtankpipe5{*}{*}{~}angle{~}* = \-(rad/deg) * atan((((5*L{~}Sed~)/8 - W{~}Channel~/2)/ \[3 * (W{~}Sed~/2 - outerradius(ND{~}SedLaunder~))/4) + outerradius(ND{~}SedLaunder~))^\-1^) \\ \\ {float:left|border=2px solid black} [!pipe6 NE.bmp|width=500px!|AutoCAD Channel Program] Northeast Isometric View {float} *pipe6* \- Calls the [Pipe Program|AutoCAD Pipe Program] to create a pipe. pipe6 <\- Pipe(sedtankpipe6{~}origin~,ND{~}SedPipeEntrance~,sedtankpipe6{~}length~,EN{~}PipeSpec~) sedtankpipe6{~}origin~ = * x: tank{~}origin0~ \- L{~}Sed~ + W{~}Channel~/2 + ElbowRadius(ND{~}SedPipeEntrance~) * y: tank{~}origin1~ + W{~}Sed~/2 + outerradius(ND{~}SedLaunder~) + 1*(W{~}Sed~/2 - outerradius(ND{~}SedLaunder~))/4 * z: tank{~}origin2~ + W{~}Sed~/2*tan(AN{~}SedBottom~) + ElbowRadius(ND{~}SedPipeEntrance~) ND{~}SedPipeEntrance~ = Nominal diameter of entrance pipe from the inlet channel to the sedimentation tank. *sedtankpipe6{*}{*}{~}length{~}* = ((L{~}Sed~/8 - W{~}InletChannel~/2)^2^ + (outerradius(ND{~}SedLaunder~) + 1*(W{~}Sed~/2 - outerradius(ND{~}SedLaunder~))/4)^2^)^1/2^ \- 2ElbowRadius(ND{~}SedPipeEntrance~) \\ \\ {float:left|border=2px solid black} [!rotate3 new.bmp|width=500px!|AutoCAD Channel Program] Northeast Isometric View {float} *rotate3* \- [Rotate{~}3d~|AutoCAD Basics Rotate] turns the object based on a given axis and degree angle. rotate3 <\- rotate{~}3d~(p1,sedtankpipe6{~}origin~,"y",90) p1 = * x: sedtankpipe{~}origin0~ + innerD(ND{~}SedPipeEntrance~,EN{~}PipeSpec~)/2 * y: sedtankpipe5{~}origin1~ * z: sedtankpipe5{~}origin0~ sedtankpipe6{~}origin~ = * x: tank{~}origin0~ \- L{~}Sed~ + W{~}Channel~/2 + ElbowRadius(ND{~}SedPipeEntrance~) * y: tank{~}origin1~ + W{~}Sed~/2 + outerradius(ND{~}SedLaunder~) + 1*(W{~}Sed~/2 - outerradius(ND{~}SedLaunder~))/4 * z: tank{~}origin2~ + W{~}Sed~/2*tan(AN{~}SedBottom~) + ElbowRadius(ND{~}SedPipeEntrance~) "y" - specifies axis that object will be rotated about. object will be rotated about. 90 - rotation angle \\ \\ {float:left|border=2px solid black} [!rotate3a.bmp|width=500px!|AutoCAD Channel Program] Northeast Isometric View {float} *rotate3a* \- [Rotate{~}3d~|AutoCAD Basics Rotate] turns the object based on a given axis and degree angle. rotate3a <\- rotate{~}3d~(p1,sedtankpipe2{~}origin~,"z",sedtankpipe6{~}angle~) p1 = * x: sedtankpipe6{~}origin0~ * y: sedtankpipe6{~}origin1~ + innerD(ND{~}SedPipeEntrance~,EN{~}PipeSpec~)/2 * z: sedtankpipe6{~}origin2~ + innerD(ND{~}SedPipeEntrance~,EN{~}PipeSpec~)/2 sedtankpipe2{~}origin~ = * x: sedtankpipe6{~}origin2~ + innerD(ND{~}SedPipeEntrance~,EN{~}PipeSpec~)/2 sedtankpipe2{~}origin~ = * x: tank{~}origin0~ \- L{~}Sed~ + W{~}Channel~/2 * y: tank{~}origin1~ + W{~}Sed~/2 + outerradius(ND{~}SedLaunder~) + 1*(W{~}Sed~/2 - outerradius(ND{~}SedLaunder~))/4 * z: tank{~}origin0~origin2~ \-+ LH{~}Sed~ +\- WH{~}Channel~/2 * y: tank{~}origin1~ + W "z" - specifies axis that object will be rotated about. *sedtankpipe6{*}{*}{~}angle{~}* = \-(rad/deg) * (((L{~}Sed~/28 +- outerradius(NDW{~}SedLaunder~Channel~/2)/ + 1*((W{~}Sed~/2 - outerradius(ND{~}SedLaunder~))/4 * z: tank{~}origin2~ + H) + outerradius(ND{~}Sed~ SedLaunder~))^\- H{~}Channel~ "y" - specifies axis that object will be rotated about. 1^) \\ \\ *pipe7* \- Calls the [Pipe Program|AutoCAD Pipe Program] to create a pipe. pipe7 <\- Pipe(sedtank7{~}origin~,ND{~}SedPipeEntrance~,sedtankpipe7{~}length~,EN{~}PipeSpec~) sedtankpipe7{~}origin~ = * x: tank{~}origin0~ \- L{~}Sed~ + W{~}Channel~/2 + ElbowRadius(ND{~}SedPipeEntrance~) * y: tank{~}origin1~ + W{~}Sed~/2 - outerradius(ND{~}SedLaunder~) - 1*(W{~}Sed~/2 - outerradius(ND{~}SedLaunder~))/4 * z: tank{~}origin2~ + W{~}Sed~/2*tan(AN{~}SedBottom~) + ElbowRadius(ND{~}SedPipeEntrance~) *rotate4* \- [Rotate{~}3d~|AutoCAD Basics Rotate] turns the object based on a given axis and degree angle. rotate4 <\- rotate{~}3d~(p1,sedtankpipe7{~}origin~,"y",90) p1 = * x: sedtankpipe7{~}origin0~ + innerD(ND{~}SedPipeEntrance~,EN{~}PipeSpec~)/2 * y: sedtankpipe7{~}origin1~ * z: sedtankpipe7{~}origin2~ sedtankpipe7{~}origin~ = * x: tank{~}origin0~ \- L{~}Sed~ + W{~}Channel~/2 + ElbowRadius(ND{~}SedPipeEntrance~) * y: tank{~}origin1~ + W{~}Sed~/2 - outerradius(ND{~}SedLaunder~) - 1*(W{~}Sed~/2 - outerradius(ND{~}SedLaunder~))/4 * z: tank{~}origin2~ + W{~}Sed~/2*tan(AN{~}SedBottom~) + ElbowRadius(ND{~}SedPipeEntrance~) "y" - specifies axis that object will be rotated about. *rotate4a* \- [Rotate{~}3d~|AutoCAD Basics Rotate] turns the object based on a given axis and degree angle. rotate4a <\- rotate{~}3d~(p1,sedtankpipe3{~}origin~,"z",sedtankpipe7{~}angle~) p1 = * x: sedtankpipe7{~}origin0~ * y: sedtankpipe7{~}origin1~ + innerD(ND{~}SedPipeEntrance~,EN{~}PipeSpec~)/2 * z: sedtankpipe7{~}origin2~ + innerD(ND{~}SedPipeEntrance~,EN{~}PipeSpec~)/2 sedtankpipe3{~}origin~ = * x: tank{~}origin0~ \- L{~}Sed~ + W{~}Channel~/2 * y: tank{~}origin1~ + W{~}Sed~/2 - outerradius(ND{~}SedLaunder~) - 1*(W{~}Sed~/2 - outerradius(ND{~}SedLaunder~))/4 * z: tank{~}origin2~ + H{~}Sed~ \- H{~}Channel~ "z" - specifies axis that object will be rotated about. *pipe8* \- Calls the [Pipe Program|AutoCAD Pipe Program] to create a pipe. pipe8 <\- Pipe(sedtankpipe8{~}origin~,ND{~}SedPipeEntrance~,sedtankpipe8{~}length~,EN{~}PipeSpec~) sedtankpipe8{~}origin~ = * x: tank{~}origin0~ \- L{~}Sed~ + W{~}Channel~/2 + ElbowRadius(ND{~}SedPipeEntrance~) * y: tank{~}origin1~ + W{~}Sed~/2 - outerradius(ND{~}SedLaunder~) - 3*(W{~}Sed~/2 - outerradius(ND{~}SedLaunder~))/4 * z: tank{~}origin2~ + W{~}Sed~/2*tan(AN{~}SedBottom~) + ElbowRadius(ND{~}SedPipeEntrance~) *rotate5* \- [Rotate{~}3d~|AutoCAD Basics Rotate] turns the object based on a given axis and degree angle. rotate5 <\- rotate{~}3d~(p1,sedtankpipe8{~}origin~,"y",90) p1 = * x: sedtankpipe8{~}origin0~ + innerD(ND{~}SedPipeEntrance~,EN{~}PipeSpec~)/2 * y: sedtankpipe8{~}origin1~ * z: sedtankpipe8{~}origin2~ sedtankpipe8{~}origin~ = * x: tank{~}origin0~ \- L{~}Sed~ + W{~}Channel~/2 + ElbowRadius(ND{~}SedPipeEntrance~) * y: tank{~}origin1~ + W{~}Sed~/2 - outerradius(ND{~}SedLaunder~) - 3*(W{~}Sed~/2 - outerradius(ND{~}SedLaunder~))/4 * z: tank{~}origin2~ + W{~}Sed~/2*tan(AN{~}SedBottom~) + ElbowRadius(ND{~}SedPipeEntrance~) "y" - specifies axis that object will be rotated about. *rotate5a* \- [Rotate{~}3d~|AutoCAD Basics Rotate] turns the object based on a given axis and degree angle. rotate5a <\- rotate{~}3d~(p1,sedtankpipe4{~}origin~,"z",sedtankpipe8{~}angle~) p1 = * x: sedtankpipe8{~}origin0~ * y: sedtankpipe8{~}origin1~ + innerD(ND{~}SedPipeEntrance~,EN{~}PipeSpec~)/2 * z: sedtankpipe8{~}origin2~ + innerD(ND{~}SedPipeEntrance~,EN{~}PipeSpec~)/2 sedtankpipe4{~}origin~ = * x: tank{~}origin0~ \- L{~}Sed~ + W{~}Channel~/2 * y: tank{~}origin1~ + W{~}Sed~/2 - outerradius(ND{~}SedLaunder~) - 3*(W{~}Sed~/2 - outerradius(ND{~}SedLaunder~))/4 * z: tank{~}origin2~ + H{~}Sed~ \- H{~}Channel~ "z" - specifies axis that object will be rotated about. *pipe9* \- Calls the [Pipe Program|AutoCAD Pipe Program] to create a pipe. pipe9 <\- Pipe(sedtankpipe9{~}origin~,ND{~}SedPipeEntrance~,sedtankpipe9{~}length~,EN{~}PipeSpec~) sedtankpipe9{~}origin~ = * x: tank{~}origin0~ \- (7*L{~}Sed~)/8 * y: tank{~}origin1~ + W{~}Sed~/2 * z: tank{~}origin2~ + S{~}SedInlet~ *pipe10* \- Calls the [Pipe Program|AutoCAD Pipe Program] to create a pipe. pipe10 <\- Pipe(sedtankpipe10{~}origin~,ND{~}SedPipeEntrance~,sedtankpipe9{~}length~,EN{~}PipeSpec~) sedtankpipe10{~}origin~ = * x: tank{~}origin0~ \- (5*L{~}Sed~)/8 * y: tank{~}origin1~ + W{~}Sed~/2 * z: tank{~}origin2~ + S{~}SedInlet~ *pipe11* \- Calls the [Pipe Program|AutoCAD Pipe Program] to create a pipe. pipe11 <\- Pipe(sedtankpipe11{~}origin~,ND{~}SedPipeEntrance~,sedtankpipe9{~}length~,EN{~}PipeSpec~) sedtankpipe11{~}origin~ = * x: tank{~}origin0~ \- (3*L{~}Sed~)/8 * y: tank{~}origin1~ + W{~}Sed~/2 * z: tank{~}origin2~ + S{~}SedInlet~ *pipe12* \- Calls the [Pipe Program|AutoCAD Pipe Program] to create a pipe. pipe12 <\- Pipe(sedtankpipe12{~}origin~,ND{~}SedPipeEntrance~,sedtankpipe9{~}length~,EN{~}PipeSpec~) sedtankpipe12{~}origin~ = * x: tank{~}origin0~ \- (L{~}Sed~)/8 * y: tank{~}origin1~ + W{~}Sed~/2 * z: tank{~}origin2~ + S{~}SedInlet~ *layerfreeze2* \- [Layer{~}freeze~|AutoCAD Basics Layer] locks the layer "pipe" so that it cannot be edited. layerfreeze2 <\- layer{~}freeze~("pipe") *cylinder5* \- [CylinderA|AutoCAD Basics Cylinders] creates a cylinder based on three dimensions. cylinder5 <\- cylinderA(sedtankpipe14{~}origin~,outerradius(ND{~}SedLaunder~),-T{~}PlantWall~) sedtankpipe14{~}origin~ = * x: tank{~}origin0~ \- L{~}Sed~ * y: tank{~}origin1~ + W{~}Sed~/2 * z: tank{~}origin2~ + H{~}Sed~ \- H{~}Channel~ \- T{~}Mp~ *rotate2* \- [Rotate{~}3d~|AutoCAD Basics Rotate] turns the object based on a given axis and degree angle. rotate2 <\- rotae{~}3d~(p1,sedtankpipe14{~}origin~,"y",90) p1 = * x: sedtankpipe14{~}origin0~ + outerradius(ND{~}SedLaunder~) * y: sedtankpipe14{~}origin1~ * z: sedtankpipe14{~}origin2~ sedtankpipe14{~}origin~ = * x: tank{~}origin0~ \- L{~}Sed~ * y: tank{~}origin1~ + W{~}Sed~/2 * z: tank{~}origin2~ + H{~}Sed~ \- H{~}Channel~ \- T{~}Mp~ "y" - specifies axis that object will be rotated about. *subtract2* \- [SubtractD|AutoCAD Basics Subtractions] subtracts a selected object based on two specified points. subtract2 <\- subtractD(Plant{~}Origin~,p1) p1 = * x: sedtankpipe14{~}origin0~ * y: sedtankpipe14{~}origin1~ + outerradius(ND{~}SedLaunder~) * z: sedtankpipe14{~}origin2~ *holes1* \- holes1 <\- concat(cylinder5,rotate2) *layerthawp* \- [Layer{~}thaw~|AutoCAD Basics Layer] unlocks the layer "pipe" so that it can be edited. layerthawp <-layer{~}thaw~("pipe") *layersetp* \- [Layer{~}set~|AutoCAD Basics Layer] selects the layer "pipe". layersetp <\- layer{~}set~("pipe") *pipe13* \- Calls the [Pipe Program|AutoCAD Pipe Program] to create a pipe. pipe13 <\- Pipe(sedtankpipe13{~}origin~,ND{~}SedLaunder~,sedtankpipe13{~}length~,EN{~}PipeSpec~) sedtankpipe13{~}origin~ = * x: tank{~}origin0~ \- L{~}Sed~ + W{~}Channel~ + T{~}ChannelWall~ + ElbowRadius(ND{~}SedLaunder~) * y: tank{~}origin1~ + W{~}Sed~/2 * z: tank{~}origin2~ + H{~}Sed~ \- H{~}Channel~ \- T{~}Mp~ + ElbowRadius(ND{~}SedLaunder~) *pipe14* \- Calls the [Pipe Program|AutoCAD Pipe Program] to create a pipe. pipe14 <\- Pipe(sedtankpipe14{~}origin~,ND{~}SedLaunder~,sedtankpipe14{~}length~,EN{~}PipeSpec~) sedtankpipe14{~}origin~ = * x: tank{~}origin0~ \- L{~}Sed~ * y: tank{~}origin1~ + W{~}Sed~/2 * z: tank{~}origin2~ + H{~}Sed~ \- H{~}Channel~ \- T{~}Mp~ *rotate6* \- [Rotate{~}3d~|AutoCAD Basics Rotate] turns the object based on a given axis and degree angle. rotate6 <\- rotate{~}3d~(p1,sedtankpipe14{~}origin~,"y",90) p1 = * x: sedtankpipe14{~}origin0~ + innerD(ND{~}SedLaunder~,EN{~}PipeSpec~)/2 * y: sedtankpipe14{~}origin1~ * z: sedtankpipe14{~}origin2~ sedtankpipe14{~}origin~ = * x: tank{~}origin0~ \- L{~}Sed~ * y: tank{~}origin1~ + W{~}Sed~/2 * z: tank{~}origin2~ + H{~}Sed~ \- H{~}Channel~ \- T{~}Mp~ "y" - specifies axis that object will be rotated about. *layerfreeze3* \- [Layer{~}freeze~|AutoCAD Basics Layer] locks the layer "channel" so that it cannot be edited. layerfreeze3 <\- layer{~}freeze~("pipe") |
Page History
Overview
Content Tools