- 积分
- 0
- 注册时间
- 2005-12-15
- 仿真币
-
- 最后登录
- 1970-1-1
|
楼主 |
发表于 2008-6-13 23:02:02
|
显示全部楼层
来自 黑龙江哈尔滨
今日又弄了一些,材料、网格、加载、求解等等问题还有好多需要解决的,
/PREP7
ET, solid117 !指定材料类型
jg=1 !间隔为1mm
wi=jg/2+13.5 !坐标平移量
MP, MURX,1,1 !指定空气材料特性
MP, MURX,2,1000 !指定磁芯材料特性
MP, MURX,3,1 !指定线圈材料特性
N=100 !线圈匝数
I=1.0 !每匝电流
WC=1
HC=2
ACOIL=WC*HC !线圈横结面积
JDENS=N*I/ACOIL !电流密度
WPOFF,0,0,-wi !工作坐标偏移
CYLIND, 19.9, 16.6, 0, 13.5, 0, 360 !绘制磁芯空心外圈
CYLIND, 8, 0, 0, 13.5, 0, 360 !绘制磁芯实心内圈
CYLIND, 19.9, 0, 0, 3.6, 0, 360 !绘制磁芯底座
BLOCK, -20, 20, 14.15, 24.15, 0, 20 !绘制上截体
BLOCK, -20, 20, -14.15, -24.15, 0, 20 !绘制下截体
VSBV, ALL, 4 !截去上截体
VSBV, ALL, 5 !截去下截体
VADD, ALL !组合成一体
WPCSYS,-1,0 !恢复坐标系
WPOFF,0,0,8.55-wi !工作坐标偏移
torus,12.3,0,4,0,360 !绘制线圈
VSYMM,Z,ALL,,,,0,0 !体的镜像运算 VSYMM为Volume symmetry reflection之意
WPCSYS,-1,0 !恢复坐标系
/VIEW, , 1, 1, 1 !改变视角
/REPLOT !视图重绘
SAVE,MAGIC_GEOM.DB !保存几何模型到文件
VSEL,s,volu,,3
VSEL,a,volu,,5
AATT,2,1,1,0 !给磁芯赋予材料特性
VSEL,s,volu,,1
VSEL,a,volu,,2
AATT,3,1,1,0 !给线圈赋予材料特性 |
|