*set,cn,0.5 !法面顶隙系数
*set,pi,3.1415929
*set,b,20 !齿宽
*set,b1,10 !螺旋角
*set,mn,2 !法向模数
*set,z,24 !齿数
*set,r,z*mn/cos(b1/180*pi)/2 !分度圆半径
*set,rb,22.859 !基圆半径
*set,ra,r+cn*mn !齿顶圆半径
/prep7
csys,0
*do,i,1,11
x=rb*(cos(4.5*(i-1)*pi/180)+4.5*(i-1)*pi/180*sin(4.5*(i-1)*pi/180))
y=rb*(sin(4.5*(i-1)*pi/180)-4.5*(i-1)*pi/180*cos(4.5*(i-1)*pi/180))
k,i,x,y
*enddo
*do,i,1,9,2
spline,i,i+1,i+2
*enddo
k,12,rb-cn
l,1,12
lsel,all
lcomb,all
numcmp,all
wprota,-3.304 !齿根对应的圆周角的一半
csys,4
lsymm,y,1
wpcsys,1,0
csys,1
l,2,4
l,1,3
lfillt,1,3,0.5
lfillt,2,3,0.5
lsel,all
al,all
k,9,r
k,10,r,b1,b
l,9,10
vdrag,1,,,,,,7
vgen,z,1,,,,360/z
vsel,all
vadd,all
numcmp,all
cylind,ra,,,b
vsbv,2,1
numcmp,all
cylind,10,,,20 !轴孔
vsbv,1,2
numcmp,all
block,-3,3,,12.8,,20 !键槽
vsbv,1,2