From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sun, 16 Dec 2012 18:59:29 +0000 (+0000)
Subject: cable-hole-trunking-cover: wip lid
X-Git-Tag: filamentspool-v2-release~606
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=commitdiff_plain;h=fbc81c95fdc3e34f74395960cea059bcc208f0fe;p=reprap-play.git

cable-hole-trunking-cover: wip lid
---

diff --git a/cable-hole-trunking-cover.scad b/cable-hole-trunking-cover.scad
index e6faa8e..9551d1e 100644
--- a/cable-hole-trunking-cover.scad
+++ b/cable-hole-trunking-cover.scad
@@ -4,6 +4,7 @@ holedia = 25.4;
 
 sidewidth = 5;
 tapewidth = 7;
+tapethick = 1;
 
 innerz = 10;
 
@@ -17,9 +18,11 @@ bevely = bevelz * bevelslope;
 sideslop = 0.5;
 
 basebaset = 2;
-basebevelt = 3;
+sidewallt = 3;
 
+lidt = 2;
 endwallt = 2;
+zslop = 0.75;
 
 module sheared_cube(sz, xperz, yperz) {
   multmatrix([[1,0,xperz,0],
@@ -33,8 +36,8 @@ module Base(){
   difference(){
     union(){
       for (mir=[0,1]) mirror([0,mir,0]) {
-	translate([0, basey/2 - basebevelt, 0])
-	  sheared_cube([basex, basebevelt, bevelz], 0, bevelslope);
+	translate([0, basey/2 - sidewallt, 0])
+	  sheared_cube([basex, sidewallt, bevelz], 0, bevelslope);
 	cube([basex, basey/2, basebaset]);
 	rotate([90, 0, 90])
 	  linear_extrude(height=endwallt)
@@ -51,9 +54,14 @@ module Base(){
 }
 
 module Lid(){
+  lidx = basex;
   for (mir=[0,1]) mirror([0,mir,0]) {
     translate([0, basey/2 + sideslop, 0])
-      sheared_cube([basex, basebevelt, bevelz], 0, bevelslope);
+      sheared_cube([lidx, sidewallt, bevelz], 0, bevelslope);
+    translate([0, basey/2 + sideslop + bevely, -tapethick])
+      cube([lidx, sidewallt, innerz + tapethick + lidt + zslop]);
+    translate([0, 0, innerz + zslop])
+      cube([lidx, basey/2 + sideslop + bevely + sidewallt, lidt]);
   }
 }