From 0f072ba2644f3e9529777184d00dfc7097592a44 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Mon, 31 Aug 2015 23:07:51 +0100
Subject: [PATCH] pull-cord-keeper: Add RoundEdges

---
 pull-cord-keeper.scad | 21 +++++++++++++++++++++
 1 file changed, 21 insertions(+)

diff --git a/pull-cord-keeper.scad b/pull-cord-keeper.scad
index d225fb1..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;
@@ -56,6 +58,23 @@ 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(){
   difference(){
     VExtrude()
@@ -65,6 +84,8 @@ module Positive(){
       translate([0,0,-50])
       cylinder(r=screwholedia/2, h=100);
   }
+
+  RoundEdges();
 }
 
 module Ribs(){
-- 
2.30.2