Sedechanneltankscript
| Wiki Markup |
|---|
h1. Sedechanneltankscript {float:left|border=2px solid black} [!echannel.bmp|width=450px!|AutoCAD Channel Program] NorthEast Isometric View {float} \\ \\ *viewtope* \- Rotates workspace so that object is being viewed from the top. viewtope <\- viewtop1 *layernewect* \- [Layer{~}new~|AutoCAD Basics Layer] creates a new light grey layer, "echanneltank." layernewext <-layer{~}new~ |
viewtope - Rotates workspace so that object is being viewed from the top.
viewtope <- viewtop1
layernewect - Layernew creates a new light grey layer, "echanneltank."
layernewext <-layernew("echanneltank",ltgrey)
| Wiki Markup |
|---|
{float:left|border=2px solid black} [!tank1.bmp|width=450px300px!|AutoCAD Channel Program] Top View {float} * |
tankect
...
-
...
Calls
...
the
...
...
...
to
...
draw
...
a
...
tank.
...
tankect
...
<-Tank(echanneltank
...
origin,echanneltank
...
dim,TPlantWall)
echannelorigin =
- if layout1:
- x: 0
- y: 0
- z: 0
- if layout2:
- x: tankorigin0
- y: tankorigin1 - TPlantWall
- z: tankorigin2 + HSed - HEChannel
- if layout3:
- x: tankorigin0 - LSed + WChannel + TChannelWall + WEChannel
- y: tankorigin1 - TPlantWall
- z: tankorigin2 + HSed - HEChannel
- if layout4:
- x: tankorigin0 - LSed + WChannelInlet + TChannelWall + WEChannel
- y: tankorigin1 - TPlantWall
- z: tankorigin2 + HSed - HEChannel
echannelboxdim =
- x: WEChannel
- y: NSedTanks(WSed~ + TPlantWall)
- z: HEChannel
TPlantWall = Thickness of tank wall of sed tank and floc tank.
| Wiki Markup |
|---|
{~}PlantWall~) echannel{~}origin~ = * if layout1: ** x: 0 ** y: 0 ** z: 0 * if layout2: ** x: tank{~}origin0~ ** y: tank{~}origin1~ \- T{~}PlantWall~ ** z: tank{~}origin2~ + H{~}Sed~ \- H{~}EChannel~ * if layout3: ** x: tank{~}origin0~ \- L{~}Sed~ + W{~}Channel~ + T{~}ChannelWall~ + W{~}EChannel~ ** y: tank{~}origin1~ \- T{~}PlantWall~ ** z: tank{~}origin2~ + H{~}Sed~ \- H{~}EChannel~ * if layout4: ** x: tank{~}origin0~ \- L{~}Sed~ + W{~}ChannelInlet~ + T{~}ChannelWall~ + W{~}EChannel~ ** y: tank{~}origin1~ \- T{~}PlantWall~ ** z: tank{~}origin2~ + H{~}Sed~ \- H{~}EChannel~ echannelbox{~}dim~ = * x: W{~}EChannel~ * y: N{~}SedTanks(W{~}Sed\~ + T{~}PlantWall~) * z: H{~}EChannel~ T{~}PlantWall~ = Thickness of tank wall of sed tank and floc tank. \\ \\ {float:left|border=2px solid black} [!box1.bmp|width=350px300px!|AutoCAD Channel Program] Top View {float} |
| Wiki Markup |
|---|
{float:left|border=2px solid black} [!box1 NE.bmp|width=350px300px!|AutoCAD Channel Program] Top View {float} * |
boxect
...
-
...
Creates
...
a
...
...
based
...
on
...
two
...
points.
...
boxect
...
<-box(echanneltank
...
origin,echanneltank
...
origin +
...
echannelboxdim)
echannelorigin =
- if layout1:
- x: 0
- y: 0
- z: 0
- if layout2:
- x: tankorigin0
- y: tankorigin1 - TPlantWall
- z: tankorigin2 + HSed - HEChannel
- if layout3:
- x: tankorigin0 - LSed + WChannel + TChannelWall + WEChannel
- y: tankorigin1 - TPlantWall
- z: tankorigin2 + HSed - HEChannel
- if layout4:
- x: tankorigin0 - LSed + WChannelInlet + TChannelWall + WEChannel
- y: tankorigin1 - TPlantWall
echannelboxdim =
- x: WEChannel
- y: NSedTanks(WSed~ + TPlantWall)
- z: HEChannel
bigunion - UnionallA selects all the objects visible in the workspace and joins them all into a single object.
bigunion <-unionallA
| Wiki Markup |
|---|
{~}dim~) echannel{~}origin~ = * if layout1: ** x: 0 ** y: 0 ** z: 0 * if layout2: ** x: tank{~}origin0~ ** y: tank{~}origin1~ \- T{~}PlantWall~ ** z: tank{~}origin2~ + H{~}Sed~ \- H{~}EChannel~ * if layout3: ** x: tank{~}origin0~ \- L{~}Sed~ + W{~}Channel~ + T{~}ChannelWall~ + W{~}EChannel~ ** y: tank{~}origin1~ \- T{~}PlantWall~ ** z: tank{~}origin2~ + H{~}Sed~ \- H{~}EChannel~ * if layout4: ** x: tank{~}origin0~ \- L{~}Sed~ + W{~}ChannelInlet~ + T{~}ChannelWall~ + W{~}EChannel~ ** y: tank{~}origin1~ \- T{~}PlantWall~ echannelbox{~}dim~ = * x: W{~}EChannel~ * y: N{~}SedTanks(W{~}Sed\~ + T{~}PlantWall~) * z: H{~}EChannel~ \\ \\ *bigunion* \- [Union{~}allA~|AutoCAD Basics Unions] selects all the objects visible in the workspace and joins them all into a single object. bigunion <-union{~}allA~ {float:left|border=2px solid black} [!box2.bmp|width=300px200px!|AutoCAD Channel Program] Top View {float} * |
boxect
...
-
...
Creates
...
a
...
...
based
...
on
...
two
...
points.
...
boxect
...
<
...
-
...
box(echannelbox
...
origin,echannelbox
...
origin +
...
echannelbox
...
dim)
echannelorigin =
- if layout1:
- x: 0
- y: 0
- z: 0
- if layout2:
- x: tankorigin0
- y: tankorigin1 - TPlantWall
- z: tankorigin2 + HSed - HEChannel
- if layout3:
- x: tankorigin0 - LSed + WChannel + TChannelWall + WEChannel
- y: tankorigin1 - TPlantWall
- z: tankorigin2 + HSed - HEChannel
- if layout4:
- x: tankorigin0 - LSed + WChannelInlet + TChannelWall + WEChannel
- y: tankorigin1 - TPlantWall
echannelboxdim =
- x: WEChannel
- y: NSedTanks(WSed~ + TPlantWall)
- z: HEChannel
Wiki Markup {float:left|border=2px solid black} [!subtract1.bmp|width=
...
300px!|AutoCAD Channel Program] Top View {float}
...
subtractect
...
- -
...
...
- subtracts
...
- one
...
- object
...
- from
...
- the
...
- other
...
- based
...
- on
...
- two
...
- points.
...
subtractect
...
<
...
-
...
subtractD(echanneltank
...
origin,echannelbox
...
origin)
layerset - Layerset selects the layer "0".
...
layerset
...
<-layer
...
set("0")
...
layerfreezeect - Layerfreeze locks the layer "echanneltank"
...
so
...
that
...
it
...
cannot
...
be
...
edited.
...
layerfreezeect
...
<-layer
...
freeze("echanneltank")
...
layernewewe - Layernew creates a new green layer, "exitweirelbow."
...
layernewewe
...
<
...
-
...
layer
...
new("exitweirelbow",green)
| Wiki Markup |
|---|
{float:left|border=2px solid black} [!elbow1.bmp|width=450px300px!|AutoCAD Channel Program] Top View {float} * |
elbowewe
...
-
...
Calls
...
the
...
...
...
to
...
draw
...
an
...
elbow.
...
elbowewe
...
<-elbow(sedtankexitweirelbow
...
origin,ND
...
PltWeir,ENPipeSpec)
ENPipeSpec - enumerated type
| Wiki Markup |
|---|
{~}PipeSpec~) EN{~}PipeSpec~ \- enumerated type \\ \\ {float:left|border=2px solid black} [!rotate1.bmp|width=450px300px!|AutoCAD Channel Program] Top View {float} * |
rotateewe1
...
-
...
Rotate3d rotates the selected object by the designated degrees.
rotateewe1 <- rotate3d(p1,sedtankexitweirelboworigin,"y",90)
...
p1
...
=
...
- x:
...
- sedtankexitweirelbow
...
- origin0 +
...
- ElbowRadius(ND
...
- PltWeir)
- y:
...
- sedtankexitweirelboworigin1
- z:
...
- sedtankexitweirelboworigin2 - outerradius(ND
...
- PltWeir)
"y"
...
=
...
rotation
...
axis
...
90
...
=
...
rotation angle
| Wiki Markup |
|---|
angle \\ \\ {float:left|border=2px solid black} [!rotate2.bmp|width=450px300px!|AutoCAD Channel Program] Top View {float} * |
rotateewe2
...
-
...
Rotate3d rotates the selected object by the designated degrees.
rotateewe2 <- rotate3d(p1,sedtankexitweirelboworigin,"z",90)
...
p1
...
=
...
- x:
...
- sedtankexitweirelboworigin0
- y:
...
- sedtankexitweirelbow
...
- origin1 +
...
- ElbowRadius(ND
...
- PltWeir)
...
- -
...
- outerradius(ND
...
- PltWeir)
- z:
...
- sedtankexitweirelboworigin2
"z"
...
=
...
rotation
...
axis
...
90
...
=
...
rotation angle
| Wiki Markup |
|---|
angle \\ \\ {float:left|border=2px solid black} [!copy1.bmp|width=450px300px!|AutoCAD Channel Program] Top View {float} * |
copyewe
...
-
...
...
copies
...
selected
...
objects
...
based
...
on
...
three
...
selected
...
points.
...
copyewe
...
<
...
-
...
copyB(exitweirpipecopy1
...
point,exitweirpipecopy1
...
point,exitweirpipecopy2
...
point)
layerfreezeewp - Layerfreeze locks the layer "exitweir" so that it cannot be edited.
layerfreezeewp <- layerfreeze("exitweir")