|
TOOTH_NUMBER NUMBER=20
"Enter the number of teeth:"
module number=3
"enter the module:"
pressure_angle number=20
"enter the pressure angle:"
face_width number=15
"enter the face width:"
rad_fillet number=0.4
"enter the fillet:"
$ H% ~- G, e/ r) n6 Z& I5 H 0 ^; V: H% k" s( C# }" m1 M
rad_pitch=0.5*tooth_number*module
rad_base=rad_pitch*cos(pressure_angle)
circular_pitch=pi*module
tooth_thick_on_pitch=circular_pitch/2
rad_addendum=rad_pitch+1*module
rad_dedendum=rad_pitch-1.157*module
inv_phi=tan(pressure_angle)-pressure_angle*2*pi/360
tooth_thick_on_base=2*rad_base*(tooth_thick_on_pitch/(2*rad_pitch)+inv_phi)
ang_tooth_thick=tooth_thick_on_base/rad_base*360/(2*pi)
ang_tooth_space=360/tooth_number-ang_tooth_thick
6 G1 \& m. v3 W0 J" ^
shaft_dia number
"enter the shaft diameter:"
key_width number
"enter the key width:"
key_height number
"enter the key height:"
7 l' }$ e) M8 o& I6 x
todeg=180/pi
roll_angle=0
solve
roll_angle*todeg-atan(roll_angle)=trajpar*ang_tooth_thick
for roll_angle
sd7=rad_base*(1+roll_angle^2)^0.2
7 [ W2 M7 P6 S
图片在附件..我做的PRT也放上来.检查多次也不知道为什么.齿形就是不对.我用的是2001的.请高手帮忙啊..
& [( |# H; T* h1 m0 d) W: \' Nprt传不了/???那只好改后缀了.加上.GIF | 
发表于 2006-5-23 09:52:53
