声振论坛

 找回密码
 我要加入

QQ登录

只需一步,快速开始

查看: 1052|回复: 1

[结构分析] 我的一个瞬态动力分析的命令流?高手帮忙

[复制链接]
发表于 2007-9-19 23:10 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?我要加入

x
我的一个瞬态动力分析的命令流?高手帮忙

简单的分析,不知道对不对,但是最后的的云图好像不对
瞬态分析最后提取结果时要提取某一个时间的数据(如位移)并写入到一个数组里面去该怎么做啊?(最好是命令流的)


/PREP7  
!*  
ET,1,PLANE182   
!*  
!*  
MPTEMP,,,,,,,,  
MPTEMP,1,0  
MPDATA,EX,1,,1000E6
MPDATA,PRXY,1,,0.25
MPTEMP,,,,,,,,  
MPTEMP,1,0  
MPDATA,DENS,1,,2500
RECTNG,0,3,0,1,
MSHAPE,1,2D
MSHKEY,0
!*  
CM,_Y,AREA  
ASEL, , , ,       1
CM,_Y1,AREA
CHKMSH,'AREA'   
CMSEL,S,_Y  
!*  
AMESH,_Y1   
!*  
CMDELE,_Y   
CMDELE,_Y1  
CMDELE,_Y2  
!*  
FINISH  
/SOL
FLST,2,1,1,ORDE,1   
FITEM,2,1   
!*  
/GO
D,P51X, , , , , ,ALL, , , , ,   
FLST,2,1,1,ORDE,1   
FITEM,2,2   
!*  
/GO
D,P51X, , , , , ,UY, , , , ,
FLST,2,1,4,ORDE,1   
FITEM,2,3   
/GO
!*  
FINISH  
/PREP7  
*DIM,force,TABLE,3,1,3, , ,
!*  
*SET,FORCE(0,1,1) , 1   
*SET,FORCE(1,0,1) , 0   
*SET,FORCE(2,0,1) , 0.15
*SET,FORCE(2,1,1) , 100
*SET,FORCE(3,0,1) , 0.3
*SET,FORCE(0,1,2) , 1   
*SET,FORCE(2,0,2) , 0.15
*SET,FORCE(3,0,2) , 0.3
*SET,FORCE(0,1,3) , 1   
*SET,FORCE(2,0,3) , 0.15
*SET,FORCE(3,0,3) , 0.3
FINISH  
/SOL
!*  
ANTYPE,4
!*  
TRNOPT,FULL
LUMPM,0
!*  
DELTIM,0.01,0.01
OUTRES,ERASE
OUTRES,ALL,1
ALPHAD,5
KBC,0   
TIME,0.3
FLST,2,1,4,ORDE,1   
FITEM,2,3   
/GO
!*  
!*  
SFL,P51X,PRES, %FORCE%  
/STATUS,SOLU
SOLVE   
FINISH  
/POST1  
/EFACE,1
AVPRIN,0, ,
!*  
PLNSOL,U,Y,0,1
回复
分享到:

使用道具 举报

发表于 2007-10-10 20:53 | 显示全部楼层
瞬态分析最后提取结果时要提取某一个时间的数据(如位移)并写入到一个数组里面去
给你个例子:具体看APDL书,注意要和程序一块运行,单独运行是会出错的。
*DIM,DATA_F,,1000,5              !STORE FIANL DATA.
VGET,DATA_F(1,1),1            !STORE TIME.
VGET,DATA_F(1,2),3            !STORE DIMPLACEMENT.
VGET,DATA_F(1,3),4            !STORE VELOCITY.
VGET,DATA_F(1,4),5            !STORE STRAIN ENERGY.
VGET,DATA_F(1,5),6            !STORE KINETIC ENERGY.

*CFOPEN,DATA_F,DAT
*VWRITE,DATA_F(1,1),DATA_F(1,2),DATA_F(1,3),DATA_F(1,4),DATA_F(1,5)
(2X,5F15.8)
*CFCLOSE
!FINISH

评分

1

查看全部评分

您需要登录后才可以回帖 登录 | 我要加入

本版积分规则

QQ|小黑屋|Archiver|手机版|联系我们|声振论坛

GMT+8, 2024-11-12 08:30 , Processed in 0.059191 second(s), 20 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表