From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Wed, 10 Oct 2012 20:47:14 +0000 (+0100)
Subject: filamenttrestle wip square pin holes
X-Git-Tag: filamentspool-v2-release~750
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=commitdiff_plain;h=060a0cdea323ec6452a67bc91168386a7d05aebb;p=reprap-play.git

filamenttrestle wip square pin holes
---

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]]);
+	    }
+	  }
+	}    
       }
     }
   }