寫了個命令流，自己參考改一下

假設對a面施加一個壓力載荷，最終載荷為10MPa，分10個迴圈，那麼:

/solu

sfa,a,,pres,10 !!!載入荷，最終壓力為10MPa

outress,all,all !!!將所有結果都寫入結果檔案，重要!!!

nsubst,10,10,10 !!!!分10個子步載入，每個子步增加1MPa

d,約束條件

solve !!!!求解

/post1

*cfopen,result,txt !!!寫入文字檔案標題頭

*vwrite,"maxstress","maxstresselem" !!!!最大應力，對應最大應力的單元號

(a16,a16) !!!!資料格式

*cfclos

*do,j,1,10 !!!!迴圈10次讀取並寫入結果

set,,j

etable,etre1,s,eqv !!!建立結果單元表

esort,etab,etre1 !!!對單元表進行排序

*get,maxstress,sort,,max !!!提取最大應力

*get,maxstressn,sort,,imax !!!提取最大應力對應的單元號

*cfopen,result,txt,,append !!!以追加方式開啟文字檔案

*vwrite,maxstress,maxstressn !!!寫入一個迴圈的最大應力及單元號

(f16.3," ",f16.0) !!!!資料格式，需頂格寫

*cfclos

*enddo