FＣＵＭ,REPL
STＥP=0.01
OUTPR,ＡLL,ＡLL，
OUTRＥS,AＬL,ALL,
*ＤIM,WL_22０,,40０0,2
*ＶRＥAD,WL_2２0,ＷL４0００,TXT,,JIK,2,4000
（２F１5．3)
＊DO,I,1，4000
ＴＩME,I＊STＥP
AＬＬSEL
F，８6,FＸ,WL_2２0(Ｉ,1)
F,86,ＦY,WL_220(I，2)
ＡＬLSＥL
SOLVＥ
*ＥNDＤＯ
ＦＩNISH
/POSＴ26
ＮSOL,2，86,U,X,UX_1
ＰLVAR,2
NSOＬ,3,88,U,Ｙ,ＵY_１
ＰLＶＡＲ,3
EＳOL,4,2４０,85,S,EＱV，SEQV_１
ＰLVAR,4
RＦORCE,5,8,F,X,ＦＸ＿１
ＭAＴ，1
REAபைடு நூலகம்,1
SＥCNUM,1
＊DO,KK，13,1+１2*nn,12
＊DO,I,ＫK,ＫK+３,１
ﻩ＊DO,Ｊ，Ｉ,I+4,4
ﻩＥ,J,Ｊ＋４
ﻩﻩ*ＥNＤDO
＊EＮＤDO
*EＮDDＯ
*DＯ,KＫ,１３,１+１2＊nn,12
ﻩ*DO,I,KＫ,KＫ＋8,4
ﻩﻩ*ＤO,J,I,I+２,1
ﻩE,J,J+1
Ｎ,６＋１２*J,0，5,0+3*Ｊ
Ｎ,7+1２＊J,0，10,0+3*J
N,8+12*J,0,15,0+3*J
N,9+１2*J,－4,0,0+3*Ｊ
N，1０+１２＊Ｊ,-4,5,0+3＊J
N，11+１２*J,－4，１0,0+3*J
N,12+12＊J,-4，15,0+3＊J
＊ENDＤO
TＹPE,1ﻩ！梁
SOLVE
FINＩSH
！在所有荷载作用下的变形图
/POSＴ１
PLＤＩSＰ，１
!位移云图
PＬＮSＯL,U,SUM,0，1
!应力云图
PＬNSOＬ,S,EQV,0,１
！输出支座反力
PRＲSＯL
(2）结果：
所有荷载作用下的变形图
最大位移云图
最大应力云图
支座反力
3模态分析
（１)命令流motaｉ.ｍａc
/ＳOLU
1、结构形式，截面参数材料参数介绍
（1)命令流
FＩＮI
/CLＥ
/FILNＡMＥ,ＹOＵＺＵNI
/ＴＩＴLE,ＫUAＮＧJIA
／UNITＳ，SI
/ＰREＰ7
!材料
ＭP，EX,1,３.15e10!Ｃ35
MＰ,NUXＹ,1,0.2５
MP,DENS,１,250０
MP,EＸ,2,3.1５e10！C３５楼板
MP,ＮUXY,2,0．25
MP,DENＳ,2,40０0
!单元类型
ＥＴ,１,BEAM44
ET,2，ＳHＥＬL63
！实常数
R，1,0!梁截面
SＥCTYPE，1，ＢＥAM,ＲＥCＴ,,0
SECOＦFＳEＴ,ＣENT
SECDATＡ,0.3０0，０．70０,２,2
！R, 2，0!柱截面
SECTYPＥ，2,ＢEAM,RECT,，0
SECOFＦSET,CENT
*GET,FRE2,MODE,2,ＦREQ
Ａ１=1./(２．＊２.*PI＊FRE1)
B１＝2．*PI＊FRＥ1/２.
BEＴ=C/（FＲE１+FRE2)/PI
ＡLF＝(Ｃ-B1*BET)/Ａ１
*DＩM，ＤTAB,AＲRAY,1，２
*ＶFILL，DTAB(1,1),DＡＴA,FＲＥ1
＊VFILL,DTＡＢ(１,２)，DATA，FRE2
ﻩ＊ENDＤO
ﻩ*ENDDO
*ＥNDDＯ
ＴYPＥ，1!柱子
ＭAT，1
REAL,2
SECNUM，２
*DO,Ｉ，1,1２*nｎ,１
E，Ｉ,Ｉ+12
*EＮDＤＯ
TYPE,2 !楼面
MＡT,2
RＥAＬ,3
＊DO,K,13,1+12*nn,1２
＊DO,Ｉ,K,Ｋ＋4,4
ﻩ*DＯ,J,Ｉ,I＋２,1
Ｅ，J，J+1，J＋５,J+4
ﻩ*EＮDDO
ﻩ*ＥNDDO
*ＥNDDＯ
ALＬSEL !施加约束
NＳＥL，Ｓ,LOC,Ｚ，0
/ＳOLU
D,AＬL，ALL,0
ＡＬLSＥL
FＩNISH
（2)结果
2、静力分析命令流ｊinｇli.ｍac
/SOLU
ＡＣＥL，0,0,9.8
*DO，I,２04,24５,1
ＳFE，I,2，PＲES，,50０
*ENDDO
*CFOPEN,RESUＬT,TXT
＊VWRＩTE，DTＡB（１,１),ＤTＡB(1,2）
（F8.４,5X,Ｆ８.4,5X)
*CFCLOSＥ
FINISH
/SOＬU
ＡLLSEL,ALＬ
ANTＹPE,TRＡNS
TＲNOＰT,FULL
ＮＣNV,0,
ALPHAＤ,ＡＬF
BEＴAＤ，BET
ＴＩＭＩNＴ，ＯN
KBＣ,0
第四阶振型从位移分布可知为弯曲振型
第五阶振型从位移分布可知为弯曲振型
前五阶频率:
4、瞬态分析
（1）命令流ｓhuntai.ｍac
!瞬态分析
PＩ=3.141592６
Ｃ＝0.05
/SＯLU
ANＴYＰE,ＭOＤAL
MODOPT,LＡNＢ,２
MXＰAＮD，
ＡＬLSEL
SOLＶE
FINISH
/ＰＯＳT1
*GET,ＦRE１,MODE,1,FＲEQ
AＮTYPＥ,ＭODAL
MOＤOPT,ＬＡＮPCＧ,5，0,100
ＭXPAND，
ALＬSEＬ
SOLVE
FＩNISH
！模态分析
/POＳＴ1
SＥT，ＬIST
SET，FIRST
PLＮＳOL,U，SUM，0，1
ANMODE,１0，0.５, ,0
／AN,'aｎimａte－1sｔmodal','avi',' '
十层框架剪力墙结构Ansｙs有限元大作业
———————————————————————————————— 作者:
———————————————————————————————— 日期:
ﻩ
Anｓｙs有限元大作业
十层框架剪力墙结构,X、Y方向均为两跨,每个开间均为5ｍ*３m，是进行静力分析、模态分析、瞬态分析
SECDATA，0．500，0.500,2,2
Ｒ，3,０.12,0.１2,0.12,0．１2 !楼板截面
ｎn=7
＊DＯ,Ｊ，0，nn
Ｎ,1+12*Ｊ,4,0,0+3*Ｊ
N,２+12*J,4,5,0+３*J
N,３＋1２*J,４,1０,０+3*J
Ｎ,４+12＊J,4，15,0+3*J
N,5+１２＊J,0,０,0+3*J
SET,NＥXT
ＰLNSOL,U,ＳＵM，0,1
SET,ＮＥXＴ
PLＮSＯL,U,SUM,0,1
SET,ＮＥXT
ＰLNＳOL,U,SUM，0,1
SET,ＮEＸＴ
PLNSOL,Ｕ，ＳUM,0,1
FIＮISＨ
（2）结果：前5阶振型
第一阶振型从位移分布可知为弯曲振型
第二阶振型从位移分布可知为弯曲振型
第三阶振型从位移分布可知为扭转振型