pin-hinge: wip

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

diff --git a/pin-hinge.scad b/pin-hinge.scad
index 658bfa31eb18fe7895a7d0dc29c8b7aa92660239..9fa22de01e7866a11a728bf0befdf84b9e529301 100644 (file)
--- a/pin-hinge.scad
+++ b/pin-hinge.scad
@@ -8,6 +8,10 @@ $hinge_noncrit_gap = 1.0;
 $fa = 3;
 $fs = 0.05;
 
+module HingePinPlan(){
+  circle(r= $hinge_pin_dia/2);
+}
+
 module HingeProngPlan(behind){
   difference(){
     hull(){
@@ -16,8 +20,17 @@ module HingeProngPlan(behind){
               [-$hinge_main_dia/2, -behind],
               [+$hinge_main_dia/2, -behind]]);
     }
-    circle(r= $hinge_pin_dia/2);
+    HingePinPlan();
   }
 }
 
-HingeProngPlan(5);
+module HingeGapPlan() {
+  circle(r = $hinge_main_dia/2 + $hinge_inter_gap);
+}
+
+module PlanDemo(){
+  HingeProngPlan(5);
+  %HingeGapPlan();
+}
+
+PlanDemo();