From 721af5823601915ba96703f4b2d4dd9d5c80d7ed Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sun, 21 Oct 2012 18:33:32 +0100
Subject: [PATCH] xeno-drivebay-bracket wip

---
 xeno-drivebay-bracket.scad | 47 ++++++++++++++++++++++++++++++++++++++
 1 file changed, 47 insertions(+)
 create mode 100644 xeno-drivebay-bracket.scad

diff --git a/xeno-drivebay-bracket.scad b/xeno-drivebay-bracket.scad
new file mode 100644
index 0000000..66b520e
--- /dev/null
+++ b/xeno-drivebay-bracket.scad
@@ -0,0 +1,47 @@
+// -*- C -*-
+
+basel = 20;
+basew = 27;
+baset = 4.0;
+
+wallt = 4.0;
+
+wallh = 42;
+
+baseholesz = 4; // fixme check
+baseholeslot = 4;
+
+holeslop = 0.5;
+
+walll = basel;
+wallholeh = 6+14+2;
+wallholesz = 3.0; // fixme check
+wallholeslot = 3.0;
+
+module slothole(sz, slot, thick) {
+  hull(){
+    for (y = [-slot/2,slot/2]) {
+      translate([0,y,-0.05])
+	cylinder(r1=sz/2 + holeslop,
+		 r2=sz/2+thick + holeslop,
+		 h=thick+0.10);
+    }
+  }
+}
+
+difference(){
+  translate([0, -basew, 0])
+    cube([basel, basew, baset]);
+
+  translate([basel/2, -(basew+wallt)/2, 0])
+    slothole(baseholesz, baseholeslot, baset);
+}
+
+difference(){
+  translate([0, -wallt, 0])
+    cube([walll, wallt, wallh]);
+
+  translate([basel/2, 0, wallholeh])
+    rotate([90,0,0])
+    slothole(wallholesz, wallholeslot, wallt);
+}
-- 
2.30.2