From 39697becedcabae1c880a1fe3663975a0440758a Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Wed, 1 Feb 2017 00:15:05 +0000
Subject: [PATCH] maglite-holder: screw holes

---
 maglite-holder.scad | 21 ++++++++++++++++++++-
 1 file changed, 20 insertions(+), 1 deletion(-)

diff --git a/maglite-holder.scad b/maglite-holder.scad
index f661c1c..cfdafaa 100644
--- a/maglite-holder.scad
+++ b/maglite-holder.scad
@@ -21,6 +21,9 @@ torch_out_more = 10;
 
 brace = [ 40, 10, 20 ];
 
+hole_dia = 4 + 0.5;
+hole_slot = 5;
+
 $fa=5;
 
 // calculated
@@ -52,6 +55,21 @@ module Torch(){
   }
 }
 
+module ScrewHole(y, rot) {
+  translate([0,0, above -y]){
+    rotate([0,rot,0]){
+      hull(){
+	for (d= [-1,+1] * hole_slot/2) {
+	  translate([d,0,0])
+	    rotate([90,0,0])
+	    translate([0,0,-stem_thick*2])
+	    cylinder(r= hole_dia/2, h= stem_thick*4);
+	}
+      }
+    }
+  }
+}    
+
 module TorchMovement(){
   // xxx needs torch increasing for slop
   translate([0, -torch_out, 0]) {
@@ -75,7 +93,8 @@ module Bracket(){
 	  cube([brace[0], brace[1], 1]);
       }
     }
-    // xxx needs screw holes
+    ScrewHole(holes[0], 90);
+    ScrewHole(holes[1], 0);
   }
   difference(){
     mirror([0,1,0])
-- 
2.30.2