nook-case: wip, tooth

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>

diff --git a/nook-case.scad b/nook-case.scad
index aa564c4c7c4f0c9600d2e8666ebcb92df0fa8df7..3b5c0d68dda18653e38d92db21ec8df9a6c4b44e 100644 (file)
--- a/nook-case.scad
+++ b/nook-case.scad
@@ -19,16 +19,20 @@ tape_w = 15;
 
 test_pillar = 4;
 
-$test = false;
-
 engage_l0 = 10;
 engage_l1 = 10;
 engage_l2 = 3;
 
+tooth_inward = gap[0] * 1.0;
+
+$test = false;
+
 // calculated
 
+tooth_height = nook_th;
 ledge_h = case_th;
 lid_th = case_th;
+tooth_th = case_th;
 
 spp0 = [0,0];
 spp1 = spp0 + case_th * [-1,0];
@@ -65,6 +69,11 @@ etxa = nom_cnr[0] - engage_l2;
 etxb = etxa - engage_l1;
 etxc = -(nom_cnr[0] - engage_l2);
 
+tppS = tppB + [-gap[0], 0];
+tppP = [ tppS[0] - tooth_th, tppC[1] ];
+tppQ = tppP + tooth_height * [0,-1] + tooth_inward * [1,0];
+tppR = [ tppS[0] + tooth_inward, tppQ[1] ];
+
 module RightSideMainProfile() {
   rectfromto(spp7, spp0);
   rectfromto(spp7, spp20);
@@ -106,6 +115,11 @@ module SideTapeCutout() {
   SideTapeCutout1(spp11y, spp1[1] + 1);
 }
 
+module ToothProfile(){
+  l = [ tppA, tppB, tppS, tppR, tppQ, tppP, tppC ];
+  polygon(l);
+}
+
 module Demo(){ ////toplevel
   translate([0,0,-2]) LeftSideMainProfile(); 
   translate([0,0,-2]) color("yellow") LeftTopMainProfile();
@@ -120,6 +134,7 @@ module Demo(){ ////toplevel
   translate([nook_cnr_rad*2 + 5, 0,0]) mirror([1,0,0]) {
     color("red") RightSideMainProfile();
     color("purple") RightTopMainProfile();
+    color("grey") translate([0,0,-2]) ToothProfile();
   }
   //%SideTapeCutout();
 }