做索导出MNF文件,加不上预应力,请高人指点，?附原文件

做索导出MNF文件分析，设置了分析时考虑预应力，从结果看没有加上，请高人指点，
以下为部分程序
/FILNAME,P632a,0
/TITLE,P632a
/COM, Structural
/PREP7
!
ET,1,LINK10
ET,2,MASS21
!*
R,1,2.83e1,0.008,
R,2,1e-9,1e-9,1e-9,1e-9,1e-9,1e-9,
!
MP,EX,1,2.3e5
MP,PRXY,1,0.3
MP,DENS,1,7.8e-6
!
MP,EX,2,2.1e10
MP,PRXY,2,0.3
MP,DENS,2,7.8e-11
K,1,,,,
K,2,25e3,,,
LSTR, 1, 2
TYPE, 1
MAT, 1
REAL, 1
ESYS, 0
SECNUM,
!*
LESIZE,ALL,,,1 !
!WPSTYL,,,,,,,,0
LMESH, 1
NPLOT
!
K,1002,24998,,,
K,1001,2,,,
TYPE, 2
MAT, 1
REAL, 2
ESYS, 0
SECNUM,
!*
KMESH, 1001
KMESH, 1
KMESH, 1002
KMESH, 2
NPLOT
!* 约束
/NOPR
CM,_NODECM,NODE
*SET,_z1, 27
NSEL,S, , , 1
NSEL,A, , ,_Z1
CM,_CERGCM,NODE
CMSEL,S,_NODECM
/GO
/NOPR
CMSEL,S,_CERGCM
/GO
CERIG,27,ALL,ALL, , , ,
/NOPR
CMSEL,S,_NODECM
/GO
/NOPR
CM,_NODECM,NODE
*SET,_z1, 28
NSEL,S, , , 2
NSEL,A, , ,_Z1
CM,_CERGCM,NODE
CMSEL,S,_NODECM
/GO
!*
/NOPR
CMSEL,S,_CERGCM
/GO
CERIG,28,ALL,ALL, , , ,
/NOPR
CMSEL,S,_NODECM
/GO
!*
FINISH
!加载荷
/SOLU
/GO
F,P51X,FX,100e3
/SOLU
!*
ANTYPE,0
PSTRES,1
/STATUS,SOLU
SOLVE
FINISH
!输出ADAMS
/SOL
*SET,_eigenmodesCount,6
*SET,_elemresult,0
*SET,_faktorL,1.0
*SET,_faktorF,1.0
*SET,_faktorM,1.0
*SET,_faktorT,1.0
FLST,5,2,1,ORDE,2
FITEM,5,27
FITEM,5,-28
NSEL,R, , ,P51X
!/UNIT,SI
/UNIT,USER,1000,1,1,,,,1
ADAMS,5,2,0