X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=blobdiff_plain;f=lock-inframe-bracket.scad;h=362bffdfb160a3a28c213d6dc74a425a51375713;hb=03d4ca44acf9913cf1de0bba38b56f72dc39fa3c;hp=d25e373a43885b5c6ccbae0a3c49b4af157263ff;hpb=4102833288a860f53df35fbd023df44933aec3f0;p=reprap-play.git

diff --git a/lock-inframe-bracket.scad b/lock-inframe-bracket.scad
index d25e373..362bffd 100644
--- a/lock-inframe-bracket.scad
+++ b/lock-inframe-bracket.scad
@@ -10,14 +10,15 @@ lock_w = 42.5 + 0.5;
 lock_d = 28.0 + 0.5;
 main_h = 45.0;
 backflange_d = 12;
+backflange_hole_dy = -1;
 lockshaft_dia = 14.35;
 
 cliprecess_h = 16;
 total_h = 45;
 
-back_gap = 10.5;
-main_th = 3.25;
-tube_th = 3.75;
+back_gap = 12.5;
+main_th = 3.50;
+tube_th = 4.00;
 
 midweb_d = 3;
 clip_th = 3.5;
@@ -27,6 +28,8 @@ clip_d = 22.0;
 mountscrew_dia = 4 + 0.5;
 clipbolt_dia = 5 + 0.6;
 
+mountscrew_washer = 10;
+
 backflange_th = 4.5;
 
 $fn=50;
@@ -46,6 +49,8 @@ divide_angle = 26;
 divide_fudge_r = 4.75;
 divide_around = 3.5;
 
+backflange_angle = 20;
+
 // calculated
 
 lockshaft_r = [1, 1] * lockshaft_dia / 2;
@@ -53,7 +58,7 @@ front_th = main_th;
 
 tube_or = tube_dia/2 + tube_th;
 back_ohw = back_gap/2 + backflange_th;
-backflange_ymin = tube_or+backflange_d;
+backflange_ymin = tube_dia/2 + backflange_d;
 
 lock_0y = tube_dia/2 + lock_d/2 + midweb_d;
 lock_0x = lock_w/2 - lock_d/2;
@@ -120,7 +125,7 @@ module DividePlanInPlace(xl=10){
     DividePlan(xl);
 }
 
-module MainPlan(){
+module MainPlan(){ ////toplevel
   difference(){
     union(){
       difference(){
@@ -130,7 +135,8 @@ module MainPlan(){
 	      translate([0, -t])
 		circle(r = tube_or);
 	  }
-	  translate([-back_ohw,0]) mirror([0,1])
+	  rotate([0,0, backflange_angle])
+	    translate([-back_ohw,0]) mirror([0,1])
 	    square([back_ohw*2, backflange_ymin]);
 
 	  translate([0, lock_0y]){
@@ -143,7 +149,8 @@ module MainPlan(){
 	  }
 	}
 
-	translate([-back_gap/2,1]) mirror([0,1])
+	rotate([0,0, backflange_angle])
+	  translate([-back_gap/2,1]) mirror([0,1])
 	  square([back_gap, backflange_ymin+2]);
 
 	JoinCircs(join_cr);
@@ -207,18 +214,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_dia/2 -0.5*backflange_d + backflange_hole_dy,
+		   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,
@@ -235,14 +248,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])
@@ -252,7 +265,7 @@ module TestTopEdge(){ //// toplevel
   }
 }
 
-module TestClipBoltHole(){ //// toplevel
+module TestClipBoltHole(){ ////toplevel
   intersection(){
     union(){
       translate([0, 0, -5])
@@ -265,6 +278,17 @@ 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);
+}
+
+module DividePlanDemo(){ ////toplevel
+  DividePlan();
+}
+
 //MainPlan();
 //ClipElevationPositive();
 //ClipElevation();
@@ -272,7 +296,6 @@ module TestClipBoltHole(){ //// toplevel
 //%ThroughHoles();
 //TestTopEdge();
 //TestClipBoltHole();
-//DividePlan();
 
-Bracket();
+//Bracket();