grey/BOSL2
1
0
Fork 0
mirror of https://github.com/BelfrySCAD/BOSL2.git synced 2025-01-04 03:09:45 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

Fixed last broken gears.scad example.

Browse source
This commit is contained in:
Revar Desmera 2023-07-27 01:34:23 -07:00
parent 22b3b66832
commit c5bf5627e0
1 changed files with 29 additions and 21 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

50
gears.scad
View file

@ -382,24 +382,26 @@ function _inherit_gear_thickness(thickness) =
// color("#ccc") fwd(d1r) right(circ_pitch*$t) // color("#ccc") fwd(d1r) right(circ_pitch*$t)
// rack(pitch=circ_pitch,teeth=n5,thickness=thickness,height=rack_base,anchor=CENTER,orient=BACK); // rack(pitch=circ_pitch,teeth=n5,thickness=thickness,height=rack_base,anchor=CENTER,orient=BACK);
// Example: Helical gears meshing with non-parallel shafts BROKEN // Example: Helical gears meshing with non-parallel shafts BROKEN
// // ang1 = 30; // ang1 = 30;
// // ang2 = 10; // ang2 = 10;
// // circ_pitch = 5; // circ_pitch = 5;
// // n = 20; // n = 20;
// // r1 = mesh_radius(circ_pitch,n,helical=ang1); // dist = gear_dist_skew(
// // r2 = mesh_radius(circ_pitch,n,helical=ang2); // circ_pitch=circ_pitch,
// // left(r1) spur_gear( // teeth1=n, teeth2=n,
// // circ_pitch, teeth=n, thickness=10, // helical1=ang1, helical2=ang2);
// // shaft_diam=5, helical=ang1, slices=12, // left(dist/2) spur_gear(
// // gear_spin=-90 // circ_pitch, teeth=n, thickness=10,
// // ); // shaft_diam=5, helical=ang1, slices=12,
// // right(r2) // gear_spin=-90
// // xrot(ang1+ang2) // );
// // spur_gear( // right(dist/2)
// // circ_pitch=circ_pitch, teeth=n, thickness=10, // xrot(ang1+ang2)
// // shaft_diam=5, helical=ang2, slices=12, // spur_gear(
// // gear_spin=90-180/n // circ_pitch=circ_pitch, teeth=n, thickness=10,
// // ); // shaft_diam=5, helical=ang2, slices=12,
// gear_spin=90-180/n
// );
// Example(Anim,Frames=36,VPT=[0,0,0],VPR=[55,0,25],VPD=375): Planetary Gear Assembly // Example(Anim,Frames=36,VPT=[0,0,0],VPR=[55,0,25],VPD=375): Planetary Gear Assembly
// rteeth=56; pteeth=16; cteeth=24; // rteeth=56; pteeth=16; cteeth=24;
// circ_pitch=5; thick=10; pa=20; // circ_pitch=5; thick=10; pa=20;
@ -2837,13 +2839,19 @@ function _working_pressure_angle(teeth1,profile_shift1, teeth2, profile_shift2,
// Function: gear_dist_skew() // Function: gear_dist_skew()
// Synopsis: Returns the distance between two helical gear centers.
// Topics: Gears, Parts
// See Also: gear_dist(), worm(), worm_gear(), pitch_radius(), outer_radius()
// Usage: // Usage:
// d = gear_dist_skew(circ_pitch, teeth1, profile_shift1, h // dist = gear_dist_skew(mod, teeth1, profile_shift1, helical1, teeth2, profile_shift2, helical2, [pressure_angle=]);
// dist = gear_dist_skew(diam_pitch=, teeth1=, [profile_shift1=], [helical1=], teeth2=, [profile_shift2=], [helical2=], [pressure_angle=]);
// dist = gear_dist_skew(circ_pitch=, teeth1=, [profile_shift1=], [helical1=], teeth2=, [profile_shift2=], [helical2=], [pressure_angle=]);
// Description: // Description:
// Calculate the distance between two helical gears that mesh with non-parallel axes, taking into account // Calculate the distance between two helical gears that mesh with non-parallel axes, taking into account
// profile shift and the helical angles. // profile shift and the helical angles.
function gear_dist_skew(mod,teeth1,profile_shift1=0, helical1, teeth2, profile_shift2=0, helical2, pressure_angle=20) = function gear_dist_skew(mod,teeth1,profile_shift1=0, helical1, teeth2, profile_shift2=0, helical2, pressure_angle=20, circ_pitch, diam_pitch) =
let( let(
mod = module_value(circ_pitch=circ_pitch, diam_pitch=diam_pitch, mod=mod),
pa_normal_eff = _working_normal_pressure_angle_skew(teeth1,profile_shift1,helical1,teeth2,profile_shift2,helical2,pressure_angle), pa_normal_eff = _working_normal_pressure_angle_skew(teeth1,profile_shift1,helical1,teeth2,profile_shift2,helical2,pressure_angle),
dist_adj = 0.5*(teeth1/cos(helical1)^3+teeth2/cos(helical2)^3)*(cos(pressure_angle)/cos(pa_normal_eff)-1), dist_adj = 0.5*(teeth1/cos(helical1)^3+teeth2/cos(helical2)^3)*(cos(pressure_angle)/cos(pa_normal_eff)-1),
ff=echo(y=dist_adj,pa_normal_eff) ff=echo(y=dist_adj,pa_normal_eff)
@ -2853,8 +2861,8 @@ function gear_dist_skew(mod,teeth1,profile_shift1=0, helical1, teeth2, profile_s
function _working_normal_pressure_angle_skew(teeth1,profile_shift1,helical1, teeth2, profile_shift2, helical2, pressure_angle) = function _working_normal_pressure_angle_skew(teeth1,profile_shift1,helical1, teeth2, profile_shift2, helical2, pressure_angle) =
let( let(
inv = function(a) tan(a) + a*PI/180,
rhs = 2*(profile_shift1+profile_shift2)/(teeth1/cos(helical1)^3+teeth2/cos(helical2)^3)*tan(pressure_angle) + inv(pressure_angle), rhs = 2*(profile_shift1+profile_shift2)/(teeth1/cos(helical1)^3+teeth2/cos(helical2)^3)*tan(pressure_angle) + inv(pressure_angle),
fdaseee= echo(rhs=rhs),
pa_eff_normal = root_find(function (x) inv(x)-rhs, 5, 75) pa_eff_normal = root_find(function (x) inv(x)-rhs, 5, 75)
) )
pa_eff_normal; pa_eff_normal;