summaryrefslogtreecommitdiff
path: root/1835/CH4/EX4.2/Ex4_2.sce
blob: f76a53eb5f4fe002d9588f7f62d1044c67cb1853 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
//Chapter-4, Illustration 2, Page 133
//Title: Gears and Gear Drivers
//=============================================================================
clc
clear

//INPUT DATA
TA=40;//Wheel A teeth
TB=TA;//Wheel B teeth
m=6;//Module pitch in mm
phi=20;//Pressure angle in degrees
pi=3.141
x=1.75;//Ratio of length of arc of contact to circular pitch

//CALCULATIONS
Cp=m*pi;//Circular pitch in mm
R=(m*TA)/2;//Pitch circle radius of wheel A in mm
r=R;//Pitch circle radius of wheel B in mm
la=x*Cp;//Length of arc of contact in mm
lp=la*cosd(phi);//Length of path of contact in mm
RA=sqrt((((lp/2)+(R*sind(phi)))^2)+((R^2)*(cosd(phi))^2));//Radius of addendum circle of each wheel in mm
add=RA-R;//Addendum in mm

//OUTPUT
mprintf('Addendum of wheel is %3.3f mm',add)









//================================END OF PROGRAM=============================================