X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=blobdiff_plain;f=lock-inframe-bracket.scad;h=1267b9ffc3ba22b2b84112d4eaac08a5f2e85bae;hb=ae2f3d6abf054e8eddbd39798a10f291470e78cd;hp=5fe3daa986a3a4aa73decbf22ddf899eec0b6143;hpb=72d405afa6d05ae423d8526048d24ea54c0861bd;p=reprap-play.git

diff --git a/lock-inframe-bracket.scad b/lock-inframe-bracket.scad
index 5fe3daa..1267b9f 100644
--- a/lock-inframe-bracket.scad
+++ b/lock-inframe-bracket.scad
@@ -1,5 +1,8 @@
 // -*- C -*-
 
+// use shell thickness 1.50
+// use fill density 40%
+
 include <funcs.scad>
 
 tube_dia = 27.5 + 1.625;
@@ -12,9 +15,9 @@ lockshaft_dia = 14.35;
 cliprecess_h = 16;
 total_h = 45;
 
-back_gap = 11;
-main_th = 2.5;
-tube_th = 2.25;
+back_gap = 12.5;
+main_th = 3.50;
+tube_th = 4.00;
 
 midweb_d = 3;
 clip_th = 3.5;
@@ -22,13 +25,30 @@ clip_gap = 2.5;
 clip_d = 22.0;
 
 mountscrew_dia = 4 + 0.5;
-clipbolt_dia = 5 + 0.1;
+clipbolt_dia = 5 + 0.6;
+
+mountscrew_washer = 10;
 
 backflange_th = 4.5;
 
 $fn=50;
 
-join_cr = 7;
+join_cr = 9;
+
+tube_rear_extra_th = 1;
+
+divide_shaft_w = 1.75;
+divide_shaft_l = 1.5;
+divide_head_dx = 1.75;
+divide_head_th = 1.5;
+divide_gap = 0.50;
+divide_heads = 2;
+
+divide_angle = 26;
+divide_fudge_r = 4.75;
+divide_around = 3.5;
+
+backflange_angle = 20;
 
 // calculated
 
@@ -57,6 +77,7 @@ 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 );
@@ -75,32 +96,79 @@ module JoinCircs(jr){
   }
 }
 
+module DividePlan(xl=10){
+  w = divide_shaft_w;
+  g = divide_gap;
+  l = divide_shaft_l + g;
+  t = divide_head_th + g;
+  dx = divide_head_dx;
+  for (m=[0,1]) mirror([m,0]) {
+    translate([w, 0]) square([xl, g]);
+    for (i=[0:divide_heads-1]) {
+      translate([w, i*(l + t)]) {
+	translate([0, 0]) square([g, l + g]);
+	translate([0, l]) square([divide_head_dx + g, g]);
+	translate([dx, l]) square([g, t + g]);
+	translate([0, l + t])
+	  square([divide_head_dx + g, g]);
+      }
+    }
+    translate([-0.1, (l + t) * divide_heads])
+      square([w + g, g]);
+  }
+}
+
+module DividePlanInPlace(xl=10){
+  rotate([0,0, -divide_angle])
+    translate([ -tube_dia/2 -tube_th/2 - divide_fudge_r, 0])
+    DividePlan(xl);
+}
+
 module MainPlan(){
   difference(){
     union(){
-      circle(r = tube_or);
-      translate([-back_ohw,0]) mirror([0,1])
-	square([back_ohw*2, backflange_ymin]);
-
-      translate([0, lock_0y]){
-	oval(lock_or);
+      difference(){
+	union(){
+	  hull(){
+	    for (t=[0, tube_rear_extra_th])
+	      translate([0, -t])
+		circle(r = tube_or);
+	  }
+	  rotate([0,0, backflange_angle])
+	    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]]]);
+	  }
+	}
+
+	rotate([0,0, backflange_angle])
+	  translate([-back_gap/2,1]) mirror([0,1])
+	  square([back_gap, backflange_ymin+2]);
+
+	JoinCircs(join_cr);
       }
 
       hull(){
-	JoinCircs(0.01);
-	polygon([[0,0], lock_0, [-lock_0[0], lock_0[1]]]);
+	minkowski(){
+	  DividePlanInPlace(0.1);
+	  circle(divide_around);
+	}
       }
     }
-
-    circle(r = tube_dia/2);
-    translate([-back_gap/2,1]) mirror([0,1])
-      square([back_gap, backflange_ymin+2]);
-
     translate([0, lock_0y]){
       oval([lock_w/2, lock_d/2]);
     }
 
-    JoinCircs(join_cr);
+    circle(r = tube_dia/2);
+
+    DividePlanInPlace();
   }
 }
 
@@ -145,18 +213,24 @@ module ExtrudeClipElevation(extra=0){
     children(0);
 }
 
-module ThroughHole(r, y, z) {
-  translate([-50, y, z])
+module ThroughHole(r, y, z, x=-50) {
+  translate([x, y, z])
     rotate([0, 90, 0])
     cylinder(r=r, h=100, $fn=20);
 }
 
-module ThroughHoles(){
+module MountingHoleCylinders(r, x=-50){
   for (z=[ 1/4, 3/4 ]) {
-    ThroughHole( mountscrew_dia/2,
-		 -tube_or -0.5*backflange_d,
-		 total_h * z );
+    rotate([0,0, backflange_angle])
+      ThroughHole( r,
+		   -tube_or -0.5*backflange_d,
+		   total_h * z,
+		   x);
   }
+}
+
+module ThroughHoles(){
+  MountingHoleCylinders(mountscrew_dia/2);
 
   ThroughHole( clipbolt_dia/2,
 	       lock_0y + lock_d/2 + clip_d/2 + front_th/2,
@@ -173,14 +247,14 @@ module MainPositive(){
   }
 }
 
-module Bracket(){ //// toplevel
+module Bracket(){ ////toplevel
   difference(){
     MainPositive();
     ThroughHoles();
   }
 }
 
-module TestTopEdge(){ //// toplevel
+module TestTopEdge(){ ////toplevel
   intersection(){
     translate([0,0, -total_h])
       translate([0,0, 4])
@@ -190,7 +264,7 @@ module TestTopEdge(){ //// toplevel
   }
 }
 
-module TestClipBoltHole(){ //// toplevel
+module TestClipBoltHole(){ ////toplevel
   intersection(){
     union(){
       translate([0, 0, -5])
@@ -203,6 +277,13 @@ module TestClipBoltHole(){ //// toplevel
   }
 }
 
+module Demo(){ ////toplevel
+  Bracket();
+  color("blue") MountingHoleCylinders(mountscrew_dia/2 - 0.1);
+  color("black") MountingHoleCylinders(mountscrew_washer/2,
+				       back_ohw + 0.25);
+}
+
 //MainPlan();
 //ClipElevationPositive();
 //ClipElevation();
@@ -210,5 +291,7 @@ module TestClipBoltHole(){ //// toplevel
 //%ThroughHoles();
 //TestTopEdge();
 //TestClipBoltHole();
+//DividePlan();
 
 //Bracket();
+