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