救命~求助 急 流固耦合+多荷载步问题
浏览：134064
小弟是个ANSYS新手 有个很急的问题 下面是根据ANSYS里面的2D问题改的 希望活塞推动流体以后 流体能再推动第二个活塞 下面是我的命令流 总是报错 请各位高手指点 希望高人能帮忙改改命令流 万分感谢
/BATCH
*SET,MAXDISP , 0.85
*DEL,_FNCNAME
*DEL,_FNCMTID
*DEL,_FNC_C1
*DEL,_FNC_C2
*SET,_FNCNAME,'uxdsp'
*DIM,_FNC_C1,,1
*DIM,_FNC_C2,,1
*SET,_FNC_C1(1),MAXDISP
*SET,_FNC_C2(1),2.5
! /INPUT,time.func
*DIM,%_FNCNAME%,TABLE,6,4,1
*SET,%_FNCNAME%(0,0,1), 0.0, -999
*SET,%_FNCNAME%(2,0,1), 0.0
*SET,%_FNCNAME%(3,0,1), %_FNC_C1(1)%
*SET,%_FNCNAME%(4,0,1), %_FNC_C2(1)%
*SET,%_FNCNAME%(5,0,1), 0.0
*SET,%_FNCNAME%(6,0,1), 0.0
*SET,%_FNCNAME%(0,1,1), 1.0, -1, 0, 1, 18, 3, 1
*SET,%_FNCNAME%(0,2,1), 0.0, -1, 9, 1, -1, 0, 0
*SET,%_FNCNAME%(0,3,1), 0, -2, 0, 1, 17, 3, -1
*SET,%_FNCNAME%(0,4,1), 0.0, 99, 0, 1, -2, 0, 0
/PREP7
ET,1,141
KEYOPT,1,4,1
ET,2,42
RECT,0.1,1.0,,0.25
TYPE,1
LESIZE,4,,,4
LESIZE,2,,,4
LESIZE,1,,,8
LESIZE,3,,,8
ALLSEL
AMESH,ALL
ALLSEL,BELOW,AREA
NSEL,R,LOC,X,0.1
SF,ALL,FSIN,1
ALLSEL,BELOW,AREA
NSEL,R,LOC,X,1
D, ALL, UY,0
/REPLOT,RESIZE
ALLSEL, BELOW, AREA
NSEL,R,LOC,Y,0
D, ALL, UY,0
D, ALL, VY,0
ALLSEL, BELOW, AREA
NSEL,R,LOC,Y,0.25
D,ALL,UY,0
D,ALL,VY,0
ALLSEL
RECT,,0.1,,0.25
LESIZE,5,,,2
LESIZE,7,,,2
LESIZE,8,,,4
LESIZE,6,,,4
TYPE,2
MAT,1
ALLSEL
ASEL,S,,,2
ALLSEL,BELOW,AREA
AMESH,ALL
ALLSEL,BELOW,AREA
NSEL,R,LOC,X,0.1
SF,ALL,FSIN,1
ALLSEL,BELOW,AREA
NSEL,R,EXT
D,ALL,UX,%uxdsp%
D,ALL,UY,0
ALLSEL
RECT,1,1.1,,0.25
LESIZE,9,,,2
LESIZE,11,,,2
LESIZE,10,,,4
LESIZE,12,,,4
TYPE,2
MAT,1
ASEL,S,,,3
ALLSEL,BELOW,AREA
AMESH,ALL
ALLSEL
MP,EX,1,2.0E11
MP,DENS,1,7800
MP,PRXY,1,0.3
FLDATA1,SOLU,FLOW,1
FLDATA1,SOLU,TEMP,0
FLDATA1,SOLU,TRAN,1
FLDATA1,SOLU,ALE,1
FLDATA2,TIME,GLOB,10,
FLDATA7,PROT,DENS,AIR-SI
FLDATA7,PROT,VISC,AIR-SI
FINISH
/SOLU
FSAN,ON
FSCO,ALL,1.0e-2
FSRE,ALL,1.0
FSOU,1
DELTIM,0.0125
FLDA, TIME, STEP, 0.0125
FSIT, 10
FSTI, 1.0
FSDT,0.0125
FSOR,SOLID
FSTR,SOLID,
FSTR,FLUID,
save
LSwrite,1
LSCLEAR,ALL
ASEL,S,,,3
ALLSEL,BELOW,AREA
NSEL,R,LOC,X,1
SF,ALL,FSIN,1
ALLSEL,BELOW,AREA
NSEL,R,EXT
D,ALL,UY,0
ALLSEL
ASEL,S,,,1
ALLSEL,BELOW,AREA
NSEL,R,LOC,X,1
SF,ALL,FSIN,1
ALLSEL
LSwrite,2
LSCLEAR,ALL
Lsread,1
Lssolve,1,2,1
/finish
/BATCH
*SET,MAXDISP , 0.85
*DEL,_FNCNAME
*DEL,_FNCMTID
*DEL,_FNC_C1
*DEL,_FNC_C2
*SET,_FNCNAME,'uxdsp'
*DIM,_FNC_C1,,1
*DIM,_FNC_C2,,1
*SET,_FNC_C1(1),MAXDISP
*SET,_FNC_C2(1),2.5
! /INPUT,time.func
*DIM,%_FNCNAME%,TABLE,6,4,1
*SET,%_FNCNAME%(0,0,1), 0.0, -999
*SET,%_FNCNAME%(2,0,1), 0.0
*SET,%_FNCNAME%(3,0,1), %_FNC_C1(1)%
*SET,%_FNCNAME%(4,0,1), %_FNC_C2(1)%
*SET,%_FNCNAME%(5,0,1), 0.0
*SET,%_FNCNAME%(6,0,1), 0.0
*SET,%_FNCNAME%(0,1,1), 1.0, -1, 0, 1, 18, 3, 1
*SET,%_FNCNAME%(0,2,1), 0.0, -1, 9, 1, -1, 0, 0
*SET,%_FNCNAME%(0,3,1), 0, -2, 0, 1, 17, 3, -1
*SET,%_FNCNAME%(0,4,1), 0.0, 99, 0, 1, -2, 0, 0
/PREP7
ET,1,141
KEYOPT,1,4,1
ET,2,42
RECT,0.1,1.0,,0.25
TYPE,1
LESIZE,4,,,4
LESIZE,2,,,4
LESIZE,1,,,8
LESIZE,3,,,8
ALLSEL
AMESH,ALL
ALLSEL,BELOW,AREA
NSEL,R,LOC,X,0.1
SF,ALL,FSIN,1
ALLSEL,BELOW,AREA
NSEL,R,LOC,X,1
D, ALL, UY,0
/REPLOT,RESIZE
ALLSEL, BELOW, AREA
NSEL,R,LOC,Y,0
D, ALL, UY,0
D, ALL, VY,0
ALLSEL, BELOW, AREA
NSEL,R,LOC,Y,0.25
D,ALL,UY,0
D,ALL,VY,0
ALLSEL
RECT,,0.1,,0.25
LESIZE,5,,,2
LESIZE,7,,,2
LESIZE,8,,,4
LESIZE,6,,,4
TYPE,2
MAT,1
ALLSEL
ASEL,S,,,2
ALLSEL,BELOW,AREA
AMESH,ALL
ALLSEL,BELOW,AREA
NSEL,R,LOC,X,0.1
SF,ALL,FSIN,1
ALLSEL,BELOW,AREA
NSEL,R,EXT
D,ALL,UX,%uxdsp%
D,ALL,UY,0
ALLSEL
RECT,1,1.1,,0.25
LESIZE,9,,,2
LESIZE,11,,,2
LESIZE,10,,,4
LESIZE,12,,,4
TYPE,2
MAT,1
ASEL,S,,,3
ALLSEL,BELOW,AREA
AMESH,ALL
ALLSEL
MP,EX,1,2.0E11
MP,DENS,1,7800
MP,PRXY,1,0.3
FLDATA1,SOLU,FLOW,1
FLDATA1,SOLU,TEMP,0
FLDATA1,SOLU,TRAN,1
FLDATA1,SOLU,ALE,1
FLDATA2,TIME,GLOB,10,
FLDATA7,PROT,DENS,AIR-SI
FLDATA7,PROT,VISC,AIR-SI
FINISH
/SOLU
FSAN,ON
FSCO,ALL,1.0e-2
FSRE,ALL,1.0
FSOU,1
DELTIM,0.0125
FLDA, TIME, STEP, 0.0125
FSIT, 10
FSTI, 1.0
FSDT,0.0125
FSOR,SOLID
FSTR,SOLID,
FSTR,FLUID,
save
LSwrite,1
LSCLEAR,ALL
ASEL,S,,,3
ALLSEL,BELOW,AREA
NSEL,R,LOC,X,1
SF,ALL,FSIN,1
ALLSEL,BELOW,AREA
NSEL,R,EXT
D,ALL,UY,0
ALLSEL
ASEL,S,,,1
ALLSEL,BELOW,AREA
NSEL,R,LOC,X,1
SF,ALL,FSIN,1
ALLSEL
LSwrite,2
LSCLEAR,ALL
Lsread,1
Lssolve,1,2,1
/finish
