Sedichanneltankscript

{float:left|border=2px solid black}
[!ichannel NE.bmp|width=350px!|AutoCAD Channel Program]
NorthEast Isometric View
{float}

viewtopi - Rotates workspace so that object is being viewed from the top.

viewtop <- viewtop1

layernewict - Layer_new creates a new light grey layer, "ichanneltank."

layernewict <- layer_new("ichanneltank",ltgrey)

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

tankict - Calls the Tank Program to draw a tank.

tankict <- Tank(ichanneltank_origin,ichanneltank_dim,T_PlantWall)

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

{float:left|border=2px solid black}
[!ibox1 NE.bmp|width=300px!|AutoCAD Channel Program]
NorthEast Isometric View
{float}

boxictb - Creates a box based on two points.

boxictb <- box(channelbox_origin,channelbox_origin + channelbox_dim)

channelbox_origin =

• x: tank_origin0 - L_Sed
• y: tank_origin1
• z: tank_origin2 + H_Sed - H_Channel

channelbox_dim =

• x: W_Channel
• y: N_SedTanks(WSed~ + T_PlantWall)
• z: H_Channel
  
  

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

  subtractict - SubtractD subtracts one object from the other based on two points.

subtractict <- subtractD(ichanneltank_origin,channelbox_origin)

channelbox_origin =

• x: tank_origin0 - L_Sed
• y: tank_origin1
• z: tank_origin2 + H_Sed - H_Channel
  
  layerset - Layer_set selects the layer "0".

layerset <- layer_set("0")

layerfreezeict - Layer_freeze locks the layer "ichanneltank" so that it cannot be edited."

layerfreezeict <- layer_freeze("ichanneltank")

layernewiwe - Layer_new creates a new green layer, "inletweirelbow."

layernewiwe <- layer_new("inletweirelbow",green)

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

elbowiwe - Calls the Elbow Program to draw an elbow.

elbowiwe <- elbow(sedtankinletweirelbow_origin,ND_PltWeir,EN_Spec)

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

rotateiwe1 - Rotate_3d rotates the selected object by the designated degrees.

rotateiwe1 <- rotate_3d(p1,sedtankinletweirelbow_origin,"y",90)

p1 =

• x: sedtankinletweirelbow_origin0 + ElbowRadius(ND_PltWeir)
• y: sedtankinletweirelbow_origin1
• z: sedtankinletweirelbow_origin2 - outerradius(ND_PltWeir)
  
  

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

  rotateiwe2 - Rotate_3d rotates the selected object by the designated degrees.

rotateiwe2 <- (p1,sedtankinletweirelbow_origin,"z",90)

p1 =

• x: sedtankinletweirelbow_origin0
• y: sedtankinletweirelbow_origin1 + ElbowRadius(NE_PltWeir) - outerradius(ND_PltWeir)
• z: sedtankinletweirelbow_origin2
  
  layerfreezeiwe - Layer_freeze locks the layer "inletweirelbow" so that it cannot be edited.

layerfreezeiwe <- layer_freeze("inletweirelbow")

layernewiwp - Layer_new creates a new blue layer, "inletweir."

layernewiwp <- layer_new("inletweir",blue)

{float:left|border=2px solid black}
[!inlet weir NE.bmp|width=150px!|AutoCAD Channel Program]
Top View
{float}

pipeiwp - Calls the Pipe Program to draw a pipe in the program.

pipeiwp <- Pipe(inletweirpipe_origin,ND_PltWeir,inletweirpipe_length,EN_PipeSpec)

layerfreezeiwp - Layer_freeze locks the layer "inletweir" so that it cannot be edited.

layerfreezeiwp <-layer_freeze("inletweir")