我把命令都贴出来,大家帮忙分析一下,谢谢!
/BATCH
! /COM,ANSYS RELEASE 9.0 UP20041104 13:50:18 08/28/2007
/input,start90,ans,'d:\Program Files\Ansys Inc\v90\ANSYS\apdl\',,,,,,,,,,,,,,,,1
/PREP7
!*
ET,1,BEAM189
!*
MP,EX,1,210e9
MP,PRXY,1,0.3
MP,DENS,1,7850
SECTYPE, 1, BEAM, HRECT, ,1
SECOFFSET, USER,1.25,0.75
SECDATA,2.5,1.5,0.04,0.04,0.036,0.036
K,1,0,0,0,
K,2,72.2,0,0,
K,3,0,20,0
LSTR,1,2
LATT,1,,1,,,,1
LESIZE,1,0.2
!*
LMESH,1
! /REPLOT
!*
/SOL
ANTYPE,TRANSIENT
TRNOPT,FULL
ALLSEL
*SET,P,16E5
J=4
D,1,,,,,,UX,UY,UZ,ROTX
D,175,,,,,,UY,UZ
D,348,,,,,,UY,UZ
D,398,,,,,,UY,UZ
D,571,,,,,,UY,UZ
D,2,,,,,,UY,UZ,ROTX
*DO,I,1,14 !共14个载荷步
N=J*13
TIME,I
NSUBST,10
NSEL,S,,,1+N
NSEL,A,,,15+N
NSEL,A,,,26+N
NSEL,A,,,40+N
NSEL,A,,,51+N
NSEL,A,,,65+N
NSEL,A,,,76+N
NSEL,A,,,90+N
NSEL,A,,,101+N
NSEL,A,,,115+N
NSEL,A,,,131+N
NSEL,A,,,145+N
NSEL,A,,,156+N
NSEL,A,,,170+N
NSEL,A,,,181+N
NSEL,A,,,195+N
NSEL,A,,,206+N
NSEL,A,,,220+N
NSEL,A,,,231+N
NSEL,A,,,245+N
NSEL,A,,,1+N+400
NSEL,A,,,15+N+400
NSEL,A,,,26+N+400
NSEL,A,,,40+N+400
NSEL,A,,,51+N+400
NSEL,A,,,65+N+400
NSEL,A,,,76+N+400
NSEL,A,,,90+N+400
NSEL,A,,,101+N+400
NSEL,A,,,115+N+400
NSEL,A,,,131+N+400
NSEL,A,,,145+N+400
NSEL,A,,,156+N+400
NSEL,A,,,170+N+400
NSEL,A,,,181+N+400
NSEL,A,,,195+N+400
NSEL,A,,,206+N+400
NSEL,A,,,220+N+400
NSEL,A,,,231+N+400
NSEL,A,,,245+N+400
F,ALL,FY,-P
ACEL,0,9.8
LSWRIRE,I
FDELE,ALL,ALL
ALLSEL
J=J+1
*ENDDO |