From 35c4b6f9b1d613cd354d41697d7ef2e60631e5a3 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sun, 21 Oct 2012 19:59:58 +0100
Subject: [PATCH] xeno-drivebay-bracket fancy web shape, kit, etc.

---
 xeno-drivebay-bracket.scad | 32 +++++++++++++++++++++++++++++---
 1 file changed, 29 insertions(+), 3 deletions(-)

diff --git a/xeno-drivebay-bracket.scad b/xeno-drivebay-bracket.scad
index 3bbff79..cf2ea7b 100644
--- a/xeno-drivebay-bracket.scad
+++ b/xeno-drivebay-bracket.scad
@@ -67,8 +67,17 @@ module Bracket(){
       slothole(wallholesz, wallholeslot, wallt);
   }
 
-  translate([basel-0.01, -webw, 0])
-    cube([webt+0.02, webw, wallh]);
+  translate([basel-0.01, 0, 0]) {
+    rotate([90,0,90]) {
+      linear_extrude(height=webt+0.02) {
+	polygon([[-basew, 0],
+		 [-basew, baset],
+		 [-webw, wallh],
+		 [0, wallh],
+		 [0, 0]]);
+      }
+    }
+  }
 
   translate([basel+webt, -padw, wallh-padt]) {
     difference(){
@@ -79,4 +88,21 @@ module Bracket(){
   }
 }
 
-Bracket();
+module BracketR(){ ////toplevel
+  rotate([-90,0,0]) Bracket();
+}
+
+module BracketL(){ ////toplevel
+  mirror([1,0,0]) BracketR();
+}
+
+module Kit(){ ////toplevel
+  for (y=[0, -wallh-5]) {
+    translate([0,y,0]) {
+      translate([5,0,0]) BracketR();
+      BracketL();
+    }
+  }
+}
+
+Kit();
-- 
2.30.2