From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Tue, 27 May 2014 21:20:14 +0000 (+0100)
Subject: brompton-computer-guard: have holes
X-Git-Tag: filamentspool-v2-release~373^2
X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=commitdiff_plain;h=8622f62da0556fe4042b37ec9d9f94f28a03053c;p=reprap-play.git

brompton-computer-guard: have holes
---

diff --git a/brompton-computer-guard.scad b/brompton-computer-guard.scad
index aaeaa7b..b720bf1 100644
--- a/brompton-computer-guard.scad
+++ b/brompton-computer-guard.scad
@@ -6,6 +6,10 @@ end_width = 25;
 
 arch_thick = 5;
 
+arch_breadth = 25;
+
+hole_dia = 3 + 0.5;
+
 // computed
 
 arch_alpha = atan(arch_height / (arch_width/2));
@@ -16,12 +20,8 @@ arch_to_chord = arch_in_rad * cos(arch_beta);
 
 end_thick = arch_thick;
 
-//arch_to_chord = (arch_width/2)*(arch_width/2)/arch_height;
-//arch_in_rad = arch_to_chord + arch_height;
-//arch_in_rad2 = sqrt(arch_to_chord*arch_to_chord +
-//		    (arch_width/2)*(arch_width/2));
-
-//echo(arch_in_rad, arch_in_rad2);
+holes = [[[  5  , 5  ], [16  , 21]], // left
+	 [[ 18.5, 4.5], [ 4.5, 22]]]; // right
 
 module ArchProfile(){
   intersection(){
@@ -40,7 +40,26 @@ module ArchProfile(){
 	  square([end_width, end_thick]);
     }
   }
-  %square([arch_width/2,arch_height]);
 }
 
-ArchProfile();
+module Holes(){
+  for (m=[0,1]) {
+    mirror([1-m,0])
+      translate([arch_width/2, 50, 0])
+      rotate([90,0,0])
+      for (h=holes[m]) {
+	translate(h)
+	  cylinder(r=hole_dia/2, h=100, $fn=20);
+      }
+  }
+}
+
+module Arch(){
+  difference(){
+    rotate([0,0,180])
+      linear_extrude(height=arch_breadth) ArchProfile();
+    Holes();
+  }
+}
+
+Arch();