From 0ee91c87e26718c6a89393a071a8da8d2f05da18 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Wed, 28 Nov 2012 22:37:38 +0000
Subject: [PATCH] anke-gps-bracket: bevel the back

---
 anke-gps-bracket.scad | 17 +++++++++++++++++
 1 file changed, 17 insertions(+)

diff --git a/anke-gps-bracket.scad b/anke-gps-bracket.scad
index 5463bc7..112df37 100644
--- a/anke-gps-bracket.scad
+++ b/anke-gps-bracket.scad
@@ -4,6 +4,7 @@
 outerw = 120 - 0.5;
 outerh =  75 - 0.5;
 outert =  15;
+outerbackbevel = 3;
 
 // Dimensions of the bezel area round the edges
 bezelw =    11 - 0.5;
@@ -44,6 +45,19 @@ module GpsPlugPlug(slop){
     cube([effplugw, effplugh, outert+2]);
 }
 
+module GpsBodyOuterBevel(len){
+  translate([0,-1,0]) {
+    rotate([-90,0,0]) {
+      linear_extrude(height=len+2) {
+	polygon([[-outerbackbevel, 0],
+		 [ 0, outerbackbevel],
+		 [outerbackbevel, 0],
+		 [ 0, -outerbackbevel]]);
+      }
+    }
+  }
+}
+
 module GpsBody() { ////toplevel
   difference(){
     union(){
@@ -61,6 +75,9 @@ module GpsBody() { ////toplevel
 	  cube([plugstrutw, outerh-0.2, plugstrutt-0.10]);
     }
     GpsPlugPlug(0);
+    for (x=[0,outerw]) translate([x,0,0]) GpsBodyOuterBevel(outerh);
+    for (y=[0,outerh]) translate([0,y,0])
+      rotate([0,0,-90]) GpsBodyOuterBevel(outerw);
   }
 }
 
-- 
2.30.2