相关代码 |
|
!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
