From 41ada164bf149e5e19488caf25527800fd3fc78c Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Thu, 11 Oct 2012 00:46:59 +0100
Subject: [PATCH] filamenttrestle wip now triangular pins

---
 filamenttrestle.scad | 32 ++++++++++++++------------------
 1 file changed, 14 insertions(+), 18 deletions(-)

diff --git a/filamenttrestle.scad b/filamenttrestle.scad
index bb8c029..4532c79 100644
--- a/filamenttrestle.scad
+++ b/filamenttrestle.scad
@@ -25,11 +25,11 @@ trestleplugd = 1;
 topcylthick = 3;
 topcylbasedepth = 4;
 
+pinbasew = 3;
 pinminh = 1.0;
-pinmaxh = 1.5;
-pinwidth = 3;
-pindh = 0.5;
-pindwidth = 1.5;
+pinmaxh = 3;
+pindh = 1.0;
+pindwidth = 1.0;
 
 module Plug(d=0){
   a = -atan(plugslope);
@@ -72,9 +72,8 @@ module Trestle(){
   eplen = sqrt(trestleheight*trestleheight + trestlebase*trestlebase*0.25);
   topcylw = plugwmax + topcylthick*2;
 
-  pinholewidth = pinwidth + pindwidth;
-  pinholeminh = pinminh + pindh;
-  pinholemaxh = pinmaxh + pindh;
+  pinholebasew = pinbasew + pindwidth;
+  pinholeh =     pinminh +  pindh;
 
   difference(){
     union(){
@@ -104,18 +103,15 @@ module Trestle(){
 
     for (rot=[0,180]) {
       translate([0,0,plugl/2]) rotate([0,rot,0]) translate([0,0,-plugl/2]) {
-	translate([0, plugh, (plugl - pinholewidth*2)/3])
-#	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]]);
-	    }
+	translate([-(topcylw*0.25+1),
+ 	           plugh,
+		   (plugl - pinholebasew*2)/3]) rotate([0,90,0]) {
+	  linear_extrude(height = topcylw*1.0+2) {
+	    polygon([[-1.0 * pinholebasew, -0.01],
+		     [-0.5 * pinholebasew, pinholeh],
+		     [ 0                 , -0.01]]);
 	  }
-	}    
+	}
       }
     }
   }
-- 
2.30.2