From 275c34922c6082e03e89fc69eb5a5139b183b9e3 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sat, 27 Aug 2016 16:25:29 +0100
Subject: [PATCH] flyscreen-handle: Ribbles

---
 flyscreen-handle.scad | 14 +++++++++++++-
 1 file changed, 13 insertions(+), 1 deletion(-)

diff --git a/flyscreen-handle.scad b/flyscreen-handle.scad
index bdecb61..1d4b979 100644
--- a/flyscreen-handle.scad
+++ b/flyscreen-handle.scad
@@ -20,6 +20,8 @@ outside_push_inadj = 0.82;
 
 ourcirc_r = 0.5 / 2;
 
+ribble_dia = 2.2;;
+
 opening_protr_slop = 0.1;
 
 intooth_top_slop = 0.1;
@@ -64,6 +66,8 @@ P6a = P6t + [ -outside_push_inadj, 0 ];
 
 outside_push_inadj_slope = (P3t[1]-P4[1]) / (P6a[1]-P5[1]);
 
+ribble_rad = ribble_dia/2;
+
 module ExtrusionSect(){
   cr = openingedge_dia/2;
   toph = opening_height/2 + opening_protrh;
@@ -117,7 +121,15 @@ module LeverSect(P89adjsense, inadj=false){
 
 module LeverSectTop(){
   difference(){
-    LeverSect(+1, false);
+    union(){
+      LeverSect(+1, false);
+      for (x = [ P8mid[0] + ourcirc_r - ribble_rad :
+		 -ribble_rad * 4 :
+		 Q0[0] + edge_or + ribble_rad*2 ]) {
+	translate([x, P5[1] + ourcirc_r])
+	  circle(r = ribble_rad, $fn=20);
+      }
+    }
     translate([pivot_x,0]) circle(r= pivot_r + pivot_slop, $fn=20);
   }
 }
-- 
2.30.2