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

Another gear tooth profile pruning bugfix.

Browse source
This commit is contained in:
Revar Desmera 2023-07-27 17:29:14 -07:00
parent 570fc5ec36
commit a14a8516e1
1 changed files with 8 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

15
gears.scad
View file

@ -2258,16 +2258,17 @@ function _gear_tooth_profile(
for (i=[0:1:steps-1]) 0.2 + i/(steps-1)*0.8,
],
// Is there an undercut?
has_undercut = [
// Find top of undercut.
undercut_max = max([
0,
for (u = us) let(
r = lerp(rrad, ma_rad, u),
a1 = lookup(r, involute_lup) + soff,
a2 = lookup(r, undercut_lup),
a = internal || r < undercut_lup[0].x? a1 : min(a1,a2),
b = internal || r < undercut_lup[0].x? false : a1>a2
) if(a<90+180/teeth && b) 1
] != [],
) if(a<90+180/teeth && b) r
]),
// Generate the left half of the tooth.
tooth_half_raw = deduplicate([
@ -2285,7 +2286,7 @@ function _gear_tooth_profile(
// Strip "jaggies" if found.
strip_left = function(path,i)
i > len(path)? [] :
norm(path[i]) >= prad? [for (j=idx(path)) if(j>=i) path[j]] :
norm(path[i]) >= undercut_max? [for (j=idx(path)) if(j>=i) path[j]] :
let(
angs = [
for (j=[i+1:1:len(path)-1]) let(
@ -2293,12 +2294,12 @@ function _gear_tooth_profile(
np = path[j],
r = norm(np),
a = v_theta(np-p)
) if(r<prad) a
) if(r<undercut_max) a
],
mti = !angs? 0 : min_index(angs),
out = concat([path[i]], strip_left(path, i + mti + 1))
) out,
tooth_half = !has_undercut? tooth_half_raw :
tooth_half = !undercut_max? tooth_half_raw :
strip_left(tooth_half_raw, 0),
// Mirror the tooth to complete it.