X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=blobdiff_plain;f=pull-cord-keeper.scad;h=b23ac47c30a2f2faa6578ea9b755467154662221;hb=0f072ba2644f3e9529777184d00dfc7097592a44;hp=4cdac3e9e80968b1a5caeaa7cf2a75beb9e3ca3c;hpb=50cad411fae12202d86992d4566485470006cbf1;p=reprap-play.git

diff --git a/pull-cord-keeper.scad b/pull-cord-keeper.scad
index 4cdac3e..b23ac47 100644
--- a/pull-cord-keeper.scad
+++ b/pull-cord-keeper.scad
@@ -11,6 +11,8 @@ blockwidth = hcentredist*2 + 6;
 
 height = 20;
 
+roundedgedia = 7.5;
+
 ziglen = hcentredist/2;
 
 feedxgap = 5;
@@ -20,6 +22,12 @@ ribsgap = 1;
 ribdepth = 3;
 ribheight = 4;
 
+backxgap = 1;
+
+blockoverlapcnr = 5;
+
+screwholedia = 4 + 0.5;
+
 module Oval(centredist, rad) {
   hull() {
     translate([-centredist/2,0,0]) circle(r=rad);
@@ -27,10 +35,20 @@ module Oval(centredist, rad) {
   }
 }  
 
+module VExtrude(){
+  translate([0,0, -height/2])
+    linear_extrude(height=20)
+    children(0);
+}
+
+module OuterOval(){
+  Oval(hcentredist, houterrad);
+}
+
 module Hoop(){
   difference(){
     hull(){
-      Oval(hcentredist, houterrad);
+      OuterOval();
       translate([0, (blockdepth + hoopthick)/2 + hinnerrad])
 	square([blockwidth,
 		blockdepth + hoopthick],
@@ -40,10 +58,34 @@ module Hoop(){
   }
 }
 
+module RoundEdges(){
+  intersection(){
+    VExtrude()
+      OuterOval();
+
+    for (xi=[-1,1]) {
+      for (yi=[-1,1]) {
+	translate([xi * (hcentredist/2 + hinnerrad),
+		   houterrad,
+		   yi * (height/2 - roundedgedia / 4 * sqrt(2))])
+	  rotate([90,0,0])
+	  cylinder(r=roundedgedia/2, h=houterrad*2, $fn=20);
+      }
+    }
+  }
+}
+
 module Positive(){
-  translate([0,0, -height/2])
-    linear_extrude(height=20)
-    Hoop();
+  difference(){
+    VExtrude()
+      Hoop();
+
+    rotate([90,0,0])
+      translate([0,0,-50])
+      cylinder(r=screwholedia/2, h=100);
+  }
+
+  RoundEdges();
 }
 
 module Ribs(){
@@ -62,27 +104,65 @@ module Ribs(){
   }
 }	    
 
-module Division(biggerpi) {
-  xgap = feedxgap * biggerpi;
-  zgap = feedzgap * biggerpi;
-
-  mirror([0,0,1])
-    translate([-ziglen + xgap/2, -100, zgap/2])
-    cube([100, 100, 50]);
-
-  translate([50, houterrad + blockdepth/2 + ribsgap * biggerpi, 0])
+module Division(cutmore) {
+  mirror([0,0,1]) {
+    translate([0, 0, -cutmore*feedzgap/2]) {
+      translate([-ziglen + -cutmore*feedxgap/2, -100, 0])
+	cube([100, 100, 50]);
+    }
+  }
+  translate([blockwidth/2 - blockoverlapcnr + -cutmore*backxgap/2,
+	     -1,
+	     -50])
+    cube([100, 100, 100]);
+
+  translate([ziglen + -cutmore*feedxgap/2,
+	     -50,
+	     -50])
+    cube([100, 51, 100]);
+
+  translate([50,
+	     hinnerrad/2 + houterrad/2 + blockdepth/2 + -cutmore*ribsgap/2,
+	     0])
     rotate([-90,0,90])
     linear_extrude(height=100)
     Ribs();
 }
 
-module Demo(){
+module SDemo(){
   //difference(){
   %  Positive();
   //  Division(0);
   //}
-  Division(0);
+  Division(-1);
+}
+
+module A(){
+  difference(){
+    Positive();
+    Division(+1);
+  }
+}
+
+module B(){
+  intersection(){
+    Positive();
+    Division(-1);
+  }
+}
+
+module Demo(){
+  color("red") A();
+  color("blue") B();
 }
 
 //Ribs();
+//Demo();
+
+//A();
+//B();
+//%Division(+1);
+
+//Hoop();
+
 Demo();