From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sun, 10 May 2020 20:55:56 +0000 (+0100)
Subject: mic-table-clamp: wip ClampTop
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=commitdiff_plain;h=cd2103422340ef2c0772e295393bfe781852f2dc;p=reprap-play.git

mic-table-clamp: wip ClampTop

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

diff --git a/mic-table-clamp.scad b/mic-table-clamp.scad
index 88d943c..745024c 100644
--- a/mic-table-clamp.scad
+++ b/mic-table-clamp.scad
@@ -5,6 +5,7 @@
 
 // others on Standard
 
+include <utils.scad>
 include <threads.scad>
 include <camera-mount.scad>
 
@@ -23,7 +24,21 @@ thread_nom = 8;
 thread_pitch = 1.25;
 thread_act = thread_nom + 0.600;
 
-//clamp_l = 
+clamp_l = 40;
+clamp_top_th = 7;
+clamp_bot_th = 10;
+clamp_bot_tooth = 2.5;
+clamp_bot_collar = 20;
+clamp_bot_collar_th = 4.0;
+clamp_reg_sz = 3;
+clamp_w = 15;
+
+clamp_hole_dia = thread_nom + 0.30;
+
+clamp_reg_clear_x = 2.5;
+clamp_reg_clear_y = 0.75; // each side
+clamp_reg_extra_x = 4;
+
 //ct_h = 7;
 
 wingnut_th = 5;
@@ -43,6 +58,8 @@ $test= true;
 
 wingnut_cnr = wingnut_wing_th/2 -0.1;
 
+clamp_reg_bot_x_min = stem_base_dia/2 + clamp_reg_clear_x - clamp_reg_sz;
+
 module OurThread(l){
   translate([0,0,-0.01])
     metric_thread(diameter=thread_act, pitch=thread_pitch,
@@ -95,8 +112,38 @@ module Wingnut(){ ////toplevel
   }
 }
 
+module ClampCollarPlan(){
+  circle(r= thread_nom/2 + clamp_bot_collar_th);
+}
+module ClampHolePlan(){
+  circle(r= clamp_hole_dia/2);
+}
+module ClampArmPlan(){
+  rectfromto([0,       -clamp_w/2],
+	     [clamp_l, +clamp_w/2]);
+}
+
 module ClampTop(){ ////toplevel
-//  linear_extrude(height);
+  linear_extrude(height = clamp_top_th, convexity=4) {
+    difference(){
+      union(){
+	ClampArmPlan();
+	ClampCollarPlan();
+      }
+      ClampHolePlan();
+    }
+  }
+  linear_extrude(height = clamp_reg_sz, convexity=4) {
+    difference(){
+      for (m=[0,1]){
+	mirror([0,m,0])
+	  translate([0, clamp_reg_sz/2 + clamp_reg_clear_y, 0])
+	  rectfromto([-clamp_reg_bot_x_min - clamp_reg_extra_x, 0 ],
+		     [0,                             clamp_reg_sz ]);
+      }
+      ClampHolePlan();
+    }
+  }
 }
 
 //Wingnut();