grey/BOSL2
1
0
Fork 0
mirror of https://github.com/BelfrySCAD/BOSL2.git synced 2024-12-29 16:29:40 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

Make internal threading masks circumscribed.

Browse source
This commit is contained in:
Revar Desmera 2019-08-04 19:03:33 -07:00
parent b16c0111aa
commit 28c96ef22c
1 changed files with 6 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
threading.scad
View file

@ -112,6 +112,11 @@ module thread_helix(base_d, pitch, thread_depth=undef, thread_angle=15, twist=72
// trapezoidal_threaded_rod(d=25, l=40, pitch=10, thread_depth=8/3, thread_angle=50, starts=4, center=false, $fa=2, $fs=2); // trapezoidal_threaded_rod(d=25, l=40, pitch=10, thread_depth=8/3, thread_angle=50, starts=4, center=false, $fa=2, $fs=2);
// trapezoidal_threaded_rod(d=50, l=35, pitch=8, thread_angle=30, starts=3, bevel=true); // trapezoidal_threaded_rod(d=50, l=35, pitch=8, thread_angle=30, starts=3, bevel=true);
// trapezoidal_threaded_rod(l=25, d=10, pitch=2, thread_angle=15, starts=3, $fa=1, $fs=1, orient=RIGHT, anchor=BOTTOM); // trapezoidal_threaded_rod(l=25, d=10, pitch=2, thread_angle=15, starts=3, $fa=1, $fs=1, orient=RIGHT, anchor=BOTTOM);
// Example(Med): Using as a Mask to Make Internal Threads
// bottom_half() difference() {
// cube(50, center=true);
// trapezoidal_threaded_rod(d=40, l=51, pitch=5, thread_angle=30, internal=true, orient=RIGHT, $fn=36);
// }
// Example(2DMed): Typical Tooth Profile // Example(2DMed): Typical Tooth Profile
// pitch = 2; // pitch = 2;
// depth = pitch * cos(30) * 5/8; // depth = pitch * cos(30) * 5/8;
@ -143,7 +148,7 @@ module trapezoidal_threaded_rod(
function _thread_pt(thread, threads, start, starts, astep, asteps, part, parts) = function _thread_pt(thread, threads, start, starts, astep, asteps, part, parts) =
astep + asteps * (thread + threads * (part + parts * start)); astep + asteps * (thread + threads * (part + parts * start));
d = internal? d+$slop*3 : d; d = internal? (d/cos(180/segs(d/2)) + $slop*3) : d;
astep = 360 / quantup(segs(d/2), starts); astep = 360 / quantup(segs(d/2), starts);
asteps = ceil(360/astep); asteps = ceil(360/astep);
threads = ceil(l/pitch/starts)+(starts<4?4-starts:1); threads = ceil(l/pitch/starts)+(starts<4?4-starts:1);