用ansys如何计算三层框架正弦激励后的位移响应？

weiyuperfect

我是菜鸟；用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。
非常感谢！

aircraft

那些无用的旋转,放大的操作,
楼主可否考虑在命令流里给删除..
那样读起来会简便点..

weiyuperfect

不好意思，我是菜鸟，刚刚接触的ansys；
是照着书上的算例做出来的框架模型，然后把命令流导出来了；
谁能帮帮俺如何加荷载呢？多谢各位了！

weiyuperfect

大家看看有没有人可以帮帮俺的？谢谢了！