From 6805b4e32f51188f9541ed40d00c8f1e242dbc1d Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sun, 7 Oct 2012 20:13:33 +0100
Subject: [PATCH] filamenttrestle wip before wedges

---
 filamenttrestle.scad | 22 +++++++++++-----------
 1 file changed, 11 insertions(+), 11 deletions(-)

diff --git a/filamenttrestle.scad b/filamenttrestle.scad
index e341e48..2ebccdc 100644
--- a/filamenttrestle.scad
+++ b/filamenttrestle.scad
@@ -13,7 +13,7 @@ guidewidth = 3;
 guiderad = 20;
 
 plugl = 12;
-plugwmin = min(8, DoveClipPairSane_width(2));
+plugwmin = 3;
 plugh = 10;
 plugslope = 0.5;
 plugwmax = plugwmin + plugh * plugslope * 2;
@@ -23,21 +23,19 @@ trestlebaseh = 10;
 trestleplugd = 1;
 
 topcylthick = 3;
-topcylbasedepth = 7;
+topcylbasedepth = 4;
 
 module Plug(d=0){
-  a = atan(plugslope);
+  a = -atan(plugslope);
   tdx = d * cos(a);
   tdy = d * sin(a);
   bdx = d / cos(a);
   translate([-d,0,0]) rotate([90,0,90]) linear_extrude(height=plugl+0.1+d*2){
-    polygon([[-(plugwmax/2 + bdx),  0],
-	     [-(plugwmin/2 + tdx),  plugh + tdy],
-	     [+(plugwmin/2 + tdx),  plugh + tdy],
-	     [+(plugwmax/2 + bdx),  0]]);
+    polygon([[-(plugwmin/2 + bdx),  0],
+	     [-(plugwmax/2 + tdx),  plugh + tdy],
+	     [+(plugwmax/2 + tdx),  plugh + tdy],
+	     [+(plugwmin/2 + bdx),  0]]);
   }
-  translate([plugl + DoveClip_depth()*0.7 + d, 0, 0])
-    DoveClipPairSane(count=1, h=plugh-0.1);
 }
 
 module Bar(){
@@ -86,7 +84,8 @@ module Trestle(){
 	}
       }
       intersection(){
-	cylinder(r=topcylr, h=plugl);
+	translate([0, 3, 0])
+	  cylinder(r=topcylr, h=plugl);
 	translate([-50, -topcylbasedepth, -1])
 	  cube([100, 50, plugl+2]);
       }
@@ -103,6 +102,7 @@ module Trestle(){
 }
 
 //Bar();
-//Plug(d=1);
 Trestle();
+
+//Plug(d=1);
 //ExtenderPillars(80,12,8, baseweb=true);
-- 
2.30.2