Open Channel Drawing Script
layerthawtank - Layerthaw unlocks the layer "slopes" so that it can be edited.
layerthawtank <- layerthaw("slopes")
viewtop - Rotates the workspace so that the object is viewed from the top.
viewtop <- viewtop1
box1 - Creates a box based on two points.
box1 <- box(channelboxorigin,channelboxorigin + channelboxdim)
channelboxorigin =
- x: tankorigin0 - LSed
- y: tankorigin1
- z: tankorigin2 + HSed - HChannel
channelboxdim =
- x: WChannel
- y: NSedTanks(WSed~ + TPlantWall)
- z: HChannel
subtract1 - SubtractD subtracts one object from the other based on two points.
subtract <- subtractD(PlantOrigin,channelboxorigin)
PlantOrigin =
channelboxorigin =
- x: tankorigin0 - LSed
- y: tankorigin1
- z: tankorigin2 + HSed - HChannel
box2 - Creates a box based on two points.
box2 <- box(echannelboxorigin,echannelboxorigin + 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
- z: tankorigin2 + HSed - HEChannel
echannelboxdim =
- x: WEChannel
- y: NSedTanks(WSed~ + TPlantWall)
- z: HEChannel
subtract2 - SubtractD subtracts one object from the other based on two points.
subtract <- subtractD(p1,echannelboxorigin)
Note: p1 is a dummy variable used only in the program help section to designate the matrix below.
p1 =
- x: PlantOrigin0 + TPlantWall
- y: PlantOrigin1
- z: PlantOrigin2
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
layerset1 - Layerset selects the layer "channel."
layerset1 <- layerset("channel")
box3 - Creates a box based on two points.
box3 <- box(channelcloseboxorigin,channelcloseboxorigin + channelcloseboxdim)
channelcloseboxorigin =
- x: tankorigin0 - LSed - TPlantWall - WChannel - TChannelWall
- y: tankorigin1 - TPlantWall
- z: tankorigin2 + HSed - HChannel - TChannelWall
channelcloseboxdim =
- x: WChannel + TChannelWall + T{~}PlantWall
- y: T{~}PlantWall
- z: HChannel + TChannelWall
bigunion - UnionallA selects all the objects visible in the workspace and joins them into one single object.
bigunion <- unionallA
layerset - Layerset selects the layer "0".
layerset <- layerset("0")
layerfreezech - Layerfreeze locks the layer "channel" so that it cannot be edited.
layerfreezech <- layerfreeze("channel")
layerfreezetank - Layerfreeze locks the layer "slopes" so that it cannot be edited.
layerfreezetank <- Layerfreeze("slopes")