{float:left|border=2px solid black}
!sludge1.bmp!
Northwest Isometric
{float} |
sludgepipeorigin - a 3 by 1 matrix with x,y,z positions corresponding to the point where the sludge pipe will be drawn
NDsludge - the nominal diameter of the sludge waste pipe - from this we can find the actual inner diameter and actual outer diameter of the pipe based on the schedule of pipe being used.
tanklength - the length of the tank
orificerad - the radius of the orifice hole
orificedist - the distance between successive orifices
ENPipeSpec - an enumerated pipe schedule which specifies a number which corresponds to a pipe schedule that states the amount of water pressure the pipe can handle before it fails. The pipe schedule affects the inner and outer diameter of the pipe.
sludepipeinr - the radius of the inner cylinder defined by innerD(NDsludge,ENPipeSpec)/2
sludgepipeoutr - the radius of the outer cylinder defined by outerradius(NDsludge)
p1 =
p2 =
p3 =
p4 =
p5 =
p6 =
p7 =
ND = NDsludge
R1 = sludgepipeoutr
R2 = sludgepipeinr
R3 = orificerad
L = tanklength
n1 = floor( tanklength / orificedist )
n2 = 1
d1 = orificedist
win1 =
win2 =
EN = ENPipeSpec
Note: zc corresponds to the zoom constant used within AutoCAD and created in the basics file that is referenced by the pipe program.
Note: All coordinates are referenced in top view in the program unless otherwise specified
viewtop - shows an object in top view in AutoCAD.
viewtop <-- viewtop
{float:left|border=2px solid black}
[!1a.bmp|width=340px!|AutoCAD Sludge Pipe Program]
[!1.bmp|width=140px!|AutoCAD Sludge Pipe Program]
Northwest Isometric View
{float} |
pipe1 - using the pipe function draws a pipe (from the pipe program) with no zoom
pipe1 <-- pipe(p1,ND,L,EN)
p1 =
ND = NDsludge
L = tanklength
EN = ENPipeSpec
{float:left|border=2px solid black}
[!2.bmp|width=420px!|AutoCAD Sludge Pipe Program]
{float} |
zoomwin - zooms on a window space
zoomwin <-- zoomwin(win1,win2)
win1 =
win2 =
{float:left|border=2px solid black}
[!3.bmp|width=340px!|AutoCAD Sludge Pipe Program]
{float} |
cylinder3 - is to draw a cylinder for orifice purpose
cylinder3 <-- cylinderD(p2,R3,p3)
p2 =
R3 = radhole
p3 =
{float:left|border=2px solid black}
[!4.bmp|width=100px!|AutoCAD Sludge Pipe Program]
{float} |
viewrightside - change view to viewrightside
viewrightside <-- viewrightside
{float:left|border=2px solid black}
[!5.bmp|width=140px!|AutoCAD Sludge Pipe Program]
{float} |
array1 - draw starting at point p4, n1 -- as many rows as the tank length/orifice dist, n2 - 1 and provide orifice distance as the next draw point for the cylinder
array1 <-- array(p4,n1,n2,-d1)
p4 =
n1 = floor( tanklength / orificedist )
n2 = 1
d1 = orificedist
{float:left|border=2px solid black}
[!6.bmp|width=340px!|AutoCAD Sludge Pipe Program]
[!6b.bmp|width=140px!|AutoCAD Sludge Pipe Program]
Northwest Isometric View
{float} |
subtract2 - subtract unneeded portion of the cylinders, using p5 to select the pipe as the object to be subtracted from, and using p6 and p7 to select the cylinder as the region to be subtracted
subtract2 <-- subtractH(p5,p6,p7)
p5 =
p6 =
p7 =