FINISH
/Clear
/FilName,EX3.13(2)
/TITLE,EX3.13(2),STANDARD SECTION OF QTZ25 TOWER CRANE with Link8.
/PREP7
N,1,650,0,-650 $ N,2,650,0,650 $ N,3,-650,0,650
N,4,-650,0,-650 $ N,5,650,100,-650 $ N,6,650,100,650
N,7,-650,100,650 $ N,8,-650,100,-650 $ N,9,650,1200,-650
N,10,650,1200,650 $ N,11,-650,1200,650 $ N,12,-650,1200,-650
N,13,650,2300,-650 $ N,14,650,2300,650
N,15,-650,2300,650 $ N,16,-650,2300,-650
N,17,650,2400,-650 $ N,18,650,2400,650
N,19,-650,2400,650 $ N,20,-650,2400,-650
ET,1,Link8
MP,EX,1,210E3
MP,PRXY,1,0.3
MP,DENS,1,7800e-12
Acel,0,9800,0
R,1,4536
R,2,766
Real,1
E,1,5 $ E,2,6 $ E,3,7
E,4,8 $ E,5,9 $ E,6,10
E,7,11 $ E,8,12 $ E,9,13
E,10,14 $ E,11,15 $ E,12,16
E,13,17 $ E,14,18 $ E,15,19
E,16,20
Real,1
E,1,5 $ E,2,6 $ E,3,7
E,4,8 $ E,5,9 $ E,6,10
E,7,11 $ E,8,12 $ E,9,13
E,10,14 $ E,11,15 $ E,12,16
E,13,17 $ E,14,18 $ E,15,19
E,16,20
Real,2
E,5,6 $ E,9,10 $ E,13,14
E,6,7 $ E,10,11 $ E,14,15
E,7,8 $ E,11,12 $ E,15,16
E,5,8 $ E,9,12 $ E,13,16
E,5,10 $ E,10,13 $ E,6,11
E,11,14 $ E,7,12 $ E,12,15
E,8,9 $ E,9,16 $ E,9,11
E,13,15 $ E,5,7
D,1,UX,0,,,,UY,UZ
D,2,UX,0,,,,UY
D,3,UY,0
D,4,UY,0,,,,UZ
F,17,FY,5E4
F,18,FY,5E4
F,19,FY,-15E4
F,20,FY,-15E4
FINISH
/SOLU
Solve
FINISH
/Post1
SET,1,1
pldisp,2
Etable,LS1,LS,1
Etable,LS6,LS,6
Etable,LS2,LS,2
Etable,LS3,LS,3
Etable,LS4,LS,4
Etable,LS5,LS,5
Etable,v,Volu
Etable,smax,NMISC,1
Etable,smin,NMISC,2
pretab,LS1,LS2,LS3,LS4,LS5,LS6,smax,smin
/Title,Axial stress distribution in the first load case
PLLS,LS1,LS6
FINSH
我吧程序直接写出来了,高手们帮忙看看了 |