用ansys绘制螺旋锥齿轮.docVIP

用ansys绘制螺旋锥齿轮请教： 用ansys画螺旋锥齿轮，其中齿向线都是方程表示的，请教各位高手，可不可行？chenhuxing (陈胡兴)当然可行，我刚建完一个圆弧齿轮。 直接在ansys中建模的 你可以参照画螺栓的程序我建了一个标准直齿轮的自动生成程序， ??当然可行，我刚建完一个圆弧齿轮。直接在ansys中建模的 ??我想对比一下，能给发一份吗？ ??xiaopj2002_tj@163.comxiaopj !仅适用于标准直齿圆齿轮 !一般情况下仅需更改 m 、z 两个参数 !特殊情况下angle1、ha、c 等参数可以更改 !对齿根过渡圆角的处理分两种情况：整圆弧过渡及0.38m倒角 !因为 circle 命令不受坐标系影响，所以必须有初始偏转。 !Pj??2004.2 ??/title,gear ??m=3.0? ?!定义模数 z=21.0??!齿数 ??!齿轮相关数据计算 pi=3.14159265358979 angle1=20*pi/180.0? ?? ? !压力角 ha=1.0? ?? ?? ?? ?? ?? ? !正常齿制的齿顶高系数 ??*if,m,LT,1,then? ?? ?? ? !正常齿制的顶隙系数选择 c=0.35 *else c=0.25 *endif ??r=0.5*m*z? ?? ?? ?? ???!分度圆半径 rb=r*cos(angle1)? ?? ? !基圆半径 ra=0.5*(z+2*ha)*m? ?? ?!齿顶圆半径 rf=0.5*(z-2*ha-2*c)*m??!齿根圆半径??zz=2*(ha+c)/(1-cos(angle1))??!以次判断用何种方法(基于对rf、rb大小的判断) ??*if,z,GE,zz,then rff=0.38*m? ?? ?? ?? ?!齿根圆角半径 *else rff=(2.0*pi*rb/z-m*cos(angle1)*(pi/2.0+z*(tan(angle1)-angle1)))/2.0 !同上 *endif ??angle2=180.0/z? ?? ?? ?!镜像旋转角? ?angle3=(pi/2.0/z+tan(angle1)-angle1)*180.0/pi? ?!初始的偏转角(其值不能改变）??angle4=(pi/2.0/z+tan(angle1)-angle1)*180.0/pi? ?!对称偏转角????/prep7 csys,4? ?? ?? ?? ?? ???!激活工作坐标系 wprot,-angle3,0,0? ?? ?!初始偏转角度 K,1,0,0? ?? ?? ?? ?? ? !绘制原点??（编号为1） ??*do,t,0,1,0.01? ?? ?? ?? ?? ?!描点 *SET,x,rb*(cos(t)+t*sin(t))??!渐开线方程 *SET,y,rb*(sin(t)-t*cos(t))? ?k,,x,y,0? ?? ?? ?? ?? ?!开始描点??*enddo? ???flst,3,101,3? ?? ?? ???!连点成线? ? *do,t,2,102 fitem,3,t? ? *enddo? ?bsplin,,p51x? ?? ?? ???!用多意线连点成线 ??KDELE,3,101,1? ?? ?? ? !删多余点 NUMCMP,KP? ?? ?? ?? ???!重排点号 ??wprot,angle4,0,0? ?? ? !X轴旋转angle4度 对称偏转角 LSYMM,Y,1, , , ,0,0? ? !镜像渐开线 ??circle,1,ra? ?? ?? ?? ?!画出齿顶圆线 LSBL,1,6? ?? ?? ?? ?? ?!对渐开线进行分割 LSBL,2,3 ldele,4? ?? ?? ?? ?? ? !删除多余的线与点 ldele,5 ldele,6 ldele,8 kdele,6,9,1 kdele,3 kdele,5 NUMCMP,line? ?? ?? ?? ?!重排线号、点号 NUMCMP,KP ??*if,z,GE,zz,then? ?? ? !判断是否进行第二次分割 circle,1,rf LSBL,1,3? ?? ?? ?? ?? ?!对渐开线进行分割 LSBL,2,6??ldele,4? ?? ?? ?? ?? ? !删除多余的线与点 ldele,5 ldele,1 ldele,7 kdele,7,9,1 kdele,2 kdele,3 NUMCMP,line NUMCMP,