ANSYS经典APDL程序实例.docx
《ANSYS经典APDL程序实例.docx》由会员分享，可在线阅读，更多相关《ANSYS经典APDL程序实例.docx（496页珍藏版）》请在冰豆网上搜索。
ANSYS经典APDL程序实例
1．ANSYSSOLID65环向布置钢筋的例子
!
一个管道，环向配筋率为1%，纵向配筋率为0.5%，径向配筋率为0.1%
!
FINISH
/CLEAR
/PREP7
!
*
!
单元属性
ET,1,SOLID65
!
*
KEYOPT,1,1,0 ！
：
单元主要选项设置
KEYOPT,1,5,0 ！
5：
NumberoftheKEYOPTtobedefined（KEYOPT（KNUM））.
KEYOPT,1,6,0 ！
0：
ValueofthisKEYOPT
KEYOPT,1,7,1
!
*
!
实参数1：
不同方向配筋
R,1,2,.001,,,2,.01,
RMORE,90,,2,.005,90,90,
!
Addsrealconstantstoaset.
!
材料属性
!
混凝土基本材料属性
MPTEMP,,,,,,,, ！
给材料属性定义温度表
MPTEMP,1,0
MPDATA,EX,1,,30E2 ！
给温度表定义相应的温度数据
MPDATA,PRXY,1,,.2
!
屈服准则
TB,MISO,1,1,5,！
Activatesadatatablefornonlinearmaterialpropertiesorspecialelementinput.
TBTEMP,0 ！
Definesatemperatureforthedatatable.
TBPT,,0.0005,15 ！
Definesapointonanonlineardatacurve在应力应变区线上定义一点
TBPT,,0.001,21
TBPT,,0.0015,24
TBPT,,0.002,27
TBPT,,0.003,24
!
破坏准则
TB,CONC,1,1,9,
TBTEMP,0
TBDATA,,.5,.9,3,30,,
!
抗拉和抗压是10倍的关系
TBDATA,,,,1,,,
MPTEMP,,,,,,,,
MPTEMP,1,0
!
钢材基本属性
MPDATA,EX,2,,200E3
MPDATA,PRXY,2,,.27
!
屈服准则
TB,BISO,2,1,2,
TBTEMP,0
TBDATA,,310,2E3,,,,
!
管道内径和外径
CYL4,0,0,3000,,,,10000
CYL4,0,0,2000,,,,10000
VSBV,1,2
!
定义局部柱坐标
CSWPLA,11,1,1,1,
!
Definesalocalcoordinatesystemattheoriginoftheworkingplane.
KWPAVE,11
!
movetokeypoint11
WPRO,,-90.000000,
VSBW,3
WPCSYS,-1,0
!
Definestheworkingplanelocationbasedonacoordinatesystem.
KWPAVE,1
WPRO,,,-90.000000
VSBW,ALL
ESIZE,500,0,
!
注意：
设定单元局部坐标
VATT,1,1,1,11
!
*
VSWEEP,ALL
/DEVICE,VECTOR,1
/ESHAPE,1.0
!
Displayselementswithshapesdeterminedfromtherealconstantsorsection
/REPLO
!
注意：
红色代表最大配筋方向，绿色代表其次，蓝色表示最小配筋方向
2.混凝土非线性计算实例
（1）-MISO单压
!
MISO单压
FINISH
/CLEAR
/PREP7
ET,1,SOLID65
R,1
MP,EX,1,30E3
MP,NUXY,1,0.2
TB,CONCR,1,1
TBTEMP,0
TBDATA,1,0.3,0.5,2.5,-1
TB,MISO,1,1,15
TBPT,,100E-6,3.0
TBPT,,300E-6,8.3
TBPT,,600E-6,14.6
TBPT,,900E-6,19.1
TBPT,,1100E-6,21.0
TBPT,,1250E-6,22.0
TBPT,,1400E-6,22.6
TBPT,,1550E-6,22.8
TBPT,,1650E-6,22.7
TBPT,,1800E-6,22.3
TBPT,,2000E-6,21.4
TBPT,,2800E-6,16.8
TBPT,,3200E-6,14.7
TBPT,,3800E-6,12.3
TBPT,,4600E-6,9.9
!
TB,MKIN,1
!
TBTEMP,,STRAIN
!
TBDATA,,600E-6,1100E-6,1600E-6,3000E-6,4500E-6
!
TBTEMP,0
!
TBDATA,,15,21.5,23,16,9
BLOCK,0,50,0,50,0,50
MSHAPE,0,3D
MSHKEY,1
ESIZE,10
VMESH,ALL
NSEL,S,LOC,X,0
D,ALL,UX,0
NSEL,S,LOC,Y,0
D,ALL,UY,0
NSEL,S,LOC,Z,0
D,ALL,UZ,0
NSEL,S,LOC,Y,50
CP,1,UY,ALL
NSEL,ALL
FINISH
/VIEW,1,1,1,1
/REPLOT
/SOLU
ANTYPE,STATIC
AUTOTS,OFF
OUTRES,ALL,1
TIME,50
NSUBST,50
D,1,UY,-.25
NSEL,ALL
SOLVE
FINISH
/POST26
NSOL,2,1,U,Y,UY
RFORCE,3,1,F,Y,FY
ADD,4,2,,,STRAIN,,,-1/50
ADD,5,3,,,STRESS,,,-1/2500
/AXLAB,X,STRAIN
/AXLAB,Y,STRESS
XVAR,4
PLVAR,5
FINISH
3.混凝土非线性计算实例
（2）-MISO约束压
!
MISO约束压
FINISH
/CLEAR
/PREP7
ANTYPE,STATIC
ET,1,SOLID65
R,1
MP,EX,1,30E3
MP,NUXY,1,0.2
TB,CONCR,1,1
TBTEMP,0
TBDATA,1,0.3,0.5,2.5,-1
TB,MISO,1,1,15
TBPT,,100E-6,3.0
TBPT,,300E-6,8.3
TBPT,,600E-6,14.6
TBPT,,900E-6,19.1
TBPT,,1100E-6,21.0
TBPT,,1250E-6,22.0
TBPT,,1400E-6,22.6
TBPT,,1550E-6,22.8
TBPT,,1650E-6,22.7
TBPT,,1800E-6,22.3
TBPT,,2000E-6,21.4
TBPT,,2800E-6,16.8
TBPT,,3200E-6,14.7
TBPT,,3800E-6,12.3
TBPT,,4600E-6,9.9
!
TB,MKIN,1
!
TBTEMP,,STRAIN
!
TBDATA,,600E-6,1100E-6,1600E-6,3000E-6,4500E-6
!
TBTEMP,0
!
TBDATA,,15,21.5,23,16,9
BLOCK,0,50,0,50,0,50
ESIZE,10
VMESH,ALL
MSHAPE,0,3D
NSEL,S,LOC,X,0
D,ALL,UX,0
NSEL,S,LOC,Y,0
D,ALL,UY,0
NSEL,S,LOC,Z,0
D,ALL,UZ,0
NSEL,S,LOC,Y,50
CP,1,UY,ALL
D,ALL,UX,0
D,ALL,UZ,0
NSEL,ALL
FINISH
/VIEW,1,1,1,1
/REPLOT
/SOLU
OUTRES,ALL,1
TIME,20
NSUBST,20,0,20
D,1,UY,-.04
LSWRITE,1
TIME,30
NSUBST,20,0,20
D,1,UY,-.06
LSWRITE,2
TIME,40
NSUBST,100
D,1,UY,-.1
LSWRITE,3
LSSOLVE,1,3
FINISH
/POST26
NSOL,2,1,U,Y,UY
RFORCE,3,1,F,Y,FY
ADD,4,2,,,STRAIN,,,-1/50
ADD,5,3,,,STRESS,,,-1/2500
/AXLAB,X,STRAIN
/AXLAB,Y,STRESS
XVAR,4
PLVAR,5
FINISH
4.混凝土非线性计算实例（3）-KINH滞回
!
KINH滞回
FINISH
/CLEAR
/PREP7
ANTYPE,STATIC
ET,1,SOLID65
R,1
MP,EX,1,30E3
MP,NUXY,1,0.2
TB,CONCR,1,1
TBTEMP,0
TBDATA,1,0.3,0.5,2.5,-1
TB,KINH,1,1,10
TBPT,,150E-6,4.5
TBPT,,600E-6,14.8
TBPT,,1000E-6,20.25
TBPT,,1300E-6,22.3
TBPT,,1480E-6,22.8
TBPT,,1620E-6,22.8
TBPT,,1800E-6,22.3
TBPT,,2000E-6,21.4
TBPT,,3500E-6,12.8
TBPT,,5000E-6,9.0
BLOCK,0,50,0,50,0,50
ESIZE,10
VMESH,ALL
MSHAPE,0,3D
NSEL,S,LOC,X,0
D,ALL,UX,0
NSEL,S,LOC,Y,0
D,ALL,UY,0
NSEL,S,LOC,Z,0
D,ALL,UZ,0
NSEL,S,LOC,Y,50
CP,1,UY,ALL
NSEL,ALL
FINISH
/VIEW,1,1,1,1
/REPLOT
/SOLU
OUTRES,ALL,ALL
TIME,20
NSUBST,20,0,20
D,1,UY,-.04
LSWRITE,1
TIME,35
NSUBST,15,0,15
D,1,UY,-.01
LSWRITE,2
TIME,90
NSUBST,55,0,55
D,1,UY,-.12
LSWRITE,3
TIME,125
NSUBST,35,0,35
D,1,UY,-.05
LSWRITE,4
TIME,175
NSUBST,50,0,50
D,1,UY,-.15
LSWRITE,5
LSSOLVE,1,5
FINISH
/POST26
NSOL,2,1,U,Y,UY
RFORCE,3,1,F,Y,FY
ADD,4,2,,,STRAIN,,,-1/50
ADD,5,3,,,STRESS,,,-1/2500
/AXLAB,X,STRAIN
/AXLAB,Y,STRESS
XVAR,4
PLVAR,5
FINISH
5.混凝土非线性计算实例（4）-KINH压-拉裂
!
KINH压——拉裂压到峰值，泄载、反向加载到拉裂
FINISH
/CLEAR
/PREP7
ANTYPE,STATIC
ET,1,SOLID65
R,1
MP,EX,1,30E3
MP,NUXY,1,0.2
TB,CONCR,1,1
TBTEMP,0
TBDATA,1,0.3,0.5,2.5,-1
TB,KINH,1,1,10
TBPT,,150E-6,4.5
TBPT,,600E-6,14.8
TBPT,,1000E-6,20.25
TBPT,,1300E-6,22.3
TBPT,,1480E-6,22.8
TBPT,,1620E-6,22.8
TBPT,,1800E-6,22.3
TBPT,,2000E-6,21.4
TBPT,,3500E-6,12.8
TBPT,,5000E-6,9.0
BLOCK,0,50,0,50,0,50
ESIZE,10
VMESH,ALL
MSHAPE,0,3D
NSEL,S,LOC,X,0
D,ALL,UX,0
NSEL,S,LOC,Y,0
D,ALL,UY,0
NSEL,S,LOC,Z,0
D,ALL,UZ,0
NSEL,S,LOC,Y,50
CP,1,UY,ALL
NSEL,ALL
FINISH
/VIEW,1,1,1,1
/REPLOT
/SOLU
OUTRES,ALL,ALL
TIME,20
NSUBST,20,0,20
D,1,UY,-.04
LSWRITE,1
TIME,45
NSUBST,25,0,25
D,1,UY,.01
LSWRITE,2
LSSOLVE,1,2
FINISH
/POST26
NSOL,2,1,U,Y,UY
RFORCE,3,1,F,Y,FY
ADD,4,2,,,STRAIN,,,-1/50
ADD,5,3,,,STRESS,,,-1/2500
/AXLAB,X,STRAIN
/AXLAB,Y,STRESS
XVAR,4
PLVAR,5
FINISH
6.混凝土非线性计算实例（5）
FINISH
/CLEAR
/PREP7
ANTYPE,STATIC
ET,1,SOLID65
R,1
MP,EX,1,30E3
MP,NUXY,1,0.2
TB,CONCR,1,1
TBTEMP,0
TBDATA,1,0.3,0.5,2.5,-1
TB,KINH,1,1,18
TBPT,,100E-6,3.0
TBPT,,300E-6,8.3
TBPT,,600E-6,14.6
TBPT,,900E-6,19.1
TBPT,,1100E-6,21.0
TBPT,,1250E-6,22.0
TBPT,,1400E-6,22.6
TBPT,,1550E-6,22.8
TBPT,,1650E-6,22.7
TBPT,,1800E-6,22.3
TBPT,,2000E-6,21.4
TBPT,,2400E-6,19.1
TBPT,,2800E-6,16.8
TBPT,,3200E-6,14.7
TBPT,,3600E-6,13.0
TBPT,,4100E-6,11.3
TBPT,,4600E-6,9.9
BLOCK,0,50,0,50,0,50
ESIZE,10
VMESH,ALL
MSHAPE,0,3D
NSEL,S,LOC,X,0
D,ALL,UX,0
NSEL,S,LOC,Y,0
D,ALL,UY,0
NSEL,S,LOC,Z,0
D,ALL,UZ,0
NSEL,S,LOC,Y,50
CP,1,UY,ALL
NSEL,ALL
FINISH
/VIEW,1,1,1,1
/REPLOT
/SOLU
OUTRES,ALL,ALL
TIME,50
NSUBST,50,0,50
D,1,UY,-.25
SOLVE
FINISH
/POST26
NSOL,2,1,U,Y,UY
RFORCE,3,1,F,Y,FY
ADD,4,2,,,STRAIN,,,-1/50
ADD,5,3,,,STRESS,,,-1/2500
/AXLAB,X,STRAIN
/AXLAB,Y,STRESS
XVAR,4
PLVAR,5
FINISH
7.混凝土非线性计算实例（6）
!
MISO约束压
FINISH
/CLEAR
/PREP7
ANTYPE,STATIC
ET,1,SOLID65
R,1
MP,EX,1,30E3
MP,NUXY,1,0.2
TB,CONCR,1,1
TBTEMP,0
TBDATA,1,0.3,0.5,2.5,-1
TB,KINH,1,1,15
TBPT,,100E-6,3.0
TBPT,,300E-6,8.3
TBPT,,600E-6,14.6
TBPT,,900E-6,19.1
TBPT,,1100E-6,21.0
TBPT,,1250E-6,22.0
TBPT,,1400E-6,22.6
TBPT,,1550E-6,22.8
TBPT,,1650E-6,22.7
TBPT,,1800E-6,22.3
TBPT,,2000E-6,21.4
TBPT,,2800E-6,16.8
TBPT,,3200E-6,14.7
TBPT,,3800E-6,12.3
TBPT,,4600E-6,9.9
!
TB,MKIN,1
!
TBTEMP,,STRAIN
!
TBDATA,,600E-6,1100E-6,1600E-6,3000E-6,4500E-6
!
TBTEMP,0
!
TBDATA,,15,21.5,23,16,9
BLOCK,0,50,0,50,0,50
ESIZE,10
VMESH,ALL
MSHAPE,0,3D
NSEL,S,LOC,X,0
D,ALL,UX,0
NSEL,S,LOC,Y,0
D,ALL,UY,0
NSEL,S,LOC,Z,0
D,ALL,UZ,0
NSEL,S,LOC,Y,50
CP,1,UY,ALL
D,ALL,UX,0
D,ALL,UZ,0
NSEL,ALL
FINISH
/VIEW,1,1,1,1
/REPLOT
/SOLU
OUTRES,ALL,1
TIME,20
NSUBST,20,0,20
D,1,UY,-.04
LSWRITE,1
TIME,30
NSUBST,20,0,20
D,1,UY,-.06
LSWRITE,2
TIME,40
NSUBST,100
D,1,UY,-.1
LSWRITE,3
LSSOLVE,1,3
FINISH
/POST26
NSOL,2,1,U,Y,UY
RFORCE,3,1,F,Y,FY
ADD,4,2,,,STRAIN,,,-1/50
ADD,5,3,,,STRESS,,,-1/2500
/AXLAB,X,STRAIN
/AXLAB,Y,STRESS
XVAR,4
PLVAR,5
FINISH
8.混凝土非线性计算实例（7）-MISO滞回
!
MISO滞回
FINISH
/CLEAR
/PREP7
ANTYPE,STATIC
ET,1,SOLID65
R,1
MP,EX,1,30E3
MP,NUXY,1,0.2
TB,CONCR,1,1
TBTEMP,0
TBDATA,1,0.3,0.5,2.5,-1
TB,MISO,1,1,15
TBPT,,100E-6,3.0
TBPT,,300E-6,8.3
TBPT,,600E-6,14.6
TBPT,,900E-6,19.1
TBPT,,1100E-6,21.0
TBPT,,1250E-6,22.0
TBPT,,1400E-6,22.6
TBPT,,1550E-6,22.8
TBPT,,1650E-6,22.7
TBPT,,1800E-6,22.3
TBPT,,2000E-6,21.4
TBPT,,2800E-6,16.8
TBPT,,3200E-6,14.7
TBPT,,3800E-6,12.3
TBPT,,4600E-6,9.9
BLOCK,0,50,0,50,0,50
ESIZE,10
VMESH,ALL
MSHAPE,0,3D
NSEL,S,LOC,X,0
D,ALL,UX,0
NSEL,S,LOC,Y,0
D,ALL,UY,0
NSEL,S,LOC,Z,0
D,ALL,UZ,0
NSEL,S,LOC,Y,50
CP,1,UY,ALL
NSEL,ALL
FINISH
/VIEW,1,1,1,1
/REPLOT
/SOLU
OUTRES,ALL,ALL
TIME,20
NSUBST,20,0,20
D,1,UY,-.04
LSWRITE,1
TIME,35
NSUBST,15,0,15
D,1,UY,-.01
LSWRITE,2
TIME,60
NSUBST,25,0,25
D,1,UY,-.06
LSWRITE,3
TIME,80
NSUBST,20,0,20
D,1,UY,-.02
LSWRITE,4
TIME,110
NSUBST,30,0,30
D,1,UY,-.08
LSWRITE,5
LSSOLVE,1,5
FINISH
/POST26
NSOL,2,1,U,Y,UY
RFORCE,3,1,F,Y,FY
ADD,4,2,,,STRAIN,,,-1/50
ADD,5,3,,,STRESS,,,-1/2500
/AXLAB,X,STRAIN
/AXLAB,Y,STRESS
XVAR,4
PLVAR,5
FINISH
9.混凝土非线性计算实例（8）
!
MISO单压
FINISH
/CLEAR
/PREP7
ANTYPE,STATIC
ET,1,SOLID65
R,1
MP,EX,1,30E3
MP,NUXY,1,0.2
TB,CONCR,1,1
TBTEMP,0
TBDATA,1,0.3,0.5,2.5,-1
TB,MISO,1,1,10
TBPT,,150E-6,4.5
TBPT,,600E-6,14.8
TBPT,,1000E-6,20.25
TBPT,,1300E-6,22.3
TBPT,,1480E-6,22.8
TBPT,,1620E-6,22.8
TBPT,,1800E-6,22.3
升级会员 