e2.06b.txt

来自「王新敏的ANSYS工程结构数值分析命令流 王新敏的ANSYS工程结构数值分析命」· 文本 代码 · 共 44 行

!EX2.6B 热轧普通槽钢实体建模
FINISH
/CLEAR
/PREP7
H=360
B=96
D=9
T=16
R=T
R1=R/2
XD=1/10
L=300
T1=T-(B-D)/2*XD
T2=T+(B-D)/2*XD
K,1
K,2,D
K,3,D,H/2-T2
K,4,B,H/2-T1
K,5,B,H/2
K,6,0,H/2
*DO,I,1,5
L,I,I+1
*ENDDO
L,1,6
LFILLT,2,3,R
LFILLT,3,4,R1
AL,ALL
ARSYM,Y,ALL
AADD,ALL
LSEL,S,LOC,X,0
LCOMB,ALL
LSEL,S,LOC,X,D
LCOMB,ALL
ALLSEL
NUMCMP,ALL
VOFFST,1,L
!如为曲线则采用拖拉方式创建实体
LOCAL,12,1,L,,,,-90
*GET,KP0,KP,0,NUM,MAX
K,KP0+1,L,-180
K,KP0+2,L,0
L,KP0+1,KP0+2
*GET,L0,LINE,0,NUM,MAX
VDRAG,1,,,,,,L0