资源描述：
《ansys基坑弹性地基梁全程序即详解》由会员上传分享，免费在线阅读，更多相关内容在应用文档-天天文库。
1、/prep7L1=30!设置变量L2=30h=-25K,1,0,0,0,K,2,L1,0,0,K,3,L1,L2,0,K,4,0,L2,0,KWPAVE,1!将工作平面原点定义在1号点RECTNG,0,L1,0,L2,wpro,,-90,!将工作平面绕X轴Z到Y方向90度RECTNG,0,L1,0,-h,KWPAVE,4!将工作平面原点定义在4号点RECTNG,0,L1,0,-h,wpro,,,90!将工作平面绕y轴x到z方向90度RECTNG,0,L2,0,-h,KWPAVE,3!将工作平面原点定义在3号点RECTNG,0,L2,0,-h,AGLUE,all!粘
2、结所有面ET,1,SHELL43!ET，ITYPE，Ename，KOPT1，~，KOPT6，INOPR（定义单元）!KOPT1～KOPT6为元素特性编码!shell434节点塑性大应变单元ET,2,COMBIN14!COMBIN14弹簧-阻尼器Spring-DamperMPTEMP,,,,,,,,!删除系统中已存在的温度表MPTEMP,1,0!定义一个温度表MPDATA,EX,1,,2.4E10!指定与温度相应的材料性能数据弹性模量MPDATA,PRXY,1,,0.15!主泊松比ESIZE,1,0!指定单元边长AMESH,ALL!划分面生成面单元NSEL,S,LO
3、C,Z,0!选择一组节点子集创建新集ESLN,S!选择已选节点上的单元NSEL,S,LOC,Z,-1!选择z坐标值为-1的---ESLN,U!从已选集中删除此时剩下只支撑板CM,STRUT,ELEM!将选择集命名STRUT生成元件alls!allsel全选CMSEL,U,STRUT!去除STRUT元件CM,WALL,ELEM!将选择集命名wall生成元件NSEL,S,LOC,X,0.1,L1-0.1!选择一组节点子集创建新集NPLOT!显示节点NSEL,R,LOC,Y,0!从当前集选择一组节点子集ESLN,S!从已选集中选择NSEL,S,LOC,Y,1!从当前集选
4、择一组节点子集ESLN,U!从已选集中删除ENSYM,,,,ALL!反转壳单元法线方向NSEL,S,LOC,Y,0.1,L2-0.1!选择一组节点子集创建新集NPLOT!显示节点NSEL,R,LOC,X,0!从当前集选择一组节点子集ESLN,S!从已选集中选择NSEL,S,LOC,X,1!从当前集选择一组节点子集ESLN,U!从已选集中删除ENSYM,,,,ALL!反转壳单元法线方向ALLSNUMCMP,ALL!所有实体进行重新编号!直接生成节点*DO,i,1,L1-1!从1到29进行循环CSYS,0!激活默认笛卡尔坐标系N,100000+2*i-1,i,0,-1
5、!节点编号后面为坐标N,100000+2*i,i,2.5,-1!节点编号后面为坐标*enddo*DO,i,1,L1-1!从1到29进行循环!Modeling>Creat>Elements>ElemAttributesTYPE,2!设置单元类型属性指示器MAT,1!MP命令中的MAT即材料性能REAL,0!材料实常数ESYS,0!材料坐标系统属性指示器EN,100000+i,100000+2*i-1,100000+2*i!根据给定的单元号和节点号生成单元*enddoNUMCMP,ALL!所有实体进行重新编号*DO,i,1,L1-1CSYS,0!激活默认笛卡尔坐标系N
6、,100000+2*i-1,i,L2,-1N,100000+2*i,i,L2-2.5,-1*enddo*DO,i,1,L1-1TYPE,2MAT,1REAL,0ESYS,0EN,100000+i,100000+2*i-1,100000+2*i*enddoNUMCMP,ALL!所有实体进行重新编号*DO,i,1,L2-1CSYS,0N,100000+2*i-1,0,i,-1N,100000+2*i,2.5,i,-1*enddo*DO,i,1,L2-1TYPE,2MAT,1REAL,0ESYS,0EN,100000+i,100000+2*i-1,100000+2*i*
7、enddoNUMCMP,ALL!所有实体进行重新编号*DO,i,1,L2-1CSYS,0N,100000+2*i-1,L1,i,-1N,100000+2*i,L1-2.5,i,-1*enddo*DO,i,1,L2-1TYPE,2$MAT,1$REAL,0ESYS,0EN,100000+i,100000+2*i-1,100000+2*i*enddoNUMCMP,ALL!所有实体进行重新编号ESEL,S,TYPE,,2!选择单元类型号为2的单元EGEN,25,100000,ALL,,,,,,,,,,-1,ESEL,S,TYPE,,2!选择单元类型号为2的单元CM,SP
8、RING,
