flyscreen-handle: wip, extrude

diff --git a/flyscreen-handle.scad b/flyscreen-handle.scad
index 26fa92c2f2720f198248c708c044f5844959d32a..68923392680e470b43d450667f2307cef06baad5 100644 (file)
--- a/flyscreen-handle.scad
+++ b/flyscreen-handle.scad
@@ -84,14 +84,34 @@ module RetainCutout(){
     difference(){
       circle(r=retain_rad + cutout_gap, $fn=20);
       rotate(180 + retain_empir_angle/2)
-       square([100, retain_empir_stalkw]);
+       translate([0, -retain_empir_stalkw])
+       square([100, retain_empir_stalkw*2]);
     }
   }
 }  
 
-difference(){
-  InsertSection();
-  RetainCutout();
+module WithRetainSection(){
+  difference(){
+    InsertSection();
+    RetainCutout();
+  }
+  HandleSection();
+  RetainSection();
 }
-HandleSection();
-color("red") RetainSection();
+
+module Demo(){
+  difference(){
+    InsertSection();
+    RetainCutout();
+  }
+  HandleSection();
+  color("red") RetainSection();
+}
+
+module Test(){
+  linear_extrude(height=2) WithRetainSection();
+}
+
+//Demo();
+//WithRetainSection();
+Test();