工程力学软件方法--两个例子

两个例子 立体斜支座 四分之一车轮 立体斜支座的实体建模这个例子只是演示如何建立一个斜支座 支座样子如图 3 首先 我们定义了地面上的轮廓线和小孔 小孔采用面积相减的方法得到 然后对该面采用拉伸后形成底部的体 底面形成后的样子如图 首先 我们定义了地面上的轮廓线和小孔 小孔采用面积相减的方法得到 然后对该面采用拉伸后形成底部的体 底面形成后的样子如图 1 首先 我们定义了地面上的轮廓线和小孔 小孔采用面积相减的方法得到 然后对该面采用拉伸后形成底部的体 底面形成后的样子如图 2 然后通过三个关键点 将工作平面移到斜支座面的方向 采用类似的方法得到斜向的部分 最后的突起轴座使用两个圆柱的相减得到的 4 FINISH 退出以前模块 CLEAR 清除内存中的所有数据 FILENAME SPNGBAS1 TITLE SPNGBAS1 PREP7 进入前处理模块PREP7BLC4 0 0 109 102 定义底座主矩形区域K 5 20 82 定义倒角位置的四个控制点K 6 20 20K 7 0 82K 8 0 20 5 LARC 4 5 7 20 定义倒角圆弧LARC 1 6 8 20L 5 6 定义过5 6点的直线 6 AL 4 5 6 7 定义用4 5 6 7围成的面积 AADD 1 2 将1 2面积相加 得到3号面积CYL4 0 20 10 定义圆孔位置 编号为1AGEN 2 1 69 生成第二个圆孔 编号为2AGEN 2 1 2 62 生成其余的二个圆孔 ASBA 3 ALL 从3号面积中减去四个圆孔 生成6号面积 命令 用面偏依成为一个体VOFFST NAREA DIST KINC VOFFST 6 26 将6号面积平行移动26 生成体 K 60 109 102 0 定义关键点60K 61 109 2 0K 62 159 102 sqrt 3 0 02KWPLAN 1 60 61 62 过关键点60 61 62定义工作面BLC4 0 0 102 180 在当前工作面方位建立矩形 三点定义工作平面KWPLAN WN KORIG KXAX KPLANDefinestheworkingplaneusingthreekeypoints CYL4 51 180 51 在当前工作面方位建立圆 AADD 25 26 面积相加 VOFFST 27 26 将面积27平移26 生成体 VADD 1 2 体相加AADD 33 34 38 面相加AADD 32 36 37 CYL4 51 180 32 60 定义凸起的圆柱 圆柱CYL4 XCENTER YCENTER RAD1 THETAl RAD2 THETA2 DEPTH 16 VADD 1 3 体相加 17 CYL4 51 180 18 5 60 定义凸起的圆柱中的圆孔VSBV 2 1 体相减 VIEW 1 0 157696856347 0 629983293323 0 760429320602 改变视角 ANG 1 6旋转模型 AUTO 1 以最佳比例显示模型vplot 绘制体模型 18 下面是全部代码 FINISH 退出以前模块 CLEAR 清除内存中的所有数据 FILENAME SPNGBAS1 TITLE SPNGBAS1 txt SOLIDMODELOFSPINDLEBASE SimplifiedVersion PREP7 进入前处理模块PREP7BLC4 0 0 109 102 定义底座主矩形区域K 5 20 82 定义倒角位置的四个控制点K 6 20 20K 7 0 82K 8 0 20LARC 4 5 7 20 定义倒角圆弧LARC 1 6 8 20L 5 6 定义过5 6点的直线AL 4 5 6 7 定义用4 5 6 7围成的面积AADD 1 2 将1 2面积相加 得到3号面积CYL4 0 20 10 定义圆孔位置 编号为1AGEN 2 1 69 生成第二个圆孔 编号为2AGEN 2 1 2 62 生成其余的二个圆孔ASBA 3 ALL 从3号面积中减去四个圆孔 生成6号面积VOFFST 6 26 将6号面积平行移动26 生成体K 60 109 102 0 定义关键点60 19 K 61 109 2 0K 62 159 102 sqrt 3 0 02KWPLAN 1 60 61 62 过关键点60 61 62定义工作面BLC4 0 0 102 180 在当前工作面方位建立矩形CYL4 51 180 51 在当前工作面方位建立圆AADD 25 26 面积相加VOFFST 27 26 将面积27平移26 生成体VADD 1 2 体相加AADD 33 34 38 面相加AADD 32 36 37CYL4 51 180 32 60 定义凸起的圆柱VADD 1 3 体相加CYL4 51 180 18 5 60 定义凸起的圆柱中的圆孔VSBV 2 1 体相减 VIEW 1 0 157696856347 0 629983293323 0 760429320602 改变视角 ANG 1 6旋转模型 AUTO 1 以最佳比例显示模型vplot 绘制体模型 20 四分之一车轮实体建模该例向通过回转操作生成回转体部件 这里只生成1 4部分 且略去了许多细部构造 21 首先定义的截面 如图 然后 定义了关键点21和22 过这两个点为轴 将该截面旋转90度 就可以得到1 4轮子部分 然后旋转工作面 定义圆柱后 将其从轮子上减去 就得到轮子上的小圆孔了 最后支座的1 4轮子如图 22 FINISH 退出以前模块 CLEAR 清除内存中的所有数据 FileName Wheel1 TITLE WHEEL1 PREP7 进入前处理模块PREP7BLC4 2 0 1 5 5 内侧截面A1BLC4 3 2 5 1 中部端面A2BLC4 8 0 0 5 5 边沿截面A3AADD ALL 上面3块面积相加 得到面积4 BLC4 XCORNER YCORNER WIDTH HEIGHIT DEPTH建立一个长方形区块体积 K 21 0 0 0 定义关键点21K 22 0 5 0 定义关键点22 24 VROTAT 4 21 22 90 将面积4绕21 21定义的轴转90度生成体 VROTAT NAI NA2 NA3 NA4 NA5 NA6 PAXl PAX2 ARC NSEG绕着某轴建立一组圆柱型体积 25 K 43 0 3 0 定义关键点43 44和45K 44 1 3 0K 45 0 3 1KWPLAN 1 43 44 45 过关键点43 44和45定义工作面CSYS 0 切换坐标系 26 CYL4 5 5 cos 45 3 14159 180 5 5 sin 45 3 14159 180 0 5 1 定义轮上的小圆孔vsbv all 2 减去小圆孔 27 VIEW 1 1 1 1 改变观察方向 ANG 1 旋转模型vplot 重绘体积 28 FINISH 退出以前模块 CLEAR 清除内存中的所有数据 FileName Wheel1 TITLE WHEEL1 txt SOLIDMODELINGSAMPLE AWHEELBYROTATION SimplifiedVersion PREP7 进入前处理模块PREP7BLC4 2 0 1 5 5 内侧截面A1BLC4 3 2 5 1 中部端面A2BLC4 8 0 0 5 5 边沿截面A3AADD ALL 上面3块面积相加 得到面积4K 21 0 0 0 定义关键点21K 22 0 5 0 定义关键点22VROTAT 4 21 22 90 将面积4绕21 21定义的轴转90度生成体K 43 0 3 0 定义关键点43 44和45K 44 1 3 0K 45 0 3 1KWPLAN 1 43 44 45 过关键