X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?p=reprap-play.git;a=blobdiff_plain;f=lock-inframe-bracket.scad;h=66e9f37858962e1efb80bde3426876951a3bd328;hp=6df5733e8e1a26d8dc25a9fdb4dd5bba10979ad7;hb=8a1445c5c91b7b976950a8138b6bcd23d387ed9c;hpb=686600f3fc2f1d7b0a22b6576db3ad3203d096f2

diff --git a/lock-inframe-bracket.scad b/lock-inframe-bracket.scad
index 6df5733..66e9f37 100644
--- a/lock-inframe-bracket.scad
+++ b/lock-inframe-bracket.scad
@@ -1,5 +1,10 @@
 // -*- C -*-
 
+// use shell thickness 1.50
+// use fill density 40%
+
+include <funcs.scad>
+
 tube_dia = 27.5 + 1.625;
 lock_w = 42.5 + 0.5;
 lock_d = 28.0 + 0.5;
@@ -10,9 +15,9 @@ lockshaft_dia = 14.35;
 cliprecess_h = 16;
 total_h = 45;
 
-back_gap = 10;
-main_th = 2.5;
-tube_th = 2.25;
+back_gap = 14.5;
+main_th = 3.25;
+tube_th = 2.50;
 
 midweb_d = 3;
 clip_th = 3.5;
@@ -20,12 +25,22 @@ clip_gap = 2.5;
 clip_d = 22.0;
 
 mountscrew_dia = 4 + 0.5;
-clipbolt_dia = 5 + 0.1;
+clipbolt_dia = 5 + 0.6;
 
-backflange_th = 3.5;
+backflange_th = 4.5;
 
 $fn=50;
 
+join_cr = 9;
+
+tube_rear_extra_th = 1;
+
+divide_shaft_w = 3;
+divide_shaft_l = 3;
+divide_head_dx = 3;
+divide_head_th = 3;
+divide_gap = 0.75;
+
 // calculated
 
 lockshaft_r = [1, 1] * lockshaft_dia / 2;
@@ -36,6 +51,8 @@ back_ohw = back_gap/2 + backflange_th;
 backflange_ymin = tube_or+backflange_d;
 
 lock_0y = tube_dia/2 + lock_d/2 + midweb_d;
+lock_0x = lock_w/2 - lock_d/2;
+lock_0 = [lock_0x,lock_0y];
 
 lock_or = [lock_w, lock_d]/2 + [front_th,front_th];
 
@@ -50,24 +67,72 @@ module oval(sz){ // sz[0] > sz[1]
   }
 }
 
+module JoinCircs(jr){
+  // http://mathworld.wolfram.com/Circle-CircleIntersection.html
+  R = tube_or + join_cr;
+  r = lock_or[1] + join_cr;
+  d = dist2d( [0,0], lock_0 );
+  x = (d*d - r*r + R*R) / (2*d);
+  y = sqrt( R*R - x*x );
+
+  echo(lock_0x, lock_0y, R,r, d, x,y);
+
+  for (m=[0,1]) {
+    mirror([m,0]) {
+      rotate(atan2(lock_0y, lock_0x)) {
+	translate([x,-y])
+	  circle(r= jr);
+      }
+    }
+  }
+}
+
+module DividePlan(){
+  g = divide_gap;
+  dx = divide_head_dx;
+  for (m=[0,1]) mirror([m,0]) {
+    translate([divide_shaft_w, 0]) {
+      square([10, g]);
+      square([10, g]);
+      translate([0, 0]) square([g, divide_shaft_l + g]);
+      translate([0, divide_shaft_l]) square([divide_head_dx + g, g]);
+      translate([dx, divide_shaft_l]) square([g, divide_head_th + g]);
+    }
+    translate([-0.1, divide_shaft_l + divide_head_th])
+      square([divide_shaft_w + divide_head_dx + g, g]);
+  }
+}
+
 module MainPlan(){
   difference(){
     union(){
-      circle(r = tube_or);
+      hull(){
+	for (t=[0, tube_rear_extra_th])
+	  translate([0, -t])
+	    circle(r = tube_or);
+      }
       translate([-back_ohw,0]) mirror([0,1])
 	square([back_ohw*2, backflange_ymin]);
+
+      translate([0, lock_0y]){
+	oval(lock_or);
+      }
+
+      hull(){
+	JoinCircs(0.01);
+	polygon([[0,0], lock_0, [-lock_0[0], lock_0[1]]]);
+      }
     }
+
     circle(r = tube_dia/2);
     translate([-back_gap/2,1]) mirror([0,1])
       square([back_gap, backflange_ymin+2]);
-  }
-  translate([0, lock_0y]){
-    difference(){
-      union(){
-	oval(lock_or);
-      }
+
+    translate([0, lock_0y]){
       oval([lock_w/2, lock_d/2]);
     }
+
+    JoinCircs(join_cr);
   }
 }
 
@@ -178,4 +243,4 @@ module TestClipBoltHole(){ //// toplevel
 //TestTopEdge();
 //TestClipBoltHole();
 
-//Bracket();
+Bracket();