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

bug fix for internal threads

Browse source
This commit is contained in:
Adrian Mariano 2023-01-04 20:30:03 -05:00
parent 8b91ce9496
commit 6bde6eeb37
1 changed files with 53 additions and 43 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

48
threading.scad
View file

@ -900,7 +900,7 @@ module square_threaded_rod(
bevel,bevel1,bevel2, bevel,bevel1,bevel2,
starts=1, starts=1,
internal=false, internal=false,
higbee=0, higbee1, higbee2, higbee, higbee1, higbee2,
d1,d2,length, d1,d2,length,
anchor, spin, orient anchor, spin, orient
) { ) {
@ -1060,7 +1060,7 @@ module ball_screw_rod(
starts=starts, starts=starts,
bevel=bevel,bevel1=bevel1,bevel2=bevel2, bevel=bevel,bevel1=bevel1,bevel2=bevel2,
internal=internal, internal=internal,
higbee=0, length=length, higbee=false, length=length,
anchor=anchor, anchor=anchor,
spin=spin, spin=spin,
orient=orient orient=orient
@ -1173,6 +1173,8 @@ module generic_threaded_rod(
// Zero higbee should be treated as "true", default angle, but it tests as false so adjust // Zero higbee should be treated as "true", default angle, but it tests as false so adjust
higbee1 = thigbee1==0 ? true : thigbee1; higbee1 = thigbee1==0 ? true : thigbee1;
higbee2 = thigbee2==0 ? true : thigbee2; higbee2 = thigbee2==0 ? true : thigbee2;
extra_thread1 = higbee1==false && internal ? 1 : 0;
extra_thread2 = higbee2==false && internal ? 1 : 0;
dummy0 = dummy0 =
assert(all_positive([pitch]),"Thread pitch must be a positive value") assert(all_positive([pitch]),"Thread pitch must be a positive value")
assert(all_positive([l]),"Length must be a postive value") assert(all_positive([l]),"Length must be a postive value")
@ -1187,7 +1189,7 @@ module generic_threaded_rod(
islop = internal? 2*get_slop() : 0; islop = internal? 2*get_slop() : 0;
_r1 = r1 * rsc + islop; _r1 = r1 * rsc + islop;
_r2 = r2 * rsc + islop; _r2 = r2 * rsc + islop;
threads = quantup(l/pitch+2,1); // Was quantup(1/pitch+2,2*starts); threads = extra_thread1+extra_thread2+quantup(l/pitch+2,1); // Was quantup(1/pitch+2,2*starts);
dir = left_handed? -1 : 1; dir = left_handed? -1 : 1;
twist = 360 * l / pitch / starts; twist = 360 * l / pitch / starts;
profile = !internal ? profile profile = !internal ? profile
@ -1199,10 +1201,10 @@ module generic_threaded_rod(
thread_minx = min(column(profile,0)); thread_minx = min(column(profile,0));
thread_maxx = max(column(profile,0)); thread_maxx = max(column(profile,0));
// Compute higbee cut angles, or set to large negative value if higbee is not enabled // Compute higbee cut angles, or set to large negative value if higbee is not enabled
higang1 = !higbee1 ? -1000 higang1 = !higbee1 && !internal ? -1000
: (180+(gap-(thread_minx+.5))*360)/starts + (is_num(higbee1) ? higbee1 : 0); : (180+(gap-(thread_minx+.5))*360)/starts + (is_num(higbee1) ? higbee1 : 0) - 360*(higbee1==false?1:0);
higang2 = !higbee2 ? -1000 higang2 = !higbee2 && !internal? -1000
: (180+(gap-(.5-thread_maxx))*360)/starts + (is_num(higbee2) ? higbee2 : 0); : (180+(gap-(.5-thread_maxx))*360)/starts + (is_num(higbee2) ? higbee2 : 0) - 360*(higbee2==false?1:0);
prof3d = path3d(profile); prof3d = path3d(profile);
pdepth = -min(column(profile,1)); pdepth = -min(column(profile,1));
pmax = pitch * max(column(profile,1)); pmax = pitch * max(column(profile,1));
@ -1217,12 +1219,14 @@ module generic_threaded_rod(
thread_verts = [ thread_verts = [
// Outer loop constructs a vertical column of the screw at each angle // Outer loop constructs a vertical column of the screw at each angle
// covering 1/starts * 360 degrees of the cylinder. // covering 1/starts * 360 degrees of the cylinder.
for (step = [0:1:start_steps]) let( for (step = [0:1:start_steps])
let(
ang = 360 * step/sides, ang = 360 * step/sides,
dz = step / start_steps, // z offset for threads at this angle dz = step / start_steps, // z offset for threads at this angle
rot_prof = zrot(ang*dir)*map_threads, // Rotate profile to correct angular location rot_prof = zrot(ang*dir)*map_threads, // Rotate profile to correct angular location
full_profile = [ // profile for the entire rod full_profile = [ // profile for the entire rod
for (thread = [-threads/2:1:threads/2-1]) let( for (thread = [-threads/2:1:threads/2-1])
let(
tang = (thread/starts) * 360 + ang, tang = (thread/starts) * 360 + ang,
adjusted_prof3d = tang < -twist/2+higang1 || tang > twist/2-higang2 adjusted_prof3d = tang < -twist/2+higang1 || tang > twist/2-higang2
? [for(v=prof3d) [v.x,internal?pmax/pitch:-pdepth,v.z]] ? [for(v=prof3d) [v.x,internal?pmax/pitch:-pdepth,v.z]]
@ -1232,38 +1236,44 @@ module generic_threaded_rod(
// what will be the z axis after the profile is mapped to 3d // what will be the z axis after the profile is mapped to 3d
each apply(right(dz + thread) , adjusted_prof3d) each apply(right(dz + thread) , adjusted_prof3d)
] ]
) [ )
[0, 0, -l/2-pitch], [
[0, 0, -l/2-pitch-1-extra_thread1*pitch],
each apply(rot_prof , full_profile), each apply(rot_prof , full_profile),
[0, 0, +l/2+pitch] [0, 0, +l/2+pitch+1+extra_thread2*pitch]
] ]
]; ];
style=internal?"concave":"convex"; style=internal?"concave":"convex";
thread_vnfs = vnf_join([ thread_vnfs = vnf_join(
[
// Main thread faces // Main thread faces
for (i=[0:1:starts-1]) for (i=[0:1:starts-1])
zrot(i*360/starts, p=vnf_vertex_array(thread_verts, reverse=left_handed, style=style)), zrot(i*360/starts, p=vnf_vertex_array(thread_verts, reverse=left_handed, style=style)),
// Top closing face(s) of thread // Top closing face(s) of thread
for (i=[0:1:starts-1]) let( for (i=[0:1:starts-1])
let(
rmat = zrot(i*360/starts), rmat = zrot(i*360/starts),
pts = deduplicate(list_head(thread_verts[0], len(prof3d)+1)), pts = deduplicate(list_head(thread_verts[0], len(prof3d)+1)),
faces = [for (i=idx(pts,e=-2)) left_handed ? [0, i, i+1] : [0, i+1, i]] faces = [for (i=idx(pts,e=-2)) left_handed ? [0, i, i+1] : [0, i+1, i]]
) [apply(rmat,pts), faces], )
[apply(rmat,pts), faces],
// Bottom closing face(s) of thread // Bottom closing face(s) of thread
for (i=[0:1:starts-1]) let( for (i=[0:1:starts-1])
let(
rmat = zrot(i*360/starts), rmat = zrot(i*360/starts),
pts = deduplicate(list_tail(last(thread_verts), -len(prof3d)-2)), pts = deduplicate(list_tail(last(thread_verts), -len(prof3d)-2)),
faces = [for (i=idx(pts,e=-2)) left_handed ? [len(pts)-1, i+1, i] : [len(pts)-1, i, i+1]] faces = [for (i=idx(pts,e=-2)) left_handed ? [len(pts)-1, i+1, i] : [len(pts)-1, i, i+1]]
) [apply(rmat,pts), faces] )
]); [apply(rmat,pts), faces]
]
);
slope = (_r1-_r2)/l; slope = (_r1-_r2)/l;
maxlen = 2*pitch; maxlen = 2*pitch;
attachable(anchor,spin,orient, r1=_r1, r2=_r2, l=l) { attachable(anchor,spin,orient, r1=_r1, r2=_r2, l=l) {
union(){ union(){
// This method is faster but more complex code and it produces green tops // This method is faster but more complex code and it produces green tops
difference() { difference() {
vnf_polyhedron(vnf_quantize(thread_vnfs),convexity=10); vnf_polyhedron(vnf_quantize(thread_vnfs),convexity=10);