From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Fri, 1 Sep 2023 16:57:26 +0000 (+0100)
Subject: makita-drill-handle-blivet: wip
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=commitdiff_plain;h=c179c59a5bc741936898d3b6d816c941bea8bd15;p=reprap-play.git

makita-drill-handle-blivet: wip

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

diff --git a/makita-drill-handle-blivet.scad b/makita-drill-handle-blivet.scad
new file mode 100644
index 0000000..7f747a9
--- /dev/null
+++ b/makita-drill-handle-blivet.scad
@@ -0,0 +1,43 @@
+// -*- C -*-
+
+include <utils.scad>
+
+hex_across = 12.70 - 0.3;
+screw_dia = 8.0 + 0.0;
+
+min_th = 0.425;
+extra_th = 0.5;
+
+// calculated
+
+total_th = min_th + extra_th;
+hex_rad = hex_across / 2 / cos(30);
+
+module Plan(){
+  difference(){
+    circle(r = hex_rad, $fn = 6);
+    circle(r = screw_dia/2);
+  }
+}
+
+module Elevation(){
+  square([ hex_across*2, min_th*2 ], center=true);
+  hull(){
+    rectfromto([ 0, -1],
+	       [ 0.1, min_th]);
+    translate([ hex_rad, 0 ])
+      rectfromto([ 0, -1 ],
+		 [ 1, total_th]);
+  }
+}
+
+module Blivet(){
+  intersection(){
+    linextr(0, total_th + 1)
+      Plan();
+    linextr_y_xz(-hex_across, hex_across)
+      Elevation();
+  }
+}
+
+Blivet();