chiark / gitweb /
knifeblock: PegTemplate apex
authorIan Jackson <ijackson@chiark.greenend.org.uk>
Wed, 31 Dec 2014 20:19:29 +0000 (20:19 +0000)
committerIan Jackson <ijackson@chiark.greenend.org.uk>
Wed, 31 Dec 2014 20:19:29 +0000 (20:19 +0000)
knifeblock.scad

index 08a0d1a4c43dd34b40b3daa5abcf9a3d8d2d74dd..1133e1cffbc106b3d3275bf9c68f96ab3383c6a3 100644 (file)
@@ -111,14 +111,14 @@ module ScrewHole(){
     cylinder(r=screwcsinkdia/2 / (sqrt(3)/2), h=100, $fn=6);
 }
 
-module PegTemplate(){
+module PegTemplate(apex){
   for (mx=[0,1]) for (my=[0,1]) {
       mirror([mx,0,0]) mirror([0,my,0])
        polygon([[-0.1,      -0.1],
                 [pegstem/2, -0.1],
                 [pegstem/2, pegstemheight/2],
                 [peghead/2, pegheight    /2],
-                [-0.1,      pegheight    /2]]);
+                [-0.1,      pegheight    /2 + apex]]);
     }
 }
 
@@ -130,7 +130,7 @@ module AtSides(){
 module BlockPegSlot(){
   translate([recessblockwidth/2, pegrecess - 0.5*peglen, -height]){
     rotate([-90,0,0]) linear_extrude(height=totaldepth){
-      PegTemplate();
+      PegTemplate(peghead/2 * 1.2);
     }
   }
 }
@@ -192,10 +192,10 @@ module Peg(){
   rotate([90,0,0]) {
     linear_extrude(height=peglen-pegslopl) {
       intersection(){
-       translate([-dx,-dy,0]) PegTemplate();
-       translate([-dx,+dy,0]) PegTemplate();
-       translate([+dx,+dy,0]) PegTemplate();
-       translate([+dx,-dy,0]) PegTemplate();
+       translate([-dx,-dy,0]) PegTemplate(0);
+       translate([-dx,+dy,0]) PegTemplate(0);
+       translate([+dx,+dy,0]) PegTemplate(0);
+       translate([+dx,-dy,0]) PegTemplate(0);
       }
     }
   }
@@ -204,7 +204,7 @@ module Peg(){
 module CoverPegSlot(coverlen){
   translate([recessblockwidth/2, 0, -1]){
     linear_extrude(height= 1 + pegrecess + 0.5*peglen){
-      PegTemplate();
+      PegTemplate(0);
     }
   }
 }