! 2.3  超靜定拉壓桿的反力計算
! 本程序來源于邢靜忠編著的《ANSYS應(yīng)用實例與分析》，科學(xué)出版社，2006年
!
FINISH	! 退出以前的模塊
/CLEAR, START	! 清除系統(tǒng)中的所有數(shù)據(jù), 讀入啟動文件設(shè)置
! （1）設(shè)置工程的選項, 進(jìn)入前處理模塊, 聲明單元類型, 實常數(shù)和材料參數(shù)
/FILNAME, EX2.3	! 指定工程文件名
/PREP7	! 進(jìn)入前處理模塊
/TITLE, EX2.3, STATICALLY INDETERMINATE REACTION FORCE ANALYSIS
ANTYPE, STATIC	! 定義分析類型為靜力分析
ET, 1, LINK1	! 定義第1類單元為二維桿單元LINK1
R, 1, 1 	! 定義實常數(shù), 桿件橫截面面積為1m^2
MP, EX, 1, 210E9	! 定義第1類材料彈性模量為210GPa
! （2）定義節(jié)點
N, 1	! 在坐標(biāo)原點定義1號節(jié)點
N, 2, , 0.4	! 在(0, 0.4m)位置定義2號節(jié)點
N, 3, , 0.7	! 在(0, 0.7m)位置定義3號節(jié)點
N, 4, , 1.0	! 在(0, 1.0m)位置定義4號節(jié)點
! （3）定義單元
E, 1, 2	! 過節(jié)點1, 2定義單元
EGEN, 3, 1, 1	! 按前面單元的節(jié)點連接情況, 從單元1開始生成3個單元, 每次節(jié)點號加1
! （4）定義位移約束和荷載
D, 1, ALL, , , 4, 3	! 固定1號節(jié)點所有自由度, 使用增量3循環(huán)到4, 固定4號節(jié)點
F, 2, FY, -500	! 在2號節(jié)點施加沿-Y方向500N的集中力
F, 3, FY, -1000	! 在3號節(jié)點施加沿-Y方向1000N的集中力
FINISH	! 退出前處理模塊
! （5）進(jìn)入求解模塊SOLU
/SOLU	! 進(jìn)入求解模塊
OUTPR, BASIC, 1	! 選擇基本輸出項目
OUTPR, NLOAD, 1	! 指定輸出第1荷載步的內(nèi)容
SOLVE	! 開始求解
FINISH	! 退出求解模塊
! （6）進(jìn)入一般后處理模塊POST1
/POST1  	! 進(jìn)入一般后處理模塊
NSEL, S, LOC, Y, 1.0	! 選擇所有Y=1.0位置上的節(jié)點, 即節(jié)點4
FSUM 	! 累計疊加選擇集中（即4號節(jié)點）所有節(jié)點上的反力
*GET, REAC_1, FSUM, , ITEM, FY	! 將累加結(jié)果中的FY（Y方向的力）保存到變量REAC_1
NSEL, S, LOC, Y, 0	! 選擇所有Y=0位置上的節(jié)點, 即節(jié)點1
FSUM 	! 累加選擇集（即1號節(jié)點）所有節(jié)點上的力
*GET, REAC_2, FSUM, , ITEM, FY	! 將累加結(jié)果的FY（Y方向的力）保存到變量REAC_2
*STATUS, PARM	! 顯示所有內(nèi)存變量的值
FINISH	! 退出后處理模塊