X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=blobdiff_plain;f=fairphone-case.scad;h=5ade84ab54bbd576d04d2a6381669717bc76789c;hb=364b586a023bc57aa5f485fcc3f73b5d98ba9234;hp=7e50afa507c8034b40d1a44db8fe6b9f17d1b4ef;hpb=01f2d7fbb1340046eac4242ab7fa40186ba031be;p=reprap-play.git

diff --git a/fairphone-case.scad b/fairphone-case.scad
index 7e50afa..5ade84a 100644
--- a/fairphone-case.scad
+++ b/fairphone-case.scad
@@ -120,7 +120,9 @@ prop_taper_len = 6;
 prop_main_width = 3;
 prop_side_gap = 0.75; // each side
 prop_caserecess_behind = 0.75;
-prop_caserecess_taper = 0.25; // each side
+prop_caserecess_taper = 0.35; // one side only
+prop_prop_gap = 0.5;
+prop_prong_heel_slope = 1.0;
 
 // ---------- calculated ----------
 
@@ -129,6 +131,8 @@ phone_height = (phone + bumper*2)[1];
 
 inside_br = [phone_width, -phone_height];
 
+prop_prong_h = prop_main_th;
+
 //echo(camera_pos_tl + bumper,
 //     camera_pos_br + bumper);
 
@@ -263,6 +267,18 @@ echo(prc_r3);
 prcp1 = [ epp2o[0],
 	  epp2i[1] - prc_r3 ];
 
+// prop recess in lid
+
+prl_r10 = prop_end_dia/2;
+prl_r10o = prl_r10 + prop_recess_slop;
+
+prlp10 = lpp10 + [1,1] * prl_r10a;
+
+// prop
+
+prpp10 = [0,0];
+prpp11 = [0, prop_taper_len];
+
 // ---------- modules ----------
 
 module KeeperProfile(slant=0){
@@ -603,6 +619,68 @@ module CaseBase(){
     EdgeProfile();
 }
 
+module PropProfile(gamma, cut=0){ ////toplevel
+  // https://en.wikipedia.org/wiki/Solution_of_triangles#Two_sides_and_the_included_angle_given_(SAS)
+  p = phone_height - prlp10[0] - hppB[0];
+  x = k / (2 * sin(gamma/2)) - hppT[0];
+  b = p + x;
+
+  q = phone_height - hppT[0]; // prpp7[0] is 0 by definition
+  a = q + x;
+  c = sqrt(a*a + b*b - 2*a*b*cos(gamma));
+  alpha = acos( (b*b + c*c - a*a) / (2*b*c) );
+
+  theta = 90 - alpha;
+  beta = 180 - alpha - gamma;
+  psi = 90 - beta + atan(prop_caserecess_taper);
+  prpv1 = [ sin(psi), cos(psi) ];
+
+  prpp7 = [0, c + (lpp13[1] - prpp10[1]) ];
+
+  prp_r1 = prc_r1;
+  prp_r11 = prp_main_th/2;
+
+  prpp1 = prpp7 + [1,0] *
+    // this is approximate, but will do
+    (prop_main_th/2 + prop_prop_gap + prcp1[0] - prcp1[1]);
+  prpp3 = prpp1 + [ -prp_r1,
+		    (prcp2[1] - prcp1[1]) - prop_prop_gap ];
+  prpp4 = [ prop_main_th/2, prpp3[1] ];
+  prp_r5 = prop_end_dia/2;
+  prpp5 = [ prpp1[0], prpp3[1] - prop_prong_h + prp_r5 ];
+  prpp6 = prpp4 + [0,-1] * (prop_prong_h +
+         prop_prong_heel_slope * (prpp5[0] - prpp4[0]));
+  prp_r8 = prop_main_th/2;
+  prpp8 = prpp4 + [0,-1] * prp_r8;
+  prpp9 = prpp8 + [-1,0] * prp_r8;
+  prpp12 = prpp3 + [0,1] * prop_end_dia;
+
+  if (!cut) {
+    hull(){
+      translate(prpp8)
+	intersection(){
+	  circle(prp_r8);
+	  rectfromto([-20,-0], [20,20]);
+        }
+      rectfromto(prpp6, prpp9);
+      circleat(prpp5, prp_r5);
+      rectfromto(prpp12 + [0,-0.1], prpp3);
+    }
+    hull(){
+      circleat(prpp1, prp_r1);
+      rectfromto(prpp12 + [0,-0.1], prpp3);
+    }
+  }
+  rotate([0,0, cut ? -theta : 0]){
+    hull(){
+      extra = cut ? prop_recess_slop : 0;
+      rectfromto(prpp6, prpp9);
+      circleat(prpp11, prp_r11 + extra);
+      circleat(prpp10, prp_r10 + extra);
+    }
+  }
+}
+
 module Case(){ ////toplevel
   difference(){
     union(){
@@ -1010,6 +1088,11 @@ module DemoProfiles(){ ////toplevel
     color("blue") CatchCatchProfile();
     color("red") difference(){ EdgeProfile(); CatchCutProfile(); }
   }
+
+  translate([40,-30]) {
+    %LidEdgeProfile();
+    PropProfile(10, 0);
+  }
 }
 
 //EdgeProfile();