ansys循环加载求解和后处理问题?
/PREP7
!*
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,EX,1,,2e11
MPDATA,PRXY,1,,0.3
FINISH
/SOL
*Dim,Prs,array,2,2,0,,,
*Create,ansuitmp
*Vread,Prs(1,1),'kpres','txt','',2,,,,,,
(E8.2,E11.3)
*end
/input,ansuitmp
*Do,i,1,2
FLST,2,1,1,ORDE,1
FITEM,2,1527
!*
/GO
F,P51X,FX,prs(1,i)
FLST,2,1,1,ORDE,1
FITEM,2,1527
!*
/GO
F,P51X,FY,prs(2,i)
/VIEW, 1, -0.492392348312 , -0.810851710223 , 0.316337287325
/ANG, 1, 47.7252305595
/REPLO
FLST,2,1,5,ORDE,1
FITEM,2,5
!*
/GO
DA,P51X,ALL,
!*
ANTYPE,0
/STATUS,SOLU
SOLVE
*enddo
FINISH
这是求解加载部分,本意是对一点加x和y向载荷,循环两次。
/post1
*cfopen,yg,txt
*dim,xyz,array,2,1
*do,i,1,2
*get,xyz(i,1),node,1527,u,x
*vwrite,xyz(i,1)
(1E23.8)
*enddo
*cfclose
这是后处理部分,得到某节点x向位移,也需要循环两次,但是这样我做出来的结果只有第二次循环的,因为这是我的一个小尝试,我真实需要循环一百次以上,不知道我的语句哪里写错了求大神解答。