From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Wed, 31 Dec 2014 20:19:29 +0000 (+0000)
Subject: knifeblock: PegTemplate apex
X-Git-Tag: filamentspool-v2-release~251
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?p=reprap-play.git;a=commitdiff_plain;h=f89c049a0a2ffb07b75f093e542e4712399db629

knifeblock: PegTemplate apex
---

diff --git a/knifeblock.scad b/knifeblock.scad
index 08a0d1a..1133e1c 100644
--- a/knifeblock.scad
+++ b/knifeblock.scad
@@ -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);
     }
   }
 }