X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=blobdiff_plain;f=camera-mount.scad;h=fec9096192b3336e7a50ed782f3dc3eb42407db4;hb=5c25c25b41a0f308602e636b94563af645f04bce;hp=d65b08d55922e63946d0db60a2fdfe6f7952ada3;hpb=4227a17e234126188f8fa7e6059c2b377f8f3e6c;p=reprap-play.git

diff --git a/camera-mount.scad b/camera-mount.scad
index d65b08d..fec9096 100644
--- a/camera-mount.scad
+++ b/camera-mount.scad
@@ -1,11 +1,28 @@
 // -*- C -*-
 
+include <threads.scad>
+
 inch = 25.4;
 
 negative_dia = inch * 1/4. + 0.375;
-negative_l =   10.0;
+negative_default_l =   10.0;
 
 negative_tpi = 20;
 negative_pitch = inch/negative_tpi;
 negative_chamfer = negative_pitch/2;
 
+module CameraMountThread(l){
+  rotate([0,180,0])
+    english_thread(diameter=negative_dia/inch,
+		   threads_per_inch=negative_tpi,
+		   leadin=0, internal=true, test=$test,
+		   length= (l + inch/19) / inch);
+  hull(){
+    translate([0,0, negative_chamfer])
+      cylinder(r= negative_dia/2 + negative_chamfer*2,
+	       h=1);
+    mirror([0,0,1])
+      cylinder(r= negative_dia/2 - negative_chamfer*2,
+		   h= negative_chamfer*3);
+  }
+}