flyscreen-handle: wip, Ps etc

diff --git a/flyscreen-handle.scad b/flyscreen-handle.scad
index 1a8d15ab8576e91740721882189cfebc8307935d..3f32c9f5a9c52019d9b2c6e60e7ab32c09b796eb 100644 (file)
--- a/flyscreen-handle.scad
+++ b/flyscreen-handle.scad
@@ -11,8 +11,8 @@ inside_len = 4;
 pivoting_gap = 1;
 
 outside_gap = 3;
 pivoting_gap = 1;
 
 outside_gap = 3;

-outside_len = 10;
-outend_height = 4;
+outside_len = 16;
+outend_height = 3;

 
 ourcirc_r = 0.5 / 2;
 
 
 ourcirc_r = 0.5 / 2;
 


@@ -60,8 +60,27 @@ module ExtrusionSect(){
   }
 }
 
   }
 }
 

+module PsHull(ps) {
+  hull(){
+    for (p = ps) {
+      translate(p)
+       circle(r = ourcirc_r, $fn=10);
+    }
+  }
+}
+

 module LeverSect(){
 module LeverSect(){

-  
+  PsHull([P2,P3,P4]);
+  //PsHull([P5,P6,P7]);
+  difference(){
+    PsHull([P0,P1,P2,//P5
+           ,P8,P9]);
+  }
+}
+
+module Demo(){
+  color("white") ExtrusionSect();
+  LeverSect();

 }
 
 }
 

-ExtrusionSect();
+Demo();