...

Inlet

...

Channel

...

Drawing

...

Script

...

layer2 - Layer_new creates a new light grey layer, "channel."

...

layer2

...

<

...

-

...

layer

...

_new("channel",ltgrey)

channel1 - Calls the Channel Program to draw a channel.

channel1 <- ChannelDrawing(channel_origin,p1,T_ChannelWall)

channel_origin =

if layout 2:

• x: Plant_Origin0 - L_Sed + W_InletChannel
• y: Plant_Origin1 - T_PlantWall
• z: Plant_Origin2 + H_Sed - H_InletChannel

if layout 3:

• x: Plant_Origin0 - L_Sed + W_InletChannel
• y: Plant_Origin1 - T_PlantWall
• z: Plant_Origin2 + H_Sed - H_InletChannel

if layout 4 :

• x: Plant_Origin0 - L_Sed + W_ChannelInlet
• y: Plant_Origin1 - T_PlantWall
• z: Plant_Origin2 + H_Sed - H_InletChannel

p1 = Specifies the dimensions of the channel cutout.

• x: W_Sed - 2T_PlantWall
• y: W_InletChannel
• z: H_InletChannel

T_Channel specifies the thickness of the channel wall.

Wiki Markup

*channel1* \- Calls the [Channel Program|AutoCAD Channel Program] to draw a channel. channel1 <\- ChannelDrawing(channel{~}origin~,p1,T{~}ChannelWall~) channel{~}origin~ = if layout 2: * x: Plant{~}Origin0~ \- L{~}Sed~ + W{~}InletChannel~ * y: Plant{~}Origin1~ \- T{~}PlantWall~ * z: Plant{~}Origin2~ + H{~}Sed~ \- H{~}InletChannel~ if layout 3: * x: Plant{~}Origin0~ \- L{~}Sed~ + W{~}InletChannel~ * y: Plant{~}Origin1~ \- T{~}PlantWall~ * z: Plant{~}Origin2~ + H{~}Sed~ \- H{~}InletChannel~ if layout 4 : * x: Plant{~}Origin0~ \- L{~}Sed~ + W{~}ChannelInlet~ * y: Plant{~}Origin1~ \- T{~}PlantWall~ * z: Plant{~}Origin2~ + H{~}Sed~ \- H{~}InletChannel~ p1 = Specifies the dimensions of the channel cutout. * x: W{~}Sed~ \- 2T{~}PlantWall~ * y: W{~}InletChannel~ * z: H{~}InletChannel~ T{~}Channel~ specifies the thickness of the channel wall. {float:left|border=2px solid black} [!inlet rotate 1.bmp|width=280px!|AutoCAD Channel Program] Top View {float} *

rotate1

...

-

...

Rotate

...

rotates

...

the

...

selected

...

object

...

by

...

the

...

designated

...

degrees.

...

rotate1

...

<

...

-

...

rotate(channel

...

_origin,90)

...

channel_origin =

if layout 2:

• x: Plant_Origin0 - L_Sed + W_InletChannel
• y: Plant_Origin1 - T_PlantWall
• z: Plant_Origin2 + H_Sed - H_InletChannel

if layout 3:

• x: Plant_Origin0 - L_Sed + W_InletChannel
• y: Plant_Origin1 - T_PlantWall
• z: Plant_Origin2 + H_Sed - H_InletChannel

if layout 4 :

• x: Plant_Origin0 - L_Sed + W_ChannelInlet
• y: Plant_Origin1 - T_PlantWall
• z: Plant_Origin2 + H_Sed - H_InletChannel

90 = rotation angle

box1 - Creates a box based on two points.

box1 <- box(channelinletwall_origin,channelinletwall_origin + channelinletwall_dim)

channelinletwall_origin =

• x: Plant_Origin0 - L_Sed + W_ChannelInlet
• y: Plant_Origin1
• z: Plant_Origin2

channelinletwall_dim =

• x: T_ChannelWall
• y: W_Sed
• z: H_Sed

bigunion - Union_allA selects all the objects visible in the workspace and joins them all into a single object.

bigunion <- union_allA

box2 - Creates a box based on two points.

box2 <- box(channelinletbox1_origin,channelinletbox1_origin + channelinletbox1_dim)

channelinletbox1_origin =

• x: Plant_Origin0 - L_Sed - T_PlantWall
• y: Plant_Origin1 + (.5W_Sed) - (.5L_ChannelInlet)
• z: Plant_Origin2 + H_Sed - H_InletChannel

channelinletbox1_dim =

• x: T_PlantWall
• y: L_ChannelInlet
• z: H_InletChannel

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

subtract2 <- subtractD(Plant_Origin,channelinletbox1_origin)

Plant_Origin =

channelinletbox1_origin =

• x: Plant_Origin0 - L_Sed - T_PlantWall
• y: Plant_Origin1 + (.5W_Sed) - (.5L_ChannelInlet)
• z: Plant_Origin2 + H_Sed - H_InletChannel

box3 - Creates a box based on two points.

box3 <- box(channelinletbox2_origin,channelinletbox2_origin + channelinletbox2_dim)

channelinletbox2_origin =

• x: Plant_Origin0 - L_Sed
• y: Plant_Origin1
• z: Plant_Origin2

channelinletbox2_dim =

• x: W_ChannelInlet
• y: W_Sed
• z: H_Sed

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

subtract3 <- subtractD(Plant_Origin,channelinletbox2_origin)

Plant_Origin =

channelinletbox2_origin =

• x: Plant_Origin0 - L_Sed
• y: Plant_Origin1
• z: Plant_Origin2

layerset - Layer_set selects the layer "0".

layerset <- layer_set("0")

viewtops - Rotates the object so that it is viewed from the top.

viewtops <-viewtop1

layerfreeze2 - Layer_freeze locks the layer "channel" so that it cannot be edited.

layerfreeze2 <- layer_freeze("channel")