马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有账号?我要加入
x
我是菜鸟;用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。
非常感谢! |