ANSYS工程结构数值分析第一章及第二章部分命令流

!e1.1--平面桁架分析
!----------前处理------------------ /filname,truss,1
!定义工作标题
/title,The Analysis of Plane truss /replot
/prep7
k,1
k,2,6
k,3,12
k,4,18
k,5,24
k,6,6,8
k,7,12,8
k,8,18,8
l,1,2
l,2,3
l,3,4
l,4,5
l,1,6
l,6,7
l,7,8
l,5,8
l,2,6
l,3,7
l,4,8
l,6,3
l,3,8
/pnum,kp,1
/pnum,line,1
lplot
et,1,link1
r,1,0.01
r,2,0.005
r,3,0.0125
mp,ex,1,2.1e11
mp,prxy,1,0.3
lsel,s,tan1,y
latt,1,1,1
lsel,s,loc,y,1,7
lsel,r,loc,x,6,18
latt,1,2,1
lsel,s,loc,y,1,7
lsel,u,loc,x,6,18
latt,1,3,1
allsel,all
/pnum,real,1
/replot
lesize,all,,,1
lmesh,all
finish
!----------加载和求解---------------------------- /solu
antype,0
lplot
dk,1,ux,,,,uy
dk,5,uy
fk,6,fy,-200000
fk,8,fy,-200000
fk,2,fy,-400000
fk,3,fy,-400000
fk,4,fy,-400000
/pnum,real,0
/pnum,line,0
/pnum,kp,0
/pbc,all,,1
/psymb,ldiv,-1
lplot
solve
finish
!----------后处理------------------------------- /post1
pldisp
etable,mforce,smisc,1
etable,mstress,ls,1
plls,mforce,mforce,1
plls,mstress,mstress,1
prrsol
finish
!/exit,nosav
!e1.2--平面桁架分析
!----------前处理-------------------------------------- /filname,truss,1
!定义工作标题
/title,The Analysis of Plane truss
/prep7
et,1,link1
r,1,0.01
r,2,0.005
r,3,0.0125
mp,ex,1,2.1e11
mp,prxy,1,0.3
n,1
n,2,6
n,3,12
n,4,18
n,5,24
n,6,6,8
n,7,12,8
n,8,18,8
type,1
mat,1
real,1
e,1,2
e,2,3
e,3,4
e,4,5
e,6,7
e,7,8
real,2
e,2,6
e,3,7
e,4,8
e,6,3
e,3,8
real,3
e,1,6
e,8,5
finish
/solu
antype,0
d,1,ux,,,,,uy
d,5,uy
f,6,fy,-200000
f,8,fy,-200000
f,2,fy,-400000
f,3,fy,-400000
f,4,fy,-400000
solve
finish
/post1
pldisp
etable,mforce,smisc,1 etable,mstress,ls,1 plls,mforce,mforce,1 plls,mstress,mstress,1 prrsol
finish
!/exit,nosav
FINISH
/CLEAR
/PREP7
!1.定义弹簧参数
D=4
C=8
N=10
DZ=C*D
T=DZ/2.5
*IF,T,LT,D,THEN
T=D
*ENDIF
!2.创建一圈螺旋线
CSYS,1
K,1,DZ/2,0,-T/2
K,2,DZ/2,180
L,1,2
CSYS,0
LSYMM,Z,1
LSYMM,Y,2,,,,,1
NUMMRG,ALL
CM,L1,LINE
!3.在螺旋线端部创建簧丝截面
KWPA VE,1
WPROTA,,90
CYL4,,,D/2
!4.沿L1路径拖拉圆面创建体、复制体等VDRAG,1,,,,,,L1
VGEN,N,ALL,,,,,T
NUMMRG,KP
WPCSYS
FINISH
/CLEAR
/PREP7
!1.定义弹簧参数
D=4
C=8
N=10
DZ=C*D
T=DZ/2.5
*IF,T,LT,D,THEN
T=D
*ENDIF
!2.创建一圈螺旋线
CSYS,1
K,1,DZ/2,0,-T/2
K,2,DZ/2,180
L,1,2
CSYS,0
LSYMM,Z,1
LSYMM,Y,2,,,,,1
NUMMRG,ALL
CM,L1,LINE
!3.在螺旋线端部创建簧丝截面
KWPA VE,1
WPROTA,,90
CYL4,,,D/2
!4.沿L1路径拖拉圆面创建体、复制体等VDRAG,1,,,,,,L1
VGEN,N,ALL,,,,,T
NUMMRG,KP
WPCSYS
FINISH
/CLEAR
/PREP7
!1.定义弹簧参数
D=4
C=8
N=10
DZ=C*D
T=DZ/2.5
*IF,T,LT,D,THEN
T=D
*ENDIF
!2.创建一圈螺旋线
CSYS,1
K,1,DZ/2,0,-T/2
K,2,DZ/2,180
L,1,2
CSYS,0
LSYMM,Z,1
LSYMM,Y,2,,,,,1
NUMMRG,ALL
CM,L1,LINE
!3.在螺旋线端部创建簧丝截面
KWPA VE,1
WPROTA,,90
CYL4,,,D/2
!4.沿L1路径拖拉圆面创建体、复制体等VDRAG,1,,,,,,L1
VGEN,N,ALL,,,,,T
NUMMRG,KP
WPCSYS
FINISH
/CLEAR
/PREP7
!1.定义弹簧参数
D=4
C=8
N=10
DZ=C*D
T=DZ/2.5
*IF,T,LT,D,THEN
T=D
*ENDIF
!2.创建一圈螺旋线
CSYS,1
K,1,DZ/2,0,-T/2
K,2,DZ/2,180
L,1,2
CSYS,0
LSYMM,Z,1
LSYMM,Y,2,,,,,1
NUMMRG,ALL
CM,L1,LINE
!3.在螺旋线端部创建簧丝截面
KWPA VE,1
WPROTA,,90
CYL4,,,D/2
!4.沿L1路径拖拉圆面创建体、复制体等VDRAG,1,,,,,,L1
VGEN,N,ALL,,,,,T
NUMMRG,KP
WPCSYS
FINISH
/CLEAR
/PREP7
!1.定义弹簧参数
D=4
C=8
N=10
DZ=C*D
T=DZ/2.5
*IF,T,LT,D,THEN
T=D
*ENDIF
!2.创建一圈螺旋线
CSYS,1
K,1,DZ/2,0,-T/2
K,2,DZ/2,180
L,1,2
CSYS,0
LSYMM,Z,1
LSYMM,Y,2,,,,,1
NUMMRG,ALL
CM,L1,LINE
!3.在螺旋线端部创建簧丝截面
KWPA VE,1
WPROTA,,90
CYL4,,,D/2
!4.沿L1路径拖拉圆面创建体、复制体等VDRAG,1,,,,,,L1
VGEN,N,ALL,,,,,T
NUMMRG,KP
WPCSYS
FINISH
/CLEAR
/PREP7
!1.定义弹簧参数
D=4
C=8
N=10
DZ=C*D
T=DZ/2.5
*IF,T,LT,D,THEN
T=D
*ENDIF
!2.创建一圈螺旋线
CSYS,1
K,1,DZ/2,0,-T/2
K,2,DZ/2,180
L,1,2
CSYS,0
LSYMM,Z,1
LSYMM,Y,2,,,,,1
NUMMRG,ALL
CM,L1,LINE
!3.在螺旋线端部创建簧丝截面
KWPA VE,1
WPROTA,,90
CYL4,,,D/2
!4.沿L1路径拖拉圆面创建体、复制体等VDRAG,1,,,,,,L1
VGEN,N,ALL,,,,,T
NUMMRG,KP
WPCSYS
FINISH
/CLEAR
/PREP7
!1.定义弹簧参数
D=4
C=8
N=10
DZ=C*D
T=DZ/2.5
*IF,T,LT,D,THEN
T=D
*ENDIF
!2.创建一圈螺旋线
CSYS,1
K,1,DZ/2,0,-T/2
K,2,DZ/2,180
L,1,2
CSYS,0
LSYMM,Z,1
LSYMM,Y,2,,,,,1
NUMMRG,ALL
CM,L1,LINE
!3.在螺旋线端部创建簧丝截面
KWPA VE,1
WPROTA,,90
CYL4,,,D/2
!4.沿L1路径拖拉圆面创建体、复制体等VDRAG,1,,,,,,L1
VGEN,N,ALL,,,,,T
NUMMRG,KP
WPCSYS
FINISH
/CLEAR
/PREP7
!1.定义弹簧参数
D=4
C=8
N=10
DZ=C*D
T=DZ/2.5
*IF,T,LT,D,THEN
T=D
*ENDIF
!2.创建一圈螺旋线
CSYS,1
K,1,DZ/2,0,-T/2
K,2,DZ/2,180
L,1,2
CSYS,0
LSYMM,Z,1
LSYMM,Y,2,,,,,1
NUMMRG,ALL
CM,L1,LINE
!3.在螺旋线端部创建簧丝截面
KWPA VE,1
WPROTA,,90
CYL4,,,D/2
!4.沿L1路径拖拉圆面创建体、复制体等VDRAG,1,,,,,,L1
VGEN,N,ALL,,,,,T
NUMMRG,KP
WPCSYS。