这是一个我的专门提取节点数据的文件,很方便实用,此为提取节点位移y方向,要用/input方法使用,不要在命令里输入
/post1
n1=16 !面层上部
n2=1004 !面层底部
n3=4544 !基层底部
n4=6952 !底基层底部
*dim,num,array,50
*dim,s1,array,50
*dim,s2,array,50
*dim,s3,array,50
*dim,s4,array,50
*do,i,1,30
num(i)=i*T/30
*enddo
*do,i,31,50
num(i)=T+T*(i-30)/10
*enddo
*do,i,1,50
set,i
*get,x,node,n1,u,y
*get,y,node,n2,u,y
*get,z,node,n3,u,y
*get,u,node,n3,u,y
s1(i)=x
s2(i)=y
s3(i)=z
s4(i)=u
*enddo
*creat,out
*cfopen,d_fwd.single_uy,txt
*vwrite,num(1),s1(1),s2(1),s3(1),s4(1)
(f7.3,f20.8,f20.8,f20.8,f20.8)
*cfclose
*end
*use,out |