/*PROE画渐开线圆柱齿轮关系式开始
/*齿数
z1=38
/*模数
mn=3.5
/*压力角
angle=20
/*螺旋角，直齿轮为零；
helix=25 
/*变位系数
xn=0.5
/*齿高变动系数，未变位及高度变位齿轮为零；
detay=0.0611
/*径向间隙系数
c_modulus=0.25
/*齿宽
gw=100
/*齿顶高系数
ha_modulus=1.0

/*齿厚等于齿槽宽的圆的直径
/*此参数如果自己懒得算，可在本网站计算;
DSE=150.035291631431

AT=ATAN(TAN(ANGLE)/COS(HELIX)) /*端面压力角
D=MN*z1/COS(HELIX) /*分度圆直径
h=pi*d/tan(helix) /*导程,直齿轮不需要；
DB=D*COS(AT) /*基圆直径 
HA=MN*(HA_MODULUS+XN-detay) /*齿顶高
HF=MN*(HA_MODULUS+C_MODULUS-XN) /*齿根高
DA=D+2*HA /*齿顶圆直径
DF=D-2*HF /*齿根圆直径
revolve_angle=gw/h*360 ，直齿轮不需要；
/*PF齿根圆角半径系数
IF (DB/2-DF/2>0) & (DB/2-DF/2<=1)
PF=sqrt(1)
ELSE
IF (DB/2-DF/2>1) & (DB/2-DF/2<=2)
PF=sqrt(sqrt(2))
ELSE
IF (DB/2-DF/2>2) & (DB/2-DF/2<=3)
PF=sqrt(sqrt(3))
ELSE
IF DB/2-DF/2>3
PF=2
ELSE
IF DB <= DF
PF=0.38*MN
ENDIF
ENDIF
ENDIF
ENDIF
ENDIF
DX=Da+3 /*柱坐标渐开级方程用   
/*关系式结束

/*渐开线方程

/*笛卡尔坐标
r0=0.5*MN*z1*cos(ANGLE)/cos(HELIX)
t0=t*50
x0=(cos(t0)+t0*pi/180*(sin(t0)))*r0
y0=(sin(t0)-t0*pi/180*(cos(t0)))*r0
theta=-(tan(ANGLE)-ANGLE*pi/180)*180/pi-90/z1
x=x0*cos(theta)-y0*sin(theta)
y=x0*sin(theta)+y0*cos(theta)
z=0

/*柱坐标
x=t*sqrt((dx/db)^2-1)
y=180/pi
r=0.5*db*sqrt(1+x^2)
theta=x*y-atan(x)
z=0
/*渐开线方程结束

/*以下是有关孔轴键的关系式,孔径为参数
/*keyb:键宽
/*keyh:键高
/*ta:轴上键槽的深度
/*th:孔上键槽的深度
/*TDepth:键槽深度公差
if 孔径>6 & 孔径<=8 
keyb=2
keyh=2
ta=1.2
th=1.0
endif

if 孔径>8 & 孔径<=10 
keyb=3
keyh=3
ta=1.8
th=1.4
endif

if 孔径>10 & 孔径<=12 
keyb=4
keyh=4
ta=2.5
th=1.8
endif

if 孔径>12 & 孔径<=17 
keyb=5
keyh=5
ta=3.0
th=2.3
endif

if 孔径>17 & 孔径<=22 
keyb=6
keyh=6
ta=3.5
th=2.8
endif

if 孔径>22 & 孔径<=30 
keyb=8
keyh=7
ta=4.0
th=3.3
endif

if 孔径>30 & 孔径<=38 
keyb=10
keyh=8
ta=5
th=3.3
endif

if 孔径>38 & 孔径<=44
keyb=12
keyh=8
ta=5.0
th=3.3
endif

if 孔径>44 & 孔径<=50
keyb=14
keyh=9
th=3.8
ta=5.5
endif

if 孔径>50 & 孔径<=58
keyb=16
keyh=10
ta=6.0
th=4.3
endif

if 孔径>58 & 孔径<=65
keyb=18
keyh=11
ta=7.0
th=4.4
endif

if 孔径>65 & 孔径<=75
keyb=20
keyh=12
ta=7.5
th=4.9
endif

if 孔径>75 & 孔径<=85
keyb=22
keyh=14
ta=9.0
th=5.4
endif

if 孔径>85 & 孔径<=95
keyb=25
keyh=14
ta=9.0
th=5.4
endif

if 孔径>95 & 孔径<=110
keyb=28
keyh=16
ta=10
th=6.4
endif

if 孔径>110 & 孔径<=130
keyb=32
keyh=18
ta=11
th=7.4
endif

if 孔径>130 & 孔径<=150
keyb=36
keyh=20
ta=12
th=8.4
endif

if 孔径>150 & 孔径<=170
keyb=40
keyh=22
ta=13
th=9.4
endif

if 孔径>170 & 孔径<=200
keyb=45
keyh=25
ta=15
th=10.4
endif

if 孔径>200 & 孔径<=230
keyb=50
keyh=28
ta=17
th=11.4
endif

if 孔径>230 & 孔径<=260
keyb=56
keyh=32
ta=20
th=12.4
endif

if 孔径>260 & 孔径<=290
keyb=63
keyh=32
ta=20
th=12.4
endif

if 孔径>290 & 孔径<=330
keyb=70
keyh=36
ta=22
th=14.4
endif

if 孔径>330 & 孔径<=380
keyb=80
keyh=40
ta=25
th=15.4
endif

if 孔径>380 & 孔径<=440
keyb=90
keyh=45
ta=28
th=17.4
endif

if 孔径>440 & 孔径<=500
keyb=100
keyh=50
ta=31
th=19.5
endif

if 孔径>500
keyb=120
keyh=60
ta=36
th=24.5
endif

if 孔径>6 & 孔径<=22 
TDepth=0.1
endif

if 孔径>22 & 孔径<=130 
TDepth=0.2
endif

if 孔径>130 & 孔径<=500 
TDepth=0.3
endif

if 孔径>500 
TDepth=0.4
endif

/*孔键槽关系结束

/*圆柱螺旋线方程，笛卡儿坐标
x=d/2*cos(t*gw/h*360)
y=d/2*sin(t*gw/h*360)
z=-t*gw
/*以上为左旋，右旋改Y为负的