From 2505c819e66d84365a98ccc315848b14b0ffae87 Mon Sep 17 00:00:00 2001
From: Scott Worley <scottworley@scottworley.com>
Date: Sat, 7 Oct 2023 11:28:42 -0700
Subject: [PATCH] housing: Extra length for cord grip

---
 housing/tattlekey.scad | 15 +++++++++------
 1 file changed, 9 insertions(+), 6 deletions(-)

diff --git a/housing/tattlekey.scad b/housing/tattlekey.scad
index 015d847..1f5ea4c 100644
--- a/housing/tattlekey.scad
+++ b/housing/tattlekey.scad
@@ -8,6 +8,7 @@ key_interface_thickness = 1.484;
 housing_inner_h = 6;
 housing_inner_w = 21;
 housing_flat = 8;
+housing_extra_l = 10;
 
 thickness = 1.7;
 
@@ -32,9 +33,9 @@ module pico_hole(d, x, y) {
     cylinder(h=slop, d = d);
 }
 
-module pico_board(gap = 0) {
-    translate([-gap, 0, -gap])
-    cube([pico_board_l + 2*gap, pico_board_w, pico_board_h + 2*gap]);
+module pico_board(length = pico_board_l, gap = 0) {
+    translate([-gap - length + pico_board_l, 0, -gap])
+    cube([length + 2*gap, pico_board_w, pico_board_h + 2*gap]);
 }
 
 module pico_w(hole_d = 2.1) {
@@ -124,10 +125,12 @@ module housing_shape(outline = thickness) {
     }
 }
 
-module housing(length = pico_board_l - extra_flare) {
+module housing() {
+    length = pico_board_l - extra_flare;
+    translate([-housing_extra_l, 0, 0])
     rotate([90, 0, 0])
     rotate([0, 90, 0])
-    linear_extrude(length)
+    linear_extrude(length + housing_extra_l)
     difference() {
         housing_shape();
         housing_shape(0);
@@ -169,7 +172,7 @@ module tattlekey_case() {
             flare();
         }
         at_board()
-        pico_board(board_gap);
+        pico_board(slop, board_gap);
     }
 }
 
-- 
2.44.1