fairphone-case: LidEdge

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>

diff --git a/fairphone-case.scad b/fairphone-case.scad
index ddf57918fac04a4189845b384d6bbbddfe39727f..bfa7d41242f2e5259d873e99aedfc190c2836a89 100644 (file)
--- a/fairphone-case.scad
+++ b/fairphone-case.scad
@@ -29,6 +29,10 @@ keeper_gap_x_holes = 0.75;
 
 case_lip = 1.25;
 
+lid_gap_x = 0.25;
+lid_gap_z = 0.25;
+lid_lip = 1.75;
+
 $fa = 5;
 $fs = 0.1;
 
@@ -53,6 +57,11 @@ kppb = [ kppe[0] - keeper_th_x, kppc[1] ];
 kppf = kppe - [0,1] * keeper_inner_height;
 kppa = [ kppb[0], kppf[1] ];
 
+lpp10 = [ epp5[0] + lid_gap_x, kppc[1] + lid_gap_z ];
+lpp11 = [ lpp10[0],            epp5[1] + lid_gap_z ];
+lpp12 = [ epp4[0] + lid_lip,   lpp11[1] ];
+lpp13 = [ lpp12[0],            lpp12[1] + lid_lip ];
+
 module rectfromto(a,b) {
   ab = b - a;
   translate([min(a[0], b[0]), min(a[1], b[1])])
@@ -79,6 +88,21 @@ module EdgeProfile(){
   }
 }
 
+module LidEdgeProfile(){
+  polygon([ lpp10,
+           lpp11,
+           lpp12,
+           lpp13,
+           lpp13 + [10, 0],
+           lpp10 + [10, 0]
+           ]);
+  intersection(){
+    circleat(lpp12, r=lid_lip);
+    rectfromto( lpp12 + [-10,   0],
+               lpp12 + [+10, +10] );
+  }
+}
+
 module CaseBase_rhsflip(yn=[0,1]) {
   for (rhs=yn) {
     translate([phone_width/2, 0, 0])
@@ -205,8 +229,17 @@ module Keeper(){ ////toplevel
     OneKeeper();
 }
 
+module DemoProfiles(){ ////toplevel
+  LidEdgeProfile();
+  %EdgeProfile();
+  KeeperProfile();
+}
+
 //EdgeProfile();
 //KeeperProfile();
 //CaseBase();
 //%Case();
 //Keeper();
+//LidEdgeProfile();
+//KeeperProfile();
+//DemoProfiles();