rope-adjuster: wip, teeth

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

diff --git a/rope-adjuster.scad b/rope-adjuster.scad
index 16267ce4401274cdd57e861b0131e4ea3f5eac83..edfe9ca8e858d84a05bdd9ce257e16d001ee9919 100644 (file)
--- a/rope-adjuster.scad
+++ b/rope-adjuster.scad
@@ -7,6 +7,13 @@ around_hole = 5;
 thick = 4;
 lever_len = 65;
 
+teeth_n = 4;
+teeth_bite = 4;
+teeth_pitch = 4;
+teeth_gap = 2;
+teeth_back = 2;
+teeth_height = 12;
+
 module Circles(r) {
   for (x = [-1,+1] * 0.5 * lever_len) {
     translate([x, 0])
@@ -23,9 +30,24 @@ module Plan() {
   }
 }
 
+module TeethPlan(){
+  for (m=[0,1]) {
+    mirror([m,0]) {
+      for (i= [ 0: teeth_n-1 ]) {
+       translate([teeth_gap/2, teeth_pitch*i])
+         polygon([[ 0,0 ],
+                  [ teeth_bite, 0 ],
+                  [ teeth_bite, teeth_pitch ]]);
+      }
+    }
+  }
+}
+
 module Adjuster(){
   linextr(0,thick)
     Plan();
+  linextr(thick - 0.1, thick + teeth_height)
+    TeethPlan();
 }
 
 Adjuster();