一本书上的例子：
/PREP7
/TITLE,2D SOLENID
ET,1,PLANE53,,,1
ET,2,PLANE53,2,,1
MP,MURX,1,1
MP,MURX,2,1000
MP,MURX,3,1
MP,MURX,4,2000
MP,RSVX,3,3e-8
MP,RSVX,4,70e-8
n=650
i=1.0
ta=0.75
tb=0.75
tc=0.5
td=0.75
wc=1
hc=2
gap=0.25
space=0.25
ws=wc+2*space
hs=hc+0.75
w=ta+ws+tc
hb=tb+hs
h=hb+gap+td
acoil=wc*hc
R,1,acoil*0.01**2,n,,1,0.95
/PNUM,AREA,1
RECTNG,0,w,0,tb
RECTNG,0,w,tb,hb
RECTNG,ta,ta+ws,0,h
RECTNG,ta+space,ta+space+wc,tb+space,tb+space+hc
AOVLAP,ALL
RECTNG,0,w,0,hb+gap
RECTNG,0,w,0,h
AOVLAP,ALL
NUMCMP,AREA
ASEL,S,AREA,,2 !线圈区域特性
AATT,3,1,2,0   !mat,real,type,esys,secn
ASEL,S,AREA,,1 !转子区域特性
ASEL,A,AREA,,12,13
AATT,4,1,1
ASEL,S,AREA,,3,5 !座铁区域特性
ASEL,A,AREA,,7,8
AATT,2,1,1,0
/PNUM,MAT,1  !加开材料号显示
APLOT
ALLSEL,ALL
SMRTSIZE,4
AMESH,ALL
ESEL,S,MAT,,4 !选择转子单元
CM,ARM,ELEM   !转子单元定义一个组
FMAGBC,'ARM' !给转子加边界条件
ESEL,S,MAT,,3
NSLE,S

CP,1,CURR,ALL
CM,COIL,ELEM
ALLSEL,ALL
ARSCAL,ALL,,,0.01,0.01,1,,0,1
FINISH
/SOLU
ANTYPE,TRANS
NSEL,EXT      !选择外层节点
D,ALL,AZ,0    !加磁力线平等边界条件
CMSEL,S,COIL
BFE,ALL,VLTG,,12
ALLSEL,ALL
TIME,0.01
DELTM,0.002
OUTRES,ALL,ALL
SOLVE
TIME,0.03
NSUBST,1
SOLVE
TIME,0.03
DELTIM,0.005
TIME,0.06
NSUBST,1
SOLVE
SAVE
FINISH

/POST1
PLF2D,27,0,10,1

很不错，谢谢了哈

学习一下先