AutoCAD Flocculation Tank Program - Flocchannelslotscript

General Program Information

Technical Program Outline

if statement - if L_slot = 0, the script will not be executed

local - Layer_new creates a new dark grey layer, "flocchannelslot"

local <- layer_new("flocchannelslot", dkgrey)

layerthaw4 - layer_thaw 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

slot_{origin i} =

• x: Plant_Origin0 - L_Sed + X_{FlocBaffles i,j}
• y: -L_slot + Y_{FlocBaffles 0,j}
• z: Plant_Origin2 + Z_{FlocBaffles i,j}

slot_{dim i} =

• x: T_FlocBaffle
• y: W_FlocChannel + 2*L_slot
• z: H_Floc - Z_{FlocBaffles i,j}

boxslots - makes the boxes to be subtracted from the floctankwall

boxslots <- box(slot_{origin i},slot_{origin i} + slot_{dim i})

subtract4 - subtracts each drawn slot from the floctankwall

subtract4 <- subtractD(floc_origin,slot_{origin i})

if/otherwise statement - this statement determines the type of lamina that will be used to draw the baffles

local <- stack(local(lamina(baffle_{origin i}, Amp_FlocBaffle, W_FlocBaffle, baffle_{length i}, T_FlocBaffle, Per_FlocBaffle,AN_FlocBaffle, N_Baffle, N_{FlocBaffleCol}, X_FlocBaffle, Y_FlocBaffle)) if Baffle_complex = 1

local <- stack(local(laminaplain1(baffle_{origin i}, W_FlocBaffle, baffle_{length i}, T_FlocBaffle, AN_FlocBaffle, N_Baffle, N_{FlocBaffleCol}, X_FlocBaffle)) if Baffle_complex = 1 otherwise