maglite-holder: shape tuning

[reprap-play.git] / maglite-holder.scad

diff --git a/maglite-holder.scad b/maglite-holder.scad
index bf78cd1296f70606bc501ffeae809581b5fa92a2..b880291c5b9b609978ce81d3e15696e50e598935 100644 (file)
--- a/maglite-holder.scad
+++ b/maglite-holder.scad
@@ -13,9 +13,11 @@ torch_clear_below = 10;
 stem_width = 20;
 stem_thick = 4;
 
-torch_recess = 15;
+torch_recess = 14;
 arm_width = 10;
-block_thick = 30;
+block_thick = 15;
+
+torch_out_more = 10;
 
 //$fa=5;
 
@@ -29,11 +31,11 @@ stem_below = stem_width/2;
 
 stem_len = holes[1] - above + stem_below;
 
-torch_out = stem_thick + torch_big_dia/2;
+torch_out = stem_thick + torch_big_dia/2 + torch_out_more;
 
 block_width = arm_width*2 + torch_big_dia;
 
-block_out = torch_out + torch_big_dia/sqrt(2);
+block_out = torch_out + torch_big_dia/2/sqrt(2);
 
 module Torch(){
   mirror([0,0,1]){
@@ -48,6 +50,16 @@ module Torch(){
   }
 }
 
+module TorchMovement(){
+  translate([0, -torch_out, 0]) {
+    translate([0, 0, -torch_recess])
+      Torch();
+    rotate([90,0,0])
+      linear_extrude(height= block_out)
+      projection() rotate([-90,0,0]) Torch();
+  }
+}
+
 module Bracket(){
   difference(){
     mirror([0,1,0])
@@ -58,10 +70,8 @@ module Bracket(){
     mirror([0,1,0])
       translate([-block_width/2, 0, -block_thick])
       cube([block_width, block_out, block_thick]);
+    TorchMovement();
   }
-  for (out=[ torch_out, torch_out + block_out*2 ])
-    translate([ 0, -out, -torch_recess ])
-      Torch();
 }
 
 module Demo(){
@@ -71,3 +81,4 @@ module Demo(){
 }
 
 Demo();
+