用ansys如何计算三层框架正弦激励后的位移响应?
我是菜鸟;用ansys建了一个三层框架的模型;命令流如下:
fini
/cle
/TITLE,kuangjia
*SET,T,0.002
*SET,S,1.2E-5
*SET,IZZ,1.6E-11
*SET,IYY,0.9E-11
*SET,B,0.003
*SET,H,0.004
*SET,EX,2.2E11
*SET,PRXY,0.3
*SET,DENS,7.8E3
fini
/cle
/PREP7
!*
ET,1,SHELL63
!*
ET,2,BEAM4
!*
R,1,T, , , , , ,
RMORE, , , ,
RMORE
RMORE, ,
!*
R,2,S,IZZ,IYY,B,H, ,
RMORE, , , , , , ,
!*
!*
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,EX,1,,EX
MPDATA,PRXY,1,,PRXY
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,DENS,1,,DENS
K,1,0,0,0,
K,2,0,0,0.5,
K,3,0,0,1.0,
K,4,0,0,1.5,
!*
/VIEW,1,-1.2,-1,1
/VUP,1,Y
/REPLOT
!*
L, 1, 2
L, 2, 3
L, 3, 4
TYPE, 2
MAT, 1
REAL, 2
ESYS, 0
SECNUM,
!*
FLST,5,3,4,ORDE,2
FITEM,5,1
FITEM,5,-3
CM,_Y,LINE
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y
!*
LESIZE,_Y1, , ,6, , , , ,1
!*
FLST,2,3,4,ORDE,2
FITEM,2,1
FITEM,2,-3
LMESH,P51X
FLST,3,3,4,ORDE,2
FITEM,3,1
FITEM,3,-3
LGEN,2,P51X, , , ,0.5, , ,0
FLST,3,6,4,ORDE,2
FITEM,3,1
FITEM,3,-6
LGEN,2,P51X, , ,0.5, , , ,0
LSEL,R,LOC,X,0.5
ALLSEL,ALL
FLST,2,4,3
FITEM,2,2
FITEM,2,6
FITEM,2,14
FITEM,2,10
A,P51X
TYPE, 1
MAT, 1
REAL, 1
ESYS, 0
SECNUM,
!*
/PNUM,KP,0
/PNUM,LINE,1
/PNUM,AREA,0
/PNUM,VOLU,0
/PNUM,NODE,0
/PNUM,TABN,0
/PNUM,SVAL,0
/NUMBER,0
!*
/PNUM,ELEM,0
/REPLOT
!*
FLST,5,4,4,ORDE,2
FITEM,5,13
FITEM,5,-16
CM,_Y,LINE
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y
!*
LESIZE,_Y1, , ,5, , , , ,1
!*
MSHKEY,0
CM,_Y,AREA
ASEL, , , , 1
CM,_Y1,AREA
CHKMSH,'AREA'
CMSEL,S,_Y
!*
AMESH,_Y1
!*
CMDELE,_Y
CMDELE,_Y1
CMDELE,_Y2
!*
FLST,3,1,5,ORDE,1
FITEM,3,1
AGEN,2,P51X, , , , ,0.5, ,0
FLST,3,2,5,ORDE,2
FITEM,3,1
FITEM,3,-2
AGEN,2,P51X, , , , ,0.5, ,0
ALLSEL,ALL
NUMMRG,ALL, , , ,LOW
NUMCMP,ALL
NSEL,R,LOC,Z,0
FINISH
/SOL
FLST,2,4,1,ORDE,4
FITEM,2,1
FITEM,2,20
FITEM,2,39
FITEM,2,58
!*
/GO
D,P51X, ,0, , , ,ALL, , , , ,
ALLSEL,ALL
!*
/VIEW,1,-0.2,-0.9,0.4
/VUP,1,Y
/REPLOT
!*
LPLOT
FINISH
想在结构上加sin13t的正弦激励,然后得到某一单元的位移响应信号,请问该如何做呢?
求高手告知,我将不胜感激!!时间间隔可以取0.01s;时程为20s。
非常感谢! 那些无用的旋转,放大的操作,
楼主可否考虑在命令流里给删除..
那样读起来会简便点..
抱歉,我是新手
不好意思,我是菜鸟,刚刚接触的ansys;是照着书上的算例做出来的框架模型,然后把命令流导出来了;
谁能帮帮俺如何加荷载呢?多谢各位了!
怎么没人回复俺呢?
大家看看有没有人可以帮帮俺的?谢谢了!
页:
[1]