CSURanLing 发表于 2015-12-2 15:01

怎样将这个循环分段加载,把循环拆开

timint,on   
*SET,buffertime,100
*do,tm,buffertime,buffertime*4,buffertime   
time,tm
deltim,10
autots,on   
*SET,current,tm/(buffertime*4)
ALLSEL,ALL
!施加接触   
FLST,2,3,5,ORDE,3   
FITEM,2,18
FITEM,2,88
FITEM,2,97
DA,P51X,VOLT,0    !在选择的面上施加电压为0   
ASEL,S, , ,   11 !(选择面)
nsla,s,1   !选择与选中面相关的节点   
*get,nodenum1,node,0,count    !得到的节点有多少个记成nodenum1
F,all,amps,-I_bar*current/nodenum1   !对所有的节点赋以-I_bar/nodenum1安倍的电流
allsel,all
ASEL,S, , ,   1   
nsla,s,1
*get,nodenum2,node,0,count
F,all,amps,-I_bar*current/nodenum2
allsel,all
outres,all,1
solve   
*enddo

htbbzzg 发表于 2015-12-3 16:46

不知道你为什么要这样做,不过应该不难的,比如修改如下 (没有仔细考虑,只是做个例子):

timint,on
buffertime = 100
   
tm=100
time,tm
deltim,10
autots,on   
*SET,current,tm/(buffertime*4)
ALLSEL,ALL
!施加接触   
FLST,2,3,5,ORDE,3   
FITEM,2,18
FITEM,2,88
FITEM,2,97
DA,P51X,VOLT,0    !在选择的面上施加电压为0   
ASEL,S, , ,   11 !(选择面)
nsla,s,1   !选择与选中面相关的节点   
*get,nodenum1,node,0,count    !得到的节点有多少个记成nodenum1
F,all,amps,-I_bar*current/nodenum1   !对所有的节点赋以-I_bar/nodenum1安倍的电流
allsel,all
ASEL,S, , ,   1   
nsla,s,1
*get,nodenum2,node,0,count
F,all,amps,-I_bar*current/nodenum2
allsel,all
outres,all,1
solve   

tm=200
time,tm
deltim,10
autots,on   
*SET,current,tm/(buffertime*4)
ALLSEL,ALL
!施加接触   
FLST,2,3,5,ORDE,3   
FITEM,2,18
FITEM,2,88
FITEM,2,97
DA,P51X,VOLT,0    !在选择的面上施加电压为0   
ASEL,S, , ,   11 !(选择面)
nsla,s,1   !选择与选中面相关的节点   
*get,nodenum1,node,0,count    !得到的节点有多少个记成nodenum1
F,all,amps,-I_bar*current/nodenum1   !对所有的节点赋以-I_bar/nodenum1安倍的电流
allsel,all
ASEL,S, , ,   1   
nsla,s,1
*get,nodenum2,node,0,count
F,all,amps,-I_bar*current/nodenum2
allsel,all
outres,all,1
solve   

tm=300
time,tm
deltim,10
autots,on   
*SET,current,tm/(buffertime*4)
ALLSEL,ALL
!施加接触   
FLST,2,3,5,ORDE,3   
FITEM,2,18
FITEM,2,88
FITEM,2,97
DA,P51X,VOLT,0    !在选择的面上施加电压为0   
ASEL,S, , ,   11 !(选择面)
nsla,s,1   !选择与选中面相关的节点   
*get,nodenum1,node,0,count    !得到的节点有多少个记成nodenum1
F,all,amps,-I_bar*current/nodenum1   !对所有的节点赋以-I_bar/nodenum1安倍的电流
allsel,all
ASEL,S, , ,   1   
nsla,s,1
*get,nodenum2,node,0,count
F,all,amps,-I_bar*current/nodenum2
allsel,all
outres,all,1
solve   

tm=400
time,tm
deltim,10
autots,on   
*SET,current,tm/(buffertime*4)
ALLSEL,ALL
!施加接触   
FLST,2,3,5,ORDE,3   
FITEM,2,18
FITEM,2,88
FITEM,2,97
DA,P51X,VOLT,0    !在选择的面上施加电压为0   
ASEL,S, , ,   11 !(选择面)
nsla,s,1   !选择与选中面相关的节点   
*get,nodenum1,node,0,count    !得到的节点有多少个记成nodenum1
F,all,amps,-I_bar*current/nodenum1   !对所有的节点赋以-I_bar/nodenum1安倍的电流
allsel,all
ASEL,S, , ,   1   
nsla,s,1
*get,nodenum2,node,0,count
F,all,amps,-I_bar*current/nodenum2
allsel,all
outres,all,1
solve   
页: [1]
查看完整版本: 怎样将这个循环分段加载,把循环拆开