我用的9.0的，大家帮我看看命令的正确与否，尤其是最后画的弯矩图对吗？谢谢。
fini
/clear
/filname,kuanjiashicheng
/prep7
a=1000


et,1,23

r,1,0.49,0.020008,0.7
r,2,0.36,0.0108,0.6
r,3,0.3025,0.007626,0.55
r,4,0.175,0.003646,0.5
r,5,0.14,0.001867,0.4
r,6,0.15,0.003125,0.5
r,7,0.12,0.0016,0.4

mp,ex,1,40330e6
mp,nuxy,1,0.31
mp,dens,1,2.414e3
mp,dmpr,1,0.68
tb,MELAS,1,,10
tbpt,,0,0
tbpt,,0.000147,5e6
tbpt,,0.000298,10e6
tbpt,,0.000434,15e6
tbpt,,0.000558,20e6
tbpt,,0.000747,25e6
tbpt,,0.00099,30e6
tbpt,,0.0014,35.5e6
tbpt,,0.00185,38e6
tbpt,,0.00215,35e6

mp,ex,2,22730e6
mp,nuxy,2,0.21
mp,dens,2,2.173e3
mp,dmpr,2,2.42
tb,MELAS,2,,12
tbpt,,0,0
tbpt,,0.00022,5e6
tbpt,,0.00044,10e6
tbpt,,0.00075,15e6
tbpt,,0.00099,19.3e6
tbpt,,0.00142,25e6
tbpt,,0.00183,28e6
tbpt,,0.00225,29.5e6
tbpt,,0.0028,30e6
tbpt,,0.0033,23.5e6
tbpt,,0.0038,17e6
tbpt,,0.00443,12e6

k,1,0,0
k,2,0,5.1
kgen,7,2,,,,3.3,,1
*do,i,1,7,1
l,i,i+1
*enddo
lgen,2,1,7,,5.4
lgen,2,8,14,,2.4
lgen,2,15,21,,5.4
kgen,2,24,32,8,,3,,9
l,24,33
l,32,41
*do,i,2,8,1
l,i,i+8
*enddo
*do,i,10,16,1
l,i,i+8
*enddo
*do,i,18,24,1
l,i,i+8
*enddo
l,33,41


lsel,s,line,,1,22,7
lesize,all,,,10
latt,1,1,1
lmesh,all

lsel,s,line,,2,4,1
lsel,a,line,,9,11,1
lsel,a,line,,16,18,1
lsel,a,line,,23,25,1
lesize,all,,,10
latt,1,2,1
lmesh,all

lsel,s,line,,5,7,1
lsel,a,line,,12,14,1
lsel,a,line,,19,21,1
lsel,a,line,,26,30,1
lesize,all,,,10
latt,1,3,1
lmesh,all

lsel,s,line,,31,45,14
lesize,all,,,10
latt,2,4,1
lmesh,all

lsel,s,line,,38
lesize,all,,,10
latt,2,5,1
lmesh,all

lsel,s,line,,32,37,1
lsel,a,line,,46,52,1
lesize,all,,,10
latt,2,6,1
lmesh,all

lsel,s,line,,39,44,1
lesize,all,,,10
latt,2,7,1
lmesh,all

nsel,s,node,,1,34,11
d,all,all


*dim,ftem,ARRAY,a,1,1,,,
*creat,ff
*vread,ftem,’rengong’,’txt’,’E:\’,1,,,,,0,
(f15.13)
*end
/input,ff
fini
/config,nres,5000

/SOL
ANTYPE,4
allsel
TRNOPT,FULL
TIMINT,OFF
TIME,1e-8
NSUBST,2
KBC,1
ACEL,0,-9.8
solve

/solu
antype,trans
trnopt,full
OUTRES,ALL,ALL
timint,on
kbc,0
nlgeom,on
*do,i,1,a,1
time,i*0.01
allsel
acel,ftem(i)*0.01
solve
*enddo

/POST1
allsel
SET,,,1,,5.47
ETABLE,MI,SMISC,6
ETABLE,MJ,SMISC,12
PLLS,MI,MJ