From 674e9f91273f54ae89266e20b6859a230eec8983 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Thu, 5 Nov 2020 18:25:40 +0000
Subject: [PATCH] scaffold-clamp: wip

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
---
 scaffold-clamp.scad | 18 +++++++++++++++++-
 1 file changed, 17 insertions(+), 1 deletion(-)

diff --git a/scaffold-clamp.scad b/scaffold-clamp.scad
index ef1fdd8..0c2f35f 100644
--- a/scaffold-clamp.scad
+++ b/scaffold-clamp.scad
@@ -15,6 +15,10 @@ bolt_flat = 10 + 1;
 
 open_gap = 10;
 
+hinge_unit = 10;
+hinge_units = 4;
+hinge_z_gap = 1;
+
 // calculated
 
 pin_dia = th;
@@ -30,6 +34,9 @@ max_x = bolt_x + max(0.5 + bolt_dia + th, 0.5 * bolt_flat/2);
 
 flats_y = open_gap/2 + th;
 
+stride_z = hinge_unit*2 + hinge_z_gap*2;
+total_z = hinge_units * stride_z - hinge_z_gap;
+
 $fa = 3;
 $fs = 0.1;
 
@@ -69,6 +76,14 @@ module MainPlanB(){
   }
 }
 
+module HalfClamp(){
+  linextr(0, total_z) mirror([0,1]) MainPlanB();
+  for (i=[0 : hinge_units-1]) {
+    translate([0,0, stride_z*i])
+      linextr(0, hinge_unit) MainPlanA();
+  }
+}
+
 module PlanDemo(){
   MainPlan();
   translate([0,0,-4]) color("red") Portion(1);
@@ -81,4 +96,5 @@ module PlanDemo(){
 //  translate([max_x - hinge_x + 20, 0]) color("blue") MainPlanA();
 }
 
-PlanDemo();
+//PlanDemo();
+HalfClamp();
-- 
2.30.2