这是我的部分主命令流,不知道有没有欠缺...
finish
/clea
/filename,istress_g
/CWD,'G:\TRANSIENT_2'
PART_PATH='G:\TRANSIENT_2'
/INPUT,'BOOM','ans','%PART_PATH%',, 0
/solu
!生成自重作用下预应力文件
INISTATE, WRITE, 1,,,,
SOLVE
FINISH
/SOLU
INISTATE, READ, istress_g,ist, '%PART_PATH%'
INISTATE, WRITE, 0,,,,
ANTYPE,TRANS
SOLCONTROL,0
KBC,1
!一节臂加载
TIME,0.2527
!R, 41,133,4.5,0,0,0,2.4e-9*1.25
F,18238,FZ,282
NSUBST,10
OUTRES,,1
LSWRITE,1
TIME,1.3751
!R, 43,133,4.5,0,0,0,2.4e-9*1.25
F,11661,FX,986
LSWRITE,2
TIME,2.4251
!R, 44,133,4.5,0,0,0,2.4e-9*1.25
F,11660,FX,986
LSWRITE,3
TIME,3.2651
!R, 45,133,4.5,0,0,0,2.4e-9*1.25
F,18161,FX,986
LSWRITE,4
TIME,3.3882
!R, 46,133,4.5,0,0,0,2.4e-9*1.25
F,18158,FX,986
LSWRITE,5
TIME,3.5529
!R, 47,133,4.5,0,0,0,2.4e-9*1.25
!R, 91,133,4.5,0,0,0,2.4e-9*1.25
F,46860,FZ,-184
LSWRITE,6
TIME,10
NSUBST,20
LSWRITE,7
LSSOLVE,1,7,1 |