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

　　FINISH !結束ANSYS分析

　　/CLEAR !清空當前數據庫

　　/FILNAME,Cantilever,1

　　!定義標題名，顯示在ANSYS圖形窗口中

　　/PREP7 !進入前處理器模塊

　　/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:創建一個矩形以表示彈性桿

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

　　SMRTSIZE,1 !設置智能有限元網格劃分的疏密度為1，即最高

　　AMESH,ALL !劃分網格

　　ALLSEL,ALL !選中所有內容

　　SAVE !保存數據庫內容

　　FINISH !退出前處理器

　　!下面進入求解器完成載荷的施加和求解

　　/SOLU !進入求解器

　　ANTYPE,TRANS !定義分析類型，這里選暫態分析

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

　　LSEL,S,LOC,X,0

　　!選中X坐標為0的線

　　DL,ALL,1,UX,0

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

　　DL,ALL,1,UY,0

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

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

　　KSEL,S,LOC,X,5

　　!選中X坐標為5的所有關鍵

　　KSEL,R,LOC,Y,0.1

　　!在上述選中的關鍵點中重新選擇Y坐標為0.1節點

　　FK,ALL,FY,-5e3

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

　　TIME,5

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

　　KBC,0

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

　　NSUBST,5

　　!指定在第一個載荷步中的子步數

　　ALLSEL,ALL

　　!重新選中數據庫中所有模型

　　LSWRITE,1,

　　!創建第一個載荷步文件，編號為1

　　!下面定義第二個載荷步

　　KSEL,S,LOC,X,5

　　!選中X坐標為5的所有關鍵點

　　KSEL,R,LOC,Y,0.1

　　!在上述選中的關鍵點中重新選擇Y坐標為0.1節點

　　FK,ALL,FY,-5e3

　　!對所選擇的關鍵施加壓力集中載荷

　　TIME,10

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

　　KBC,1

　　!指定為階躍載荷，1為階躍載荷類型的標識符號

　　NSUBST,5

　　!指定在第二個載荷步中的子步數

　　ALLSEL,ALL

　　!重新選中數據庫中所有模型

　　LSWRITE,2,

　　!創建第二個載荷步文件，編號為2

　　!下面定義第三個載荷步

　　KSEL,S,LOC,X,5

　　!選中X坐標為5的所有關鍵點

　　KSEL,R,LOC,Y,0.1

　　!在上述選中的關鍵點中重新選擇Y坐標為0.1節點

　　FK,ALL,FY,-5e4

　　!對所選擇的關鍵點施加壓力集中載荷

　　TIME,15

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

　　KBC,1

　　!指定為階躍載荷，1為階躍載荷類型的標識符號

　　NSUBST,5

　　!指定在第三個載荷步中的子步數

　　ALLSEL,ALL

　　!重新選中數據庫中所有模型

　　LSWRITE,3

　　!創建第三個載荷步文件，編號為3

　　OUTPR,ALL,ALL

　　!指定輸出所有的數據，即在每一個子步結束時都輸出一次數據

　　LSSOLVE,1,3,1

　　!LSSOLVE為Load Step Solve

　　FINISH !退出求解器

　　!求解完畢后，進入通用后處理器查看求解結果

　　/POST1 !進入通用后處理器

　　SET,,,1,,5

　　!從結果文件中讀取第5秒時刻的數據，命令中的1表示按照原來數據大小讀取，不進行縮放

　　PLNSOL, EPEL,Y,0,1.0

　　!畫出節點求解值Y方向彈性應變分布，

　　SET,,,1,,15

　　!從結果文件中讀取第15秒時刻的數據，這一時刻已經進入第二個載荷步

　　PLNSOL, EPEL,Y,0,1.0

　　!畫出節點求解值Y方向彈性應變分布