6013平头塔吊ansys命令流
合集下载
相关主题
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
LMESH,ALL
*enddo
*enddo
*do,i1,1,3,1
*do,i,1,4,1
l,i1+4*(i-1),i1+5+4*(i-1),1
*enddo
*enddo
latt,1,3,2,,,, !∠90x10
LMESH,ALL
l,25+8*(i-1),32+8*(i-1),1
*enddo
latt,1,3,2,,,, !∠90x10
LMESH,ALL
*do,i1,1,3,1
*do,i,1,12,1
l,25+i1-1+8*(i-1),26+i1-1+8*(i-1),1
*enddo
!SECTYPE,23,BEAM,CSOLID,0
!SECDATA,0.0782 !塔头顶梁
L=0.7466 !断面形心距离
NOD=1.5 !节点距离
KN=1 !关键点编号
*afun,deg
!*ASK,alph,jiaodu, !输入塔身建模的角度
*enddo
*enddo
latt,1,1,2,,,, !∠70x7
LMESH,ALL
*do,i,1,4,1
l,5+4*(i-1),8+4*(i-1),1
*enddo
latt,1,1,2,,,, !∠70x7
LMESH,ALL
*do,i,1,3,1
SECTYPE,7,BEAM,CTUBE,0
SECDATA,0.06,0.07 !Ф140x10-7
SECTYPE,8,BEAM,CSOLID,0
SECDATA,0.05 !Ф100-8
KN=KN+1
*do,i1,1,3,1
*do,i,1,12,1
l,21+i1-1+8*(i-1),26+i1-1+8*(i-1),1
l,26+i1-1+8*(i-1),29+i1-1+8*(i-1),1
*enddo
*enddo
*do,i,1,12,1
l,24+8*(i-1),25+8*(i-1),1
SECTYPE,11,BEAM,CHAN,0
SECDATA,0.07,0.07,0.18,0.0105,0.0105,0.009 ![18-11
SECTYPE,12,BEAM,CSOLID,0
SECDATA,0.03 !Ф60-12
MP,EX,1,2.06E11 !定义第一类材料的弹性模量EX
MP,PRXY,1,0.3 !定义材料属性
!MP,DENS,1,9.42e3 !定义第一类材料的密度DENS
R,1,0.0009424 !∠70x7
R,2,0.0012303 !∠80x8
R,3,0.0017167 !∠90x10
SECTYPE,19,BEAM,CSOLID,0
SECDATA,0.04 !起重臂第三节上弦Ф80-19
SECTYPE,20,BEAM,HREC,0
SECDATA,0.086,0.086,0.007,0.007,0.007,0.007 !起重臂第四、五节下弦：□86x7（∠80x7）-20
SECTYPE,5,BEAM,HREC,0
SECDATA,0.098,0.098,0.01,0.01,0.01,0.01 !□98x10（∠90x10）-5
SECTYPE,6,BEAM,HREC,0
SECDATA,0.133,0.133,0.01,0.01,0.01,0.01 !□133x10（∠125x10）-6
SECTYPE,17,BEAM,CSOLID,0
SECDATA,0.0575 !起重臂根部节上弦Ф115-17
SECTYPE,18,BEAM,CSOLID,0
SECDATA,0.0475 !起重臂第二节上弦Ф95-18
SECTYPE,21,BEAM,CSOLID,0
SECDATA,0.04 !起重臂第四、五节上弦：Ф65-21
SECTYPE,22,BEAM,HREC,0
SECDATA,0.067,0.067,0.005,0.005,0.005,0.005 !起重臂第六、七节下弦：□67x5（∠63x5）-22
R,10,0.000292 !Ф34x3-10
R,11,0.0009048 !Ф76x4-11
R,12,0.000424 !Ф48x3-12
R,13,0.0003086 !∠40x4-13
R,14,0.000804 !Ф68x4-14
R,15,0.000666 !Ф57x4-15
SECTYPE,9,BEAM,HREC,0
SECDATA,0.14,0.18,0.009,0.009,0.0105,0.0105 !140x180（2[18）-9
SECTYPE,10,BEAM,I,0
SECDATA,0.2,0.2,0.25,0.02,0.02,0.016 !平衡臂端部节下弦-10
SECTYPE,15,BEAM,HREC,0
SECDATA,0.096,0.096,0.008,0.008,0.008,0.008 !□96x8（∠90x8）-15
SECTYPE,16,BEAM,HREC,0
SECDATA,0.079,0.079,0.005,0.005,0.005,0.005 !□79x5（∠75x5）-16
SECTYPE,13,BEAM,CSOLID,0
SECDATA,0.025 !Ф50-13 起重臂第六、七节上弦
SECTYPE,14,BEAM,HREC,0
SECDATA,0.135,0.135,0.0206,0.0206,0.012,0.012 !起重臂根部节下弦□135（∠125x12）-14
latt,1,-1,1,,12+4*(i-1),,2
LMESH,ALL
*enddo
a=10 $b=14
*do,i1,1,3,1
*do,i,1,27,1
l,a+i1-1+4*(i-1),b+i1-1+4*(i-1),3
latt,1,-1,1,,9-1+i1+4*(i-1),,2
/clear
/units,si
/PREP7 !进入前处理模块PREP7
/TITLE,The analysis of 6013
ANTYPE,STATIC
ET,1,beam188 !定义第一类单元为空间梁单元BEAM188
ET,2,link8 !定义第二类单元为空间杆单元link8
alph=0
*if,alph,EQ,0,then
*do,i,1,30,1 !0度方向-标准节
k,KN,L,1.5*(i-1),L
KN=KN+1
k,KN,L,1.5*(i-1),-L
KN=KN+1
k,KN,-L,1.5*(i-1),-L
KN=KN+1
k,KN,-L,1.5*(i-1),L
KN=KN+1
*enddo
*else
*do,i,1,30,1 !45度方向-标准节
k,KN,L/cos(45),1.5*(i-1),0
KN=KN+1
k,KN,0,1.5*(i-1),-L/cos(45)
KN=KN+1
k,KN,-L/cos(45),1.5*(i-1),0
SECTYPE,1,BEAM,L,0
SECDATA,0.2,0.2,0.016,0.016,0,0,0,0,0,0 !角钢∠200x16
SECTYPE,2,BEAM,L,0
SECDATA,0.2,0.2,0.016,0.016,0,0,0,0,0,0 !角钢∠200x16
*do,i,1,4,1
l,4+4*(i-1),5+4*(i-1),1
*endபைடு நூலகம்o
latt,1,3,2,,,, !∠90x10
LMESH,ALL
*do,i1,1,3,1
*do,i,1,4,1
l,5+i1-1+4*(i-1),6+i1-1+4*(i-1),1
R,4,0.0031276 !2∠100x8
R,5,0.001115 !Ф76x5
R,6,0.001776 !2∠75x6
R,7,0.019200 !塔头顶梁
R,8,0.001636 !2∠70x6-8
R,9,0.0004893 !Ф48x3.5-9
*do,i1,1,3,1
*do,i,1,2,1
l,a+4*(i-1),b+4*(i-1),3
latt,1,-1,1,,i1+4*(i-1),,1
LMESH,ALL
*enddo
a=a+1 $b=b+1
*enddo
*do,i,1,27,1
l,9+4*(i-1),13+4*(i-1),3
LMESH,ALL
!!!!!!!!!!!!!回转建模
k,KN,0.65,KY(117)+1.545,0.55
KN=KN+1
k,KN,0.65,KY(117)+1.545,-0.55
KN=KN+1
k,KN,-0.65,KY(117)+1.545,-0.55
KN=KN+1
k,KN,-0.65,KY(117)+1.545,0.55
*enddo
latt,1,1,2,,,, !∠70x7
LMESH,ALL
*do,i1,1,3,1
*do,i,1,12,1
l,29+i1-1+8*(i-1),30+i1-1+8*(i-1),1
*enddo
*enddo
latt,1,2,2,,,, !∠80x8
KN=KN+1
k,KN,0,1.5*(i-1),L/cos(45)
KN=KN+1
*enddo
*endif
*do,i,1,2,1
l,1+4*(i-1),5+4*(i-1),3
latt,1,-1,1,,4+4*(i-1),,1
*enddo
LMESH,ALL
a=2 $b=6
l,18+i-1,21+i-1,1
*enddo
l,17,24,1
latt,1,3,2,,,, !∠90x10
LMESH,ALL
l,21,22,1
l,22,23,1
l,23,24,1
l,21,24,1
latt,1,2,2,,,, !∠80x8
LMESH,ALL
LMESH,ALL
*do,i,1,12,1
l,25+8*(i-1),28+8*(i-1),1
*enddo
latt,1,1,2,,,, !∠70x7
LMESH,ALL
*do,i,1,12,1
l,29+8*(i-1),32+8*(i-1),1
*enddo
latt,1,2,2,,,, !∠80x8
SECTYPE,3,BEAM,HREC,0
SECDATA,0.135,0.135,0.012,0.012,0.012,0.012 !□135x12（∠125x12）-3
SECTYPE,4,BEAM,HREC,0
SECDATA,0.135,0.135,0.0158,0.0158,0.0158,0.0158 !□135x15.8（∠125x12）-4
*enddo
*enddo
*do,i1,1,3,1
*do,i,1,4,1
l,i1+4*(i-1),i1+5+4*(i-1),1
*enddo
*enddo
latt,1,3,2,,,, !∠90x10
LMESH,ALL
l,25+8*(i-1),32+8*(i-1),1
*enddo
latt,1,3,2,,,, !∠90x10
LMESH,ALL
*do,i1,1,3,1
*do,i,1,12,1
l,25+i1-1+8*(i-1),26+i1-1+8*(i-1),1
*enddo
!SECTYPE,23,BEAM,CSOLID,0
!SECDATA,0.0782 !塔头顶梁
L=0.7466 !断面形心距离
NOD=1.5 !节点距离
KN=1 !关键点编号
*afun,deg
!*ASK,alph,jiaodu, !输入塔身建模的角度
*enddo
*enddo
latt,1,1,2,,,, !∠70x7
LMESH,ALL
*do,i,1,4,1
l,5+4*(i-1),8+4*(i-1),1
*enddo
latt,1,1,2,,,, !∠70x7
LMESH,ALL
*do,i,1,3,1
SECTYPE,7,BEAM,CTUBE,0
SECDATA,0.06,0.07 !Ф140x10-7
SECTYPE,8,BEAM,CSOLID,0
SECDATA,0.05 !Ф100-8
KN=KN+1
*do,i1,1,3,1
*do,i,1,12,1
l,21+i1-1+8*(i-1),26+i1-1+8*(i-1),1
l,26+i1-1+8*(i-1),29+i1-1+8*(i-1),1
*enddo
*enddo
*do,i,1,12,1
l,24+8*(i-1),25+8*(i-1),1
SECTYPE,11,BEAM,CHAN,0
SECDATA,0.07,0.07,0.18,0.0105,0.0105,0.009 ![18-11
SECTYPE,12,BEAM,CSOLID,0
SECDATA,0.03 !Ф60-12
MP,EX,1,2.06E11 !定义第一类材料的弹性模量EX
MP,PRXY,1,0.3 !定义材料属性
!MP,DENS,1,9.42e3 !定义第一类材料的密度DENS
R,1,0.0009424 !∠70x7
R,2,0.0012303 !∠80x8
R,3,0.0017167 !∠90x10
SECTYPE,19,BEAM,CSOLID,0
SECDATA,0.04 !起重臂第三节上弦Ф80-19
SECTYPE,20,BEAM,HREC,0
SECDATA,0.086,0.086,0.007,0.007,0.007,0.007 !起重臂第四、五节下弦：□86x7（∠80x7）-20
SECTYPE,5,BEAM,HREC,0
SECDATA,0.098,0.098,0.01,0.01,0.01,0.01 !□98x10（∠90x10）-5
SECTYPE,6,BEAM,HREC,0
SECDATA,0.133,0.133,0.01,0.01,0.01,0.01 !□133x10（∠125x10）-6
SECTYPE,17,BEAM,CSOLID,0
SECDATA,0.0575 !起重臂根部节上弦Ф115-17
SECTYPE,18,BEAM,CSOLID,0
SECDATA,0.0475 !起重臂第二节上弦Ф95-18
SECTYPE,21,BEAM,CSOLID,0
SECDATA,0.04 !起重臂第四、五节上弦：Ф65-21
SECTYPE,22,BEAM,HREC,0
SECDATA,0.067,0.067,0.005,0.005,0.005,0.005 !起重臂第六、七节下弦：□67x5（∠63x5）-22
R,10,0.000292 !Ф34x3-10
R,11,0.0009048 !Ф76x4-11
R,12,0.000424 !Ф48x3-12
R,13,0.0003086 !∠40x4-13
R,14,0.000804 !Ф68x4-14
R,15,0.000666 !Ф57x4-15
SECTYPE,9,BEAM,HREC,0
SECDATA,0.14,0.18,0.009,0.009,0.0105,0.0105 !140x180（2[18）-9
SECTYPE,10,BEAM,I,0
SECDATA,0.2,0.2,0.25,0.02,0.02,0.016 !平衡臂端部节下弦-10
SECTYPE,15,BEAM,HREC,0
SECDATA,0.096,0.096,0.008,0.008,0.008,0.008 !□96x8（∠90x8）-15
SECTYPE,16,BEAM,HREC,0
SECDATA,0.079,0.079,0.005,0.005,0.005,0.005 !□79x5（∠75x5）-16
SECTYPE,13,BEAM,CSOLID,0
SECDATA,0.025 !Ф50-13 起重臂第六、七节上弦
SECTYPE,14,BEAM,HREC,0
SECDATA,0.135,0.135,0.0206,0.0206,0.012,0.012 !起重臂根部节下弦□135（∠125x12）-14
latt,1,-1,1,,12+4*(i-1),,2
LMESH,ALL
*enddo
a=10 $b=14
*do,i1,1,3,1
*do,i,1,27,1
l,a+i1-1+4*(i-1),b+i1-1+4*(i-1),3
latt,1,-1,1,,9-1+i1+4*(i-1),,2
/clear
/units,si
/PREP7 !进入前处理模块PREP7
/TITLE,The analysis of 6013
ANTYPE,STATIC
ET,1,beam188 !定义第一类单元为空间梁单元BEAM188
ET,2,link8 !定义第二类单元为空间杆单元link8
alph=0
*if,alph,EQ,0,then
*do,i,1,30,1 !0度方向-标准节
k,KN,L,1.5*(i-1),L
KN=KN+1
k,KN,L,1.5*(i-1),-L
KN=KN+1
k,KN,-L,1.5*(i-1),-L
KN=KN+1
k,KN,-L,1.5*(i-1),L
KN=KN+1
*enddo
*else
*do,i,1,30,1 !45度方向-标准节
k,KN,L/cos(45),1.5*(i-1),0
KN=KN+1
k,KN,0,1.5*(i-1),-L/cos(45)
KN=KN+1
k,KN,-L/cos(45),1.5*(i-1),0
SECTYPE,1,BEAM,L,0
SECDATA,0.2,0.2,0.016,0.016,0,0,0,0,0,0 !角钢∠200x16
SECTYPE,2,BEAM,L,0
SECDATA,0.2,0.2,0.016,0.016,0,0,0,0,0,0 !角钢∠200x16
*do,i,1,4,1
l,4+4*(i-1),5+4*(i-1),1
*endபைடு நூலகம்o
latt,1,3,2,,,, !∠90x10
LMESH,ALL
*do,i1,1,3,1
*do,i,1,4,1
l,5+i1-1+4*(i-1),6+i1-1+4*(i-1),1
R,4,0.0031276 !2∠100x8
R,5,0.001115 !Ф76x5
R,6,0.001776 !2∠75x6
R,7,0.019200 !塔头顶梁
R,8,0.001636 !2∠70x6-8
R,9,0.0004893 !Ф48x3.5-9
*do,i1,1,3,1
*do,i,1,2,1
l,a+4*(i-1),b+4*(i-1),3
latt,1,-1,1,,i1+4*(i-1),,1
LMESH,ALL
*enddo
a=a+1 $b=b+1
*enddo
*do,i,1,27,1
l,9+4*(i-1),13+4*(i-1),3
LMESH,ALL
!!!!!!!!!!!!!回转建模
k,KN,0.65,KY(117)+1.545,0.55
KN=KN+1
k,KN,0.65,KY(117)+1.545,-0.55
KN=KN+1
k,KN,-0.65,KY(117)+1.545,-0.55
KN=KN+1
k,KN,-0.65,KY(117)+1.545,0.55
*enddo
latt,1,1,2,,,, !∠70x7
LMESH,ALL
*do,i1,1,3,1
*do,i,1,12,1
l,29+i1-1+8*(i-1),30+i1-1+8*(i-1),1
*enddo
*enddo
latt,1,2,2,,,, !∠80x8
KN=KN+1
k,KN,0,1.5*(i-1),L/cos(45)
KN=KN+1
*enddo
*endif
*do,i,1,2,1
l,1+4*(i-1),5+4*(i-1),3
latt,1,-1,1,,4+4*(i-1),,1
*enddo
LMESH,ALL
a=2 $b=6
l,18+i-1,21+i-1,1
*enddo
l,17,24,1
latt,1,3,2,,,, !∠90x10
LMESH,ALL
l,21,22,1
l,22,23,1
l,23,24,1
l,21,24,1
latt,1,2,2,,,, !∠80x8
LMESH,ALL
LMESH,ALL
*do,i,1,12,1
l,25+8*(i-1),28+8*(i-1),1
*enddo
latt,1,1,2,,,, !∠70x7
LMESH,ALL
*do,i,1,12,1
l,29+8*(i-1),32+8*(i-1),1
*enddo
latt,1,2,2,,,, !∠80x8
SECTYPE,3,BEAM,HREC,0
SECDATA,0.135,0.135,0.012,0.012,0.012,0.012 !□135x12（∠125x12）-3
SECTYPE,4,BEAM,HREC,0
SECDATA,0.135,0.135,0.0158,0.0158,0.0158,0.0158 !□135x15.8（∠125x12）-4