Wiki Markup |
---|
h1. Tank Slope Drawing Script |
...
*layerslopes* \- [Layer{~}new~|AutoCAD Basics Layer] creates a new light grey layer, "slopes." |
...
layerslopes <\- layer |
...
{~}new~("slopes",ltgrey) |
...
slopes - Calls the Sedimentation Tank Slopes Program to draw the tank slopes based on three inputs.
slopes <- sedslope(SedSlopesOrigin,p1,ANSedBottom)
Note: p1 is a dummy variable used only in the program help section to designate the matrix below.
SedSlopesOrigin =
- x: PlantOrigin0
- y: PlantOrigin1
- z: PlantOrigin2
p1 =
- x: LSed
- y: WSed
- z: HSed
ANSedBottom = 10 deg
tankthaw - Layerthaw unlocks the "tank" layer so that edits can be made.
tankthaw <- layerthaw("tank")
bigunion - UnionallA selects all the objects in the workspace and unions them into a single object
bigunion <- unionallA
box1 - Creates a box based on two points.
box1 <- box(sedtankbox1origin, sedtankbox1origin + sedtankbox1dim)
sedtankbox1origin =
- x: PlantOrigin0 - LSed
- y: PlantOrigin1 + WSed/2 - outerradius(NDSedSludge)
- z: PlantOrigin2
sedtankbox1dim =
- x: LSed
- y: outerdiameter(NDSedSludge)
- z: 3outerdiameter(NDSedSludge)
tankthaw - Layerthaw unlocks the layer "tank" so that it can be edited.
tankthaw <- layerthaw("tank")
subtractbox - SubtractJ subtracts one object from the other based on four points.
subtractbox <- subtractJ(PlantOrigin,p1,p2,sedtankbox1origin)
Note: p1 and p2 are dummy variable used only in the program help section to designate the matrix below.
PlantOrigin =
p1 =
- x: PlantOrigin0
- y: PlantOrigin1 + WSed
- z: PlantOrigin2
p2 =
- x: PlantOrigin0
- y: PlantOrigin1 - TPlantWall
- z: PlantOrigin2
sedtankbox1origin =
- x: PlantOrigin0 - LSed
- y: PlantOrigin1 + WSed/2 - outerradius(NDSedSludge)
- z: PlantOrigin2
layerset - Layerset selects the layer "0".
layerset <- layerset("0")
layerfreezeslope - Layerfreeze locks the layer "slopes" so that it cannot be edited.
...
{float:left|border=2px solid black} [!slope.bmp|width=500px!|AutoCAD Channel Program] Right View {float} *slopes* \- Calls the [Sedimentation Tank Slopes Program|AutoCAD Sedimentation Tank Slopes Program] to draw the tank slopes based on three inputs. slopes <\- sedslope(SedSlopes{~}Origin~,p1,AN{~}SedBottom~) *Note*: p1 is a dummy variable used only in the program help section to designate the matrix below. SedSlopes{~}Origin~ = * x: Plant{~}Origin0~ * y: Plant{~}Origin1~ * z: Plant{~}Origin2~ p1 = * x: L{~}Sed~ * y: W{~}Sed~ * z: H{~}Sed~ AN{~}SedBottom~ = Sedimentation tank bottom slope. \\ \\ *tankthaw* \- [Layer{~}thaw~|AutoCAD Basics Layer] unlocks the "tank" layer so that edits can be made. tankthaw <\- layer{~}thaw~("tank") *bigunion* \- [Union{~}allA~|AutoCAD Basics Unions] selects all the objects in the workspace and unions them into a single object bigunion <\- union{~}allA~ {float:left|border=2px solid black} [!slope subtract.bmp|width=500px!|AutoCAD Channel Program] Right View {float} *box1* \- Creates a [box|AutoCAD Basics Box] based on two points. box1 <\- box(sedtankbox1{~}origin~, sedtankbox1{~}origin~ + sedtankbox1{~}dim~) sedtankbox1{~}origin~ = * x: Plant{~}Origin0~ \- L{~}Sed~ * y: Plant{~}Origin1~ + W{~}Sed~/2 - outerradius(ND{~}SedSludge~) * z: Plant{~}Origin2~ sedtankbox1{~}dim~ = * x: L{~}Sed~ * y: outerdiameter(ND{~}SedSludge~) * z: 3outerdiameter(ND{~}SedSludge~) \\ \\ *tankthaw* \- [Layer{~}thaw~|AutoCAD Basics Layer] unlocks the layer "tank" so that it can be edited. tankthaw <\- layer{~}thaw~("tank") *subtractbox* \- [SubtractJ|AutoCAD Basics Subtractions] subtracts one object from the other based on four points. subtractbox <\- subtractJ(Plant{~}Origin~,p1,p2,sedtankbox1{~}origin~) *Note*: p1 and p2 are dummy variable used only in the program help section to designate the matrix below. Plant{~}Origin~ = p1 = * x: Plant{~}Origin0~ * y: Plant{~}Origin1~ + W{~}Sed~ * z: Plant{~}Origin2~ p2 = * x: Plant{~}Origin0~ * y: Plant{~}Origin1~ \- T{~}PlantWall~ * z: Plant{~}Origin2~ sedtankbox1{~}origin~ = * x: Plant{~}Origin0~ \- L{~}Sed~ * y: Plant{~}Origin1~ + W{~}Sed~/2 - outerradius(ND{~}SedSludge~) * z: Plant{~}Origin2~ *layerset* \- [Layer{~}set~|AutoCAD Basics Layer] selects the layer "0". layerset <\- layer{~}set~("0") *layerfreezeslope* \- [Layer{~}freeze~|AutoCAD Basics Layer] locks the layer "slopes" so that it cannot be edited. layerfreezeslope <\- layer{~}freeze~("slopes") |