你好，看到你在百度知道上的回答，能不能给以在ansys中施加脉动风荷载的命令流例子

!***在自重作用下，计算结构在风激励下的响应***
/SOLU
TIMINT,ON
ANTYPE,4
TRNOPT,FULL
OUTRES,ALL,NONE
OUTRES,NSOL,LAST
OUTRES,STRS,LAST
KBC,0
AUTOTS,ON
ALPHAD,0.0054 !设定质量阻尼系数（修改）
BETAD,0.0734 !设定刚度阻尼系数（修改）
*DIM,Al,ARRAY,11
*DIM,Ad,ARRAY,11
*DIM,Lb,ARRAY,3000,11
*DIM,Db,ARRAY,3000,11
*DIM,Mb,ARRAY,3000,11
*DIM,MMx,ARRAY,3000,11
*DIM,Nod,ARRAY,11
*DIM,FFy,ARRAY,3000,11
*DIM,FFz,ARRAY,3000,11
*DIM,Kn,ARRAY,11
*DIM,v,ARRAY,3000,11
*DIM,w,ARRAY,3000,11
Al(1)=1771.2,1623.6,2164.8,2214,2214,1279.2,2214,2214,2164.8,1623.6,1771.2
Ad(1)=162,148.5,198,202.5,202.5,117,202.5,202.5,198,148.5,162
Kn(1)=50,104,158,218,278,324,371,430,490,550,598
Nod(1)=1453,2990,1723,1873,2023,2143,3858,2413,2563,3011,2833
*SET,Ro,1.225
*SET,U,20
*SET,B,32.8
*SET,Cl,0.4885
*SET,Cd,1.5129
*SET,Cm,-0.1526
*SET,Cll,0.4207
*SET,Cdl,0.0374
*SET,Cml,-0.0316
*DO,T,1,3000,1
TIME,0.1*T
*DO,n,1,11,1
*SET,v(T,n),FSX(T,n)
*SET,w(T,n),FSY(T,n)
Lb1=Ro*U*v(T,n)*Al(n)*Cl
Lb2=1/2*Ro*U*w(T,n)*(Ad(n)*Cd+Al(n)*Cll)
Lb(T,n)=Lb1+Lb2
Db1=Ro*U*v(T,n)*Ad(n)*Cd
Db2=1/2*Ro*U*w(T,n)*(Ad(n)*Cdl-Al(n)*Cl)
Db(T,n)=Db1+Db2
Mb1=Ro*B*U*v(T,n)*Al(n)*Cm
Mb2=1/2*Ro*B*U*w(T,n)*Al(n)*Cml
Mb(T,n)=Mb1+Mb2
FFy(T,n)=Lb(T,n)*cos(0/180*3.14)+Db(T,n)*sin(0/180*3.14)
FFz(T,n)=Db(T,n)*cos(0/180*3.14)-Lb(T,n)*sin(0/180*3.14)
MMx(T,n)=Mb(T,n)
!***********选择节点并施加风载荷*********
F,Nod(n),FY,FFy(T,n) !施加所选节点的风载荷
F,Kn(n),FX,FFz(T,n)
*ENDDO
NSUB,1 !指定载荷子步数
SOLVE !求解
*ENDDO
SAVE
FINI