nook-case: wip DiagonaliseNearHinge, slope

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

diff --git a/nook-case.scad b/nook-case.scad
index fa55d7f5604780011051ab36906701a31d8b33e4..e6025df92aceb36f1ceea1434ee9fa6d4d288b99 100644 (file)
--- a/nook-case.scad
+++ b/nook-case.scad
@@ -40,6 +40,8 @@ engage_l2 = 3;
 tooth_inward = gap[0] * 1.0 + 0.25;
 tooth_w = 15;
 
+diag_near_hinge_slope = 0.5;
+
 $test = false;
 
 $fa = $test ? 10 : 3;
@@ -257,8 +259,8 @@ module DiagonaliseNearHinge(wider){
        translate([ 0, spp30[1] ])
        polygon([[  -1, 0 ],
                 [   0, 0 ],
-                [  sz, sz ],
-                [  sz, sz + 0.1 ],
+                [  sz/diag_near_hinge_slope, sz ],
+                [  sz/diag_near_hinge_slope, sz + 0.1 ],
                 [  -1, sz + 0.1 ]]);
     }
 }    
@@ -274,7 +276,7 @@ module Base(){ ////toplevel
       mirror([0,1,0])
       linextr_x_yz(-usb_w/2, usb_w/2)
       rectfromto(spp8 + [-40, usb_below], [40, 40]);
-    translate([ vectorlen2d(gap), 0,0 ])
+    translate([ gap[0], 0,0 ])
       DiagonaliseNearHinge(10);
 /*
     translate([nook_w/2, 0, 0])