Versions Compared

Key

  • This line was added.
  • This line was removed.
  • Formatting was changed.
Wiki Markup
h1. Elbow Drawing Script

*layer4* \- [Layer{~}new~|AutoCAD Basics Layer] creates a new green layer "elbow."

layer4 <\- layer{~}new~("elbow",green)
{float:left|border=2px solid black}
[!elbow1.bmp|width=280px!|AutoCAD Channel Program]
Top View
{float}
*elbow1* \- Calls the [Elbow Program|AutoCAD Elbow Program] to create an elbow.

elbow1 <\- elbow(sedtankelbow1{~}origin~,ND{~}SedPipeEntrance~,EN{~}PipeSpec~)

sedtankelbow1{~}origin~ =
* x: Plant{~}Origin0~ \- L{~}Sed~ + W{~}InletChannel~/2
* y: Plant{~}Origin1~ + W{~}Sed~/2 + outerradius(ND{~}SedLaunder~) + 3*(W{~}Sed~/2 - outerradius(ND{~}SedLaunder~))/4 - ElbowRadius(ND{~}SedPipeEntrance~)
* z: Plant{~}Origin2~ + sedtankpipe9{~}length~ + S{~}SedInlet~ + 2ElbowRadius(ND{~}SedPipeEntrance~)

ND{~}SedPipeEntrance~ = The nominal diameter of the pipe. This value along with the pipe schedule is used to determine other actual dimensions of the elbow

EN{~}PipeSpec~ = The enumerated pipe schedule type. Each schedule of pipe is represented by a specific number within our code.
\\
\\
{float:left|border=2px solid black}
[!rotate6.bmp|width=280px!|AutoCAD Channel Program]
Top View
{float}
*rotate6* \- [Rotate{~}3d~|AutoCAD Basics Rotate] turns the object based on a given axis and degree angle.

rotate6 <\- rotate{~}3d~(p1,p2,"x",-90)

Note: p1 and p2 are dummy variables used only in the program help section to designate the matrix below.

p1 =
* x: sedtankelbow1{~}origin0~
* y: sedtankelbow1{~}origin1~ + ElbowRadius(ND{~}SedPipeEntrance~)
* z: sedtankelbow1{~}origin2~ + innerD(ND{~}SedPipeEntrance~,EN{~}PipeSpec~)/2

p2 =
* x: sedtankelbow1{~}origin0~
* y: sedtankelbow1{~}origin1~ + ElbowRadius(ND{~}SedPipeEntrance~)
* z: sedtankelbow{~}origin2~

"x" - specifies axis that object will be rotated about.

\-90 - rotation angle
\\
\\
{float:left|border=2px solid black}
[!rotate7.bmp|width=280px!|AutoCAD Channel Program]
Top View
{float}
*rotate7* \- [Rotate{~}3d~|AutoCAD Basics Rotate] turns the object based on a given axis and degree angle.

rotate7 <\- rotate{~}3d~(p1,p2,"y",90)

Note: p1 and p2 are dummy variables used only in the program help section to designate the matrix below.

p1 =
* x: sedtankelbow1{~}origin0~
* y: sedtankelbow1{~}origin1~ + ElbowRadius(ND{~}SedPipeEntrance~)
* z: sedtankelbow1{~}origin2~ + innerD(ND{~}SedPipeEntrance~,EN{~}PipeSpec~)/2

p2 =
* x: sedtankelbow1{~}origin0~
* y: sedtankelbow1{~}origin1~ + ElbowRadius(ND{~}SedPipeEntrance~)
* z: sedtankelbow{~}origin2~

"y" - specifies axis that object will be rotated about.

90 - rotation angle.
\\
\\
{float:left|border=2px solid black}
[!copy1.bmp|width=280px!|AutoCAD Channel Program]
Top View
{float}
*copy1* \- [CopyDa|AutoCAD Basics Copy] duplicates the selected object.

copy1 <\- copyDa(p1,sedtankpipe5{~}origin~,sedtankpipe6{~}origin~,sedtankpipe7{~}origin~,sedtankpipe8{~}origin~)

Note: p1 is a dummy variable used only in the program help section to designate the matrix below.

p1 =
* x: sedtankpipe5{~}origin0~
* y: sedtankpipe5{~}origin1~
* z: sedtankpipe5{~}origin2~ \- outerradius(ND{~}SedPipeEntrance~)

sedtankpipe5{~}origin~ =
* x: Plant{~}Origin0~ \- L{~}Sed~ + ElbowRadius(ND{~}SedPipeEntrance~)
* y: Plant{~}Origin1~ + W{~}Sed~/2 + outerradius(ND{~}SedLaunder~) + 3(W{~}Sed~/2 - outerradius(ND{~}SedLaunder))/4
* z: Plant{~}Origin2~ + (W{~}Sed~/2)*tank(AN{~}SedBottom~) + ElbowRadius(ND{~}SedPipeEntrance~)

sedtankpipe6{~}origin~ =
* x: Plant{~}Origin0~ \- L{~}Sed~ + ElbowRadius(ND{~}SedPipeEntrance~)
* y: Plant{~}Origin1~ + W{~}Sed~/2 + outerradius(ND{~}SedLaunder~) + 1(W{~}Sed~/2 - outerradius(ND{~}SedLaunder))/4
* z: Plant{~}Origin2~ + (W{~}Sed~/2)*tank(AN{~}SedBottom~) + ElbowRadius(ND{~}SedPipeEntrance~)

sedtankpipe7{~}origin~ =
* x: Plant{~}Origin0~ \- L{~}Sed~ + ElbowRadius(ND{~}SedPipeEntrance~)
* y: Plant{~}Origin1~ + W{~}Sed~/2 + outerradius(ND{~}SedLaunder~) + 1(W{~}Sed~/2 - outerradius(ND{~}SedLaunder))/4
* z: Plant{~}Origin2~ + (W{~}Sed~/2)*tank(AN{~}SedBottom~) + ElbowRadius(ND{~}SedPipeEntrance~)

sedtankpipe8{~}origin~ =
* x: Plant{~}Origin0~ \- L{~}Sed~ + ElbowRadius(ND{~}SedPipeEntrance~)
* y: Plant{~}Origin1~ + W{~}Sed~/2 + outerradius(ND{~}SedLaunder~) + 3(W{~}Sed~/2 - outerradius(ND{~}SedLaunder))/4
* z: Plant{~}Origin2~ + (W{~}Sed~/2)*tank(AN{~}SedBottom~) + ElbowRadius(ND{~}SedPipeEntrance~)
\\
\\
{float:left|border=2px solid black}
[!rotate8.bmp|width=280px!|AutoCAD Channel Program]
Top View
{float}
*rotate8* \- [Rotate{~}3d~|AutoCAD Basics Rotate] turns the object based on a given axis and degree angle.

rotate8 <\- rotate{~}3d~(p1,sedtankpipe1{~}origin~,"z",sedtankpipe5{~}angle~)

Note: p1 is a dummy variable used only in the program help section to designate the matrix below.

p1 =
* x: sedtankpipe5{~}origin0~
* y: sedtankpipe5{~}origin1~
* z: sedtankpipe5{~}origin2~ \- outerradius(ND{~}SedPipeEntrance~)

sedtankpipe1{~}origin~ =
* x: Plant{~}Origin0~ \- L{~}Sed~ + ElbowRadius(ND{~}SedPipeEntrance~)
* y: Plant{~}Origin1~ + W{~}Sed~/2 + outerradius(ND{~}SedLaunder~) + 3(W{~}Sed~/2 - outerradius(ND{~}SedLaunder))/4
* z: Plant{~}Origin2~ + (W{~}Sed~/2)*tank(AN{~}SedBottom~) + ElbowRadius(ND{~}SedPipeEntrance~)

"z" - specifies axis that object will be rotated about.

*sedtankpipe5{*}{*}{~}angle{~}* = \-(rad/deg) * atan((((5*L{~}Sed~)/8 - W{~}Channel~/2)/ \[3 * (W{~}Sed~/2 - outerradius(ND{~}SedLaunder~))/4) + outerradius(ND{~}SedLaunder~))^\-1^)
\\
\\
{float:left|border=2px solid black}
[!rotate9.bmp|width=280px!|AutoCAD Channel Program]
Top View
{float}
*rotate9* \- [Rotate{~}3d~|AutoCAD Basics Rotate] turns the object based on a given axis and degree angle.

rotate9 <\- rotate{~}3d~(p1,sedtankpipe2{~}origin~,"z".sedtankpipe6{~}angle~)

Note: p1 is a dummy variable used only in the program help section to designate the matrix below.

p1 =
* x: sedtankpipe6{~}origin0~
* y: sedtankpipe6{~}origin1~
* z: sedtankpipe6{~}origin2~ \- outerradius(ND{~}SedPipeEntrance~)

sedtankpipe2{~}origin~ =
* x: Plant{~}Origin0~ \- L{~}Sed~ + ElbowRadius(ND{~}SedPipeEntrance~)
* y: Plant{~}Origin1~ + W{~}Sed~/2 + outerradius(ND{~}SedLaunder~) + 1(W{~}Sed~/2 - outerradius(ND{~}SedLaunder))/4
* z: Plant{~}Origin2~ + (W{~}Sed~/2)*tank(AN{~}SedBottom~) + ElbowRadius(ND{~}SedPipeEntrance~)

"z" - specifies axis that object will be rotated about.

*sedtankpipe6{*}{*}{~}angle{~}* = \-(rad/deg) * (((L{~}Sed~/8 - W{~}Channel~/2)/ ((W{~}Sed~/2 - outerradius(ND{~}SedLaunder~))/4) + outerradius(ND{~}SedLaunder~))^\-1^)
\\
\\
{float:left|border=2px solid black}
[!rotate10.bmp|width=280px!|AutoCAD Channel Program]
Top View
{float}
*rotate10* \- [Rotate{~}3d~|AutoCAD Basics Rotate] turns the object based on a given axis and degree angle.

rotate10 <\- rotate{~}3d~(p1,sedtankpipe3{~}origin~,"z".sedtankpipe7{~}angle~)

Note: p1 is a dummy variable used only in the program help section to designate the matrix below.

p1 =
* x: sedtankpipe7{~}origin0~
* y: sedtankpipe7{~}origin1~
* z: sedtankpipe7{~}origin2~ \- outerradius(ND{~}SedPipeEntrance~)

sedtankpipe3{~}origin~ =
* x: Plant{~}Origin0~ \- L{~}Sed~ + ElbowRadius(ND{~}SedPipeEntrance~)
* y: Plant{~}Origin1~ + W{~}Sed~/2 + outerradius(ND{~}SedLaunder~) + 1(W{~}Sed~/2 - outerradius(ND{~}SedLaunder))/4
* z: Plant{~}Origin2~ + (W{~}Sed~/2)*tank(AN{~}SedBottom~) + ElbowRadius(ND{~}SedPipeEntrance~)

"z" - specifies axis that object will be rotated about.

*sedtankpipe7{*}{*}{~}angle{~}* = \-(rad/deg) * atan(((3*L{~}Sed~/8 - W{~}Channel~/2)/ ((W{~}Sed~/2 - outerradius(ND{~}SedLaunder~))/4) + outerradius(ND{~}SedLaunder~))^\-1^)
\\
\\
{float:left|border=2px solid black}
[!rotate11.bmp|width=280px!|AutoCAD Channel Program]
Top View
{float}
*rotate11* \- [Rotate{~}3d~|AutoCAD Basics Rotate] turns the object based on a given axis and degree angle.

rotate11 <\- rotate{~}3d~(p1,sedtankpipe4{~}origin~,"z".sedtankpipe8{~}angle~)

Note: p1 is a dummy variable used only in the program help section to designate the matrix below.

p1 =
* x: sedtankpipe8{~}origin0~
* y: sedtankpipe8{~}origin1~
* z: sedtankpipe8{~}origin2~ \- outerradius(ND{~}SedPipeEntrance~)

sedtankpipe4{~}origin~ =
* x: Plant{~}Origin0~ \- L{~}Sed~ + ElbowRadius(ND{~}SedPipeEntrance~)
* y: Plant{~}Origin1~ + W{~}Sed~/2 + outerradius(ND{~}SedLaunder~) + 1(W{~}Sed~/2 - outerradius(ND{~}SedLaunder))/4
* z: Plant{~}Origin2~ + (W{~}Sed~/2)*tank(AN{~}SedBottom~) + ElbowRadius(ND{~}SedPipeEntrance~)

"z" - specifies axis that object will be rotated about.

*sedtankpipe8{*}{*}{~}angle{~}* = \-(rad/deg) * atan((((7*L{~}Sed~)/8 - W{~}Channel~/2)/ (3*(W{~}Sed~/2 - outerradius(ND{~}SedLaunder~))/4) + outerradius(ND{~}SedLaunder~))^\-1^)
\\
\\
*layerset* \- [Layer{~}set~|AutoCAD Basics Layer] selects the layer "0".

layerset <\- layer{~}set~("0")

*layerfreeze4* \- [Layer{~}freeze~|AutoCAD Basics Layer] locks the layer "elbow" so that it cannot be edited.

layerfreeze4 <\- layer{~}freeze~("elbow")

*layer5* \- [Layer{~}new~|AutoCAD Basics Layer] creates a new green layer "elbowa."

layer5 <\- layer{~}new~("elbowa",green)
{float:left|border=2px solid black}
[!elbow5.bmp|width=280px!|AutoCAD Channel Program]
Top View
{float}
*elbow5* \- Calls the [Elbow Program|AutoCAD Elbow Program] to create an elbow.

elbow5 <\- elbow(sedtankelbow5{~}origin~,ND{~}SedPipeEntrance~,EN{~}PipeSpec~)

sedtankelbow5{~}origin~ =
* x: tank{~}origin0~ \- (7*L{~}Sed~)/8 - ElbowRadius(ND{~}SedPipeEntrance~)
* y: tank{~}origin1~ + W{~}Sed~/2 - ElbowRadius(ND{~}SedPipeEntrance~)
* z: tank{~}origin2~ + S{~}SedInlet~ + sedtankpipe9{~}length~ + ElbowRadius(ND{~}SedPipeEntrance~)

ND{~}SedPipeEntrance~ = The nominal diameter of the pipe. This value along with the pipe schedule is used to determine other actual dimensions of the elbow

EN{~}PipeSpec~ = The enumerated pipe schedule type. Each schedule of pipe is represented by a specific number within our code.
\\
\\
{float:left|border=2px solid black}
[!rotate14.bmp|width=280px!|AutoCAD Channel Program]
Top View
{float}
*rotate14* \- [Rotate{~}3d~|AutoCAD Basics Rotate] turns the object based on a given axis and degree angle.

rotate14 <\- rotate{~}3d~(p1,p2,"x",90)

Note: p1 and p2 are dummy variables used only in the program help section to designate the matrix below.

p1 =
* x: sedtankelbow5{~}origin0~
* y: sedtankelbow5{~}origin1~ + ElbowRadius(ND{~}SedPipeEntrance~)
* z: sedtankelbow5{~}origin2~ + (innerD(ND{~}SedPipeEntrance~,EN{~}PipeSpec~)/2)

p2 =
* x: sedtankelbow5{~}origin0~
* y: sedtankelbow5{~}origin1~ + ElbowRadius(ND{~}SedPipeEntrance~)
* z: sedtankelbow5{~}origin2~

"x" - specifies axis that object will be rotated about.

90 - specifies rotation angle.
\\
\\
{float:left|border=2px solid black}
[!copy2.bmp|width=280px!|AutoCAD Channel Program]
Top View
{float}
*copy2* \- [CopyDa|AutoCAD Basics Copy] duplicates the selected objuect.

copy2 <\- copyDa(p1,sedtankelbow5{~}origin~,sedtankelbow6{~}origin~,sedtankelbow7{~}origin~,sedtankelbow8{~}origin~)

Note: p1 is a dummy variable used only in the program help section to designate the matrix below.

p1 =
* x: sedtankpipe9{~}origin0~ \- ElbowRadius(ND{~}SedPipeEntrance~)
* y: sedtankpipe9{~}origin1~
* z: sedtankpipe9{~}origin2~

sedtankelbow5{~}origin~ =
* x: tank{~}origin0~ \- (7*L{~}Sed~)/8 - ElbowRadius(ND{~}SedPipeEntrance~)
* y: tank{~}origin1~ + W{~}Sed~/2 - ElbowRadius(ND{~}SedPipeEntrance~)
* z: tank{~}origin2~ + S{~}SedInlet~ + sedtankpipe9{~}length~ + ElbowRadius(ND{~}SedPipeEntrance~)

sedtankelbow6{~}origin~ =
* x: tank{~}origin0~ \- (5*L{~}Sed~)/8 - ElbowRadius(ND{~}SedPipeEntrance~)
* y: tank{~}origin1~ + W{~}Sed~/2 - ElbowRadius(ND{~}SedPipeEntrance~)
* z: tank{~}origin2~ + S{~}SedInlet~ + sedtankpipe9{~}length~ + ElbowRadius(ND{~}SedPipeEntrance~)

sedtankelbow7{~}origin~ =
* x: tank{~}origin0~ \- (3*L{~}Sed~)/8 - ElbowRadius(ND{~}SedPipeEntrance~)
* y: tank{~}origin1~ + W{~}Sed~/2 - ElbowRadius(ND{~}SedPipeEntrance~)
* z: tank{~}origin2~ + S{~}SedInlet~ + sedtankpipe9{~}length~ + ElbowRadius(ND{~}SedPipeEntrance~)

sedtankelbow8{~}origin~ =
* x: tank{~}origin0~ \- (1*L{~}Sed~)/8 - ElbowRadius(ND{~}SedPipeEntrance~)
* y: tank{~}origin1~ + W{~}Sed~/2 - ElbowRadius(ND{~}SedPipeEntrance~)
* z: tank{~}origin2~ + S{~}SedInlet~ + sedtankpipe9{~}length~ + ElbowRadius(ND{~}SedPipeEntrance~

*rotate15*\\
\\
{float:left|border=2px solid black}
[!rotate15.bmp|width=280px!|AutoCAD Channel Program]
Top View
{float}
*rotate15* \- [Rotate{~}3d~|AutoCAD Basics Rotate] turns the object based on a given axis and degree angle.

rotate15 <\- rotate{~}3d~(p1,sedtankpipe9{~}origin~,"z".sedtankpipe6{~}angle~)

Note: p1 is a dummy variable used only in the program help section to designate the matrix below.

p1 =
* x: sedtankpipe9{~}origin1~ \- outerradius(ND{~}SedPipeEntrance~)
* y: sedtankpipe9{~}origin2~
* z: sedtankpipe10{~}origin0~

sedtankelbow9{~}origin~ =
* x: tank{~}origin0~ \- L{~}Sed~ + W{~}Channel~ + T{~}ChannelWall + ElbowRadius(ND{~}SedLaunder~)
* y: tank{~}origin1~ + W{~}Sed~/2 - ElbowRadius(ND{~}SedLaunder~)
* z: tank{~}origin2~ + HW{~}Sed~ \- H{~}SedAbove~/2 - ElbowRadius(ND{~}SedLaunder~)

"z" - specifies axis that object will be rotated about.

*sedtankpipe6{*}{*}{~}angle{~}* = \-(rad/deg) * (((L{~}Sed~/8 - W{~}Channel~/2)/ ((W{~}Sed~/2 - outerradius(ND{~}SedLaunder~))/4) + outerradius(ND{~}SedLaunder~))^\-1^)
\\
\\
{float:left|border=2px solid black}
[!rotate16.bmp|width=280px!|AutoCAD Channel Program]
Top View
{float}
*rotate16* \- [Rotate{~}3d~|AutoCAD Basics Rotate] turns the object based on a given axis and degree angle.

rotate16 <\- rotate{~}3d~(p1,sedtankpipe10{~}origin~,"z".sedtankpipe7{~}angle~)

Note: p1 is a dummy variable used only in the program help section to designate the matrix below.

p1 =
* x: sedtankpipe10{~}origin1~ \- outerradius(ND{~}SedPipeEntrance~)
* y: sedtankpipe10{~}origin2~
* z: sedtankpipe11{~}origin0~

sedtankelbow10{~}origin~ =
* x: tank{~}origin0~ \- L{~}Sed~ + W{~}Channel~ + T{~}ChannelWall
* y: tank{~}origin1~ + W{~}Sed~/2 - ElbowRadius(ND{~}SedLaunder~)
* z: tank{~}origin2~ + H{~}Sed~ \- H{~}Channel~ \- T{~}Mp~

"z" - specifies axis that object will be rotated about.

*sedtankpipe7{*}{*}{~}angle{~}* = \-(rad/deg) * atan(((3*L{~}Sed~/8 - W{~}Channel~/2)/ ((W{~}Sed~/2 - outerradius(ND{~}SedLaunder~))/4) + outerradius(ND{~}SedLaunder~))^\-1^)
\\
\\
{float:left|border=2px solid black}
[!rotate17.bmp|width=280px!|AutoCAD Channel Program]
Top View
{float}
*rotate17* \- [Rotate{~}3d~|AutoCAD Basics Rotate] turns the object based on a given axis and degree angle.

rotate17 <\- rotate{~}3d~(p1,sedtankpipe11{~}origin~,"z".sedtankpipe5{~}angle~)

Note: p1 is a dummy variable used only in the program help section to designate the matrix below.

p1 =
* x: sedtankpipe10{~}origin1~ \- outerradius(ND{~}SedPipeEntrance~)
* y: sedtankpipe11{~}origin2~
* z: sedtankpipe12{~}origin0~

sedtankpipe11{~}origin~ =
* x: tank{~}origin0~ \- (3*L{~}Sed~)/8
* y: tank{~}origin1~ + W{~}Sed~/2
* z: tank{~}origin2~ + S{~}SedInlet~

"z" - specifies axis that object will be rotated about.

sedtankpipe5{~}angle - specifies rotation angle.
\\
\\
{float:left|border=2px solid black}
[!rotate14.bmp|width=280px!|AutoCAD Channel Program]
Top View
{float}
*rotate18* \- [Rotate{~}3d~|AutoCAD Basics Rotate] turns the object based on a given axis and degree angle.

rotate18 <\- rotate{~}3d~(p1,sedtankpipe12{~}origin~,"z".sedtankpipe8{~}angle~)

Note: p1 is a dummy variable used only in the program help section to designate the matrix below.

p1 =
* x: sedtankpipe12{~}origin0~
* y: sedtankpipe12{~}origin1~ \- outerradius(ND{~}SedPipeEntrance~)
* z:  sedtankpipe12{~}origin2~

sedtankpipe12{~}origin~ =
* x: tank{~}origin0~ \- (L{~}Sed~)/8
* y: tank{~}origin1~ + W{~}Sed~/2
* z: tank{~}origin2~ + S{~}SedInlet~

"z" - specifies axis that object will be rotated about.

sedtankpipe8{~}angle - specifies rotation angle.
\\
\\
*layerset* \- [Layer{~}set~|AutoCAD Basics Layer] selects the layer "0".

layerset <\- layer{~}set~("0")

*layerfreeze5* \- [Layer{~}freeze~|AutoCAD Basics Layer] locks the layer "elbowa" so that it cannot be edited.

layerfreeze5 <\- layer{~}freeze~("elbowa")

*layer6* \- [Layer{~}freeze~|AutoCAD Basics Layer] locks the layer "elbowb" so that it cannot be edited.

layer6 <\- layer{~}new~("elbowb",green)

*elbow9* \- Calls the [Elbow Program|AutoCAD Elbow Program] to create an elbow.

elbow9 <\- elbow(sedtankelbow9{~}origin~,ND{~}SedLaunder~,EN{~}PipeSpec~)

sedtankelbow9{~}origin~ =
* x: tank{~}origin0~ \- L{~}Sed~ + W{~}Channel~ + T{~}ChannelWall + ElbowRadius(ND{~}SedLaunder~)
* y: tank{~}origin1~ + W{~}Sed~/2 - ElbowRadius(ND{~}SedLaunder~)
* z: tank{~}origin2~ + HW{~}Sed~ \- H{~}SedAbove~/2 - ElbowRadius(ND{~}SedLaunder~)

ND{~}SedPipeEntrance~ = The nominal diameter of the pipe. This value along with the pipe schedule is used to determine other actual dimensions of the elbow

EN{~}PipeSpec~ = The enumerated pipe schedule type. Each schedule of pipe is represented by a specific number within our code.

*rotate19* \- [Rotate{~}3d~|AutoCAD Basics Rotate] turns the object based on a given axis and degree angle.

rotate19 <\- rotate{~}3d~(p1,p2,"z",90)

Note: p1 and p2 are dummy variables used only in the program help section to designate the matrix below.

p1 =
* x: sedtankelbow9{~}origin0~
* y: sedtankelbow9{~}origin1~ + ElbowRadius(ND{~}SedLaunder~)
* z: sedtankelbow9{~}origin2~ + (innerD(ND{~}SedLaunder~,EN{~}PipeSpec~)/2)

p2 =
* x: sedtankelbow9{~}origin0~
* y: sedtankelbow9{~}origin1~ + ElbowRadius(ND{~}SedLaunder~)
* z: sedtankelbow9{~}origin2~

"z" - specifies axis that object will be rotated about.

90 - specifies rotation angle.

*rotate20* \- [Rotate{~}3d~|AutoCAD Basics Rotate] turns the object based on a given axis and degree angle.

rotate20 <\- rotate{~}3d~(p1,p2,"x",90)

Note: p1 and p2 are dummy variables used only in the program help section to designate the matrix below.

p1 =
* x: sedtankelbow9{~}origin0~
* y: sedtankelbow9{~}origin1~ + ElbowRadius(ND{~}SedLaunder~)
* z: sedtankelbow9{~}origin2~ + (innerD(ND{~}SedLaunder~,EN{~}PipeSpec~)/2)

p2 =
* x: sedtankelbow9{~}origin0~
* y: sedtankelbow9{~}origin1~ + ElbowRadius(ND{~}SedLaunder~)
* z: sedtankelbow9{~}origin2~

"x" - specifies axis that object will be rotated about.

90 - specifies rotation angle.

*elbow10* \- Calls the [Elbow Program|AutoCAD Elbow Program] to create an elbow.

elbow10 <\- elbow(sedtankelbow10{~}origin~,ND{~}SedLaunder~,EN{~}PipeSpec~)

sedtankelbow10{~}origin~ =
* x: tank{~}origin0~ \- L{~}Sed~ + W{~}Channel~ + T{~}ChannelWall
* y: tank{~}origin1~ + W{~}Sed~/2 - ElbowRadius(ND{~}SedLaunder~)
* z: tank{~}origin2~ + H{~}Sed~ \- H{~}Channel~ \- T{~}Mp~

ND{~}SedPipeEntrance~ = The nominal diameter of the pipe. This value along with the pipe schedule is used to determine other actual dimensions of the elbow

EN{~}PipeSpec~ = The enumerated pipe schedule type. Each schedule of pipe is represented by a specific number within our code.

*rotate21* \- [Rotate{~}3d~|AutoCAD Basics Rotate] turns the object based on a given axis and degree angle.

rotate21 <\- rotate{~}3d~(p1,p2,"x",-90)

Note: p1 and p2 are dummy variables used only in the program help section to designate the matrix below.

p1 =
* x: sedtankelbow10{~}origin0~
* y: sedtankelbow10{~}origin1~ + ElbowRadius(ND{~}SedLaunder~)
* z: sedtankelbow10{~}origin2~ + (innerD(ND{~}SedLaunder~,EN{~}PipeSpec~)/2)

p2 =
* x: sedtankelbow10{~}origin0~
* y: sedtankelbow10{~}origin1~ + ElbowRadius(ND{~}SedLaunder~)
* z: sedtankelbow10{~}origin2~

"x" - specifies axis that object will be rotated about.

\-90 - specifies rotation angle.

*layerset* \- [Layer{~}set~|AutoCAD Basics Layer] selects the layer "0".

layerset <\- layer{~}set~("0")

*layerfreeze6* \- [Layer{~}freeze~|AutoCAD Basics Layer] locks the layer "elbowb" so that it cannot be edited.

layerfreeze6 <\- layer{~}freeze~("elbowb")