From 8c2692e5b50a4dd822bd8424262399539cdba871 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sun, 11 May 2014 22:48:25 +0100
Subject: [PATCH] brompton-computer-guard: wip, before rename coords

---
 brompton-computer-guard.scad | 56 ++++++++++++++++++++++++++++++++++++
 1 file changed, 56 insertions(+)
 create mode 100644 brompton-computer-guard.scad

diff --git a/brompton-computer-guard.scad b/brompton-computer-guard.scad
new file mode 100644
index 0000000..37d10e6
--- /dev/null
+++ b/brompton-computer-guard.scad
@@ -0,0 +1,56 @@
+// -*- C -*-
+
+cover_zsz = 45;
+cover_len = 70;
+
+attach_tube_dia = 18;
+
+attach_cx = -15;
+attach_cdz = -10;
+attach_w = 25;
+
+attach_inrad = 25; ///
+attach_hole_dist = 5; ///
+attach_hole_dia = 4 + 0.5; ///
+attach_ang = 45;
+
+// calculated
+
+cover_lcircle_r = cover_zsz / (1 + 1/sqrt(2));
+
+base_len = cover_len - cover_lcircle_r;
+
+attach_total_len =
+  attach_inrad + attach_tube_dia + attach_hole_dist + attach_hole_dia/2;
+
+module RearSideTemplate(){
+  polygon([[0.1,0],
+	   [-base_len,0],
+	   [-base_len,-cover_zsz],
+	   [0.1,      -cover_zsz]]);
+  translate([-base_len, -cover_zsz + cover_lcircle_r])
+    circle(r=cover_lcircle_r);
+}
+
+module AttachTemplate(){
+  hull(){
+//    polygon([[0,   0],
+//	     [-0.1, 0],
+//	     [-0.1, -cover_zsz],
+//	     [0,    -cover_zsz]]);
+    translate([attach_cx, -attach_cdz]) rotate([0,0,-attach_ang]) {
+      polygon([[-attach_cx,       attach_w/2],
+	       [0,                -attach_w/2],
+	       [attach_total_len, -attach_w/2],
+	       [attach_total_len, attach_w/2]]);
+      translate([attach_total_len, 0])
+	circle(r=attach_w/2);
+    }
+  }
+}
+
+//module Tube(){
+//  translate(
+
+color("blue") RearSideTemplate();
+AttachTemplate();
-- 
2.30.2