壳体与接管的一个建模方法
作壳体与接管之间的圆弧焊缝(即内外倒圆),采用以下方法作出的焊缝划出的网格较规整,
总体思路是先删除体保留面然后作面运算,最后用面围成体。步骤如下:
1、两个外面相贯、两个内面相贯
2、选两个外面作area fillet形成焊缝外圆弧面,选两个内面作area fillet形成焊缝内圆弧面
3、面被相贯线分开
4、删除体保留面
5、删除所选的面
6、线围成焊缝两侧端面
7、所有面再围成体,这样就只有接管、壳体、焊缝三个体,此时划分的网格较规整。
8、具体命令流如下:
FINISH
/CLEAR,NOSTART
/PREP7
CYLIND,50,40,0,100,0,90, !作壳体Ro=50 Ri=40 长度L=100 90度为1/4柱壳
wpro,,-90.000000, !旋转工作平面
wpro,-90.000000,, !旋转工作平面
CYLIND,30,20,0,100,0,90, !作接管Ro=30 Ri=20 高度H=100 90度为1/4柱壳
FLST,2,2,5,ORDE,2
FITEM,2,3
FITEM,2,9
AOVLAP,P51X !两个外面OVLAP
FLST,2,2,5,ORDE,2
FITEM,2,4
FITEM,2,10
AOVLAP,P51X !两个内面OVLAP
AFILLT,16,15,10, !外倒角R=10
AFILLT,20,19,6, !内倒角R=6
ASBL, 9, 59 !面被线分开
ASBL, 10, 63 !面被线分开
ASBL, 4, 52 !面被线分开
LSTR, 34, 37 !作直线
LSTR, 29, 30 !作直线
ASBL, 12, 2 !面被线分开
ASBL, 1, 11 !面被线分开
LSTR, 38, 33 !作直线
LSTR, 36, 32 !作直线
ASBL, 11, 4 !面被线分开
ASBL, 6, 40 !面被线分开
FLST,2,2,6,ORDE,2
FITEM,2,1
FITEM,2,-2
VDELE,P51X !删除体
FLST,2,5,5,ORDE,5
FITEM,2,1
FITEM,2,4
FITEM,2,7
FITEM,2,18
FITEM,2,-19
ADELE,P51X, , ,1 !删除所选的面(多余部分)
FLST,2,2,5,ORDE,2
FITEM,2,9
FITEM,2,14
ADELE,P51X, , ,1 !删除所选的面(多余部分)
FLST,2,3,5,ORDE,3
FITEM,2,11
FITEM,2,13
FITEM,2,25
ADELE,P51X, , ,1 !删除所选的面(多余部分)
ADELE, 17, , ,1 !删除所选的面(多余部分)
ADELE, 10, , ,1 !删除所选的面(多余部分)
ASBL, 3, 54 !面被线分开
ADELE, 1, , ,1 !删除所选的面(多余部分)
FLST,2,4,4
FITEM,2,43
FITEM,2,11
FITEM,2,30
FITEM,2,2
AL,P51X !线围成焊缝一侧端面
FLST,2,4,4
FITEM,2,4
FITEM,2,44
FITEM,2,40
FITEM,2,31
AL,P51X !线围成焊缝另一侧端面
FLST,2,15,5,ORDE,11
FITEM,2,1
FITEM,2,-3
FITEM,2,5
FITEM,2,8
FITEM,2,12
FITEM,2,15
FITEM,2,-16
FITEM,2,20
FITEM,2,-24
FITEM,2,26
FITEM,2,-27
VA,P51X !所有面再围成体
/VIEW, 1, -45, -45, -45 !罢个角度显示
VPLOT !显示体
效果如下:

-
Origin(Pro):学习版的窗口限制【数据绘图】 2020-08-07
-
如何卸载Aspen Plus并再重新安装,这篇文章告诉你! 2020-05-29
-
AutoCAD 保存时出现错误:“此图形中的一个或多个对象无法保存为指定格式”怎么办? 2020-08-03
-
OriginPro:学习版申请及过期激活方法【数据绘图】 2020-08-06
-
CAD视口的边框线看不到也选不中是怎么回事,怎么解决? 2020-06-04
-
教程 | Origin从DSC计算焓和比热容 2020-08-31
-
如何评价拟合效果-Origin(Pro)数据拟合系列教程【数据绘图】 2020-08-06
-
Aspen Plus安装过程中RMS License证书安装失败的解决方法,亲测有效! 2021-10-15
-
CAD外部参照无法绑定怎么办? 2020-06-03
-
CAD中如何将布局连带视口中的内容复制到另一张图中? 2020-07-03
