Revert "flyscreen-handle: from v6, another go at the retain"

[reprap-play.git] / flyscreen-handle.scad

diff --git a/flyscreen-handle.scad b/flyscreen-handle.scad
index 85434c599e8f15d25297c523f8ac5ee01d3159c3..dae611bb86e8e2a8a509795294607dbefe6e1978 100644 (file)
--- a/flyscreen-handle.scad
+++ b/flyscreen-handle.scad
@@ -23,14 +23,14 @@ topprotr_rad = 0.35;
 bot_overlap = 5;
 bot_w = 3;
 
-handle_w = 8;
+handle_w = 10;
 handle_rh = 3;
 handle_rcut = 3;
 
 cutout_gap = 1.5;
 
-total_len = 35;
-retaining_len = 10;
+total_len = 40;
+basics_len = 8;
 
 overret_hch = 5;
 
@@ -56,6 +56,9 @@ retain_cutout_h = retain_rad * 2 + retain_bend_gap;
 
 overret_gaplen = retain_cutout_h / cos(retain_empir_angle);
 
+retaining_len = total_len - overret_gaplen - basics_len * 2;
+echo(retaining_len);
+
 module InsertSection(){
   hull(){
     translate([-ins_irad, -ins_irad])
@@ -102,6 +105,9 @@ module HandleSection(){
       translate([handle_x1 - handle_rh/2, y])
        circle(r = handle_rh/2, $fn=20);
   }
+  translate([ handle_x1 - handle_rh*2,
+             handle_y1 - handle_rh/2 ])
+    circle(r = handle_rh/2, $fn=20);
 }
 
 module RetainSection(){
@@ -151,12 +157,31 @@ module BasicSection(){
 }
 
 module Handle(){
-  bs0 = retaining_len + overret_gaplen;
+  bs0 = retaining_len + overret_gaplen + basics_len;
   bs1 = bs0 + overret_hch;
   linear_extrude(height=total_len, convexity=100) GappingSection();
-  linear_extrude(height=retaining_len, convexity=100) WithRetainSection();
-  translate([0,0, bs1]) linear_extrude(height= total_len - bs1)
-    BasicSection();
+
+  translate([0,0, basics_len]) {
+    intersection(){
+      linear_extrude(height=retaining_len, convexity=100)
+       WithRetainSection();
+      translate([retain_mxy[0], retain_mxy[1], 0])
+       rotate([0,0, retain_empir_angle])
+       translate([retain_stalk_len, -30, 0])
+       multmatrix([[1,0,-1,0],
+                   [0,1,0,0],
+                   [0,0,1,0],
+                   [0,0,0,1]])
+       cube([50, 60, 50]);
+    }
+  }
+
+  for (z= [0, bs1]) {
+    translate([0,0, z])
+      linear_extrude(height= basics_len)
+      BasicSection();
+  }
+
   translate([0,0, bs1+0.1]) mirror([0,0,1]) {
     intersection_for (sl=[0,1]) {
       multmatrix([[1,0,0,0],