GUI:
General Postproc-plot Result-Contour Plot-Line Element Result
弹出画单元结果的对话框,分别在Labi和Labj依次选取SMIS6和SMIS12(弯矩图)、SMIS1和SMIS7(轴力图)、SMIS2和SMIS8(剪力图)
! 建立单元表
ETABLE,NI,SMISC,1 !单元I点轴力
ETABLE,NJ,SMISC,7 !单元J点轴力
ETABLE,QI,SMISC,2 !单元I点剪力
ETABLE,QJ,SMISC,8 !单元J点剪力
ETABLE,MI,SMISC,6 !单元I点弯矩
ETABLE,MJ,SMISC,12 !单元J点弯矩
! 更新单元表
ETABLE,REFL
! 画轴力分布图
/TITLE,Axial force diagram
PLLS,NI,NJ,1.0,0
/image,save,'Axial_force_%T%',jpg
! 画剪力分布图
/TITLE,Shearing force diagram
PLLS,QI,QJ,1.0,0
/image,save,'Shearing_force_%T%',jpg
! 画弯矩分布图
/TITLE,Bending moment diagram
PLLS,MI,MJ,-0.8,0
/image,save,'Bending_moment_%T%',jpg
另:自定义截面梁剪力弯矩显示
finish
/clear
/verify
/replot
!自定义截面
/prep7
et,1,plane82
rectng,0,1.0,0,0.6,
cyl4,0.28,0.25,0.18,-180,
cyl4,0.28,0.35,0.18,180,
cyl4,0.72,0.25,0.18,-180,
cyl4,0.72,0.35,0.18,180,
rectng,0.1,0.46,0.25,0.35,
rectng,0.54,0.9,0.25,0.35,
asel,u,,,1
cm,area0,area
allsel,all
asba,1,area0
esize,0.1
amesh,all
!读入截面文件
secwrite,jiemian,sect,,1
aclear,all
adele,all,,1
ldele,all,,,1
finish
/clear
/prep7
et,1,beam44
keyopt,1,6,1
mp,dens,1,2600
mp,ex,1,3.06e10
mp,prxy,1,0.2
sectype,1,beam,mesh,sect1
secoffset,cent,,,
secread,'jiemian','sect','',mesh
k,1
k,2,10
k,3,0,3
lstr,1,2
latt,1,,1,,3,,1
lesize,all,0.5
lmesh,all
/eshape,1
eplot
dk,1,ux,0,,,uy,uz
dk,2,uy,0,,,uz
f,12,fy,-1
/solu
antype,static
solve
finish
/post1
pldisp,2
plnsol,u,y,2
!显示剪力
etable,sheari,smisc,3
etable,shearj,smisc,9
plls,sheari,shearj,-1
!显示弯矩
etable,mforcei,smisc,5
etable,mforcej,smisc,11
plls,mforcei,mforcej,-1