From 855c17458e89188883e1060e2f83e38a63841f0a Mon Sep 17 00:00:00 2001
From: Scott Worley <scottworley@scottworley.com>
Date: Sat, 7 Oct 2023 11:11:57 -0700
Subject: [PATCH] housing: Flatten

---
 housing/tattlekey.scad | 17 ++++++++++-------
 1 file changed, 10 insertions(+), 7 deletions(-)

diff --git a/housing/tattlekey.scad b/housing/tattlekey.scad
index 4567a3d..0bc4e47 100644
--- a/housing/tattlekey.scad
+++ b/housing/tattlekey.scad
@@ -5,8 +5,9 @@ key_interface_corner_r = 5;
 key_interface_thickness = 1.484;
 
 // Chosen to let board fit inside
-housing_inner_h = 8;
+housing_inner_h = 6;
 housing_inner_w = 21;
+housing_flat = 8;
 
 thickness = 1.7;
 
@@ -17,6 +18,7 @@ extra_flare = wiring_l;
 
 pico_board_l = 51.0;
 pico_board_w = 21.0;
+pico_board_h = 1.0;
 pico_total_h = 3.7;
 
 $fs = .1;
@@ -31,9 +33,8 @@ module pico_hole(d, x, y) {
 }
 
 module pico_board(gap = 0) {
-    board_h = 1.0;
     translate([-gap, -gap, -gap])
-    cube([pico_board_l + 2*gap, pico_board_w + 2*gap, board_h + 2*gap]);
+    cube([pico_board_l + 2*gap, pico_board_w + 2*gap, pico_board_h + 2*gap]);
 }
 
 module pico_w(hole_d = 2.1) {
@@ -112,13 +113,15 @@ module key_interface() {
 }
 
 module housing_shape(outline = thickness) {
-    inner_squish = housing_inner_h / housing_inner_w;
     housing_w = housing_inner_w + 2 * outline;
     housing_h = housing_inner_h + 2 * outline;
-    squish = housing_h / housing_w;
+    squish = housing_h / (housing_w - housing_flat);
 
     scale([1, squish])
-    circle(d = housing_w);
+    minkowski() {
+        circle(d = housing_w - housing_flat);
+        square([housing_flat, epsilon], center=true);
+    }
 }
 
 module housing(length = pico_board_l - extra_flare) {
@@ -153,7 +156,7 @@ module flare() {
 }
 
 module at_board() {
-    translate([0, -pico_board_w/2, -1])
+    translate([0, -pico_board_w/2, -pico_board_h])
     children();
 }
 
-- 
2.44.1