本文介紹了ANSYS的3級載荷步lswrite施加方法。

　　FINISH !結(jié)束ANSYS分析

　　/CLEAR !清空當(dāng)前數(shù)據(jù)庫

　　/FILNAME,Cantilever,1

　　!定義標(biāo)題名，顯示在ANSYS圖形窗口中

　　/PREP7 !進(jìn)入前處理器模塊

　　/TITLE, Changing force on one point of a pole

　　!定義單元和材料屬性

　　ET,1,PLANE42 !定義編號為1的單元為PLANE42

　　MP,EX,1,3.08e6 !定義材料編號為1的材料的彈性模量為3.08e6

　　MP,PRXY,1,0.3 !定義材料的次泊松比為0.3

　　!下邊開始建模

　　RECTNG,0,5,0,0.1

　　!RECTNG:創(chuàng)建一個矩形以表示彈性桿

　　AATT,1,,1 !將單元和材料屬性賦予上述所建模型

　　SMRTSIZE,1 !設(shè)置智能有限元網(wǎng)格劃分的疏密度為1，即最高

　　AMESH,ALL !劃分網(wǎng)格

　　ALLSEL,ALL !選中所有內(nèi)容

　　SAVE !保存數(shù)據(jù)庫內(nèi)容

　　FINISH !退出前處理器

　　!下面進(jìn)入求解器完成載荷的施加和求解

　　/SOLU !進(jìn)入求解器

　　ANTYPE,TRANS !定義分析類型，這里選暫態(tài)分析

　　!下面對模型施加自由度約束

　　LSEL,S,LOC,X,0

　　!選中X坐標(biāo)為0的線

　　DL,ALL,1,UX,0

　　!給線施加UX=0的邊界條件

　　DL,ALL,1,UY,0

　　!給線施加UY=0的邊界條件

　　!下面開始定義第一個載荷步

　　KSEL,S,LOC,X,5

　　!選中X坐標(biāo)為5的所有關(guān)鍵

　　KSEL,R,LOC,Y,0.1

　　!在上述選中的關(guān)鍵點(diǎn)中重新選擇Y坐標(biāo)為0.1節(jié)點(diǎn)

　　FK,ALL,FY,-5e3

　　!對所選擇的關(guān)鍵點(diǎn)施加壓力集中載荷，值為-5e3，即沿著Y軸向下

　　TIME,5

　　!定義第一個載荷步結(jié)束的時刻，這里的5表示從零時刻到第5秒

　　KBC,0

　　!指定為斜坡加載方式，0為遞增載荷類型的標(biāo)識符號

　　NSUBST,5

　　!指定在第一個載荷步中的子步數(shù)

　　ALLSEL,ALL

　　!重新選中數(shù)據(jù)庫中所有模型

　　LSWRITE,1,

　　!創(chuàng)建第一個載荷步文件，編號為1

　　!下面定義第二個載荷步

　　KSEL,S,LOC,X,5

　　!選中X坐標(biāo)為5的所有關(guān)鍵點(diǎn)

　　KSEL,R,LOC,Y,0.1

　　!在上述選中的關(guān)鍵點(diǎn)中重新選擇Y坐標(biāo)為0.1節(jié)點(diǎn)

　　FK,ALL,FY,-5e3

　　!對所選擇的關(guān)鍵施加壓力集中載荷

　　TIME,10

　　!定義第二個載荷步結(jié)束的時刻，這里的10表示從第一個載荷結(jié)束的時刻到第10秒

　　KBC,1

　　!指定為階躍載荷，1為階躍載荷類型的標(biāo)識符號

　　NSUBST,5

　　!指定在第二個載荷步中的子步數(shù)

　　ALLSEL,ALL

　　!重新選中數(shù)據(jù)庫中所有模型

　　LSWRITE,2,

　　!創(chuàng)建第二個載荷步文件，編號為2

　　!下面定義第三個載荷步

　　KSEL,S,LOC,X,5

　　!選中X坐標(biāo)為5的所有關(guān)鍵點(diǎn)

　　KSEL,R,LOC,Y,0.1

　　!在上述選中的關(guān)鍵點(diǎn)中重新選擇Y坐標(biāo)為0.1節(jié)點(diǎn)

　　FK,ALL,FY,-5e4

　　!對所選擇的關(guān)鍵點(diǎn)施加壓力集中載荷

　　TIME,15

　　!定義第三個載荷步結(jié)束的時刻，這里的15表示從第二個載荷結(jié)束的時刻到第15秒

　　KBC,1

　　!指定為階躍載荷，1為階躍載荷類型的標(biāo)識符號

　　NSUBST,5

　　!指定在第三個載荷步中的子步數(shù)

　　ALLSEL,ALL

　　!重新選中數(shù)據(jù)庫中所有模型

　　LSWRITE,3

　　!創(chuàng)建第三個載荷步文件，編號為3

　　OUTPR,ALL,ALL

　　!指定輸出所有的數(shù)據(jù)，即在每一個子步結(jié)束時都輸出一次數(shù)據(jù)

　　LSSOLVE,1,3,1

　　!LSSOLVE為Load Step Solve

　　FINISH !退出求解器

　　!求解完畢后，進(jìn)入通用后處理器查看求解結(jié)果

　　/POST1 !進(jìn)入通用后處理器

　　SET,,,1,,5

　　!從結(jié)果文件中讀取第5秒時刻的數(shù)據(jù)，命令中的1表示按照原來數(shù)據(jù)大小讀取，不進(jìn)行縮放

　　PLNSOL, EPEL,Y,0,1.0

　　!畫出節(jié)點(diǎn)求解值Y方向彈性應(yīng)變分布，

　　SET,,,1,,15

　　!從結(jié)果文件中讀取第15秒時刻的數(shù)據(jù)，這一時刻已經(jīng)進(jìn)入第二個載荷步

　　PLNSOL, EPEL,Y,0,1.0

　　!畫出節(jié)點(diǎn)求解值Y方向彈性應(yīng)變分布