wfj0057 发表于 2007-5-12 19:03

请问:单自由度弹簧-振子振动的计算问题!

请各位高手帮忙!
我做了一个很简单的单自由度弹簧-振子振动的模型,施加初位移使其发生振动,但是结果不对,后期都没有振动了,请各位高手帮忙看一下!谢谢!!
命令流如下:
/prep7
ET,2,COMBIN14,,,2
ET,3,MASS21,,,4
R,2,840.4okok.org !刚度
R,3,11.121/9.8okok.org !质量
N,1000,0,-1,0
N,1002,0,0,0

TYPE,2
REAL,2
E,1000,1002
TYPE,3
REAL,3
E,1002
M,1002,UY

/solu

ANTYPE,TRANS
SSTIF,ON
TIMINT,ON
AUTOTS,ON
NSUBST,4
KBC,0
OUTRES,all,all
FCUM,ADDokok.org

TT=1
acel,,9.8
*do,I,1,300
*IF,I,EQ,1,THEN
D,1002,UY,-0.01 !位移荷载
*ENDIF
d,1000,ALL
d,1002,ux
TIME,TT
lswrite,TT
TT=TT+1
ddele,ALL,ALL !去除约束
*enddo
FCUM,REPL

lssolve,1,TT
FINISH
SAVE

waltdon 发表于 2007-5-13 17:50

你是在做谐响应分析吗?
我也这按你的过程做了一遍 出了好多错误 没有结果显示 :@L :@L
页: [1]
查看完整版本: 请问:单自由度弹簧-振子振动的计算问题!