wqxyqf 发表于 2008-2-22 10:15:57

电磁感应加热--求教北极熊甲老师

这是我做的电磁感应加热的命令流,其中:电磁场采用的谐波分析,温度场采用的是瞬态分析,结果中电磁场只有两步结果没有错,温度场是随时间变化的结果,但是我在提取不同时间的结果时,钢板的温度云图没有变化,也就是说,我得出的结果是不随时间变化的,我提取结果用的是以下三种方法:
读结果有几种方法:
1) 利用载荷步和子载荷步
General Postpro > Read Results > By Load Step

2) 利用结果集号(Set 号)
General Postpro > Read Results > By Set Number

3) 读入规定时刻的结果
General Postpro > Read Results > By Time/Freq
现在电磁场的结果是没有错的,我现在觉得是在循环中没语句中没有保存每一步的结果,可是我现在却不知道该怎么改循环,也可能是我的热分析不正确,我也看不出来,我已经在这个问题上困绕了快一个多月了,现在急切求教北极熊甲老师帮我解决一下这个问题,万分感谢!!!

/PREP7
*SET,ftime,1          ! final time
*SET,tinc,0.1                ! time increment for harmonic analysis
*SET,time,0                  ! initialize time
*SET,delt,0.5   
!*
ET,1,SOLID117    !线圈单元
!*
ET,2,SOLID117   !磁极单元
!*
ET,3,SOLID117,1  !钢板单元
!*
ET,4,SOLID117   !空气单元
!*
MPTEMP,,,,,,,, !钢板材料属性
MPTEMP,1,20
MPTEMP,2,100
MPTEMP,3,200
MPTEMP,4,300
MPTEMP,5,400
MPTEMP,6,500
MPTEMP,7,600
MPTEMP,8,700
MPTEMP,9,720
MPTEMP,10,742   
MPTEMP,11,760   
MPTEMP,12,800   
MPTEMP,13,900   
MPTEMP,14,1000
MPDATA,MURX,3,,200
MPDATA,MURX,3,,195
MPDATA,MURX,3,,186.6
MPDATA,MURX,3,,178.1
MPDATA,MURX,3,,167.1
MPDATA,MURX,3,,154.9
MPDATA,MURX,3,,137.8
MPDATA,MURX,3,,92.5
MPDATA,MURX,3,,33   
MPDATA,MURX,3,,11   
MPDATA,MURX,3,,1
MPDATA,MURX,3,,1
MPDATA,MURX,3,,1
MPDATA,MURX,3,,1
MPTEMP,,,,,,,,
MPTEMP,1,20
MPTEMP,2,100
MPTEMP,3,200
MPTEMP,4,300
MPTEMP,5,400
MPTEMP,6,500
MPTEMP,7,600
MPTEMP,8,700
MPTEMP,9,720
MPTEMP,10,742   
MPTEMP,11,760   
MPTEMP,12,800   
MPTEMP,13,900   
MPTEMP,14,1000
MPDATA,RSVX,3,,0.198e-6
MPDATA,RSVX,3,,0.254e-6
MPDATA,RSVX,3,,0.339e-6
MPDATA,RSVX,3,,0.435e-6
MPDATA,RSVX,3,,0.541e-6
MPDATA,RSVX,3,,0.656e-6
MPDATA,RSVX,3,,0.790e-6
MPDATA,RSVX,3,,0.949e-6
MPDATA,RSVX,3,,0.982e-6
MPDATA,RSVX,3,,1.019e-6
MPDATA,RSVX,3,,1.042e-6
MPDATA,RSVX,3,,1.080e-6
MPDATA,RSVX,3,,1.162e-6
MPDATA,RSVX,3,,1.20e-6
mp,murx,4,1    !!空气材料属性
mp,murx,1,1   !线圈材料属性
!*
mp,murx,2,1000!磁极材料属性
RECTNG,-0.034,0.034,0.011,0.025, 
RECTNG,0.036,0.05,-0.009,0.009,
/AUTO,1
/REP,FAST   
wpoff,0.034,0.009   
PCIRC,0.016,0.002,0,90,
FLST,3,2,5,ORDE,2   
FITEM,3,1   
FITEM,3,3   
ARSYM,Y,P51X, , , ,0,0
FLST,3,3,5,ORDE,3   
FITEM,3,2   
FITEM,3,-3
FITEM,3,5   
ARSYM,X,P51X, , , ,0,0
CSYS,0
WPAVE,0,0,0
CSYS,0
!*
RECTNG,-0.034,0.034,-0.009,0.009,   
FLST,2,8,5,ORDE,2   
FITEM,2,1   
FITEM,2,-8
VEXT,P51X, , ,0,0,-0.025,,,,
APLOT   
FLST,2,1,5,ORDE,1   
FITEM,2,9   
VEXT,P51X, , ,0,0,-0.03,,,,
/VIEW,1,1,1,1   
/ANG,1
/REP,FAST   
/VIEW,1,,,1
/ANG,1
/REP,FAST   
FLST,2,8,6,ORDE,2   
FITEM,2,1   
FITEM,2,-8
VGLUE,P51X
FLST,3,9,6,ORDE,6   
FITEM,3,1   
FITEM,3,-2
FITEM,3,4   
FITEM,3,6   
FITEM,3,9   
FITEM,3,-13
VGEN,3,P51X, , , ,0.1, , ,0
LOCAL,11,1,0.034,0.009,0, , , ,1,1,
!*
LOCAL,12,1,0.034,-0.009,0, , , ,1,1,
!*
LOCAL,13,1,-0.034,-0.009,0, , , ,1,1,   
!*
LOCAL,14,1,-0.034,0.009,0, , , ,1,1,
!*
LOCAL,15,1,0.034,0.109,0, , , ,1,1,
!*
LOCAL,16,1,0.034,0.091,0, , , ,1,1,
!*
LOCAL,17,1,-0.034,0.091,0, , , ,1,1,
!*
LOCAL,18,1,-0.034,0.109,0, , , ,1,1,
!*
LOCAL,19,1,0.034,0.209,0, , , ,1,1,
!*
LOCAL,20,1,0.034,0.191,0, , , ,1,1,
!*
LOCAL,21,1,-0.034,0.191,0, , , ,1,1,
!*
LOCAL,22,1,-0.034,0.209,0, , , ,1,1,
BLOCK,0.034,-0.034,-0.025,0.225,-0.03,-0.04, !
BLOCK,-0.07,0.07,-0.04,0.26,0.033,0.003,
BLOCK,-0.07,0.07,-0.04,0.26,0.003,0,
BLOCK,-0.07,0.07,-0.04,0.26,0,-0.08,   
/VIEW,1,1,1,1   
/ANG,1
/REP,FAST   
FLST,2,31,6,ORDE,2
FITEM,2,1   
FITEM,2,-31
VOVLAP,P51X
/VIEW,1,1,1,1   
/ANG,1
/REP,FAST   
CM,_Y,VOLU
VSEL, , , ,      29
CM,_Y1,VOLU
CMSEL,S,_Y
!*
CMSEL,S,_Y1
VATT,       3, ,   3,       0   !选择钢板材料属性
CMSEL,S,_Y
CMDELE,_Y   
CMDELE,_Y1
!*

FLST,5,2,6,ORDE,2   
FITEM,5,33
FITEM,5,-34
CM,_Y,VOLU
VSEL, , , ,P51X
CM,_Y1,VOLU
CMSEL,S,_Y
!*
CMSEL,S,_Y1
VATT,       4, ,   4,       0   !选择空气材料属性
CMSEL,S,_Y
CMDELE,_Y   
CMDELE,_Y1
!*
FLST,5,24,6,ORDE,8
FITEM,5,1   
FITEM,5,-8
FITEM,5,10
FITEM,5,-13
FITEM,5,15
FITEM,5,-22
FITEM,5,24
FITEM,5,-27
CM,_Y,VOLU
VSEL, , , ,P51X
CM,_Y1,VOLU
CMSEL,S,_Y
!*
FLST,5,3,6,ORDE,3   
FITEM,5,1   
FITEM,5,7   
FITEM,5,19
CM,_Y,VOLU
VSEL, , , ,P51X
CM,_Y1,VOLU
CMSEL,S,_Y
!*
FLST,5,12,6,ORDE,4
FITEM,5,1   
FITEM,5,-8
FITEM,5,19
FITEM,5,-22
CM,_Y,VOLU
VSEL, , , ,P51X
CM,_Y1,VOLU
CMSEL,S,_Y
!*
CMSEL,S,_Y1
VATT,       1, ,   1,       0   !选择线圈材料属性
CMSEL,S,_Y
CMDELE,_Y   
CMDELE,_Y1
!*
CM,_Y,VOLU
VSEL, , , ,      10
CM,_Y1,VOLU
CMSEL,S,_Y
!*
CMSEL,S,_Y1
VATT,       1, ,   1,      11   
CMSEL,S,_Y
CMDELE,_Y   
CMDELE,_Y1
!*
CM,_Y,VOLU
VSEL, , , ,      12
CM,_Y1,VOLU
CMSEL,S,_Y
!*
CMSEL,S,_Y1
VATT,       1, ,   1,      12   
CMSEL,S,_Y
CMDELE,_Y   
CMDELE,_Y1
!*
CM,_Y,VOLU
VSEL, , , ,      13
CM,_Y1,VOLU
CMSEL,S,_Y
!*
CMSEL,S,_Y1
VATT,       1, ,   1,      13   
CMSEL,S,_Y
CMDELE,_Y   
CMDELE,_Y1
!*
CM,_Y,VOLU
VSEL, , , ,      11
CM,_Y1,VOLU
CMSEL,S,_Y
!*
CMSEL,S,_Y1
VATT,       1, ,   1,      14   
CMSEL,S,_Y
CMDELE,_Y   
CMDELE,_Y1
!*
CM,_Y,VOLU
VSEL, , , ,      15
CM,_Y1,VOLU
CMSEL,S,_Y
!*
CMSEL,S,_Y1
VATT,       1, ,   1,      15   
CMSEL,S,_Y
CMDELE,_Y   
CMDELE,_Y1
!*
CM,_Y,VOLU
VSEL, , , ,      17
CM,_Y1,VOLU
CMSEL,S,_Y
!*
CMSEL,S,_Y1
VATT,       1, ,   1,      16   
CMSEL,S,_Y
CMDELE,_Y   
CMDELE,_Y1
!*
CM,_Y,VOLU
VSEL, , , ,      18
CM,_Y1,VOLU
CMSEL,S,_Y
!*
CMSEL,S,_Y1
VATT,       1, ,   1,      17   
CMSEL,S,_Y
CMDELE,_Y   
CMDELE,_Y1
!*
CM,_Y,VOLU
VSEL, , , ,      16
CM,_Y1,VOLU
CMSEL,S,_Y
!*
CMSEL,S,_Y1
VATT,       1, ,   1,      18   
CMSEL,S,_Y
CMDELE,_Y   
CMDELE,_Y1
!*
CM,_Y,VOLU
VSEL, , , ,      24
CM,_Y1,VOLU
CMSEL,S,_Y
!*
CMSEL,S,_Y1
VATT,       1, ,   1,      19   
CMSEL,S,_Y
CMDELE,_Y   
CMDELE,_Y1
!*
CM,_Y,VOLU
VSEL, , , ,      26
CM,_Y1,VOLU
CMSEL,S,_Y
!*
CMSEL,S,_Y1
VATT,       1, ,   1,      20   
CMSEL,S,_Y
CMDELE,_Y   
CMDELE,_Y1
!*
CM,_Y,VOLU
VSEL, , , ,      27
CM,_Y1,VOLU
CMSEL,S,_Y
!*
CMSEL,S,_Y1
VATT,       1, ,   1,      21   
CMSEL,S,_Y
CMDELE,_Y   
CMDELE,_Y1
!*
CM,_Y,VOLU
VSEL, , , ,      25
CM,_Y1,VOLU
CMSEL,S,_Y
!*
CMSEL,S,_Y1
VATT,       1, ,   1,      22   
CMSEL,S,_Y
CMDELE,_Y   
CMDELE,_Y1
!*
FLST,5,4,6,ORDE,4   
FITEM,5,9   
FITEM,5,14
FITEM,5,23
FITEM,5,32
CM,_Y,VOLU
VSEL, , , ,P51X
CM,_Y1,VOLU
CMSEL,S,_Y
!*
CMSEL,S,_Y1
VATT,       2, ,   2,       0   !选择磁极材料属性
CMSEL,S,_Y
CMDELE,_Y   
CMDELE,_Y1
!*
VSEL,S,MAT,,1   
VPLOT   
FLST,5,6,4,ORDE,6   
FITEM,5,3   
FITEM,5,11
FITEM,5,15
FITEM,5,71
FITEM,5,155
FITEM,5,179
CM,_Y,LINE
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y   
!*
LESIZE,_Y1, , ,8, , , , ,1 !划分网格
!*
FLST,5,6,4,ORDE,6   
FITEM,5,2   
FITEM,5,10
FITEM,5,14
FITEM,5,70
FITEM,5,154
FITEM,5,178
CM,_Y,LINE
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y   
!*
LESIZE,_Y1, , ,4, , , , ,1
!*
FLST,5,6,4,ORDE,6   
FITEM,5,6   
FITEM,5,22
FITEM,5,30
FITEM,5,90
FITEM,5,166
FITEM,5,190
CM,_Y,LINE
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y   
!*
LESIZE,_Y1, , ,5, , , , ,1
!*
FLST,5,6,4,ORDE,6   
FITEM,5,5   
FITEM,5,21
FITEM,5,29
FITEM,5,89
FITEM,5,165
FITEM,5,189
CM,_Y,LINE
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y   
!*
LESIZE,_Y1, , ,4, , , , ,1
!*
FLST,5,12,4,ORDE,12
FITEM,5,27
FITEM,5,43
FITEM,5,51
FITEM,5,59
FITEM,5,65
FITEM,5,81
FITEM,5,86
FITEM,5,98
FITEM,5,163
FITEM,5,175
FITEM,5,186
FITEM,5,198
CM,_Y,LINE
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y   
!*
LESIZE,_Y1, , ,6, , , , ,1
!*
/AUTO,1
/REP,FAST   
MSHAPE,0,3D
MSHKEY,1
!*
FLST,5,12,6,ORDE,4
FITEM,5,1   
FITEM,5,-8
FITEM,5,19
FITEM,5,-22
CM,_Y,VOLU
VSEL, , , ,P51X
CM,_Y1,VOLU
CHKMSH,'VOLU'   
CMSEL,S,_Y
!*
VMESH,_Y1   
!*
CMDELE,_Y   
CMDELE,_Y1
CMDELE,_Y2
!*
/ZOOM,1,RECT,-0.0123277,0.681333 ,0.64372130521 ,-0.754755327283
vlist, all
VPLOT   
FLST,5,24,4,ORDE,24
FITEM,5,109
FITEM,5,-110
FITEM,5,113
FITEM,5,-114
FITEM,5,117
FITEM,5,-118
FITEM,5,121
FITEM,5,-122
FITEM,5,137
FITEM,5,-138
FITEM,5,141
FITEM,5,-142
FITEM,5,145
FITEM,5,-146
FITEM,5,149
FITEM,5,-150
FITEM,5,213
FITEM,5,-214
FITEM,5,217
FITEM,5,-218
FITEM,5,221
FITEM,5,-222
FITEM,5,225
FITEM,5,-226
CM,_Y,LINE
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y   
!*
LESIZE,_Y1, , ,3, , , , ,1
!*
/AUTO,1
/REP,FAST   
FLST,5,12,6,ORDE,6
FITEM,5,10
FITEM,5,-13
FITEM,5,15
FITEM,5,-18
FITEM,5,24
FITEM,5,-27
CM,_Y,VOLU
VSEL, , , ,P51X
CM,_Y1,VOLU
CHKMSH,'VOLU'   
CMSEL,S,_Y
!*
VSWEEP,_Y1
!*
CMDELE,_Y   
CMDELE,_Y1
CMDELE,_Y2
!*
/VIEW,1,1,1,1   
/ANG,1
/REP,FAST   
alls
VSEL,S,MAT,,3   
VPLOT   
/ZOOM,1,RECT,-0.105215,0.693647 ,0.56901842502 ,-0.783283784062
FLST,5,4,4,ORDE,2   
FITEM,5,249
FITEM,5,-252
CM,_Y,LINE
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y   
!*
LESIZE,_Y1, , ,20,3, , , ,1
!*
FLST,5,1,4,ORDE,1   
FITEM,5,248
CM,_Y,LINE
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y   
!*
LESIZE,_Y1, , ,35, , , , ,1
!*
FLST,5,1,4,ORDE,1   
FITEM,5,245
CM,_Y,LINE
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y   
!*
LESIZE,_Y1, , ,25, , , , ,1
!*
CM,_Y,VOLU
VSEL, , , ,      29
CM,_Y1,VOLU
CHKMSH,'VOLU'   
CMSEL,S,_Y
!*
VMESH,_Y1   
!*
CMDELE,_Y   
CMDELE,_Y1
CMDELE,_Y2
!*
/VIEW,1,1   
/ANG,1
/REP,FAST   
/ZOOM,1,RECT,0.00644175,-0.169327 ,0.20398775639 ,-0.238021408137   
/AUTO,1
/REP,FAST   
alls
VSEL,S,MAT,,2   
VPLOT   
/VIEW,1,1,1,1   
/ANG,1
/REP,FAST   
/ZOOM,1,RECT,0.0450921,0.582019 ,0.534662597384 ,-0.663068457086
FLST,5,4,4,ORDE,4   
FITEM,5,35
FITEM,5,127
FITEM,5,203
FITEM,5,235
CM,_Y,LINE
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y   
!*
LESIZE,_Y1, , ,6, , , , ,1
!*
FLST,5,3,4,ORDE,3   
FITEM,5,107
FITEM,5,135
FITEM,5,211
CM,_Y,LINE
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y   
!*
LESIZE,_Y1, , ,4, , , , ,1
!*
FLST,5,3,4,ORDE,3   
FITEM,5,34
FITEM,5,126
FITEM,5,202
CM,_Y,LINE
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y   
!*
LESIZE,_Y1, , ,2, , , , ,1
!*
FLST,5,5,4,ORDE,5   
FITEM,5,102
FITEM,5,130
FITEM,5,206
FITEM,5,278
FITEM,5,283
CM,_Y,LINE
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y   
!*
LESIZE,_Y1, , ,2, , , , ,1
!*
FLST,5,2,4,ORDE,2   
FITEM,5,279
FITEM,5,281
CM,_Y,LINE
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y   
!*
LESIZE,_Y1, , ,3, , , , ,1
!*
FLST,5,3,6,ORDE,3   
FITEM,5,9   
FITEM,5,14
FITEM,5,23
CM,_Y,VOLU
VSEL, , , ,P51X
CM,_Y1,VOLU
CHKMSH,'VOLU'   
CMSEL,S,_Y
!*
VMESH,_Y1   
!*
CMDELE,_Y   
CMDELE,_Y1
CMDELE,_Y2
!*
EPLOT   
/VIEW,1,0.875780190917    ,0.473905766254    , -0.917735359893E-01
/ANG,   1,   28.9219582946
/REPLO
VPLOT   
/VIEW,1,1,1,1   
/ANG,1
/REP,FAST   
FLST,5,1,4,ORDE,1   
FITEM,5,231
CM,_Y,LINE
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y   
!*
LESIZE,_Y1, , ,16, , , , ,1
!*

FLST,5,2,4,ORDE,2   
FITEM,5,237
FITEM,5,240
CM,_Y,LINE
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y   
!*
LESIZE,_Y1, , ,2, , , , ,1
!*
CM,_Y,VOLU
VSEL, , , ,      32
CM,_Y1,VOLU
CHKMSH,'VOLU'   
CMSEL,S,_Y
!*
VSWEEP,_Y1
!*
CMDELE,_Y   
CMDELE,_Y1
CMDELE,_Y2
!*
/VIEW,1,1   
/ANG,1
/REP,FAST   
/AUTO,1
/REP,FAST   
SMRT,6
SMRT,5
SMRT,4
MSHAPE,1,3D
MSHKEY,0
!*
alls
VPLOT   
CM,_Y,VOLU
VSEL, , , ,      34
CM,_Y1,VOLU
CHKMSH,'VOLU'   
CMSEL,S,_Y
!*
VMESH,_Y1   
!*
CMDELE,_Y   
CMDELE,_Y1
CMDELE,_Y2
!*
VCLEAR,      34
VPLOT   
SMRT,OFF
CM,_Y,VOLU
VSEL, , , ,      33
CM,_Y1,VOLU
CHKMSH,'VOLU'   
CMSEL,S,_Y
!*
VMESH,_Y1   
!*
CMDELE,_Y   
CMDELE,_Y1
CMDELE,_Y2
!*
SMRT,4
APLOT   
CM,_Y,VOLU
VSEL, , , ,      34
CM,_Y1,VOLU
CHKMSH,'VOLU'   
CMSEL,S,_Y
!*
VMESH,_Y1   
!*
CMDELE,_Y   
CMDELE,_Y1
CMDELE,_Y2
!*
LPLOT   
/VIEW,1,,,1
/ANG,1
/REP,FAST   
FLST,5,3,6,ORDE,3   
FITEM,5,1   
FITEM,5,7   
FITEM,5,19
VSEL,R, , ,P51X
/UI,MESH,OFF
ESLV,R
FLST,2,1080,2,ORDE,6
FITEM,2,1   
FITEM,2,-360
FITEM,2,1441
FITEM,2,-1800   
FITEM,2,1921
FITEM,2,-2280   
BFE,P51X,JS,1,2.4e6,,, , !线圈加载电流密度
alls
!*
!*
EPLOT   
LPLOT   
FLST,5,3,6,ORDE,3   
FITEM,5,3   
FITEM,5,-4
FITEM,5,21
VSEL,R, , ,P51X
ESLV,R
FLST,2,1080,2,ORDE,4
FITEM,2,481
FITEM,2,-1200   
FITEM,2,2401
FITEM,2,-2760   
BFE,P51X,JS,1,-2400000,,, ,
EPLOT   
alls
EPLOT   
LPLOT   
FLST,5,7,6,ORDE,5   
FITEM,5,5   
FITEM,5,-6
FITEM,5,15
FITEM,5,-18
FITEM,5,22
VSEL,R, , ,P51X
ESLV,R
FLST,2,648,2,ORDE,6
FITEM,2,1201
FITEM,2,-1440   
FITEM,2,2761
FITEM,2,-2880   
FITEM,2,3169
FITEM,2,-3456   
BFE,P51X,JS,1,,-2.4e6,, ,   
alls
EPLOT   
LPLOT   
FLST,5,11,6,ORDE,7
FITEM,5,2   
FITEM,5,8   
FITEM,5,10
FITEM,5,-13
FITEM,5,20
FITEM,5,24
FITEM,5,-27
VSEL,R, , ,P51X
ESLV,R
FLST,2,936,2,ORDE,10
FITEM,2,361
FITEM,2,-480
FITEM,2,1801
FITEM,2,-1920   
FITEM,2,2281
FITEM,2,-2400   
FITEM,2,2881
FITEM,2,-3168   
FITEM,2,3457
FITEM,2,-3744   
BFE,P51X,JS,1,,2400000,, ,
alls
EPLOT
FLST,2,1,5,ORDE,1   
FITEM,2,146
DA,P51X,AZ,0,0
/VIEW,1,1,1,1   
/ANG,1
/REP,FAST   
alls
!*
ANTYPE,3
HARFRQ,0,120,   
!*
FINISH
/SOL
!*
PHYSICS,WRITE,emag, , ,
APLOT   
FINISH
/PREP7
lsclear,all
et,1,0
et,2,0
et,4,0
et,3,SOLID90
MPTEMP,,,,,,,,!   
MPTEMP,1,20
MPTEMP,2,100
MPTEMP,3,200
MPTEMP,4,300
MPTEMP,5,400
MPTEMP,6,500
MPTEMP,7,600
MPTEMP,8,700
MPTEMP,9,720
MPTEMP,10,742   
MPTEMP,11,760   
MPTEMP,12,800   
MPTEMP,13,900   
MPTEMP,14,1000
MPDE,C,3
MPDATA,C,3,,472
MPDATA,C,3,,480
MPDATA,C,3,,498
MPDATA,C,3,,524
MPDATA,C,3,,560
MPDATA,C,3,,615
MPDATA,C,3,,700
MPDATA,C,3,,854
MPDATA,C,3,,916
MPDATA,C,3,,986
MPDATA,C,3,,1064
MPDATA,C,3,,806
MPDATA,C,3,,637
MPDATA,C,3,,602
MPTEMP,,,,,,,,
MPTEMP,1,20
MPTEMP,2,100
MPTEMP,3,200
MPTEMP,4,300
MPTEMP,5,400
MPTEMP,6,500
MPTEMP,7,600
MPTEMP,8,700
MPTEMP,9,720
MPTEMP,10,742   
MPTEMP,11,760   
MPTEMP,12,800   
MPTEMP,13,900   
MPTEMP,14,1000
MPDE,KXX,3
MPDATA,KXX,3,,47.68
MPDATA,KXX,3,,43.53
MPDATA,KXX,3,,40.44
MPDATA,KXX,3,,38.13
MPDATA,KXX,3,,36.02
MPDATA,KXX,3,,34.16
MPDATA,KXX,3,,31.98
MPDATA,KXX,3,,28.66
MPDATA,KXX,3,,27.49
MPDATA,KXX,3,,26.20
MPDATA,KXX,3,,25.14
MPDATA,KXX,3,,26.49
MPDATA,KXX,3,,25.29
MPDATA,KXX,3,,24.02
!*
VSEL,S,MAT,,3   
VPLOT   
alls
EPLOT   
FINISH
/POST1
FINISH
/SOL
FINISH
/PREP7
ASEL,R, , ,   145  !钢板对流系数
NSLA,R,1
FLST,2,2746,1,ORDE,2
FITEM,2,19969   
FITEM,2,-22714
/GO
!*
SF,P51X,CONV,3,23   
alls
ASEL,R, , ,   146
NSLA,R,1
FLST,2,2746,1,ORDE,2
FITEM,2,22715   
FITEM,2,-25460
/GO
!*
SF,P51X,CONV,1,23   
alls
FLST,5,4,5,ORDE,2   
FITEM,5,147
FITEM,5,-150
ASEL,R, , ,P51X
NSLA,R,1
FINISH
/SOL
FLST,2,7440,1,ORDE,6
FITEM,2,19969   
FITEM,2,-20208
FITEM,2,22715   
FITEM,2,-22954
FITEM,2,25461   
FITEM,2,-32420
/GO
!*
SF,P51X,CONV,5.97,23
antype,trans
toffst,273
tunif,100   
d,nmax,temp,25
cnvtol,heat,1   
kbc,1   
trnopt,full
autos,on
deltim,0.1,0.05,delt,on
outres,basic,all
physics,write,thermal   
finish
*do,i,1,ftime/tinc   ! solution *do loop
*SET,time,time+tinc               ! increment time
physics,read,emag    ! read emag physics file   
/SOLU         
*if,i,eq,1,then
tunif,100                  ! initial temperature
*else   
ldread,temp,last,,,,,rth   ! read thermal analysis temperatures   
*endif
solve                         ! solve harmonic analysis
finish
physics,read,thermal          ! read thermal physics file   
/assign,esav,therm,esav       ! redirect files for use in thermal restart   
/assign,emat,therm,emat
/solu   
*if,i,gt,1,then
antype,trans,rest            ! thermal restart
*endif

time,time                     ! time at end of thermal run
esel,s,mat,,3               ! select billet region
ldread,hgen,,,,2,,rst         ! apply coupled joule heating load from emag
OUTRES,ALL,ALL,
esel,all
solve   
finish
/assign,esav                  ! reassign files to default   
/assign,emat
*enddo
finish
save

yangzi7851 发表于 2008-3-7 15:08:32

关注一下,也想弄清楚这个问题

chgdong213 发表于 2008-3-7 21:41:07

我也在搞这个
但还不知道从何处入手
望高手指点一二

kelvin6521659 发表于 2008-3-17 18:38:32

环境法求解电感加热好像不太精准,MULTI-FEILD求解效果也许会更好些,

JCHLI2000 发表于 2008-3-20 09:55:49

请贴上你的磁极的磁感应强度的分布云图

请贴上你的磁极的磁感应强度的分布云图,这样我们才可以看到你的磁场结果是否正确!

wqxyqf 发表于 2008-3-28 19:10:23

这是我计算得出的结果云图,从云图上可以看出不同时间下钢板上的温度并没有随时间在变化,讲求高手指点一下,万分感谢。

yinzhen12 发表于 2009-3-18 15:41:40

怎么没人解答呢,偶也学学

weizumin 发表于 2010-10-15 11:41:06

我也很想知道
,高手都忙呢?没人答!

无悔060961 发表于 2011-12-27 11:29:48

哥们,你这个最终整好没?整好的话可以把你的命令流给我发一份,wuh060962@126.com

wxs 发表于 2012-2-15 10:19:17

哪位高人有磁热耦合的实例,能不能给小弟发一份,万分感谢。X_S_WU@163.com

h40531173 发表于 2012-3-19 14:39:24

朋友,我是感应加热的初学者,能给我发一份命令流吗?在此先谢过了,lantiangaojuchun@126.com
页: [1]
查看完整版本: 电磁感应加热--求教北极熊甲老师