下面是命令流，请高手指教
local,11,0,420,877,10000,0,-90,0 ! 命令流合并 左边水管
length=8000
hgu=500 ! 环箍
zz=100 ! 支座
originx=0
originy=0
originz=0
/prep7
et,1,63
et,2,30 !选用
et,3,30,,1 !FLUID30单元，用于流固耦合问题
r,1,0
r,2,0
!keyopt,2,7,1
!keyopt,3,7,1

r,3,1
mp,ex,1,2e11
mp,nuxy,1,0.3
mp,dens,1,7.8e-3
mp,dens,2,1e-3 !定义Acoustics材料来描述流体材料-水
mp,sonc,2,1400e20
mp,dens,3,1e-3 !定义Acoustics材料来描述流体材料-水
mp,sonc,3,1400e20

mp,mu,0,


!
k,1
k,2,0,length
l,1,2



LPLOT

WPSTYLE,,,,,,,,1
KWPAVE, 2



CSYS,4

CYL4, , ,0,0,16,90
CYL4, , ,0,-90,16,0
CYL4, , ,0,90,16,180
CYL4, , ,0,-180,16,-90

CYL4, , ,16,0,20,90
CYL4, , ,16,-90,20,0
CYL4, , ,16,90,20,180
CYL4, , ,16,-180,20,-90


VDRAG,1,2,3,4,5,6,1
VDRAG,7,8,,, , ,1
vplot
allsel,all
vglue,all

esize,20
mshkey,1
vsel,all

allsel,all
vsel,s,,,15
vsel,a,,,14
vsel,a,,,12
vsel,a,,,13
type,2
mat,2
real,1
vmesh,all
alls

allsel,all
vsel,s,,,10
vsel,a,,,11
vsel,a,,,1
vsel,a,,,9

type,3
mat,3
real,2
vmesh,all
alls

aplot
numcmp,all
asel,all
asel,s,,,6
asel,a,,,23
asel,a,,,27
ASEL,a,,,30

!ALLSEL,BELOW,AREA
aplot
type,1 !with mesh only elements
mat,1
real,3
amesh,all
cm,fsi,elem !Create component named fsi
allsel
!numcmp,all
!cdwrite,db,fluid,cdb !Create fluid.cdb file for CFXpre
asel,all
!ADELE,ALL
allSEL,ALL
vgen,7,1,8,1,,,-8000

ESEL,S,MAT,,1 !压缩重合截面
Nummrg,kp
Nummrg,node
Nummrg,elem
ESEL,S,MAT,,2
Nummrg,kp
Nummrg,node
Nummrg,elem
allSEL,ALL
cdwrite,,name3