From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sun, 4 Jun 2017 11:33:12 +0000 (+0100)
Subject: sewing-table: FitTest_PairLink: wip
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=commitdiff_plain;h=ebb99e1e31e40a4439621aabf3d2e7d922afe25b;p=reprap-play.git

sewing-table: FitTest_PairLink: wip
---

diff --git a/sewing-table.scad.m4 b/sewing-table.scad.m4
index 7c95db9..7f59091 100644
--- a/sewing-table.scad.m4
+++ b/sewing-table.scad.m4
@@ -832,23 +832,17 @@ module FitTest_PairLink(cut=false){ ////toplevel
   cy0=-55; cy1=85; cx=127;
   bar = [10,10];
   legrad = 12;
-  footrad_min = 4; footrad_max = 6; footrad_depth = 3;
+  footrad_min = 2; footrad_max = 4; footrad_depth = 3;
+  strap = [3,5];
+
+  // calculated
+  straphole_x_max = legrad/sqrt(2) + footrad_max;
 
   translate([cx - bar[0]/2, cy0, 0])
     cube([bar[0], cy1-cy0, bar[1]]);
   for (endy=[cy0,cy1]) {
     $fn=32;
     translate([cx,endy,0]){
-      for (rot=[45,135]) {
-	rotate(rot){
-	  hull(){
-	    for (s=[-1,+1]){
-	      translate([s*legrad,0,0])
-		cylinder(r= footrad_max, h=bar[1]);
-	    }
-	  }
-	}
-      }
       for (rot=[45:90:315]) {
 	rotate(rot){
 	  translate([legrad,0,0]){
@@ -860,14 +854,26 @@ module FitTest_PairLink(cut=false){ ////toplevel
 	  }
 	}
       }
+      for (rot=[45,135]) {
+	rotate(rot){
+	  hull(){
+	    for (s=[-1,+1]){
+	      translate([s*legrad,0,0])
+		cylinder(r= footrad_max, h=bar[1]);
+	    }
+	  }
+	}
+      }
     }
   }
 }
 
 module FitTest_PairDemo(){ ////toplevel
-  FitTest_PairLink();
-  %FitTest_FrontCurve();
-  %FitTest_RearCurve();
+  translate([-120,0,0]){
+    FitTest_PairLink();
+    %FitTest_FrontCurve();
+    %FitTest_RearCurve();
+  }
 }
 
 module RoundCornerDemo_plat(cnr){