maglite-holder: wip holder

diff --git a/maglite-holder.scad b/maglite-holder.scad
index 233d851621ee8bc96d449f877f835fd653f9dc68..3f5c67a390e2918fa65ad9d98523796645b593fc 100644 (file)
--- a/maglite-holder.scad
+++ b/maglite-holder.scad
@@ -7,8 +7,26 @@ torch_big_dia = 56.5;
 torch_tot_len = 256;
 torch_big_len = 60;
 
+torch_clear = 30;
+torch_clear_below = 10;
+
+stem_width = 20;
+stem_thick = 4;
+
 $fa=5;
 
+// calculated
+
+above = torch_big_len + torch_clear + torch_clear_below;
+
+holes = [ 172, 265 ];
+
+stem_below = stem_width/2;
+
+stem_len = holes[1] - above + stem_below;
+
+torch_out = stem_thick + torch_big_dia/2;
+
 module Torch(){
   mirror([0,0,1]){
     hull(){
@@ -22,4 +40,17 @@ module Torch(){
   }
 }
 
-Torch();
+module Bracket(){
+  difference(){
+    translate([-stem_width/2, -stem_thick, -stem_len])
+      cube([stem_width, stem_thick, stem_len]);
+  }
+}
+
+module Demo(){
+  %translate([0, -torch_out, 0])
+    Torch();
+  Bracket();
+}
+
+Demo();