even2004 信息:
来自:未填
发贴:1239 贴
积分:244 点
货币:5814 阳光币
注册时间:2008/12/31
资料 好友 消息 引用 回复 选择字号 9 10 11 12 14 15 16 18 20 25 30 50
从ANSYS中提取三维数组的一个东东 在时程后处理器中,当我们需要处理的东西太多的时候,用数组这个东西是很有用处的。我今天试着弄了一个三位数组的东东;大家过来看看。 为了讨论方便,贴上来,大家多提意见。 finish /POST26 !进入时间历程处理器 numvar,100 !提取数据 !Get data !第一层三榀框架 *dim,storey11,array,4,34000,5,,, *dim,storey12,array,4,34000,5,,, *dim,storey13,array,4,34000,5,,, ! nsol,2,2,u,x,ux nsol,3,2,u,z,uz rforce,4,1,f,x,fx rforce,5,1,f,z,fz ! nsol,12,13,u,x,ux nsol,13,13,u,z,uz rforce,14,12,f,x,fx rforce,15,12,f,z,fz ! nsol,22,24,u,x,ux nsol,23,24,u,z,uz rforce,24,23,f,x,fx rforce,25,23,f,z,fz ! nsol,32,35,u,x,ux nsol,33,35,u,z,uz rforce,34,34,f,x,fx rforce,35,34,f,z,fz ! nsol,42,46,u,x,ux nsol,43,46,u,z,uz rforce,44,45,f,x,fx rforce,45,45,f,z,fz store ! *do,I,1,4,1 *do,T,1,34000,1 *do,K,1,5,1 *set,time,T*0.05 *get,storey11(I,T,K),VARI,10*(K-1)+(I+1),rtime,time *enddo *enddo *enddo *MWRITE,storey11(1,1,1),DATA11,dat,,IKTI,4,5,34000 (1X,4F16.7)_____这个可以根据需要把数据空格调大一点,更好看