knifeblock: CoverParts

diff --git a/knifeblock.scad b/knifeblock.scad
index 7e03782c58da25e51faf8e176c796fd4ed490eb1..d083156a76ec722fcf3b5fb992e8898417dd92f0 100644 (file)
--- a/knifeblock.scad
+++ b/knifeblock.scad
@@ -49,7 +49,7 @@ pegsloph = 0.5;
 pegslopv = 0.5;
 pegslopl = 0.5;
 
-pegdepthproportion = 0.67;
+pegdepthproportion = 0.80;
 
 // computed
 side = minsidein + screwcsinkdia + minsideout;
@@ -219,10 +219,24 @@ module CoverAligned(){
     Cover();
 }
 
+module DemoPeg(){
+  translate([recessblockwidth/2, pegrecess, -height])
+    Peg();
+}
+
 module Demo(){ ////toplevel
   %Block();
   DoKnives();
   color([0,0,1]) CoverAligned();
+  color([1,0,0]) AtSides() { DemoPeg(); DemoPeg(); }
+}
+
+module CoverParts(){ ////toplevel
+  Cover();
+  translate([0, coverlonglen, pegheight/2]) {
+    Peg();
+    translate([-peghead-3, 0,0]) Peg();
+  }
 }
 
 Demo();