回复 1 # Abaiyueguang 的帖子
以下为命令流:
fini
/clear
/TITLE,guandao
/UNITS,MKS !MKS system (m, kg, s, °C).
/PREP7 !进入前处理器
MP,EX,1,1.139e10
MP,PRXY,1,0.35
MP,ALPX,1,2.5e-5 !热膨胀系数
MP,DENS,1,1179
PUNIT,2 !设置为米制单位 (meter A+centimeter B+fraction of cm C/D)
PSPEC,1,,,0.0285,0.0035, !管子外径28.5CM 壁厚:0.35CM
POPT,NC !管道分析标准: ASME Section III NC, Class 2.
PTEMP,20,20, !Temperature = 20°
BRANCH,0,0,0,0 !第一根管起点
/PNUM,NODE,1 !显示节点及编号
RUN,0+9+5/10 !meter A+centimeter B+fraction of cm C/D---点2
RUN,1+1+5/10 !点3
RUN,0+10 !转弯1
RUN,0,0,1+31+5/10 !点5
RUN,0,0,0+19 !转弯2
RUN,-1+76 !点7
RUN,-0+30 !转弯3
RUN,0,0+40 !转弯4
RUN,-0+22 !点10
RUN,-0+22 !转弯5
RUN,0,-0+64 !点12
/VIEW,1,1,1,1
BEND,3,4,0.025,2, ,1,
BEND,5,6,0.025,2, ,1,
BEND,8,7,0.025,2, ,1,
BEND,9,8,0.1,2, ,1,
BEND,10,11,0.1,2, ,1,
VALVE,10, ,0.695
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
ACEL,0,-9.8,0 !重力加速度
D,1,All
D,2,UY,0
D,2,UZ,0
D,2,ROTY,0
D,2,ROTZ,0 !对应K2
D,3,UY,0
D,3,UZ,0
D,3,ROTY,0
D,3,ROTZ,0 !对应K3
D,5,UX,0
D,5,UY,0
D,5,ROTX,0
D,5,ROTY,0 !对应K5
D,7,UY,0
D,7,UZ,0
D,7,ROTY,0
D,7,ROTZ,0 !对应K7
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
/SOLU
ANTYPE,MODAL
MODOPT,LANB,12
MXPAND,12,,,YES
SOLVE |