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~ \\ \\ {float:left|border=2px solid black} [!rotate15.bmp|width=400px500px!|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") |
Page History
Overview
Content Tools