注册 登录  
 加关注
   显示下一条  |  关闭
温馨提示!由于新浪微博认证机制调整,您的新浪微博帐号绑定已过期,请重新绑定!立即重新绑定新浪微博》  |  关闭

Maple

生活就像白开水,也许有人不喜欢,但是谁也离不开!

 
 
 

日志

 
 
关于我

生活就像白开水,也许有人不喜欢,但是谁也离不开!

网易考拉推荐

采用Ansys计算双向拉索幕墙  

2011-07-07 10:15:44|  分类: 心得 |  标签: |举报 |字号 订阅

  下载LOFTER 我的照片书  |

采用Ansys计算双向拉索幕墙 - maple - Maple

 

照片为2009年设计施工的一个双向拉索幕墙

近日采用Ansys对门头上方的拉索幕墙进行了校验计算,计算用命令流如下:

/PREP7 
ET,1,LINK10
!* 
R,1,192,0.00207,  !设置竖向拉索截面及应变量
!* 
R,2,152.8,0.0018,  !设置横向拉索截面及应变量  
!* 
MPTEMP,,,,,,,, 
MPTEMP,1,0 
MPDATA,EX,1,,1.4E5 
MPDATA,PRXY,1,,0.3 
/WAIT,3   !延时3秒
K,1,-7000,0,0  !建立关键点1~54 
K,2,-7000,2000,0
K,3,-7000,4000,0
K,4,-7000,6000,0
K,5,-7000,8000,0
K,6,-5600,3140,0
K,7,-5600,4000,0
K,8,-5600,6000,0
K,9,-5600,8000,0
K,10,-4200,3140,0  
K,11,-4200,4000,0  
K,12,-4200,6000,0  
K,13,-4200,8000,0  
K,14,-2800,3140,0  
K,15,-2800,4000,0  
K,16,-2800,6000,0  
K,17,-2800,8000,0  
K,18,-1400,3140,0  
K,19,-1400,4000,0  
K,20,-1400,6000,0  
K,21,-1400,8000,0  
K,22,0,3140,0  
K,23,0,4000,0  
K,24,0,6000,0  
K,25,0,8000,0  
K,26,1400,3140,0
K,27,1400,4000,0
K,28,1400,6000,0
K,29,1400,8000,0
K,30,2800,3140,0
K,31,2800,4000,0
K,32,2800,6000,0
K,33,2800,8000,0
K,34,4200,3140,0
K,35,4200,4000,0
K,36,4200,6000,0
K,37,4200,8000,0
K,38,5600,3140,0
K,39,5600,4000,0
K,40,5600,6000,0
K,41,5600,8000,0
K,42,7000,0,0  
K,43,7000,2000,0
K,44,7000,4000,0
K,45,7000,6000,0
K,46,7000,8000,0
K,47,-7700,2000,0  
K,48,-7700,4000,0  
K,49,-7700,6000,0  
K,50,-5600,2000,0  
K,51,7700,2000,0
K,52,7700,4000,0
K,53,7700,6000,0
K,54,5600,2000,0
/WAIT,3   !延时3秒
LSTR,1,2  !建立竖向拉索
LSTR,2,3
LSTR,3,4
LSTR,4,5
LSTR,6,7
LSTR,7,8
LSTR,8,9
LSTR,10,11 
LSTR,11,12 
LSTR,12,13 
LSTR,14,15 
LSTR,15,16 
LSTR,16,17 
LSTR,18,19 
LSTR,19,20 
LSTR,20,21 
LSTR,22,23 
LSTR,23,24 
LSTR,24,25 
LSTR,26,27 
LSTR,27,28 
LSTR,28,29 
LSTR,30,31 
LSTR,31,32 
LSTR,32,33 
LSTR,34,35 
LSTR,35,36 
LSTR,36,37 
LSTR,38,39 
LSTR,39,40 
LSTR,40,41 
LSTR,42,43 
LSTR,43,44 
LSTR,44,45 
LSTR,45,46
/WAIT,3   !延时3秒 
LSTR,47,2  !建立横向拉索
LSTR,2,50  
LSTR,48,3  
LSTR,3,7
LSTR,7,11  
LSTR,11,15 
LSTR,15,19 
LSTR,19,23 
LSTR,23,27 
LSTR,27,31 
LSTR,31,35 
LSTR,35,39 
LSTR,39,44 
LSTR,44,52 
LSTR,49,4  
LSTR,4,8
LSTR,8,12  
LSTR,12,16 
LSTR,16,20 
LSTR,20,24 
LSTR,24,28 
LSTR,28,32 
LSTR,32,36 
LSTR,36,40 
LSTR,40,45 
LSTR,45,53 
LSTR,54,43 
LSTR,43,51 
/WAIT,3   !延时3秒
/VIEW,1,1,1,1  
/ANG,1 
/REP,FAST  
LPLOT  
/VIEW,1,,,1
/ANG,1 
/REP,FAST  
FLST,5,35,4,ORDE,2 
FITEM,5,1  
FITEM,5,-35
CM,_Y,LINE  !赋予竖向拉索属性 
LSEL, , , ,P51X
CM,_Y1,LINE  !赋予横向拉索属性
CMSEL,S,_Y 
!* 
!* 
CMSEL,S,_Y1
LATT,1,1,1, , , ,  
CMSEL,S,_Y 
CMDELE,_Y  
CMDELE,_Y1 
!* 
FLST,5,28,4,ORDE,2 
FITEM,5,36 
FITEM,5,-63
CM,_Y,LINE 
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,S,_Y 
!* 
!* 
CMSEL,S,_Y1
LATT,1,2,1, , , ,  
CMSEL,S,_Y 
CMDELE,_Y  
CMDELE,_Y1 
!* 
FLST,5,63,4,ORDE,2 
FITEM,5,1  
FITEM,5,-63
CM,_Y,LINE 
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y  
!* 
LESIZE,_Y1, , ,1, , , , ,1  !设置网格划分尺寸
!* 
SMRT,6 
FLST,2,63,4,ORDE,2  !进行网格划分尺寸 
FITEM,2,1  
FITEM,2,-63
LMESH,P51X 
FINISH 
/SOL
FLST,2,30,1,ORDE,23
FITEM,2,1  
FITEM,2,5  
FITEM,2,-6 
FITEM,2,9  
FITEM,2,-10
FITEM,2,13 
FITEM,2,-14
FITEM,2,17 
FITEM,2,-18
FITEM,2,21 
FITEM,2,-22
FITEM,2,25 
FITEM,2,-26
FITEM,2,29 
FITEM,2,-30
FITEM,2,33 
FITEM,2,-34
FITEM,2,37 
FITEM,2,-38
FITEM,2,41 
FITEM,2,-42
FITEM,2,46 
FITEM,2,-54
!* 
/GO
D,P51X, , , , , ,ALL, , , , ,    !施加边界条件  
FLST,2,24,1,ORDE,22
FITEM,2,2  
FITEM,2,-4 
FITEM,2,7  
FITEM,2,-8 
FITEM,2,11 
FITEM,2,-12
FITEM,2,15 
FITEM,2,-16
FITEM,2,19 
FITEM,2,-20
FITEM,2,23 
FITEM,2,-24
FITEM,2,27 
FITEM,2,-28
FITEM,2,31 
FITEM,2,-32
FITEM,2,35 
FITEM,2,-36
FITEM,2,39 
FITEM,2,-40
FITEM,2,43 
FITEM,2,-45
!* 
/GO
F,P51X,FY,-2386     !施加竖向荷载
FLST,2,24,1,ORDE,22
FITEM,2,2  
FITEM,2,-4 
FITEM,2,7  
FITEM,2,-8 
FITEM,2,11 
FITEM,2,-12
FITEM,2,15 
FITEM,2,-16
FITEM,2,19 
FITEM,2,-20
FITEM,2,23 
FITEM,2,-24
FITEM,2,27 
FITEM,2,-28
FITEM,2,31 
FITEM,2,-32
FITEM,2,35 
FITEM,2,-36
FITEM,2,39 
FITEM,2,-40
FITEM,2,43 
FITEM,2,-45
!* 
/GO
F,P51X,FZ,-4179     !施加水平荷载
/VIEW,1,1,2,3  
/ANG,1 
/REP,FAST  
/WAIT,3   !延时3秒
ANTYPE,0    !开始求解
NLGEOM,1    !设置几何非线性控制,应为1
PSTRES,0    !设置大微移控制,应为0
NSUBST,1    !设置分析为2步分析(可避免出现错误警告提示)
/STATUS,SOLU
SOLVE  
FINISH      !进入后处理  
/POST1 
PLESOL, SMISC,1, 0,1      !显示拉索轴力云图及最大微移量

  评论这张
 
阅读(246)| 评论(0)
推荐 转载

历史上的今天

评论

<#--最新日志,群博日志--> <#--推荐日志--> <#--引用记录--> <#--博主推荐--> <#--随机阅读--> <#--首页推荐--> <#--历史上的今天--> <#--被推荐日志--> <#--上一篇,下一篇--> <#-- 热度 --> <#-- 网易新闻广告 --> <#--右边模块结构--> <#--评论模块结构--> <#--引用模块结构--> <#--博主发起的投票-->
 
 
 
 
 
 
 
 
 
 
 
 
 
 

页脚

网易公司版权所有 ©1997-2017