knifeblock.scad

   1 // -*- C -*-
   2
   3 // properties of the knives
   4 nknives = 3;
   5 widths = [15.5, 15.8, 19.0];
   6 handlelenbase = 75;
   7 handlelendelta = [-15, 0, 10];
   8 locations = [-35, 0, 40];
   9 bladew = 5; // 2.5
  10 maxhandledepth = 45;
  11
  12 templatescale = 27.2 / 19.6;
  13
  14 coverlonglen = 120; // xxx
  15 covershortlen = 70; // xxx
  16
  17 // other tuneables
  18 front = 5;
  19 back = 5;
  20 height = 50;
  21 minsidein = 4;
  22 minsideout = 4;
  23
  24 frontbackslop = 0.25;
  25
  26 screwbackdepth = 6.0 - 1.0;
  27 screwdia =       4.0 + 0.5;
  28 screwcsinkdia =  9.8 + 1.0;
  29
  30 screwabove = 15;
  31
  32 coverthick = 2.4;
  33 coverside = coverthick;
  34
  35 covertopwing = 15;
  36 covertopwingbase = 20;
  37 coveredge = 3;
  38
  39 pegstem = 3.5;
  40 peghead = 10;
  41 pegstemheight = 2;
  42 pegheight = 9;
  43 peglen = 12;
  44
  45 recessblockwidth = peghead + pegstem*3;
  46 recessblockheight = peglen + pegstem*1.5;
  47
  48 pegsloph = 0.5;
  49 pegslopv = 0.5;
  50 pegslopl = 0.5;
  51
  52 pegdepthproportion = 0.67;
  53
  54 // computed
  55 side = minsidein + screwcsinkdia + minsideout;
  56 totaldepth = front + maxhandledepth + back;
  57
  58 minkx = locations[0] -         widths[0]        /2;
  59 maxkx = locations[nknives-1] + widths[nknives-1]/2;
  60
  61 minx = minkx - side;
  62 maxx = maxkx + side;
  63
  64 pegrecess = pegdepthproportion*totaldepth - 0.5*peglen;
  65
  66 module ImportTemplate(w,k,t) {
  67   fn = str("knifeblock-knives-t",k,t,".dxf");
  68   echo(fn);
  69   translate([0,0, -w/2])
  70     linear_extrude(height=w)
  71     scale(templatescale) import(file=fn, convexity=100);
  72 }
  73
  74 module Knife(k){
  75   ImportTemplate(bladew, k,"bl");
  76   hull(){
  77     ImportTemplate(widths[k], k,"hl");
  78     translate([-100,0,0])
  79       ImportTemplate(widths[k], k,"hl");
  80   }
  81 }
  82
  83 module DoKnife(k){
  84   translate([locations[k],0,0]){
  85     rotate([0,90,0])
  86       translate([-(handlelenbase + handlelendelta[k]),0,0])
  87       Knife(k);
  88   }
  89 }
  90
  91 module DoKnives(){
  92   for (k=[0:nknives-1])
  93     DoKnife(k);
  94 }
  95
  96 module ScrewHole(){
  97   translate([0,-50,0])
  98     rotate([-90,0,0])
  99     cylinder(r=screwdia/2, h=150, $fn=40);
 100   translate([0, totaldepth-front - screwbackdepth, 0])
 101     rotate([90,0,0])
 102     cylinder(r=screwcsinkdia/2 / (sqrt(3)/2), h=100, $fn=6);
 103 }
 104
 105 module Block(){
 106   sidemidx = minsideout + screwcsinkdia/2;
 107
 108   difference(){
 109     hull() mirror([0,0,1]) {
 110       translate([minx, 0, 0])
 111         cube([maxx-minx, totaldepth-front, height]);
 112       for (x=[minx + front/2, maxx - front/2])
 113         translate([x, -front/2, 0])
 114         cylinder(r=front/2, h=height, $fn=30);
 115     }
 116     for (x=[minx + sidemidx, maxx - sidemidx]) {
 117       translate([x, 0, -screwabove])
 118         ScrewHole();
 119     }
 120     for (yshift=[-1,1])
 121       translate([0, yshift * frontbackslop, 0])
 122         DoKnives();
 123   }
 124 }
 125
 126 module BlockPrint(){ ////toplevel
 127   rotate([0,0,90])
 128     Block();
 129 }
 130
 131 module CoverTemplate(){
 132   linear_extrude(height=coverthick)
 133     polygon([[minx, 0],
 134              [maxx, 0],
 135              [maxx, coverlonglen],
 136              [maxx - coverside, coverlonglen],
 137              [minx, covershortlen]]);
 138 }
 139
 140 module CoverSide(len){
 141   translate([0, 0 ,0]) {
 142     rotate([90,0,90])
 143       linear_extrude(height=coverside)
 144       polygon([[0,                      0],
 145                [0,                      totaldepth],
 146                [covertopwing,           totaldepth],
 147                [covertopwingbase,       coverside + coverthick],
 148                [len - covertopwingbase, coverside + coverthick],
 149                [len - covertopwing,     totaldepth],
 150                [len,                    totaldepth],
 151                [len,                    0]]);
 152     cube([recessblockwidth, recessblockheight, totaldepth]);
 153   }
 154 }
 155
 156 module PegTemplate(){
 157   for (mx=[0,1]) for (my=[0,1]) {
 158       mirror([mx,0,0]) mirror([0,my,0])
 159         polygon([[-0.1,      -0.1],
 160                  [pegstem/2, -0.1],
 161                  [pegstem/2, pegstemheight/2],
 162                  [peghead/2, pegheight    /2],
 163                  [-0.1,      pegheight    /2]]);
 164     }
 165 }
 166
 167 module Peg(){
 168   echo("peg angle slope (must be <1)",
 169        (peghead-pegstem)/(pegheight-pegstemheight));
 170   dx = pegsloph;
 171   dy = pegslopv;
 172   rotate([90,0,0]) {
 173     linear_extrude(height=peglen-pegslopl) {
 174       intersection(){
 175         translate([-dx,-dy,0]) PegTemplate();
 176         translate([-dx,+dy,0]) PegTemplate();
 177         translate([+dx,+dy,0]) PegTemplate();
 178         translate([+dx,-dy,0]) PegTemplate();
 179       }
 180     }
 181   }
 182 }
 183
 184 module AtSides(){
 185   translate([minx,0,0])                 child(0);
 186   translate([maxx,0,0]) mirror([1,0,0]) child(1);
 187 }
 188
 189 module Cover(){
 190   CoverTemplate();
 191   AtSides() { CoverSide(covershortlen); CoverSide(coverlonglen); }
 192 }
 193
 194 module CoverAligned(){
 195   translate([0,-front,-height])
 196     rotate([-90,0,0])
 197     Cover();
 198 }
 199
 200 module Demo(){ ////toplevel
 201   %Block();
 202   DoKnives();
 203   color([0,0,1]) CoverAligned();
 204 }
 205
 206 Demo();
 207 //Cover();