fairphone-case: wip hinge, HingerBaseProfile

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

diff --git a/fairphone-case.scad b/fairphone-case.scad
index f25c1998addeea49973f00fe2634d7dda1a864ea..da109ffd0f6fbc9ee8ecdd95be3589be93981594 100644 (file)
--- a/fairphone-case.scad
+++ b/fairphone-case.scad
@@ -390,6 +390,17 @@ module HingeLidProfile(){
   }
 }
 
+module HingeBaseProfile(){
+  difference(){
+    hull(){
+      circleat(hppB, hp_r1);
+      circleat(epp2o, case_th_bottom);
+      circleat(hppB + [10,0], hp_r1);
+    }
+    polygon([epp5, epp1, epp2i, epp3, bppL]);
+  }
+}
+
 module CaseBase(){
   AroundEdges(epp3[1], case_th_bottom, 1)
     EdgeProfile();
@@ -653,6 +664,7 @@ module DemoProfiles(){ ////toplevel
     %LidEdgeProfile();
     %EdgeProfile();
     color("blue") HingeLidProfile();
+    color("red")  HingeBaseProfile();
   }
 }