FINISH

/CLEAR

/CONFIG,NRES,2000

/PREP7

!================

!定義單元與材料性質

ET,1,SOLID65,,,,,,,1

ET,2,LINK8

MP,EX,1,13585

MP,PRXY,1,0.2

FC=14.3

FT=1.43

TB,CONCR,1

TBDATA,,0.5,0.95,FT,-1

TB,MISO,1,,11

TBPT,,0.0002,FC*0.19

TBPT,,0.0004,FC*0.36

TBPT,,0.0006,FC*0.51

TBPT,,0.0008,FC*0.64

TBPT,,0.0010,FC*0.75

TBPT,,0.0012,FC*0.84

TBPT,,0.0014,FC*0.91

TBPT,,0.0016,FC*0.96

TBPT,,0.0018,FC*0.99

TBPT,,0.0020,FC

TBPT,,0.0033,FC*0.85

MP,EX,2,2.0E5

MP,PRXY,2,0.3

TB,BISO,2

TBDATA,,300,0

PI=ACOS(-1)

R,1,0.25*PI*22*22

R,2,0.25*PI*22*22/2

R,2,0.25*PI*10*10

R,4,0.25*PI*10*10/2

!創建幾何模型

BLC4,,,150/2,300,2000/2

*DO,I,1,9

WPOFF,,,100

VSBW,ALL

*ENDDO

WPCSYS,-1

WPOFF,,,50

VSBW,ALL

WPCSYS,-1

WPROTA,,-90

WPOFF,,,30

VSBW,ALL

WPOFF,,,240

VSBW,ALL

WPCSYS,-1

WPOFF,30

WPROTA,,,90

VSBW,ALL

WPCSYS,-1

!劃分鋼筋網格

ELEMSIZ=50

LSEL,S,LOC,X,30

LSEL,R,LOC,Y,30

CM,ZJ,LINE

LATT,2,1,2

LESIZE,ALL,ELEMSIZ

LSEL,S,LOC,X,75

LSEL,R,LOC,Y,30

CM,ZJB,LINE

LATT,2,2,2

LESIZE,ALL,ELEMSIZ

LSEL,S,LOC,X,30

LSEL,R,LOC,Y,270

CM,JLJ,LINE

LATT,2,3,2

LESIZE,ALL,ELEMSIZ

LSEL,S,TAN1,Z

LSEL,R,LOC,Y,30,270

LSEL,R,LOC,X,30,70

LSEL,U,LOC,Z,50

CM,GJ,LINE

LATT,2,3,2

LESIZE,ALL,ELEMSIZ

LSEL,S,LOC,Z,0

LSEL,R,LOC,Y,30,270

LSEL,R,LOC,X,30,70

CM,GJB,LINE

LATT,2,4,2

LESIZE,ALL,ELEMSIZ

LSEL,ALL

CMSEL,S,ZJ

CMSEL,A,ZJB

CMSEL,A,JLJ

CMSEL,A,GJ

CMSEL,A,GJB

CM,GJ,LINE

LMESH,ALL

LSEL,ALL

/ESHAPE,1

EPLOT

!劃分混凝土網格

VATT,1,,1

MSHKEY,1

ESIZE,ELEMSIZ

VMESH,ALL

ALLSEL,ALL

!施加荷載和約束

LSEL,S,LOC,Y,0

LSEL,R,LOC,Z,900

DL,ALL,UY

ASEL,S,LOC,Z,0

DA,ALL,SYMM

ASEL,S,LOC,X,75

DA,ALL,SYMM

P0=180000

Q0=P0/150/100

ASEL,S,LOC,Z,0,50

ASEL,R,LOC,Y,300

SFA,ALL,1,PRES,Q0

ALLSEL,ALL

!進入post1查看結果

/POST1

SET,LAST

PLDISP,1

ESEL,S,TYPE,,2

ETABLE,SAXL,LS,1

PLLS,SAXL,ASXL

ESEL,S,TYPE,1

/DEVICE,VECTOR,ON

PLCRACK

/POST26

NSOL,2,205,U,Y

PROD,3,2,,,,,,-1

PROD,4,1,,,,,,P0/1000

XVAR,3

PLVAR,4

出現錯誤怎么修改，ansys小白，求指導