使F初值等于-0.5，然后當所選材料中有應力大于36的單元，就繼續按照力F加載，否則就使F=F-0.1，加大唯一荷載，F變量更新，使過程循環。
提示為Unknown parameter name= F. A value of 7.888609052E-31 will be used.
/prep7                !進入prep7  
f=-0.5
finish
*DO,i,1,10,1        !載荷從-0.5增加到-3
/POST1 
allsel  
esel,s,type,,1
etable,aa,s,eqv !將總應變存入ETABLE   
esel,s,etab,aa,36!選擇總應變大于或等于36的單元 
*get,nnum,elem,,count    !提取選中單元數量并把它裝進nnum
*if,nnum,gt,0,then           !如果表中有應變大于36的單元
FINISH  
/solu
EKILL,ALL              !殺死選擇（超過允許值）的單元
ESEL,ALL  
!resume
ANTYPE,,REST
asel,s,loc,y,290  
nsla,s,1
d,all,uy,f                !加載當前
allsel
nsubst,200                        !子步數和時間步長
neqit,75
solve
finish
*ELSE                        !沒有的話就加大荷載
/solu
f=f-0.1
ANTYPE,,REST
asel,s,loc,y,290  
nsla,s,1
d,all,uy,f
allsel
nsubst,200                        !子步數和時間步長
neqit,75
solve
finish
*ENDIF
*ENDDO