*VREAD,TIME,TIME,TXT,,NT 的修改

FINISH
*SET,NT,150
*DIM,TIME,,NT
*DIM,AC_X,,NT
*DIM,AC_Y,,NT

*CREATE,ansuitmp
*VREAD,TIME,'TIME','txt',' ',1, , , , , ,
(F6.2)
*END
/INPUT,ansuitmp

!*
*CREATE,ansuitmp
*VREAD,AC_X,'AC_X','txt',' ',1, , , , , ,
(E10.3)
*END
/INPUT,ansuitmp

!*
*CREATE,ansuitmp
*VREAD,AC_Y,'AC_Y','txt',' ',1, , , , , ,
(E10.3)
*END
/INPUT,ansuitmp
！分析选项设置与求解
/SOLU ！进入求解器
ANTYPE,TRANS ！定义分析类型
NSUBST,1, , ,1 ！定义荷载子步数

*DO,II,1,NT
！施加加速度荷载
ACEL,AC_X(II),AC_Y(II)
TIME,TIME(II) ！设置时间点
SOLVE ！求解
*ENDDO

FINISH



/POST26
NSOL,2,733,U,X,UX_1
NSOL,3,773,U,X,UX_2
NSOL,4,748,U,X,UX_3
NSOL,5,788,U,X,UX_4

NSOL,6,733,U,Y,UY_1
NSOL,7,773,U,Y,UY_2
NSOL,8,748,U,Y,UY_3
NSOL,9,788,U,Y,UY_4

PLVAR,2,3,4,5
PLVAR,6,7,8,9


FINISH

[ 本帖最后由 wyhang191 于 2009-8-6 14:09 编辑 ]

:victory: :victory: :victory: :victory:

:victory: :victory: :victory: :victory: :victory:

是对的吗，谢谢了，参考一下，想问问，怎样加载随时间变化的载荷，载荷可用table表表示，有3000多，肯定不能按载荷步写了，该怎么办呢？

做的很不错 :)

*vread不能直接加入的:lol