From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Mon, 21 Apr 2025 11:35:49 +0000 (+0100)
Subject: toolbox-inserts: actual screw threads
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=commitdiff_plain;h=e6289c1d528817f5bdab7c4a1d8a4adc3e19b7cc;p=reprap-play.git

toolbox-inserts: actual screw threads

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
---

diff --git a/toolbox-inserts-coarse.scad b/toolbox-inserts-coarse.scad
index 9069ce0..652fc95 100644
--- a/toolbox-inserts-coarse.scad
+++ b/toolbox-inserts-coarse.scad
@@ -5,3 +5,4 @@ include <toolbox-inserts.scad>
 
 $fa = 20;
 $fs = 2;
+$screw_test = true;
diff --git a/toolbox-inserts.scad b/toolbox-inserts.scad
index 5cf5917..e0fa112 100644
--- a/toolbox-inserts.scad
+++ b/toolbox-inserts.scad
@@ -1,6 +1,7 @@
 // -*- C -*-
 
 include <utils.scad>
+include <threads.scad>
 
 box_y = 149.4 - 0.5;
 box_x = 309.2 - 0.5;
@@ -14,6 +15,7 @@ below_plane_z = 4.5;
 fixing_pitch = 10;
 fixing_depth = 6;
 fixing_nom_d = 4;
+fixing_thread_pitch = 0.5; // M4
 
 fixing_receptacle_d = 4 + 2.5 + 2.5;
 
@@ -27,6 +29,7 @@ driver_handle_handle_d = 21.6 + 0.75;
 
 $fs = 0.1;
 $fa = 3;
+$screw_test = false;
 
 // calculated
 
@@ -116,6 +119,13 @@ module WellSurround(
 	linextr_x_yz(gap[0], gap[1])
 	  rectfromto([ -100, well_stiffening_height ], [ 100,100 ]);
       }
+
+      for (hull_group = fixings)
+	AtFixingPositions(hull_group)
+	  render()
+	  metric_thread(diameter=fixing_nom_d, pitch=fixing_thread_pitch,
+			length=fixing_depth, internal=true, leadin=3,
+			test=$screw_test);
     }
 
     linextr(-100, -0.1) square(1000, center=true);