scaffold-clamp: wip

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>

diff --git a/scaffold-clamp.scad b/scaffold-clamp.scad
index 730dfaf905ff10cc95ac409706772d8ac1a8db89..ef1fdd855017e8ba1f8f7d4833af4cef3b07a5cb 100644 (file)
--- a/scaffold-clamp.scad
+++ b/scaffold-clamp.scad
@@ -6,7 +6,7 @@ tube_dia = 48.3;
 
 th = 7;
 
-pin_gap = 1.0; // around
+pin_gap = 1.5; // around
 
 smooth_r = 10;
 
@@ -20,6 +20,8 @@ open_gap = 10;
 pin_dia = th;
 hole_dia = th + pin_gap;
 
+hinge_gap = pin_gap;
+
 hinge_o_r = 0.5 * hole_dia + th;
 
 hinge_x = -0.5 * tube_dia - hinge_o_r;
@@ -31,7 +33,7 @@ flats_y = open_gap/2 + th;
 $fa = 3;
 $fs = 0.1;
 
-module Plan() {
+module MainPlan() {
   difference(){
     offset(r=-smooth_r) offset(delta=smooth_r)
       union(){
@@ -43,7 +45,40 @@ module Plan() {
     circle(r = tube_dia/2);
     rectfromto([0,       -open_gap/2],
               [max_x+1, +open_gap/2]);
+    translate([hinge_x, 0]) circle(r= hole_dia/2);
+  }
+}
+
+module Portion(d=0) {
+  translate([hinge_x, 0]) circle(r= hinge_o_r + d);
+  rectfromto([hinge_x*2, 0],
+            [max_x+10, -(tube_dia/2+th+10)]);
+}
+
+module MainPlanA(){
+  intersection(){
+    MainPlan();
+    Portion(0);
+  }
+}
+
+module MainPlanB(){
+  difference(){
+    MainPlan();
+    Portion(hinge_gap);
+  }
+}
+
+module PlanDemo(){
+  MainPlan();
+  translate([0,0,-4]) color("red") Portion(1);
+  translate([0,0,-2]) color("grey") Portion(0);
+
+  translate([0, tube_dia*1.5]) {
+    MainPlanB();
+    MainPlanA();
   }
+//  translate([max_x - hinge_x + 20, 0]) color("blue") MainPlanA();
 }
 
-Plan();
+PlanDemo();