fairphone-case: wip lanyard, wip cutout

[reprap-play.git] / fairphone-case.scad

diff --git a/fairphone-case.scad b/fairphone-case.scad
index 4a774a56b78778d396bab49d13cb5f71a99a0e6e..50396258081ced9d3ea2224aa6363c6ae113714c 100644 (file)
--- a/fairphone-case.scad
+++ b/fairphone-case.scad
@@ -446,6 +446,11 @@ cppQ = [ cppR[0],
         cppV[1] - (catch_finger_height - cp_rQ) ];
 cppF = [ cppV[0] + catch_finger_depth, cppC[1] ];
 
+// lanyard
+
+ly_r = lanyard_half_dia / 2;
+ly_rc = ly_r * 2;
+
 // prop recess in case
 
 prop_x_pos = phone_width/2;
@@ -529,6 +534,61 @@ module LanyardLanyardProfile(entry=false){
   }
 }
 
+module LanyardCurveChannelProfile(){
+  translate([0, -ly_r])
+    LanyardLanyardProfile();
+}  
+
+module LanyardEntryChannelProfile(){
+  LanyardLanyardProfile(true);
+}  
+
+module LanyardMainChannelProfile(){
+  LanyardCurveChannelProfile();
+  difference(){
+    square(center=true, ly_r * [6, 2]);
+    for (xs=[-1,+1])
+      translate(ly_r * [3 * xs, -1])
+       circle(r = ly_r);
+  }
+}
+
+module LanyardEntry(){
+  q_z = -(ly_rc + ly_r);
+  d_x = -ly_rc;
+
+  translate([d_x, 0, q_z]) {
+    intersection(){
+      rotate([90,0,0])
+       rotate_extrude(convexity=10)
+       rotate(90)
+       translate([0, -q_z])
+       LanyardCurveChannelProfile();
+      translate([0,-10,0])
+       cube([20,20,20]);
+    }
+  }
+
+  mirror([0,0,1])
+    translate([0,0,-1])
+    linear_extrude(height=20)
+    rotate(-90)
+    LanyardEntryChannelProfile();
+}
+
+module LanyardCutout(l){
+  rotate([0,-90,0])
+    linear_extrude(height=l)
+    rotate(-90)
+    LanyardMainChannelProfile();
+
+  for (ee=[0,1]){
+    translate(ee * l * [-1,0])
+      mirror([ee,0,0])
+      LanyardEntry();
+  }
+}
+
 module LidEdgeProfile(){
   polygon([ lpp10,
            lpp11,
@@ -1524,6 +1584,10 @@ module DemoFrame(){ ////toplevel
   %HingeLever();
 }
 
+module DemoLanyardCutout(){ ////toplevel
+  LanyardCutout(25);
+}
+
 module DemoHingedFrame(){ ///toplevel
   color("red") TestFrameCase();
   translate([0,0, -2*hp_k])
@@ -1557,6 +1621,12 @@ module DemoProfiles(){ ////toplevel
       LanyardLanyardProfile(true);
   }
 
+  translate([0,20]) {
+    LanyardMainChannelProfile();
+    translate([0,0,1]) color("purple") LanyardCurveChannelProfile();
+    translate([0,0,-1]) color("red") LanyardEntryChannelProfile();
+  }
+
   translate([20,0]) {
     LidEdgeProfile();
     %EdgeProfile();