scaffold-clamp: wip break up

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

diff --git a/scaffold-clamp-vhook.scad b/scaffold-clamp-vhook.scad
new file mode 100644 (file)
index 0000000..c7303d2
--- /dev/null
+++ b/scaffold-clamp-vhook.scad
@@ -0,0 +1,29 @@
+// -*- C -*-
+
+hinge_units = 4;
+
+include <scaffold-clamp-common.scad>
+
+module VHookPlan() {
+  PlanWeldMainCircle(){
+    rectfromto([ -5, 0 ],
+              [ +5, -60 ]);
+  }
+}
+
+module PartB(){ ////toplevel
+ GeneralB();
+}
+
+module PartA(){ ////toplevel
+  DummyA();
+  linextr(min_z, max_z)
+    VHookPlan();
+}
+
+module PlanDemo(){
+  GeneralPlanDemo();
+  translate([0, -tube_dia*1.5]) {
+    VHookPlan();
+  }
+}