节点合力提取写入文件-- 简单的命令流问题

gczhang

下面提取2个载荷步共26个子步的节点合力数据，然后写入数据文件，但得到的都是同样的26对（Fx，Fy）数据，谁能帮我看一下问题出在哪里？谢谢！

finish
/clear, start
/post1
! Input file name in the following two lines
resume, HViscoNew3,db
file, HViscoNew3,rst

! Input number of steps
nstep=26
*dim,fx_U,array,nstep,1
*dim,fy_U,array,nstep,1

! Input height of the back surface of the indenter  
h=0.000519
nsel,s,loc,y,h

! load step 1, substeps 1~6
*do,k,1,6
set,1,k
*get,fx_U(k),fsum,,item,fx
*get,fy_U(k),fsum,,item,fy
*enddo

! load step 2, substeps 1~20
*do,k,1,20
set,2,k
*get,fx_U(k+6),fsum,,item,fx
*get,fy_U(k+6),fsum,,item,fy
*enddo

*CFOPEN,reaction_force2,txt
*VWRITE,fx_U(1),fy_U(1)
(2(e12.6,2x))  
*CFCLOS