X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=blobdiff_plain;f=mic-table-clamp.scad;h=b88e8d160566795562000f5d7b8933737594e2e7;hb=5c25c25b41a0f308602e636b94563af645f04bce;hp=564f5043f03a1cbfce203210bbc64a268423b37e;hpb=425bd258b9df05b00b4b6d5f8ff549fd52d626a8;p=reprap-play.git

diff --git a/mic-table-clamp.scad b/mic-table-clamp.scad
index 564f504..b88e8d1 100644
--- a/mic-table-clamp.scad
+++ b/mic-table-clamp.scad
@@ -12,6 +12,10 @@ include <camera-mount.scad>
 positive_dia = inch * 3/8. - 0.375;
 positive_l = inch * 1/2.;
 
+positive_blank_dia = 8.12;
+blank_l = 17;
+blank_taper = 1.0;
+
 stem_l = 40;
 stem_dia = 12;
 stem_th = 3;
@@ -51,11 +55,11 @@ wingnut_wing_xrad = 8;
 wingnut_wing_xh = 5;
 wingnut_wing_th = 3;
 
-$test= true;
-///$test= false;
+//$test= true;
+$test= false;
 
-//$fa= 3;
-//$fs= 0.2;
+$fa= 3;
+$fs= 0.2;
 
 // calculated
 
@@ -71,11 +75,9 @@ module OurThread(l){
 		  test=$test, length=l);
 }
 
-module Stem(){ ////toplevel
+module StemWith(){
   translate([0,0, stem_l -0.1])
-    english_thread(diameter=positive_dia/inch, threads_per_inch=16,
-		   leadin=1, test=$test,
-		   length= (positive_l + 0.1) / inch);
+    children();
 
   difference(){
     union(){
@@ -87,6 +89,27 @@ module Stem(){ ////toplevel
     }
     OurThread(stem_inner_l);
   }
+}  
+
+module Stem(){ ////toplevel
+  StemWith()
+    english_thread(diameter=positive_dia/inch, threads_per_inch=16,
+		   leadin=1, test=$test,
+		   length= (positive_l + 0.1) / inch);
+}
+
+module StemBlankPart(){
+  hull(){
+    cylinder(h = blank_l + 0.1 - blank_taper,
+	     r = positive_blank_dia/2);
+    cylinder(h = blank_l + 0.1,
+	     r = positive_blank_dia/2 - blank_taper);
+  }
+}
+
+module BlankStem(){ ////toplevel
+  StemWith()
+    StemBlankPart();
 }
 
 module Wingnut(){ ////toplevel
@@ -189,8 +212,13 @@ module ClampBot(){ ////toplevel
   }
 }
 
+module StemBlankTest(){ ////toplevel
+  StemBlankPart();
+  linextr(-1.5,0) square(center=true, [10,35]);
+}
+
 module Demo(){ ////toplevel
-  color("blue") translate([0,0, clamp_top_th+0.5]) Stem();
+  color("blue") translate([0,0, clamp_top_th+0.5]) BlankStem();
   color("red") ClampTop();
   color("grey") translate([0,0, -(clamp_bot_th + 5)]) ClampBot();
   translate([0,0, -(clamp_bot_collar +10)])