使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