h1. Inlet Pipe Drawing Script - layout 1
*viewtops* \- Adjust workspace so that the object is being viewed from the top.
viewtops <\- viewtop1
*layerthawc* \-
layerthawc <\- layer [Layer{~}thaw~(|AutoCAD Basics Layer] unlocks the layer "channel")
*layersetc* \-
layersetc so that it can be edited.
layerthawc <\- layer{~}set~thaw~("channel")
{float:left|border=2px solid black}
[!cylinder1.bmp|width=500px!|AutoCAD Channel Program]
Northeast Isometric View
{float}
*cylinder1* \-
cylinder1
*layersetc* \- [Layer{~}set~|AutoCAD Basics Layer] selects the layer "channel".
layersetc <\- cylinderA(sedtankpipe1layer{~}origin~,outerradius(ND{~}SedPipeEntrance~),-T{~}ChannelWall~)
\\
\\set~("channel")
{float:left|border=2px solid black}
[!cylinder2cylinder1.bmp|width=500px!|AutoCAD Channel Program]
Northeast Isometric View
{float}
*cylinder2cylinder1* \- [CylinderA|AutoCAD Basics Cylinders] creates a cylinder based on three dimensions.
cylinder2cylinder1 <\- cylinderA(sedtankpipe2sedtankpipe1{~}origin~,outerradius(ND{~}SedPipeEntrance~),-T{~}ChannelWall~)
\\
\\
{float:left|border=2px solid black}
[!cylinder3cylinder2.bmp|width=500px!|AutoCAD Channel Program]
Northeast Isometric View
{float}
*cylinder3cylinder2* \-
cylinder3 <\- cylinderC(sedtankpipe3{~}origin~ [CylinderA|AutoCAD Basics Cylinders] creates a cylinder based on three dimensions.
cylinder2 <\- cylinderA(sedtankpipe2{~}origin~,outerradius(ND{~}SedPipeEntrance~),-T{~}ChannelWall~)
\\
\\
{float:left|border=2px solid black}
[!cylinder4cylinder3.bmp|width=500px!|AutoCAD Channel Program]
Northeast Isometric View
{float}
*cylinder4cylinder3* \- [CylinderC|AutoCAD Basics Cylinders] creates a cylinder based on three dimensions.
cylinder4cylinder3 <\- cylinderAcylinderC(sedtankpipe4sedtankpipe3{~}origin~,outerradius(ND{~}SedPipeEntrance~),-T{~}ChannelWall~)
\\
\\
*subtract1* \-
subtract1 <\- subtractH(channel{~}origin~,p1,p2)
p1 =
* x: sedtankpipe1{~}origin0~ + {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~)
* y: sedtankpipe1,-T{~}origin1~ + outerradius(ND{~}SedPipeEntrance~)
* z: sedtankpipe1{~}origin2~
p2 =
* x: sedtankpipe4{~}origin0~ \- outerradius(ND{~}SedPipeEntrance~)
* y: sedtankpipe4{~}origin1~ \-ChannelWall~)
\\
\\
*subtract1* \- [SubtractH|AutoCAD Basics Subtractions] subtracts a selected object based on three specified points.
subtract1 <\- subtractH(channel{~}origin~,p1,p2)
p1 =
* x: sedtankpipe1{~}origin0~ + outerradius(ND{~}SedPipeEntrance~)
* zy: sedtankpipe4sedtankpipe1{~}origin2~
*holes2* \-
holes2 <\- concat(cylinder1,cylinder2,cylinder3)
*holes3* \-
holes3 <\- concat(cylinder4,subtract1)
*layerset* \-
layerset <\- layer{~}set~("0")
*layerfreeze* \-
layerfreeze <\- layer{~}freeze~("channel")
*layer3origin1~ + outerradius(ND{~}SedPipeEntrance~)
* z: sedtankpipe1{~}origin2~
p2 =
* x: sedtankpipe4{~}origin0~ \- outerradius(ND{~}SedPipeEntrance~)
* y: sedtankpipe4{~}origin1~ \- outerradius(ND{~}SedPipeEntrance~)
* z: sedtankpipe4{~}origin2~
*holes2* \-
layer3holes2 <\- layer{~}new~("pipe",blueconcat(cylinder1,cylinder2,cylinder3)
*pipe1holes3* \-
pipe1holes3 <\- Pipe(sedtankpipe1{~}origin~,ND{~}SedPipeEntrance~,-sedtankpipe1{~}length~,EN{~}PipeSpec~concat(cylinder4,subtract1)
*pipe2layerset* \-
pipe2 <\- Pipe(sedtankpipe2{~}origin~,ND{~}SedPipeEntrance~,-sedtankpipe1{~}length~,EN{~}PipeSpec~)
*pipe3* \-
pipe3 <\- Pipe(sedtankpipe3{~}origin~,ND{~}SedPipeEntrance~,-sedtankpipe1{~}length~,EN{~}PipeSpec~)
*pipe4* \-
pipe4 <\- Pipe(sedtankpipe4{~}origin~,ND{~}SedPipeEntrance~,-sedtankpipe1{~}length~,EN{~}PipeSpec~)
*pipe5* \-
pipe5 [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)
*pipe1* \- Calls the [Pipe Program|AutoCAD Pipe Program] to create a pipe.
pipe1 <\- Pipe(sedtankpipe5sedtankpipe1{~}origin~,ND{~}SedPipeEntrance~,-sedtankpipe5sedtankpipe1{~}length~,EN{~}PipeSpec~)
*rotatepipe5pipe2* \-
rotatepipe5 Calls the [Pipe Program|AutoCAD Pipe Program] to create a pipe.
pipe2 <\- rotatePipe(sedtankpipe2{~}3d~(p1origin~,sedtankpipe5ND{~}origin~,"y",90)
p1 =
* x: sedtankpipe5{~}origin0~ + innerD(SedPipeEntrance~,-sedtankpipe1{~}length~,EN{~}PipeSpec~)
*pipe3* \- Calls the [Pipe Program|AutoCAD Pipe Program] to create a pipe.
pipe3 <\- Pipe(sedtankpipe3{~}origin~,ND{~}SedPipeEntrance~,-sedtankpipe1{~}length~,EN{~}PipeSpec~)/2
*pipe4* y: sedtankpipe5{~}origin1~
* z: sedtankpipe5{~}origin2~
*rotate2a* \- rotate{~}3d~(p1,sedtankpipe1{~}origin~,"z",sedtankpipe5{~}angle~)
p1 =
* x: sedtankpipe5{~}origin0~
* y: sedtankpipe5{~}origin1~ + innerD(ND{~}SedPipeEntrance~,EN{~}PipeSpec~)/2
* z: sedtankpipe5{~}origin2~ + innerD(ND{~}SedPipeEntrance~ \- Calls the [Pipe Program|AutoCAD Pipe Program] to create a pipe.
pipe4 <\- Pipe(sedtankpipe4{~}origin~,ND{~}SedPipeEntrance~,-sedtankpipe1{~}length~,EN{~}PipeSpec~)
*pipe5* \- Calls the [Pipe Program|AutoCAD Pipe Program] to create a pipe.
pipe5 <\- Pipe(sedtankpipe5{~}origin~,ND{~}SedPipeEntrance~,-sedtankpipe5{~}length~,EN{~}PipeSpec~)/2
*pipe6rotatepipe5* \-
pipe6 <\- Pipe(sedtankpipe6{~}origin~,ND{~}SedPipeEntrance~,sedtankpipe6{~}length~,EN{~}PipeSpec~)
*rotate3* \-
rotate3 <\- rotate{~}3d~(p1,sedtankpipe6{~}origin~," [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: sedtankpipesedtankpipe5{~}origin0~ + innerD(ND{~}SedPipeEntrance~,EN{~}PipeSpec~)/2
* y: sedtankpipe5{~}origin1~
* z: sedtankpipe5{~}origin0~origin2~
*rotate3a* \-
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~"y" - specifies axis that object will be rotated about.
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~)
p1 =
* x: sedtankpipe5{~}origin0~
* y: sedtankpipe5{~}origin1~ + innerD(ND{~}SedPipeEntrance~,EN{~}PipeSpec~)/2
*pipe7* \-
pipe7 <\- Pipe(sedtank7{~}origin~, z: sedtankpipe5{~}origin2~ + innerD(ND{~}SedPipeEntrance~,sedtankpipe7{~}length~,EN{~}PipeSpec~)/2
*rotate4"z" - specifies axis that object will be rotated about.
*pipe6* \- Calls the [Pipe Program|AutoCAD Pipe Program] to create a pipe.
rotate4pipe6 <\- rotate{~}3d~(p1,sedtankpipe7Pipe(sedtankpipe6{~}origin~,"y",90)
p1 =
* x: sedtankpipe7ND{~}origin0~ + innerD(NDSedPipeEntrance~,sedtankpipe6{~}SedPipeEntrance~length~,EN{~}PipeSpec~)/2
*rotate3* y: sedtankpipe7\- [Rotate{~}origin1~
* z: sedtankpipe7{~}origin2~
*rotate4a* \-
rotate4a3d~|AutoCAD Basics Rotate] turns the object based on a given axis and degree angle.
rotate3 <\- rotate{~}3d~(p1,sedtankpipe3sedtankpipe6{~}origin~,"zy",sedtankpipe7{~}angle~90)
p1 =
* x: sedtankpipe7sedtankpipe{~}origin0~
* y: sedtankpipe7{~}origin1~ + innerD(ND{~}SedPipeEntrance~,EN{~}PipeSpec~)/2
* zy: sedtankpipe7sedtankpipe5{~}origin2~ + innerD(NDorigin1~
* z: sedtankpipe5{~}SedPipeEntrance~,EN{~}PipeSpec~)/2
*pipe8* \-
pipe8 <\- Pipe(sedtankpipe8{~}origin~,ND{~}SedPipeEntrance~,sedtankpipe8{~}length~,EN{~}PipeSpec~)
*rotate5* \-
rotate5 <\- rotate{~}3d~(p1,sedtankpipe8{~}origin~,"y",90origin0~
"y" - specifies axis that object will be rotated about.
*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: sedtankpipe8sedtankpipe6{~}origin0~ +
* y: sedtankpipe6{~}origin1~ + innerD(ND{~}SedPipeEntrance~,EN{~}PipeSpec~)/2
* y: sedtankpipe8{~}origin1~
* z: sedtankpipe8sedtankpipe6{~}origin2~
*rotate5a* \-
rotate5a <\- rotate + innerD(ND{~}3d~(p1SedPipeEntrance~,sedtankpipe4EN{~}origin~,"z",sedtankpipe8{~}angle~)
p1 =
* x: sedtankpipe8{~}origin0~
* y: sedtankpipe8{~}origin1~ + innerD(ND{~}SedPipeEntrance~PipeSpec~)/2
"y" - specifies axis that object will be rotated about.
*pipe7* \- Calls the [Pipe Program|AutoCAD Pipe Program] to create a pipe.
pipe7 <\- Pipe(sedtank7{~}origin~,ND{~}SedPipeEntrance~,sedtankpipe7{~}length~,EN{~}PipeSpec~)/2
*rotate4* z: sedtankpipe8\- [Rotate{~}origin2~ + innerD(ND{~}SedPipeEntrance~,EN{~}PipeSpec~)/2
*pipe9* \-
pipe93d~|AutoCAD Basics Rotate] turns the object based on a given axis and degree angle.
rotate4 <\- Pipe(sedtankpipe9rotate{~}origin~3d~(p1,NDsedtankpipe7{~}SedPipeEntrance~,sedtankpipe9{~}length~,EN{~}PipeSpec~origin~,"y",90)
*pipe10* \-
pipe10 <\- Pipe(sedtankpipe10{~}origin~,p1 =
* x: sedtankpipe7{~}origin0~ + innerD(ND{~}SedPipeEntrance~,sedtankpipe9{~}length~,EN{~}PipeSpec~)/2
*pipe11* \-
pipe11 <\- Pipe(sedtankpipe11{~}origin~,ND{~}SedPipeEntrance~,sedtankpipe9{~}length~,EN{~}PipeSpec~)
*pipe12* \-
pipe12 <\- Pipe(sedtankpipe12{~}origin~,ND{~}SedPipeEntrance~,sedtankpipe9{~}length~,EN{~}PipeSpec~)
*layerfreeze2* \-
layerfreeze2 <\- layer{~}freeze~("pipe")
*cylinder5* \-
cylinder5 <\- cylinderA(sedtankpipe14{~}origin~,outerradius(ND{~}SedLaunder~),-T{~}PlantWall~)
*rotate2* \-
rotate2 <\- rotae{~}3d~(p1,sedtankpipe14{~}origin~,"y",90)
p1 =
* x: sedtankpipe14{~}origin0~ + outerradius(ND{~}SedLaunder~)
* y: sedtankpipe14{~}origin1~
* z: sedtankpipe14{~}origin2~
*subtract2* \-
subtract2 <\- subtractD(Plant{~}Origin~,p1)
p1 =
* x: sedtankpipe14{~}origin0~
* y: sedtankpipe14{~}origin1~ + outerradius(ND{~}SedLaunder~)
* z: sedtankpipe14{~}origin2~
*holes1* \-
holes1 <\- concat(cylinder5,rotate2)
*layerthawp* \-
layerthawp <-layer{~}thaw~("pipe")
*layersetp* \-
layersetp <\- layer{~}set~("pipe")
*pipe13* \-
pipe13 <\- Pipe(sedtankpipe13 y: sedtankpipe7{~}origin1~
* z: sedtankpipe7{~}origin2~
"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
"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~)
*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~
"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
"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~)
*pipe10* \- Calls the [Pipe Program|AutoCAD Pipe Program] to create a pipe.
pipe10 <\- Pipe(sedtankpipe10{~}origin~,ND{~}SedPipeEntrance~,sedtankpipe9{~}length~,EN{~}PipeSpec~)
*pipe11* \- Calls the [Pipe Program|AutoCAD Pipe Program] to create a pipe.
pipe11 <\- Pipe(sedtankpipe11{~}origin~,ND{~}SedPipeEntrance~,sedtankpipe9{~}length~,EN{~}PipeSpec~)
*pipe12* \- Calls the [Pipe Program|AutoCAD Pipe Program] to create a pipe.
pipe12 <\- Pipe(sedtankpipe12{~}origin~,ND{~}SedPipeEntrance~,sedtankpipe9{~}length~,EN{~}PipeSpec~)
*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~)
*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~
"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~)
*pipe14* \- Calls the [Pipe Program|AutoCAD Pipe Program] to create a pipe.
pipe14 <\- Pipe(sedtankpipe14{~}origin~,ND{~}SedLaunder~,sedtankpipe13sedtankpipe14{~}length~,EN{~}PipeSpec~)
*pipe14rotate6* \-
pipe14 <\- Pipe(sedtankpipe14{~}origin~,ND{~}SedLaunder~,sedtankpipe14{~}length~,EN{~}PipeSpec~)
*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{~}origin1~
* z: sedtankpipe14{~}origin2~
"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") |
