用ansys解结构力学问题.docVIP

例一：用ansys计算弯矩图。 以下是命令： /title, JingDing Structure 2005.08.08 /triad,rbot /prep7 mp,ex,1,3e10 mp,prxy,1,0.3 mp,dens,1,2500 et,1,beam3 r,1,0.5,0.5,0.5**3/12 k,1,0,0 k,2,-2,-4 k,3,-2,0 k,4,-2,2 k,5,-4,0 k,6,-4,0 ! 5，6两个关键点重合。 k,7,-10,0 l,1,3 ! 直线方向为逆时针，下同。 l,2,3 l,3,4 l,3,5 l,6,7 Lesize,all,0.5 !mesh lmesh,all cp,1,ux,18,22 !couple(连接，联结) cp,2,uy,18,22 /solu fk,4,fx,20 fk,1,mz,-10 *do,i,21,32 !施加均布荷载 sfbeam,i,,pres,-10 *enddo dk,1,uy,0 !施加约束 dk,2,ux,0 dk,2,uy,0 d,31,uy,0 solve /post1 etable,mi,smisc,6 etable,mj,smisc,12 例二：用ansys计算弯矩图。 /title, SanJiaoGangJia 2005.08.08 /triad,rbot /prep7 mp,ex,1,3e10 mp,prxy,1,0.3 mp,dens,1,2500 et,1,beam3 r,1,0.5,0.5,0.5**3/12 k,1,0,0 k,2,0,4 k,3,4,0 k,4,4,4 k,5,6,4 k,6,2,4 k,7,2,4 ! 6，7两个关键点重合。 l,2,1 ! 直线方向为逆时针，下同。 l,6,2 l,3,4 l,5,4 l,4,7 Lesize,all,0.5 !mesh lmesh,all cp,1,ux,10,27 !couple(连接，联结) cp,2,uy,10,27 /solu f,23,fy,-30 *do,i,9,12 !施加均布荷载 sfbeam,i,,pres,-10 *enddo *do,j,25,28 sfbeam,j,,pres,-10 *enddo d,2,ux,0 !施加约束 d,2,uy,0 d,14,uy,0 d,14,rotz,0 solve /post1 etable,mi,smisc,6 etable,mj,smisc,12 etable,qi,smisc,2 etable,qj,smisc,8 plls,mi,mj,-1