From 6a6e3304c33f0c425381dac3a5afa7a8cfd4fc84 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Fri, 5 Feb 2021 19:25:48 +0000
Subject: [PATCH] powerbank-bike-clamp: wip

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

diff --git a/powerbank-bike-clamp.scad b/powerbank-bike-clamp.scad
index 0fcb109..5840268 100644
--- a/powerbank-bike-clamp.scad
+++ b/powerbank-bike-clamp.scad
@@ -12,6 +12,7 @@ minor_wall_min = 1;
 screw = 5.0 + 0.75;
 screw_nut_across = 10; // xxx
 knob_behind_across = 15; // xxx
+behind_knob_th = 5;
 
 clamp_width = 15;
 
@@ -65,5 +66,42 @@ module TubeClampLeft() { ////toplevel
     TubeClampLeftPlan();
 }
 
-TubeClampLeft();
+module TubeClampRightPlan(){
+  difference(){
+    union(){
+      rectfromto([ clamp_gap/2,                   bot_y ],
+		 [ clamp_gap/2 + behind_knob_th,  0     ]);
+      intersection(){
+	circle(r= main_r);
+	union(){
+	  rectfromto([0,0],
+		      main_r *  [5,5]);
+	  rectfromto([ clamp_gap/2, main_r*5 ],
+		      main_r * [2,-5]);
+	}
+      }
+      HingeBodyPlan();
+    }
+    TubePlan();
+    HingePinPlan();
+  }
+}
+
+module SomeClamp(){
+  linextr(-clamp_width/2, clamp_width/2)
+    child(0);
+}
+
+module TubeClampLeft() { ////toplevel
+  SomeClamp()
+    TubeClampLeftPlan();
+}
+
+module TubeClampRight() { ////toplevel
+  SomeClamp()
+    TubeClampRightPlan();
+}
+
+//TubeClampLeft();
+TubeClampRight();
 
-- 
2.30.2