Versions Compared

Key

  • This line was added.
  • This line was removed.
  • Formatting was changed.
Wiki Markup
h1. Inlet Pipe Drawing Script - layout 1

...

viewtops -

viewtops <- viewtop1

layerthawc -

...



*viewtops* \-

viewtops <\- viewtop1

*layerthawc* \-

layerthawc <\- layer{~}thaw~("channel")

...

layersetc -

...



*layersetc* \-

layersetc <\- layer{~}set~("channel")

...

cylinder1 -

cylinder1 <- cylinderA(sedtankpipe1origin,outerradius(NDSedPipeEntrance),-TChannelWall)

cylinder2 -

cylinder2 <- cylinderA(sedtankpipe2origin,outerradius(NDSedPipeEntrance),-TChannelWall)

cylinder3 -

cylinder3 <- cylinderC(sedtankpipe3origin,outerradius(NDSedPipeEntrance),-TChannelWall)

cylinder4 -

cylinder4 <- cylinderA(sedtankpipe4origin,outerradius(NDSedPipeEntrance),-TChannelWall)

subtract1 -

subtract1 <- subtractH(channelorigin,p1,p2)

p1 =

  • x: sedtankpipe1origin0 + outerradius(NDSedPipeEntrance)
  • y: sedtankpipe1origin1 + outerradius(NDSedPipeEntrance)
  • z: sedtankpipe1origin2

p2 =

  • x: sedtankpipe4origin0 - outerradius(NDSedPipeEntrance)
  • y: sedtankpipe4origin1 - outerradius(NDSedPipeEntrance)
  • z: sedtankpipe4origin2

holes2 -

...


{float:left|border=2px solid black}
[!cylinder1.bmp|width=500px!|AutoCAD Channel Program]
Northeast Isometric View
{float}
*cylinder1* \-

cylinder1 <\- cylinderA(sedtankpipe1{~}origin~,outerradius(ND{~}SedPipeEntrance~),-T{~}ChannelWall~)
\\
\\
{float:left|border=2px solid black}
[!cylinder2.bmp|width=500px!|AutoCAD Channel Program]
Northeast Isometric View
{float}
*cylinder2* \-

cylinder2 <\- cylinderA(sedtankpipe2{~}origin~,outerradius(ND{~}SedPipeEntrance~),-T{~}ChannelWall~)
\\
\\
*cylinder3* \-

cylinder3 <\- cylinderC(sedtankpipe3{~}origin~,outerradius(ND{~}SedPipeEntrance~),-T{~}ChannelWall~)

*cylinder4* \-

cylinder4 <\- cylinderA(sedtankpipe4{~}origin~,outerradius(ND{~}SedPipeEntrance~),-T{~}ChannelWall~)

*subtract1* \-

subtract1 <\- subtractH(channel{~}origin~,p1,p2)

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* \-

holes3 <\- concat(cylinder4,subtract1)

...

layerset -

...



*layerset* \-

layerset <\- layer{~}set~("0")

...

layerfreeze -

...



*layerfreeze* \-

layerfreeze <\- layer{~}freeze~("channel")

...

layer3 -

...



*layer3* \-

layer3 <\- layer{~}new~("pipe",blue)

...

pipe1 -

...



*pipe1* \-

pipe1 <\- Pipe(sedtankpipe1

...

{~}origin~,ND

...

{~}SedPipeEntrance~,-sedtankpipe1

...

{~}length~,EN

...

pipe2 -

pipe2 <- Pipe(sedtankpipe2origin,NDSedPipeEntrance,-sedtankpipe1length,ENPipeSpec)

pipe3 -

pipe3 <- Pipe(sedtankpipe3origin,NDSedPipeEntrance,-sedtankpipe1length,ENPipeSpec)

pipe4 -

pipe4 <- Pipe(sedtankpipe4origin,NDSedPipeEntrance,-sedtankpipe1length,ENPipeSpec)

pipe5 -

pipe5 <- Pipe(sedtankpipe5origin,NDSedPipeEntrance,-sedtankpipe5length,ENPipeSpec)

rotatepipe5 -

...

{~}PipeSpec~)

*pipe2* \-

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 <\- Pipe(sedtankpipe5{~}origin~,ND{~}SedPipeEntrance~,-sedtankpipe5{~}length~,EN{~}PipeSpec~)

*rotatepipe5* \-

rotatepipe5 <\- rotate{~}3d~(p1,sedtankpipe5{~}origin~,"y",90)

...



p1 =

...


* x: sedtankpipe5

...

{~}origin0~ + innerD(ND

...

{~}SedPipeEntrance~,EN

...

{~}PipeSpec~)/2

...


* y:

...

 sedtankpipe5{~}origin1~
* z:

...

 sedtankpipe5{~}origin2~

*rotate2a* \- rotate{~}3d~(p1,sedtankpipe1

...

{~}origin~,"z",sedtankpipe5

...

p1 =

  • x: sedtankpipe5origin0
  • y: sedtankpipe5origin1 + innerD(NDSedPipeEntrance,ENPipeSpec)/2
  • z: sedtankpipe5origin2 + innerD(NDSedPipeEntrance,ENPipeSpec)/2

pipe6 -

pipe6 <- Pipe(sedtankpipe6origin,NDSedPipeEntrance,sedtankpipe6length,ENPipeSpec)

rotate3 -

...

{~}angle~)

p1 =
* x: sedtankpipe5{~}origin0~
* y: sedtankpipe5{~}origin1~ + innerD(ND{~}SedPipeEntrance~,EN{~}PipeSpec~)/2
* z: sedtankpipe5{~}origin2~ + innerD(ND{~}SedPipeEntrance~,EN{~}PipeSpec~)/2

*pipe6* \-

pipe6 <\- Pipe(sedtankpipe6{~}origin~,ND{~}SedPipeEntrance~,sedtankpipe6{~}length~,EN{~}PipeSpec~)

*rotate3* \-

rotate3 <\- rotate{~}3d~(p1,sedtankpipe6{~}origin~,"y",90)

...



p1 =

...


* x: sedtankpipe

...

{~}origin0~ + innerD(ND

...

{~}SedPipeEntrance~,EN

...

{~}PipeSpec~)/2

...


* y:

...

 sedtankpipe5{~}origin1~
* z:

...

rotate3a -

...

 sedtankpipe5{~}origin0~

*rotate3a* \-

rotate3a <\- rotate{~}3d~(p1,sedtankpipe2

...

{~}origin~,"z",sedtankpipe6

...

p1 =

  • x: sedtankpipe6origin0
  • y: sedtankpipe6origin1 + innerD(NDSedPipeEntrance,ENPipeSpec)/2
  • z: sedtankpipe6origin2 + innerD(NDSedPipeEntrance,ENPipeSpec)/2

pipe7 -

pipe7 <- Pipe(sedtank7origin,NDSedPipeEntrance,sedtankpipe7length,ENPipeSpec)

rotate4 -

...

{~}angle~)

p1 =
* x: sedtankpipe6{~}origin0~
* y: sedtankpipe6{~}origin1~ + innerD(ND{~}SedPipeEntrance~,EN{~}PipeSpec~)/2
* z: sedtankpipe6{~}origin2~ + innerD(ND{~}SedPipeEntrance~,EN{~}PipeSpec~)/2

*pipe7* \-

pipe7 <\- Pipe(sedtank7{~}origin~,ND{~}SedPipeEntrance~,sedtankpipe7{~}length~,EN{~}PipeSpec~)

*rotate4* \-

rotate4 <\- rotate{~}3d~(p1,sedtankpipe7{~}origin~,"y",90)

...



p1 =

...


* x: sedtankpipe7

...

{~}origin0~ + innerD(ND

...

{~}SedPipeEntrance~,EN

...

{~}PipeSpec~)/2

...


* y:

...

 sedtankpipe7{~}origin1~
* z:

...

rotate4a -

...

 sedtankpipe7{~}origin2~

*rotate4a* \-

rotate4a <\- rotate{~}3d~(p1,sedtankpipe3

...

{~}origin~,"z",sedtankpipe7

...

{~}angle~)
* x:

...

 sedtankpipe7{~}origin0~
* y: sedtankpipe7

...

{~}origin1~ + innerD(ND

...

{~}SedPipeEntrance~,EN

...

{~}PipeSpec~)/2

...


* z: sedtankpipe7

...

{~}origin2~ + innerD(ND

...

{~}SedPipeEntrance~,EN

...

{~}PipeSpec~)/2

...

pipe8 -

...



*pipe8* \-

pipe8 <\- Pipe(sedtankpipe8

...

{~}origin~,ND

...

{~}SedPipeEntrance~,sedtankpipe8

...

{~}length~,EN

...

rotate5 -

...

{~}PipeSpec~)

*rotate5* \-

rotate5 <\- rotate{~}3d~(p1,sedtankpipe8

...

{~}origin~,"y",90)

...



p1 =

...


* x: sedtankpipe8

...

{~}origin0~ + innerD(ND

...

{~}SedPipeEntrance~,EN

...

{~}PipeSpec~)/2

...


* y:

...

 sedtankpipe8{~}origin1~
* z:

...

rotate5a -

...

 sedtankpipe8{~}origin2~

*rotate5a* \-

rotate5a <\- rotate{~}3d~(p1,sedtankpipe4

...

{~}origin~,"z",sedtankpipe8

...

p1 =

  • x: sedtankpipe8origin0
  • y: sedtankpipe8origin1 + innerD(NDSedPipeEntrance,ENPipeSpec)/2
  • z: sedtankpipe8origin2 + innerD(NDSedPipeEntrance,ENPipeSpec)/2

pipe9 -

pipe9 <- Pipe(sedtankpipe9origin,NDSedPipeEntrance,sedtankpipe9length,ENPipeSpec)

pipe10 -

pipe10 <- Pipe(sedtankpipe10origin,NDSedPipeEntrance,sedtankpipe9length,ENPipeSpec)

pipe11 -

pipe11 <- Pipe(sedtankpipe11origin,NDSedPipeEntrance,sedtankpipe9length,ENPipeSpec)

pipe12 -

pipe12 <- Pipe(sedtankpipe12origin,NDSedPipeEntrance,sedtankpipe9length,ENPipeSpec)

layerfreeze2 -

layerfreeze2 <- layerfreeze("pipe")

cylinder5 -

cylinder5 <- cylinderA(sedtankpipe14origin,outerradius(NDSedLaunder),-TPlantWall)

rotate2 -

...

{~}angle~)

p1 =
* x: sedtankpipe8{~}origin0~
* y: sedtankpipe8{~}origin1~ + innerD(ND{~}SedPipeEntrance~,EN{~}PipeSpec~)/2
* z: sedtankpipe8{~}origin2~ + innerD(ND{~}SedPipeEntrance~,EN{~}PipeSpec~)/2

*pipe9* \-

pipe9 <\- Pipe(sedtankpipe9{~}origin~,ND{~}SedPipeEntrance~,sedtankpipe9{~}length~,EN{~}PipeSpec~)

*pipe10* \-

pipe10 <\- Pipe(sedtankpipe10{~}origin~,ND{~}SedPipeEntrance~,sedtankpipe9{~}length~,EN{~}PipeSpec~)

*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:

...

subtract2 -

subtract2 <- subtractD(PlantOrigin,p1)

p1 =

  • x: sedtankpipe14origin0
  • y: sedtankpipe14origin1 + outerradius(NDSedLaunder)
  • z: sedtankpipe14origin2

holes1 -

...

 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* \-

layerthawp <-layer

...

{~}thaw~("pipe")

...

layersetp -

...



*layersetp* \-

layersetp <\- layer{~}set~("pipe")

...

pipe13 -

...



*pipe13* \-

pipe13 <\- Pipe(sedtankpipe13

...

{~}origin~,ND

...

{~}SedLaunder~,sedtankpipe13

...

{~}length~,EN

...

pipe14 -

pipe14 <- Pipe(sedtankpipe14origin,NDSedLaunder,sedtankpipe14length,ENPipeSpec)

...

{~}PipeSpec~)

*pipe14* \-

pipe14 <\- Pipe(sedtankpipe14{~}origin~,ND{~}SedLaunder~,sedtankpipe14{~}length~,EN{~}PipeSpec~)

*rotate6* \- rotate{~}3d~(p1,sedtankpipe14{~}origin~,"y",90)

...



p1 =

...


* x: sedtankpipe14

...

{~}origin0~ + innerD(ND

...

{~}SedLaunder~,EN

...

{~}PipeSpec~)/2

...


* y:

...

 sedtankpipe14{~}origin1~
* z:

...

layerfreeze3 -

...

 sedtankpipe14{~}origin2~

*layerfreeze3* \-

layerfreeze3 <\- layer{~}freeze~("pipe")