AS0=380.1 $AS1=50.3 $A=30 $B=150! H=300 $L=2650 $L0=125! ET,1,SOLID65! KEYOPT,1,1,0! KEYOPT,1,5,1! KEYOPT,1,6,3! KEYOPT,1,7,1! ET,2,LINK180! ET,3,SOLID185,,3
R,1,AS0 $R,2,AS1 $R,3
MP,EX, 1,2.4E4 $MP,PRXY,1,0.2 $FC=25! TB,CONCR,1,1,9!
TBDATA,,0.35,0.75,3.1125,-1! TB,MISO,1,,15!
TBPT,,0.0002,4.8 $TBPT,,0.0004,9.375 $TBPT,,0.0006,13.51! TBPT,,0.0008,17.02 $TBPT,,0.001,19.83, $TBPT,,0.0012,21.95! TBPT,,0.0014,23.43 $TBPT,,0.0016,24.365 $TBPT,,0.0018,24.856! TBPT,,0.002,FC $TBPT,,0.0038,FC ! TBPLOT!
MP,EX,2,2E5 $MP,PRXY,2,0.25! TB,BKIN,2 $TBDATA,,360! MP,EX,3,2E5 $MP,PRXY,3,0.25! TB,BKIN,3 $TBDATA,,210! N,1,,B $N,9 $FILL,1,9! NGEN,11,9,1,9,1,,,A! NGEN,2,1000,1,99,1,75!
NGEN,3,1000,1001,1099,1,50! NGEN,7,1000,3001,3099,1,75! NGEN,4,1000,9001,9099,1,200/3! NGEN,7,1000,12001,12099,1,75! NGEN,2,1000,18001,18099,1,50! /VIEW,1,-1,-1,1!
TYPE,2 $REAL,2 $MAT,3!
*DO,II,11,16,1 $E,II,II+1 $*ENDDO! *DO,II,83,88,1 $E,II,II+1 $*ENDDO! *DO,II,11,74,9 $E,II,II+9 $*ENDDO! *DO,II,17,80,9 $E,II,II+9 $*ENDDO! EGEN,20,1000,1,28,1!
*DO,II,83,18083,1000 $E,II,II+1000 $*ENDDO! *DO,II,89,18089,1000 $E,II,II+1000 $*ENDDO! TYPE,2 $REAL,1 $MAT,2
*DO,II,11,18011,1000 $E,II,II+1000 $*ENDDO!
*DO,II,17,18017,1000 $E,II,II+1000 $*ENDDO! /ESHAPE,1 $EP!
BLC4,,,L/2,B,H $BLC4,75,,100,B,-40 $WPOFFS,,,H $BLC4,625,,200,B,40 $WPCSYS,-1! WPOFFS,75 $WPROTA,,,90 $VSBW,ALL!
WPOFFS,,,100 $VSBW,ALL $WPOFFS,,,450 $VSBW,ALL! WPOFFS,,,200 $VSBW,ALL $WPOFFS,,,450 $VSBW,ALL! WPCSYS,-1 $ALLSEL!
LSEL,S,LOC,Y,0 $LSEL,A,LOC,Y,150 $LSEL,R,LOC,X,0 $LESIZE,ALL,,,10! LSEL,S,LOC,Z,0 $LSEL,A,LOC,Z,300 $LSEL,R,LOC,X,0 $LESIZE,ALL,,,8! LSEL,S,LOC,Z,300 $LSEL,R,LOC,Y,0 $LSEL,R,LOC,X,0,75 $LESIZE,ALL,75! LSEL,S,LOC,Z,300 $LSEL,R,LOC,Y,0 $LSEL,R,LOC,X,75,175 $LESIZE,ALL,25! LSEL,S,LOC,Z,300 $LSEL,R,LOC,Y,0 $LSEL,R,LOC,X,175,625 $LESIZE,ALL,75/2! LSEL,S,LOC,Z,300 $LSEL,R,LOC,Y,0 $LSEL,R,LOC,X,625,825 $LESIZE,ALL,100/3! LSEL,S,LOC,Z,300 $LSEL,R,LOC,Y,0 $LSEL,R,LOC,X,825,1275 $LESIZE,ALL,75/2! LSEL,S,LOC,Z,300 $LSEL,R,LOC,Y,0 $LSEL,R,LOC,X,1275,1325 $LESIZE,ALL,50! LSEL,S,LOC,Z,340 $LSEL,R,LOC,X,625 $LESIZE,ALL,,,8!
LSEL,S,LOC,Y,0 $LSEL,R,LOC,X,625 $LSEL,R,LOC,Z,300,340 $LESIZE,ALL,,,1! LSEL,S,LOC,Z,-40 $LSEL,R,LOC,X,75 $LESIZE,ALL,,,8! LSEL,S,LOC,Y,0 $LSEL,R,LOC,Z,-40 $LESIZE,ALL,,,4!
LSEL,S,LOC,Y,0 $LSEL,R,LOC,X,75 $LSEL,R,LOC,Z,0,-40 $LESIZE,ALL,,,1! VSEL,S,LOC,Z,0,H $VATT,1,3,1 MSHAPE,0,3D $MSHKEY,1 VMESH,ALL $ALLSEL
VSEL,S,LOC,Z,-40,0 $VSEL,A,LOC,Z,H,H+40 $VATT,2,3,3 MSHAPE,0,3D $MSHKEY,1 $VMESH,ALL /VIEW,1,-0.2,-1,1 $EPLOT $ALLSEL NUMMRG,ALL $NUMCMP,ALL $EPLOT /SOLU!
NSEL,S,LOC,Z,-40 $NSEL,R,LOC,X,L0 $D,ALL,UY,,,,,UZ $ALLSEL! ASEL,S,LOC,X,L/2 $DA,ALL,SYMM $ALLSEL! NSEL,S,LOC,Z,H+40 $NSEL,R,LOC,X,725!
*GET,NODE1,NODE,,COUNT $F,ALL,FZ,-110000/NODE1 $ALLSEL!
ANTYPE,STATIC $NLGEOM,ON $NSUBST,80 $OUTRES,ALL,ALL $AUTOTS,1 $LNSRCH,1! CNVTOL,F,,0.05,2,0.5 $ALLSEL! SOLVE $FINISH
/POST1 $SET,LAST $PRRSOL,FZ! SET,LAST $PLDISP,1!
ESEL,S,TYPE,,2 $ETABLE,SAXL,LS,1 $PLLS,SAXL,SAXL! ESEL,S,TYPE,,1 $/DEVICE,VECTOR,ON $PLCRACK!
/POST26 $NSOL,2,NODE(L/2,B/2,0),U,Z! PROD,3,2,,,,,,-1 $PROD,4,1,,,LOAD,,,110! /AXLAB,X,MID-UZ(MM) $/AXLAB,Y,P(KN)!
XVAR,3 $PLVAR,4
因篇幅问题不能全部显示，请点此查看更多更全内容