声振论坛

 找回密码
 我要加入

QQ登录

只需一步,快速开始

查看: 1701|回复: 2

[结构分析] 自己写的 3跨简支梁 (2D)

[复制链接]
发表于 2011-11-3 12:34 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?我要加入

x
本帖最后由 zp4655958 于 2011-11-3 12:42 编辑

!矩形截面
finish
/clear
/prep7
et,1,3
mp,ex,1,2e11
mp,prxy,1,0.3
mp,dens,1,2500
r,1,0.8,(0.8**3)/12,0.8
k,1,
k,2,6.581
k,3,7.831
k,4,11.331
k,5,11.331+1.250
k,6,19.162
l,1,2
l,2,3
l,3,4
l,4,5
l,5,6
dk,1,ux,,,,uy
dk,3,uy,
dk,4,uy,
dk,6,uy,
fk,1,fy,-125.311e3
fk,2,fy,-380.593e3
fk,5,fy,-379e3
fk,6,fy,-125.429e3
lesize,all,,,10
lmesh,all
eplot
sbctran
allsel
/solu
solve
allsel,all
fkdele,all,all,all
acel,,9.8,
solve
/post1
lcdef,1,1,1
lcdef,2,2,1
lcfact,1,1
lcfact,2,1.2
lcase,1
lcoper,add,2
prrsol
etable,myi,smisc,6
etable,myj,smisc,12
plls,myi,myj,-1
/title,wanjutu
/ui,copy,save,jpeg
自己写的 高手指教
!工字钢(I32a)
finish
/clear
/prep7
et,1,beam189
mp,ex,1,2.06e11
mp,prxy,1,0.3
mp,dens,1,7850
sectype,1,beam,i
secdata,0.130,0.130,0.32,0.015,0.015,0.0095
k,1,
k,2,6.581
k,3,7.831
k,4,11.331
k,5,11.331+1.250
k,6,19.162
k,100,0,100
l,1,2
l,2,3
l,3,4
l,4,5
l,5,6
dk,1,ux,,,,uy,uz,rotx,roty
dk,3,uy,,,,uz,rotx,roty
dk,4,uy,,,,uz,rotx,roty
dk,6,uy,,,,uz,rotx,roty
fk,1,fy,-125.311e3
fk,2,fy,-380.593e3
fk,5,fy,-379e3
fk,6,fy,-125.429e3
lesize,all,,,10
latt,1,,1,,100,,1
lmesh,all
eplot
sbctran
allsel
/solu
solve
allsel,all
fkdele,all,all,all
acel,,9.8,
solve
/post1
lcdef,1,1,1
lcdef,2,2,1
lcfact,1,1
lcfact,2,1.2
lcase,1
lcoper,add,2
prrsol
etable,myi,smisc,2
etable,myj,smisc,15
plls,myi,myj,-1
/title,wanjutu
/ui,copy,save,jpeg
etable,qi,smisc,5
etable,qj,smisc,18
plls,qi,qj,
/title,jianlitu
/ui,copy,save,jpeg



回复
分享到:

使用道具 举报

发表于 2011-11-3 20:18 | 显示全部楼层
我想知道,这种自己用参数写 是不是很难啊?我也想学参数语言。
 楼主| 发表于 2011-11-3 21:57 | 显示全部楼层
推荐 王新敏老师的书  按照书中的命令流自己做一遍你肯定会有收获的!~
您需要登录后才可以回帖 登录 | 我要加入

本版积分规则

QQ|小黑屋|Archiver|手机版|联系我们|声振论坛

GMT+8, 2024-11-2 21:30 , Processed in 0.064738 second(s), 17 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表