请教一个瞬态耦合中，怎样读出每一步的结果

bobocom

请教各位高手，

我现在尝试瞬态的电磁耦合，电流在前4秒上升至39110A,到第10秒在下降到0A.

但在耦合的结果中，只能耦合出来第一部的结果。我希望能读出每一部的磁场结果，真的请各位高手帮帮忙。

关键请帮我看看循环部分。

/PREP7  
!*  
ET,1,SOLID69
!*  
ET,2,SOLID97
!*  
!*  
MPTEMP,,,,,,,,  
MPTEMP,1,0  
MPDATA,MURX,1,,1
MPTEMP,,,,,,,,  
MPTEMP,1,0  
MPDATA,RSVX,1,,1.7e-8   
MPTEMP,,,,,,,,  
MPTEMP,1,0  
MPDATA,MURX,2,,1
CYLIND,0.02,0,0,0.5,0,360,  
CYLIND,0.2,0,0,0.5,0,360,   
FLST,2,2,6,ORDE,2   
FITEM,2,1   
FITEM,2,-2  
VOVLAP,P51X
/VIEW,1,1,1,1   
/ANG,1  
/REP,FAST   
CM,_Y,VOLU  
VSEL, , , ,       1
CM,_Y1,VOLU
CMSEL,S,_Y  
!*  
CMSEL,S,_Y1
VATT,       1, ,   1,       0   
CMSEL,S,_Y  
CMDELE,_Y   
CMDELE,_Y1  
!*  
CM,_Y,VOLU  
VSEL, , , ,       3
CM,_Y1,VOLU
CMSEL,S,_Y  
!*  
CMSEL,S,_Y1
VATT,       2, ,   2,       0   
CMSEL,S,_Y  
CMDELE,_Y   
CMDELE,_Y1  
!*  
SMRT,6  
SMRT,10
FLST,5,2,6,ORDE,2   
FITEM,5,1   
FITEM,5,3   
CM,_Y,VOLU  
VSEL, , , ,P51X
CM,_Y1,VOLU
CHKMSH,'VOLU'   
CMSEL,S,_Y  
!*  
VSWEEP,_Y1  
!*  
CMDELE,_Y   
CMDELE,_Y1  
CMDELE,_Y2  
!*  
VSEL,S,MAT,,1   
ALLSEL,BELOW,VOLU   
VPLOT   
EPLOT   

FLST,4,10,1,ORDE,4  
FITEM,4,1   
FITEM,4,-2  
FITEM,4,281
FITEM,4,-288
/UI,MESH,OFF
CP,10,VOLT,P51X

FLST,2,1,5,ORDE,1   
FITEM,2,1   
/GO
!*  
DA,P51X,VOLT,0  
FINISH  
/SOLU  
!*  
ANTYPE,4
!*  
TRNOPT,FULL
LUMPM,0
!*  
FLST,2,1,3,ORDE,1   
FITEM,2,6   
/GO
!*  
FK,P51X,AMPS,39110  
!*  
TIME,4  
AUTOTS,0
DELTIM,1, , ,1  
KBC,0   
!*  
TSRES,ERASE
!*  
OUTRES,ALL,ALL,

SOLVE   
VPLOT   
EPLOT   
FLST,2,1,3,ORDE,1   
FITEM,2,6   
/GO
!*  
FK,P51X,AMPS,0  
!*  
TIME,10
AUTOTS,0
DELTIM,1, , ,1  
KBC,0   
!*  
TSRES,ERASE
!*  
OUTRES,ALL,ALL,
/STATUS,SOLU
SOLVE   
FINISH  

/PREP7  
/COM,   

ESEL,S,MAT,,1   
EMODIF,ALL,TYPE,2,  
ALLSEL,ALL  
VPLOT   

ALLSEL,ALL  
VPLOT   
ASEL,S,LOC,Z,0  
ASEL,A,LOC,Z,0.5
ASEL,A, , ,8
ASEL,A, , ,7
DA,ALL,ASYM

/SOLU  

*DO,DELTA,1,10,1
LDREAD,JS,,,DELTA, ,,'rst',' ' TIME,DELTA
SOLVE !计算
*ENDDO
FINISH

[ 本帖最后由 xuruikl 于 2007-12-14 08:54 编辑 ]