Tank Slope Drawing Script

layerslopes - Layer_new creates a new light grey layer, "slopes."

layerslopes <- layer_new("slopes",ltgrey)

{float:left|border=2px solid black}
[!slope.bmp|width=500px!|AutoCAD Channel Program]
Right View
{float}

slopes - Calls the 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 =

p1 =

AN_SedBottom = Sedimentation tank bottom slope.

tankthaw - Layer_thaw unlocks the "tank" layer so that edits can be made.

tankthaw <- layer_thaw("tank")

bigunion - Union_allA 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 based on two points.

box1 <- box(sedtankbox1_origin, sedtankbox1_origin + sedtankbox1_dim)

sedtankbox1_origin =

sedtankbox1_dim =

x: L_Sed
y: outerdiameter(ND_SedSludge)
z: 3outerdiameter(ND_SedSludge)

tankthaw - Layer_thaw unlocks the layer "tank" so that it can be edited.

tankthaw <- layer_thaw("tank")

{float:left|border=2px solid black}
[!subtract box.bmp|width=600px!|AutoCAD Channel Program]
Top View
{float}

subtractbox - SubtractJ 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 =

p2 =

sedtankbox1_origin =

layerset - Layer_set selects the layer "0".

layerset <- layer_set("0")

layerfreezeslope - Layer_freeze locks the layer "slopes" so that it cannot be edited.

layerfreezeslope <- layer_freeze("slopes")