24小时热门版块排行榜

返回列表

shi-fq

金虫 (正式写手)

应助: 0 (幼儿园)
金币: 574.2
散金: 17
红花: 2
帖子: 943
在线: 358小时
虫号: 862702
注册: 2009-10-04
性别: GG
专业: 力学中的基本问题和方法

[求助] nasys 瞬态分析后处理求助

哪位在ansys动力学分析方面有经验，我没有做过动力学分析，现在要做一个弹性体受随时间变化的压力的作用下，内部的变形随时间的变化情况。但动力学分析的操作我不会，找了些书，也试不成功。实在没啥办法了？求高手帮我看看，并帮我给出动力学分析的设置求解过程，或者命令流~
谢谢啦
建模和模型简图如下，
/BATCH
/COM,ANSYS RELEASE 10.0A1  UP20060105    16:38:46 08/14/2011
/input,menust,tmp,'',,,,,,,,,,,,,,,,1
/GRA,POWER
/GST,ON
/PLO,INFO,3
/GRO,CURL,ON
/CPLANE,1
/REPLOT,RESIZE
WPSTYLE,,,,,,,,0
/TITLE,1201
/PREP7
!*
ET,1,PLANE82
!*
KEYOPT,1,3,2
KEYOPT,1,5,0
KEYOPT,1,6,0
!*
!*
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,EX,1,,35e9
MPDATA,PRXY,1,,0.23
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,DENS,1,,2500
k,1,-500,0,,
k,2,-800,0,,
k,3,-800,-1200,,
k,4,1200,-1200,,
k,5,1200,0,,
k,6,900,0,,
k,7,300,500,,
l,1,2
l,2,3
l,3,4
l,4,5
l,5,6
l,6,7
l,7,1
a,1,2,3,4,5,6,7
SAVE
/REPLOT,RESIZE
FLST,5,4,4,ORDE,3
FITEM,5,1
FITEM,5,5
FITEM,5,-7
CM,_Y,LINE
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,S,_Y
!*
!*
LESIZE,_Y1,50, ,0,0,4,0,0
CMDELE,_Y
CMDELE,_Y1
!*
FLST,5,3,4,ORDE,2
FITEM,5,2
FITEM,5,-4
CM,_Y,LINE
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,S,_Y
!*
!*
LESIZE,_Y1,100, ,0,0,4,0,0
CMDELE,_Y
CMDELE,_Y1
!*
MSHKEY,0
CM,_Y,AREA
ASEL, , , ,    1
CM,_Y1,AREA
CHKMSH,'AREA'
CMSEL,S,_Y
!*
AMESH,_Y1
!*
CMDELE,_Y
CMDELE,_Y1
CMDELE,_Y2
!*
SAVE
FLST,2,1,4,ORDE,1
FITEM,2,2
!*
/GO
DL,P51X, ,UX,0
FLST,2,1,4,ORDE,1
FITEM,2,3
!*
/GO
DL,P51X, ,UY,0
ACEL,0,9.8,0,
SAVE
*DEL,_FNCNAME
*DEL,_FNCMTID
*DEL,_FNCCSYS
*SET,_FNCNAME,'syy'
*SET,_FNCCSYS,0
! /INPUT,yy.func,,,1
*DIM,%_FNCNAME%,TABLE,6,5,1,,,,%_FNCCSYS%
!
! Begin of equation: 5*{TIME}^2
*SET,%_FNCNAME%(0,0,1), 0.0, -999
*SET,%_FNCNAME%(2,0,1), 0.0
*SET,%_FNCNAME%(3,0,1), 0.0
*SET,%_FNCNAME%(4,0,1), 0.0
*SET,%_FNCNAME%(5,0,1), 0.0
*SET,%_FNCNAME%(6,0,1), 0.0
*SET,%_FNCNAME%(0,1,1), 1.0, -1, 0, 2, 0, 0, 1
*SET,%_FNCNAME%(0,2,1), 0.0, -2, 0, 1, 1, 17, -1
*SET,%_FNCNAME%(0,3,1), 0, -1, 0, 5, 0, 0, -2
*SET,%_FNCNAME%(0,4,1), 0.0, -3, 0, 1, -1, 3, -2
*SET,%_FNCNAME%(0,5,1), 0.0, 99, 0, 1, -3, 0, 0
! End of equation: 5*{TIME}^2
!-->
FLST,2,1,4,ORDE,1
FITEM,2,4
/GO
!*
!*
SFL,P51X,PRES, %SYY%
/REPLOT,RESIZE
FINISH
/SOL
!*
ANTYPE,4
!*
TRNOPT,FULL
LUMPM,0
!*
SAVE
FINISH
! /EXIT,MODEL

[ Last edited by shi-fq on 2011-8-14 at 17:03 ]

回复此楼