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") |