这是变形图

这是弯矩图

命令流如下：

finish

/clear

/prep7

et,1,plane82

mp,ex,1,2.09e11

mp,prxy,1,0.269

k,1,-0.03

k,2,-0.03,0.035

k,3,-0.005,0.035

k,4,-0.03,0.06

k,5,-0.03,0.055

k,6,-0.04,0.055

k,7,-0.04,0.075

k,8

k,9,,0.075

l,1,2

l,2,3

l,4,5

l,5,6

l,6,7

l,7,9

l,1,8

larc,4,3,1,0.025

lsymn,x,all

lglue,6,14

lglue,7,15

lcomb,6,17

lcomb,7,14

al,all

lesize,all,,,10

mshape,0$mshkey,0

amesh,all

secwrite,jm2,sect,,1

finish

/clear

/prep7

et,1,beam188

mp,prxy,1,0.269

mp,ex,1,2.09e11

k,1

k,2,,,0.53

k,3,,,1.51

k,4,,,2.49

k,5,,,3.47

k,6,,,4

k,7,-0.33,,0.53

k,8,0.33,,0.53

k,9,-0.33,,1.51

k,10,0.33,,1.51

k,11,-0.33,,2.49

k,12,0.33,,2.49

k,13,-0.33,,3.47

k,14,0.33,,3.47

k,100,,0.5,0.5

k,101,0.5,,1000

*do,i,1,5

l,i,i+1

*enddo

l,13,5

l,5,14

l,11,4

l,4,12

l,9,3

l,3,10

l,7,2

l,2,8

sectype,1,beam,mesh 

secoffset,user

secread,jm2,sect,,mesh

secplot,1,1

slist,,,,,beam

sectype,2,beam,rect

secdata,0.06,0.09

secoffset,user,0.03

lsel,s,,,1,5,1

latt,1,,1,,100,,1

lsel,s,,,6,7,1

latt,1,,1,,101,,2

lsel,s,,,8,9,1

latt,1,,1,,101,,2

lsel,s,,,10,11,1

latt,1,,1,,101,,2

lsel,s,,,12,13,1

latt,1,,1,,101,,2

lsel,all

lesize,all,,,10

allsel

lmesh,all

nummrg,all

/eshape,1

eplot

dk,7,all

dk,8,all

dk,9,all

dk,10,all

dk,11,all

dk,12,all

dk,13,all

dk,14,all

f,67,fy,-145000

f,67,fx,-29000

f,27,fy,-145000

f,27,fx,-29000

allsel

/dscale,wn,30

/solu

solve

/post1

pldisp,1

ETABLE,I1,SMISC,2 

ETABLE,J1,SMISC,15

 PLLS,I1,J1,-1 

lsel,s,,,1,5,1 

esll,s,1