General Program Information
Unable to render embedded object: File (Segment of floc tank.PNG) not found.
Segment of Floc Tank
Technical Program Outline
if statement - if Lslot = 0, the script will not be executed
local - Layernew creates a new dark grey layer, "flocchannelslot"
local <- layernew("flocchannelslot", dkgrey)
layerthaw4 - layerthaw thaws floctankwall for editing
for loop - this loop counts the number of baffles per channel
x(j) - returns the number of channels in column j
for loop - this loop assigns the appropriate origin and dimension to each slot. Each slot is then drawn and subtracted from the floctankwall
slotorigin i =
- x: PlantOrigin0 - LSed + XFlocBaffles i,j
- y: -Lslot + YFlocBaffles 0,j
- z: PlantOrigin2 + ZFlocBaffles i,j
slotdim i =
- x: TFlocBaffle
- y: WFlocChannel + 2*Lslot
- z: HFloc - ZFlocBaffles i,j
boxslots - makes the boxes to be subtracted from the floctankwall
boxslots <- box(slotorigin i,slotorigin i + slotdim i)
subtract4 - subtracts each drawn slot from the floctankwall
subtract4 <- subtractD(flocorigin,slotorigin i)
if/otherwise statement - this statement determines the type of lamina that will be used to draw the baffles
local <- stack(local(lamina(baffleorigin i, AmpFlocBaffle, WFlocBaffle, bafflelength i, TFlocBaffle, PerFlocBaffle,ANFlocBaffle, NBaffle, NFlocBaffleCol, XFlocBaffle, YFlocBaffle)) if Bafflecomplex = 1
local <- stack(local(laminaplain1(baffleorigin i, WFlocBaffle, bafflelength i, TFlocBaffle, ANFlocBaffle, NBaffle, NFlocBaffleCol, XFlocBaffle)) if Bafflecomplex = 1 otherwise