关于单个线圈的磁场分布的ansys命令流.docVIP

一个关于单个线圈的磁场分布的ansys命令流 自己随便编的一个apdl程序,可以求解任意一个尺寸不是很大的线圈的磁场分布,当然中心磁场是可以得到的哦。使用时，文件名改为fuck，txt格式改成mac,放到ansys的工作目录里,打开ansys,在命令栏里输入fuck就可以啦。(部分ansys需要清除数据库,就是新建个ansysdb,然后输入）或者直接复制粘贴好了^^;有问题联系我 为什么文档上传不让通过啊，因为简洁么？简单么？啊啊啊啊啊，实在懒得说明，要不是为了做那个新手任务，才懒得传呢，f_u_c_ku_sun of the beach /clear /title,lovrcj keyw,magnod,1 *ask,l,l,0.81 *ask,n,n,26124 ! 匝数 *ask,a2,a2,0.272 ! 外径 *ask,a1,a1,0.2 ! 内径 *ask,i,i,143 ! 电流 s=l*(a2-a1) j=n*i/s /prep7 ! 前处理 et,1,53 单元属性 keyopt,1,3,1 et,2,110 keyopt,2,3,1 mp,murx,1,1 材料属性 mp,murx,2,1 rectng,a1,a2,-l/2,l/2 建模 rectng,0,1,-1,1 rectng,,1.5,-1.5,1.5 rectng,,2,-2,2 rectng,,2.5,-2.5,2.5 aovlap,all 叠分 numcmp,all aplot asel,,,,1 赋予材料属性 aatt,2,,1 asel,,,,4 aatt,1,,2 mshape,0,2d asel,,,,1 划分网格 aesi,all,0.005 amesh,all asel,,,,5 aesi,all,0.02 amesh,all asel,,,,2 aesi,all,0.05 设置面域网格尺寸 amesh,all asel,,,,3 aesi,all,0.1 amesh,all asel,,,,4 esize,,1 /pnum,area,1 !显示面域编号 /pnum,line,1 aplot lsel,s,,,15,17 lccat,all lsel,s,,,12,14 lccat,all amesh,all allsel ldele,24,25 aplot finish /solu 求解 esel,s,mat,,2 eplot bfe,all,js,,,,j allsel lsel,s,loc,x,2.5 远场边界 lsel,a,loc,y,2.5 lsel,a,loc,y,-2.5 sfl,all,inf allsel eplot solve finish /post1 后处理 plf2d plvect,b,,,,vect,elem,on path,c1,2,30,40 设置路径 ppath,1,0,,2,,0 ppath,2,0,,-2,,0 pdef,,b,sum,avg /pbc,path,,0 plpath,bsum n1=node(0,0,0) *get,centre,node,n1,b,sum !中心磁场 *status,centre 另外，附个2d ansys施加匀强磁场的apdl /prep7 et,1,53 mp,murx,1,1 rectng,0,2,0,2 esize,,10 amesh,all /solu lsel,,,,4 dl,all,,az,0 lsel,,,,2 dl,all,,az,3 allsel eplot solve /post1 plnsol,az,avg plvect,b,,,,vect,elem,on 这样就施加了一个1.5T的匀强磁场，这次要是上传不了我就怒了，擦擦 运行apdl 提示设置参数，输入自己想要的参数，内径，外径，高度,etc 然后继续运行,会提示一个边界单元载荷已经被施加的警告,不用管 求解结束 画面会显示中心轴线上的磁场分布 中心场强就是最冒尖的那个值了^^;下面是准确