From 060a0cdea323ec6452a67bc91168386a7d05aebb Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Wed, 10 Oct 2012 21:47:14 +0100
Subject: [PATCH] filamenttrestle wip square pin holes

---
 filamenttrestle.scad | 21 ++++++++++++++-------
 1 file changed, 14 insertions(+), 7 deletions(-)

diff --git a/filamenttrestle.scad b/filamenttrestle.scad
index 1ef23fe..1d502ed 100644
--- a/filamenttrestle.scad
+++ b/filamenttrestle.scad
@@ -26,8 +26,9 @@ topcylthick = 3;
 topcylbasedepth = 4;
 
 pindr = 0.5;
-pinholeminr = 1.0 + pindr;
-pinholemaxr = 1.5 + pindr;
+pinholeminh = 1.0 + pindr;
+pinholemaxh = 1.5 + pindr;
+pinholewidth = 5;
 
 module Plug(d=0){
   a = -atan(plugslope);
@@ -98,12 +99,18 @@ module Trestle(){
 
     for (rot=[0,180]) {
       translate([0,0,plugl/2]) rotate([0,rot,0]) translate([0,0,-plugl/2]) {
-	translate([-(topcylw/2+1), plugh, plugl/4])
-	  rotate([0,90,0])
-	  cylinder(r1=pinholeminr, r2=pinholeminr, h=topcylw/2+2, $fn=20);
 	translate([0, plugh, plugl/4])
-	  rotate([0,90,0])
-	  cylinder(r1=pinholeminr, r2=pinholemaxr, h=topcylw/2+1, $fn=20);
+#	linear_extrude(height = pinholewidth){
+	  for (mir=[0,1]) {
+	    mirror([0,mir,0]) {
+	      polygon([[-(topcylw/2+0.1), -0.1],
+		       [-(topcylw/2+0.1), pinholeminh],
+		       [0,                pinholeminh],
+		       [+(topcylw/2+0.1), pinholemaxh],
+		       [+(topcylw/2+0.1), -0.1]]);
+	    }
+	  }
+	}    
       }
     }
   }
-- 
2.30.2