!為了提高分析效率，我們在前節初始位置確定分析中已經創建了宏“MODEL.MAC”，在本節只需要直接調用該宏，并將纜索的初應變設為由前述初始位置確定計算得到的0.0043，即可得到模態分析的有限元模型，然后先對其進行預應力靜力分析，再進行預應力模態分析。
!參數定義
FINI								!退出
/CLE
/FILNAMe,CABLE_BRIDGE,1
/TITLE,MODEL ANALYSIS OF CABLE_BRIDGE
!建立模型
!"MODEL"宏文件應放在工作目錄下。
MODEL								!運行宏生成模型
!加載及求解
!預應力靜力分析
FINI
/SOLU
ANTYPE,0							!首先進行靜力分析，得到預應力
ACEL,,9.8							!考慮重力影響
TIME,1								!設置求解時間
NSUB,10,20,5						!設置10個載荷子步
OUTRES,ALL,ALL					!輸出每一步的所有結果
SSTIF,ON							!激活應力剛化效應
PSTRES,ON							!激活預應力效應
ALLS								!全選
SOLVE								!求解
FINI								!退出求解器
!預應力模態分析
/SOLU
ANTYPE,2							!設置分析類型為模態分析
MODOPT,LANB,10					!提取前10階模態
MXPAND,10,,,0						!指定擴展模態為10階
ACEL,0,9.8,0						!設置重力加速度
PSTRES,1							!激活預應力效應
ALLS								!選中所有的元素
SOLVE								!求解
SAVE								!保存
FINI								!退出SOLU處理器
!結果后處理
!在結果后處理中，通過列表，可以得到結構的各階頻率，通過顯示命令，可以得到結構各階振型的應力云圖，變形圖，位移云圖等，還可以通過命令制作出動畫，以實時顯示某一個量的變化情況。
!***************后處理****************
/POST1
FILE,' CABLE_BRIDGE ','rst'			!讀入結果文件
SET,LIST							!列出各階頻率,如表5-5所示
*DO,I,1,10
SET,,, ,,, ,I 							!查看各階振型						PLDISP,0							!顯示各階振型圖
*ENDDO
SET,1,1								!讀取第1階振型
PLNSOL,U,Y,0,1.0					!顯示Y向位移，如圖5-22
ANMODE,10,0.5,,0					!制作第1階動畫
SET,1,10							!讀取第10階振型
PLNSOL,U,Y,0,1.0					!顯示Y向位移，如圖5-23
ANMODE,10,0.5,,0					!制作第10階動畫