From 7c1a2043942b13873f52eb8d2960a7002c5f26cd Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Tue, 29 Dec 2015 01:40:36 +0000
Subject: [PATCH] pattress-boxes-3-cover: provide 4 peg outer slop sizes

---
 pattress-boxes-3-cover.scad | 12 ++++++++++++
 1 file changed, 12 insertions(+)

diff --git a/pattress-boxes-3-cover.scad b/pattress-boxes-3-cover.scad
index ffd3b01..0ffce30 100644
--- a/pattress-boxes-3-cover.scad
+++ b/pattress-boxes-3-cover.scad
@@ -150,6 +150,17 @@ module Peg(){ ////toplevel
     PegProfile();
 }
 
+module Pegs(){ ////toplevel
+  baseslop = $peg_outer_slop;
+  dslops = [0, -0.5, -1.0, -1.5];
+  stride = peg_max_dia + 4;
+  for (i=[0:len(dslops)-1]) {
+    translate([i*stride,0,0])
+      assign($peg_outer_slop= baseslop + dslops[i])
+      Peg();
+  }
+}
+
 module AtFixingCentres(){
   for (fc=[-1,+1]) {
     translate([patbox_side/2 + fc*patbox_centres/2,
@@ -184,6 +195,7 @@ module Demo(){
 //LidSide();
 //PegProfile();
 //Peg();
+//Pegs();
 //TopPattressBox();
 //RailProfile();
 //Demo();
-- 
2.30.2