z2*cos(alfa2)!定义基圆直径Rb2=db2/2!定义基圆半径Df2=d2-2*(ha+c)*m!定义齿根圆直径Rf2=df2/2!定义齿根圆半径Da2=d2+2*ha*m!定义齿顶圆直径Ra2=da2/2!定义齿顶圆半径Alfa_f2=acos(db2/df2)!定义齿根处的压力角Alfa_a2=acos(db2/da2)!定义齿顶处的压力角*dim,alfa_12,array,46,1!定义461数组alfa_12*dim,sita2,array,45,1!定义451数组sita2*dim,r2,array,45,1!定义451数组r2Csys,1!改变当前坐标系为柱坐标系Alfa_12(1,1)=0/prep7!进入前处理器K,1000,rb2,0!生成关键点*do,j,1,45,1!进入循环生成其他关键点Alfa_12(j+1,1)=alfa_12(j,1)+0.01!定义压力角Sita2(j,1)=(tan(alfa_12(j,1))-alfa_12(j,1))*180/pi!定义展角R2(j,1)=rb2/cos(alfa_12(j,1))/prep7K,j+1000,r2(j,1),sita2(j,1)!生成关键点Bsplin,j+1000,j-1+1000!生成样条曲线*enddoSita_a2=(tan(alfa_a2)-alfa_a2)*180/piK,1046,ra2,sita_a2!生成最后一个关键点Bsplin,1045,1046!生成样条曲线渐开线的生成采用APDL命令流,直接生成多条样条曲线。单击/preprocessor/modeling/operate/booleans/add/lines,弹出一个对话框单击pickall按钮,直接将生成的所有样条曲线融合为一条曲线,这就是小齿轮的渐开线(如图3所示)。图2渐开线的关键点图3渐开线