ANSYS APDL输电铁塔模型代码

首先建立了一个铁塔框架，建立点，连成线，利用镜像命令等完成创建，图形大致形状如下图所示：

finish   
/clear   
/prep7
et,1,beam188  

 

mp,ex,1,200e9
mp,dens,1,7.8e3
mp,prxy,1,0.3
!===================
!sectype,1,beam,rect
!secdata,30,50  
sectype,2,beam,csolid
secdata,0.2
!===================
k,1,-3,-3,0
k,2,3,-3,0
k,3,3,3,0
k,4,-3,3,0
lstr,1,2
lstr,2,3
lstr,4,3
lstr,1,4
!===================
k,5,-1,-1,27
k,6,1,-1,27
k,7,1,1,27
k,8,-1,1,27
lstr,5,6
lstr,5,8
lstr,6,7
lstr,7,8
!===================
lstr,1,5
lstr,2,6
lstr,4,8
lstr,3,7
!===================
k,9,-0.8,-0.8,39
k,10,0.8,-0.8,39
lstr,9,10
lstr,9,5
lstr,6,10
k,11,0.8,0.8,39
k,12,-0.8,0.8,39
lstr,5,9
lstr,7,11
lstr,8,12
lstr,12,9
lstr,11,12
lstr,11,10
!===================
blc5,,,6,6
agen,2,1,1,1,0,0,3
agen,2,1,1,1,0,0,5.9
agen,2,1,1,1,0,0,8.7
agen,2,1,1,1,0,0,11.4
agen,2,1,1,1,0,0,14   
agen,2,1,1,1,0,0,16.5  
agen,2,1,1,1,0,0,18.9
agen,2,1,1,1,0,0,21.2
agen,2,1,1,1,0,0,23.4
agen,2,1,1,1,0,0,25.5
!===================
!agen,2,1,1,1,0,0,27
agen,2,1,1,1,0,0,28.2   
agen,2,1,1,1,0,0,29.4
agen,2,1,1,1,0,0,30.6
agen,2,1,1,1,0,0,31.8  
agen,2,1,1,1,0,0,33
agen,2,1,1,1,0,0,34.2