chiark / gitweb /
fairphone-case: prop: make more variables special and introduce PropProfileAssignment...
[reprap-play.git] / fairphone-case.scad
index 7e50afa507c8034b40d1a44db8fe6b9f17d1b4ef..fb75586d32d7f93b207a55e616e48a9d945cb068 100644 (file)
@@ -119,8 +119,11 @@ prop_main_th = 3;
 prop_taper_len = 6;
 prop_main_width = 3;
 prop_side_gap = 0.75; // each side
+prop_lidrecess_behind = 0.75;
 prop_caserecess_behind = 0.75;
-prop_caserecess_taper = 0.25; // each side
+prop_caserecess_taper = 0.45; // one side only
+prop_prop_gap = 0.5;
+prop_prong_heel_slope = 0.5;
 
 // ---------- calculated ----------
 
@@ -129,6 +132,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);
 
@@ -258,11 +263,25 @@ prcp2 = [ epp4[0] + prop_buildout_less,
 
 prop_caserecess_buildout_r = -1; // prcp2[0] - epp2o[0];
 
-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_r10o
+  + [1,0] * prop_lidrecess_behind
+  + [0,1] * prop_recess_under;
+
+// prop
+
+$prpp10 = [0,0];
+$prpp11 = [0, prop_taper_len];
+
+$prp_r10 = prl_r10;
+
 // ---------- modules ----------
 
 module KeeperProfile(slant=0){
@@ -603,6 +622,102 @@ module CaseBase(){
     EdgeProfile();
 }
 
+function prop_x(gamma) = hp_k / (2 * sin(gamma/2)) - hppT[0];
+
+module PropProfileAssignments(gamma){
+  // https://en.wikipedia.org/wiki/Solution_of_triangles#Two_sides_and_the_included_angle_given_(SAS)
+  x = prop_x(gamma);
+  p = phone_height - prlp10[0] - hppB[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));
+  $prp_alpha = acos( (b*b + c*c - a*a) / (2*b*c) );
+
+  $prp_theta = 90 - $prp_alpha;
+  beta = 180 - $prp_alpha - gamma;
+  psi = 90 - beta;
+
+  //echo("abc", a,b,c);
+
+  v1 = [ [ cos(psi), -sin(psi) ],    // x
+        [ sin(psi),  cos(psi) ] ];  // y
+
+  $prpp7 = [0, c + (lpp13[1] - $prpp10[1]) ];
+
+  $prp_r1 = prc_r1;
+  $prp_r11 = prop_main_th/2;
+
+  $prpp1 = $prpp7 + [1,0] *
+    // this is approximate, but will do
+    (prop_main_th/2 + prop_prop_gap + prcp1[0] - epp4[0]);
+  $prpp3 = $prpp1 +
+    v1[0] * -$prp_r1 +
+    v1[1] * ((prcp2[1] - prcp1[1]) - prop_prop_gap);
+  $prpp12 = $prpp3 + v1[0] *
+    (prop_end_dia + prop_caserecess_taper * ($prpp1[1] - $prpp3[1]));
+  $prp_r8 = prop_main_th;
+  $prpp4 = [ prop_main_th/2, $prpp3[1] ];
+  $prp_r5 = $prp_r8;
+  $prpp5 = [ $prpp12[0] - $prp_r5,
+           $prpp3[1] - prop_prong_h + $prp_r5 ];
+  $prpp6 = $prpp4 + [0,-1] * (prop_prong_h +
+         prop_prong_heel_slope * ($prpp5[0] - $prpp4[0]));
+  $prpp8 = $prpp4 + [0,-1] * $prp_r8;
+  $prpp9 = $prpp8 + [-1,0] * $prp_r8;
+
+  children();
+}
+
+module PropProfile(gamma, cut=0, rot=0){ ////toplevel
+  PropProfileAssignments(gamma){
+
+    //#circleat($prpp3,1);
+    //#circleat($prpp12,1);
+
+    if (!cut) {
+      hull(){
+       translate($prpp8)
+         intersection(){
+           circle($prp_r8);
+           polygon([[-20,-0], [0,0], [20,20]]);
+         }
+       rectfromto($prpp6, $prpp9);
+       translate($prpp5) intersection(){
+         circle($prp_r5);
+         polygon([[-10,-10], [0,0], [10,0]]);
+       }
+       rectfromto($prpp12 + [0,-0.1], $prpp3);
+      }
+      hull(){
+       circleat($prpp1, $prp_r1);
+       rectfromto($prpp12 + [0,-0.1], $prpp3);
+      }
+    }
+    // main shaft
+    rotate([0,0, rot*-$prp_theta]){
+      hull(){
+       extra = cut ? prop_recess_slop : 0;
+       rectfromto($prpp6, $prpp9);
+       circleat($prpp11, $prp_r11 + extra);
+       circleat($prpp10, $prp_r10 + extra);
+      }
+    }
+  }
+}
+
+module PropAggregateProfile(){
+  for (angle = prop_angles)
+    PropProfile(angle, 0,0);
+}
+
+module Prop(){ ////toplevel
+  hw = prop_main_width/2;
+  linextr(-hw, +hw)
+    PropAggregateProfile();
+}
+
 module Case(){ ////toplevel
   difference(){
     union(){
@@ -748,6 +863,15 @@ module Lid(){ ////toplevel
 
     // screw holes in the hinge arms
     HingeScrews();
+
+    // prop recess
+    translate([prop_x_pos, -prlp10[0], prlp10[1]])
+      rotate([90,0,90])
+      linextr(-prop_recess_hw, +prop_recess_hw)
+      mirror([1,0])
+      hull()
+      for (pa = prop_angles)
+       PropProfile(pa, 1,1);
   }
 }
 
@@ -876,19 +1000,6 @@ module LidPrint(){ ////toplevel
     Lid();
 }
 
-module TestSelectPropRecesses(posns){
-  linextr(-100,100){
-    translate([phone_width/2, -phone_height]){
-      square([ 3, 500 ], center=true);
-      for (y=posns)
-       hull()
-         for (dy=[ -prp5[0], -prp2[0] ])
-           translate([0,y+dy])
-             square([prop_main_width+5, 5], center=true);
-    }
-  }
-}
-
 module TestSelectFrame(){
   include = [1,-1] * (epp2i[0] + 4);
 
@@ -902,7 +1013,6 @@ module TestSelectFrame(){
 
 module TestSelectLidFrame(){
   TestSelectFrame();
-  TestSelectPropRecesses(prop_lid_posns);
 }
 
 module TestFrameCase(){ ////toplevel
@@ -945,6 +1055,40 @@ module HingeScrews(){
   }
 }
 
+module DemoPropAngleSelect(c){
+  color(c) difference(){
+    union(){ children(); }
+    translate([ prop_x_pos, -400, -200 ])
+      cube([ 400,800,400 ]);
+  }
+}
+
+module DemoPropAngle(ang){
+  hL = [0, -(phone_height - hppT[0]), hppT[1] - hp_k*2];
+  hC = [0, -(phone_height - hppB[0]), hppB[1]];
+
+  translate(hL)
+    rotate([ang/2,0,0])
+    translate(-hL)
+    translate(hC)
+    rotate([ang/2,0,0])
+    translate(-hC) {
+      DemoPropAngleSelect("red") Case();
+
+      color("orange")
+       translate([prop_x_pos, -prcp1[0], prcp1[1]])
+       rotate([90,0,-90])
+       Prop();
+    }
+
+  translate([0,0, -hp_k*2])
+    DemoPropAngleSelect("blue") Lid();
+}
+
+module DemoPropAngles(){ ////toplevel
+  DemoPropAngle(15);
+}
+
 module DemoFrame(){ ////toplevel
   color("red") TestFrameCase();
   color("blue") intersection(){ Lid(); TestSelectLidFrame(); }
@@ -1010,6 +1154,19 @@ module DemoProfiles(){ ////toplevel
     color("blue") CatchCatchProfile();
     color("red") difference(){ EdgeProfile(); CatchCutProfile(); }
   }
+
+  translate([40,-30]) {
+    difference(){
+      LidEdgeProfile();
+      translate(prlp10)
+       PropProfile(10, 1, 0);
+    }
+    translate(prlp10)
+      PropProfile(15, 0);
+  }
+  translate([60,-30]) {
+    PropAggregateProfile();
+  }
 }
 
 //EdgeProfile();