ex2-2-4.txt

来自「《ANSYS工程分析进阶实例》-王呼佳-源代码 看文件吧.不多说了.」· 文本 代码 · 共 53 行

!综合实例2-2-4
FINI
/CLE

/FILNAME,EX2-2-4
/TITLE,EX2-2-4
/PREP7  
*DO,I,0,1                    			! 控制Z方向的节点生成
  *DO,J,0,2                  			! 控制Y方向的节点生成
    *DO,K,0,4               			! 控制X方向的节点生成
      N,100*I+10*J+K+1,K,0.5*J,-2*I  	!注意节点编号，和节点坐标的表示
    *ENDDO
  *ENDDO
*ENDDO
!定义单元属性：
ET,1,BEAM3                  	! 定义beam3单元为1号单元
MP,EX,1,2.0E11               	! 定义材料参考号1，杨式模量 E=2.0e11
R,1,1e-4,2.083e-10,0.005       ! 定义梁的实常数，参考号为1
/PNUM,ELEM，1                ! 打开单元编号显示开关
!生成纵向单元
*DO,I,0,1                       ! 控制Z方向的单元生成
  *DO,J,0,2                     ! 控制Y方向的单元生成
    *DO,K,1,4                  	! 控制X方向的单元生成
      E,100*I+10*J+K,100*I+10*J+K+1
    *ENDDO
  *ENDDO
*ENDDO

!生成竖向单元
*DO,I,0,1                       	! Z
  *DO,J,0,1           			! Y
    *DO,K,1,5         			! X
      E,100*I+10*J+K,100*I+10*J+K+10
    *ENDDO
  *ENDDO
*ENDDO

!生成斜向单元
*DO,I,0,1             			! Z
  *DO,J,0,1           			! Y
    *DO,K,2,5         			! X
      E,100*I+10*J+K,100*I+10*J+K+9
    *ENDDO
  *ENDDO
*ENDDO

!生成横向单元
*DO,J,0,2           				! Y
  *DO,K,1,5         			! X
    E,10*J+K,10*J+K+100
  *ENDDO
*ENDDO