ansys螺旋线画法的几个例子

ansys螺旋线画法的几个例子

ID:44908369

大小:310.55 KB

页数:10页

时间:2019-11-04

ansys螺旋线画法的几个例子_第1页
ansys螺旋线画法的几个例子_第2页
ansys螺旋线画法的几个例子_第3页
ansys螺旋线画法的几个例子_第4页
ansys螺旋线画法的几个例子_第5页
资源描述:

《ansys螺旋线画法的几个例子》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库

1、1.EXAMPLE_1CSYS,1*AFUN,DEG/prep7ET,1,45*do,i,0,36,1x=10y=10*iz=i/2k,i+1,x,y,z*enddo*do,j,1,36,1L,j,j+1*enddo*do,i,0,35,1LWPL,-1,i+1,0CYL4,0,0,1*enddo*do,i,1,36,1VDRAG,i,,,,,,i,,,,,*enddovglue,allTYPE,1vmesh,all过程图:1.EXAMPLE_2/PREP7wpoff,-10CYL4,,,1ET,1,MES

2、H200ET,2,SOLID45KEYOPT,1,1,6KEYOPT,1,2,0LESIZE,ALL,,,10,,,,,1MSHAPE,0,2DMSHKEY,1AMESH,ALLCSYS,0WPAVE,0,0,0CSYS,0!*CSYS,1KBETW,3,1,0,RATI,0.5,!Createsakeypointbetweentwoexistingkeypoints*do,i,1,72k,5+i,10,180-i*10,ilstr,5+i,4+i*enddo*do,i,1,72VDRAG,1+(i-1)*

3、5,,,,,,4+ieplot*enddo1.EXAMPLE_3finish/clear/prep7*AFUN,RADpi=2*ASIN(1)!获得pi常数*afun,degR1=6.3!轴外半径rs=1.65!丝半径R2=R1+rs!螺旋外半径h0=64!螺距H=h0!螺旋总高度K,1,R2,0,0theta=90-Atan(64/(2*pi*R2))!获得旋转角wprota,0,-theta,0KWPAVE,1!Movestheworkingplaneorigintotheaveragelocation

4、ofkeypoints.rad1=rs!圆半径rad2=rad1*0.6!四边形半径*get,knum,kp,,num,maxCYL4,,,rad1CSYS,1!选择柱坐标系circle_p=10*get,knum,kp,,num,maxK,knum+1,R2,0,0nn=NINT(h*circle_p/h0)*DO,i,1,nn-1,1xx=R2yy=i*360/circle_pzz=i*h0/circle_pK,knum+i+1,xx,yy,zz*ENDDOK,knum+nn+1,xx,h/h0*360

5、,hLSEL,U,,,ALL*DO,i,1,nn,1L,knum+i,knum+i+1*ENDDOLCOMB,ALL,,0*GET,lnum,LINE,0,NUM,MAX!获得最大线条号ET,2,SOLID45TYPE,2LESIZE,lnum,,,40,,,,,1VDRAG,ALL,,,,,,lnum1.EXAMPLE_4钢丝软轴的模型/prep7*AFUN,DEGCSYS,1*do,i,1,500k,i,2,10*(i-1),0.01*(i-1)*enddo*do,i,1,499l,i,i+1*endd

6、oFLST,2,499,4,ORDE,2FITEM,2,1FITEM,2,-499LCOMB,P51X,,0CSYS,0KWPAVE,1wprot,0,90PCIRC,0.18,0,0,360,VDRAG,1,,,,,,1FINISH1.EXAMPLE_5近来算了一个螺旋形的钢桥,以下是一段用APDL建立螺旋线的代码,主要使用"BSPLIN"命令来绘制空间曲线,然后再进行网格划分。适当修改一下可以用做各种螺旋形模型的建立。/PREP7PI=3.1415926R=18.100!螺旋线半径H=24.836!螺旋

7、线单圈高N=6!曲线关键点数量ANG1=45.18!曲线起始角度ANG2=135.71!曲线终止角度HH=H*(ANG2-ANG1)/360!曲线段高度DH=HH/(N-1)!每个关键点的高度增量DA=(ANG2-ANG1)/(N-1)!每个关键点的角度增量*DO,I,0,N-1XX=R*COS((ANG1+I*DA)*PI/180)YY=R*SIN((ANG1+I*DA)*PI/180)ZZ=I*DHK,I+1,XX,YY,ZZ*ENDDOBSPLIN,1,2,3,4,5,6*GET,LENG,LINE,

8、1,LENG!得到螺旋线的长度1.EXAMPLE_6Ansys生成螺旋线模型/prep7/title,helixheater/units,user,1e-3,,,,273Rh=2.5!螺“线”半径H=20!总长dis=0.8!螺距rs=0.5!丝径*afun,degtheta=90-atan(dis/Rh)k,1,0,0,0k,2,0,0,Hk,3,Rh,0,0k,4,Rh,0,Hl,3,4!可为曲线,但要修改参

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。