From 3796db1f56c3c193bfe06857ee81f08a5541f4ca Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Mon, 10 Sep 2018 00:33:36 +0100
Subject: [PATCH] sleepphone-cable-box: wip

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
---
 sleepphone-cable-box.scad | 39 +++++++++++++++++++++++++++++++++------
 1 file changed, 33 insertions(+), 6 deletions(-)

diff --git a/sleepphone-cable-box.scad b/sleepphone-cable-box.scad
index 9b7c9cd..d422420 100644
--- a/sleepphone-cable-box.scad
+++ b/sleepphone-cable-box.scad
@@ -3,7 +3,7 @@
 include <funcs.scad>
 
 wall = 0.75 * [1,1,1];
-phone = [ 76.40, 30.96, 6.26 ];
+phone = [ 76.40, 30.96, 6.26 ]; // includes socket
 phone_button_z = 6.58;
 minwall = 0.25;
 
@@ -23,6 +23,10 @@ plug_minw=   6.53 + 0.35;
 plug_sllen=  6.50;
 plug_totlen = 84.90; // to maxw, including phone
 
+plug_h = 6.5;
+plug_tooth_h = 0.5;
+plug_tooth_dy = 0.5;
+
 keeper_prong = 2;
 
 // calculated
@@ -33,6 +37,14 @@ top_z = max( phone[2] + wall[2],
 
 plugkeeper_x_maxw = phone[0] - plug_totlen;
 
+plugkeeper_p_max = [ 0, plug_maxw/2 ];
+plugkeeper_p_min = [ -plug_sllen, plug_minw/2 ];;
+plugkeeper_d_u = unitvector2d(
+                 clockwise2d(
+                 vecdiff2d( plugkeeper_p_max, plugkeeper_p_min )
+			     )
+			     );
+
 module MainProfileInnerHalf(){
   p = phone + phone_slop;
   pb = phone_button_z + phone_slop[2];
@@ -69,10 +81,10 @@ module BoxMain(){
   }
 }
 
-module PlugKeeperProfile(){
-  p_max = [ 0, plug_maxw/2 ];
-  p_min = [ -plug_sllen, plug_minw/2 ];
-  d = unitvector2d(clockwise2d(vecdiff2d(p_min, p_max))) * keeper_prong;
+module PlugKeeperProfileHalf(){
+  p_max = plugkeeper_p_max;
+  p_min = plugkeeper_p_min;
+  d = plugkeeper_d_u * keeper_prong;
   
   translate([ plugkeeper_x_maxw, 0 ]) {
     polygon([ p_min,
@@ -82,6 +94,19 @@ module PlugKeeperProfile(){
   }
 }
 
+module PlugKeeper(){
+  for (m=[0,1]) mirror([0,m,0]) {
+      translate([0,0, -wall[2]])
+	linear_extrude(height=plug_h + wall[2])
+	PlugKeeperProfileHalf();
+
+      translate([0, 0, plug_h - plug_tooth_h])
+	linear_extrude(height= plug_tooth_h)
+	translate(plugkeeper_d_u * -plug_tooth_dy)
+	PlugKeeperProfileHalf();
+    }
+}
+
 module Box(){
   difference(){
     BoxMain();
@@ -89,8 +114,10 @@ module Box(){
     translate([ led[0], phone[1]/2 - led[1], 1 ])
       cylinder(r = led_dia/2, h= phone[2]*2, $fn=20);
   }
+
+  PlugKeeper();
 }
 
 //MainProfileInner();
 Box();
-linear_extrude(h=1) PlugKeeperProfile();
+
-- 
2.30.2