From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sat, 1 Aug 2015 16:36:25 +0000 (+0100)
Subject: pull-cord-keeper: wip, before reorg for ovals
X-Git-Tag: filamentspool-v2-release~179
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?p=reprap-play.git;a=commitdiff_plain;h=98e8b71a90856a50147edcce3c30a6836648f497

pull-cord-keeper: wip, before reorg for ovals
---

diff --git a/pull-cord-keeper.scad b/pull-cord-keeper.scad
new file mode 100644
index 0000000..b7a6aa7
--- /dev/null
+++ b/pull-cord-keeper.scad
@@ -0,0 +1,34 @@
+// -*- C -*-
+
+hoopthick = 3;
+
+hinnerrad = 15;
+houterrad = hinnerrad + hoopthick;
+hcentredist = 10;
+
+blockdepth = 5;
+blockwidth = hcentredist*2 + 6;
+
+module Oval(centredist, rad) {
+  hull() {
+    translate([-centredist/2,0,0]) circle(r=rad);
+    translate([+centredist/2,0,0]) circle(r=rad);
+  }
+}  
+
+module Hoop(){
+  difference(){
+    Oval(hcentredist, houterrad);
+    Oval(hcentredist, hinnerrad);
+  }
+}
+
+module Positive(){
+  Hoop();
+  translate([0, (blockdepth + hoopthick)/2 + hinnerrad])
+    square([blockwidth,
+	    blockdepth + hoopthick],
+	   center=true);
+}
+
+Positive();