scaffold-clamp: wip straphook

[reprap-play.git] / scaffold-clamp-common.scad

diff --git a/scaffold-clamp-common.scad b/scaffold-clamp-common.scad
index 51f0d8ce422679a84a25c51bd98b912eefb59c11..9c9a831b3d6c3c4903afb89ba3b74afb12b84894 100644 (file)
--- a/scaffold-clamp-common.scad
+++ b/scaffold-clamp-common.scad
@@ -26,8 +26,9 @@ vhook_th = 14;
 
 // ---------- hhook ----------
 
-hhook_inner = 40;
+hhook_inside = 40;
 hhook_th = 4;
+hhook_l = 40;
 
 // ========== calculated ==========
 
@@ -64,6 +65,12 @@ vhook_y0 = -max(main_r, (tube_dia/2 + vhook_th));
 vhook_ctr = vhook_y0 - vhook_inside/2;
 vhook_outer_dia = vhook_inside + vhook_th*2;
 
+// calculated - hhook
+
+hhook_outer_dia = hhook_inside + hhook_th*2;
+
+hhook_ctr = -max(main_r + hhook_inside/2,
+                tube_dia/2 + hhook_outer_dia/2);
 
 $fa = 3;
 $fs = 0.1;
@@ -217,8 +224,34 @@ module VHookPlanDemo(){
 
 // ---------- hhook ----------
 
+module HHookHookPlan(){
+  translate([0, hhook_ctr]){
+    difference(){
+      circle(r = hhook_outer_dia/2);
+      circle(r = hhook_inside/2);
+      rectfromto([+hhook_outer_dia, -hhook_outer_dia],
+                [0,                +hhook_outer_dia]);
+    }
+    translate([0, -(hhook_inside/2 + hhook_th/2)]){
+      hull(){
+       for (x=[-0.1, hhook_l]) {
+         translate([x,0]) square(center=true, hhook_th);
+       }
+      }
+    }
+  }
+}
+
+module HHookPartA(){ ////toplevel
+  DummyA();
+  linextr(min_z, max_z) {
+    HHookHookPlan();
+  }
+}
+
 module HHookPlanDemo(){
   MainPlanA();
+  HHookHookPlan();
 }
 
 // ---------- misc ----------