h3. General Program Information
\\
{float:left|border=2px solid black}
[!Segment of floc tankslots.PNG|width=300px!|AutoCAD Channel Program]
Segment of Floc Tank
{float}\\
\\
\\
\\
\\
h3. Technical Program Outline
*if statement* \- if L{~}slot~ = 0, the script will not be executed
*local* \- [Layer{~}new~|AutoCAD Basics Layer] 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~)
local <\- stack(local,layerthaw4,boxslots,subtract4)
*layerfreeze5* \- layer{~}freeze~ freezes flocktankwall for editing
layerfreeze5 <\- layer{~}freeze~("floctankwall")
local <\- stack(local,layerfreeze5)
return local | 