From 9dab366fea1abfa69ea72e76e0383ff154c4d168 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Fri, 26 Aug 2016 02:10:07 +0100
Subject: [PATCH] flyscreen-handle: adjustments from v3

---
 flyscreen-handle.scad | 23 +++++++++++++++--------
 1 file changed, 15 insertions(+), 8 deletions(-)

diff --git a/flyscreen-handle.scad b/flyscreen-handle.scad
index feb606b..d1517db 100644
--- a/flyscreen-handle.scad
+++ b/flyscreen-handle.scad
@@ -1,9 +1,9 @@
 // -*- C -*-
 
 opening_height = 7.84 - 0.3;
-opening_depth = 7.88;
+opening_depth = 6.0; // 7.88;
 openingcnr_dia = 2.75;
-opening_topprotr = 1.54 - 0.65;
+opening_topprotr = 1.54;
 
 gap = 0.25;
 
@@ -12,12 +12,13 @@ retain_empir_stalkw = 0.8;
 retain_rad = 1.65;
 retain_empir_inward = 0.65;
 
+hgap_empir_adjust = -0.5;
+
 topprotr_rad = 0.35;
 
 bot_overlap = 5;
 bot_w = 3;
 
-handle_d = 2;
 handle_w = 8;
 handle_rh = 2;
 handle_rcut = 3;
@@ -36,23 +37,29 @@ ins_irad = openingcnr_dia/2 + gap;
 ins_orad = openingcnr_dia/2 + opening_height - gap;
 ins_th = ins_orad - ins_irad;
 
-handle_x0 = ins_irad;
+handle_x0 = ins_irad + hgap_empir_adjust;
 handle_h = bot_overlap + ins_th;
 handle_y0 = -ins_orad-bot_overlap;
 handle_y1 = handle_y0 + handle_h;
 
 handle_x1 = handle_x0 + bot_w + handle_w;
 
+topprotr_y = -ins_irad + opening_topprotr;
+
 module InsertSection(){
   hull(){
-    translate([-ins_orad, 0]) square([ins_th, 0.1]);
+    translate([-ins_irad, -ins_irad])
+      mirror([1,0])
+      square([opening_depth - ins_irad, 0.1]);
     translate([-ins_irad - topprotr_rad,
-	       opening_topprotr - topprotr_rad])
+	       topprotr_y - topprotr_rad])
       circle(r=topprotr_rad, $fn=10);
   }
   translate([0, -ins_orad]) square([ins_irad+1, ins_th]);
   intersection(){
-    translate([0.1,0.1]) mirror([1,1]) square([100,100]);
+    translate([0.1, -ins_irad + 0.1])
+      mirror([1,1])
+      square([100, opening_depth]);
     difference(){
       circle(r= ins_orad);
       circle(r= ins_irad, $fn=20);
@@ -159,7 +166,7 @@ module Demo(){
 module Test(){
   linear_extrude(height=2) {
     WithRetainSection();
-    translate([0, -handle_y0 + opening_topprotr])
+    translate([0, -handle_y0 + topprotr_y + 10])
       BasicSection();
   }
 }
-- 
2.30.2