knifeblock: fix Makefile for recent GNU make

[reprap-play.git] / knifeblock.scad

diff --git a/knifeblock.scad b/knifeblock.scad
index 686644a425f86b6b90f603b4dbfb96cb3a328ef0..73d3a8954707a30080f1640159a6b33918f3c36e 100644 (file)
--- a/knifeblock.scad
+++ b/knifeblock.scad
@@ -7,21 +7,25 @@ handlelenbase = 60;
 handlelendelta = [-10, 0, 0];
 locations = [-35, 0, 40];
 bladew = 5; // 2.5
-maxhandledepth = 43.5;
+maxhandledepth = 43.5 - 5;
 
 // other tuneables
-side = 5;
 front = 5;
-back = 5;
+back = 8;
 height = 50;
+minsidein = 4;
+minsideout = 4;
 
 frontbackslop = 0.5;
 
-screwbackdepth = 16;
-screwdia = 3.6;
-screwcsinkdia = 8.7;
+screwbackdepth = 6.0 - 1.0;
+screwdia =       4.0 + 0.5;
+screwcsinkdia =  9.8 + 1.0;
+
+screwabove = 15;
 
 // computed
+side = minsidein + screwcsinkdia + minsideout;
 totaldepth = front + maxhandledepth + back;
 
 module ImportTemplate(w,k,t) {
@@ -58,6 +62,15 @@ module DoKnives(){
   }
 }
 
+module ScrewHole(){
+  translate([0,-50,0])
+    rotate([-90,0,0])
+    cylinder(r=screwdia/2, h=150, $fn=40);
+  translate([0, totaldepth-front - screwbackdepth, 0])
+    rotate([90,0,0])
+    cylinder(r=screwcsinkdia/2 / (sqrt(3)/2), h=100, $fn=6);
+}
+
 module Block(){
   minkx = locations[0] -         widths[0]        /2;
   maxkx = locations[nknives-1] + widths[nknives-1]/2;
@@ -65,11 +78,21 @@ module Block(){
   minx = minkx - side;
   maxx = maxkx + side;
 
+  sidemidx = minsideout + screwcsinkdia/2;
+
   difference(){
-    translate([minx, -front, 0])
-      mirror([0,0,1])
-      cube([maxx-minx, totaldepth, height]);
-    #DoKnives();
+    hull() mirror([0,0,1]) {
+      translate([minx, 0, 0])
+       cube([maxx-minx, totaldepth-front, height]);
+      for (x=[minx + front/2, maxx - front/2])
+       translate([x, -front/2, 0])
+       cylinder(r=front/2, h=height, $fn=30);
+    }
+    for (x=[minx + sidemidx, maxx - sidemidx]) {
+      translate([x, 0, -screwabove])
+       ScrewHole();
+    }
+    DoKnives();
   }
 }