X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=blobdiff_plain;f=salter-scale-hook.scad;h=3a8cfa354c0ca1642c4415a734a2b2da4251efec;hb=6dba99d4594590c1af949fbd0379d366a05c2ca6;hp=68d603f19c815a9fed68091cf46523944f6f2f4b;hpb=a8929875d59f41619597c5ed144df83e651d0518;p=reprap-play.git

diff --git a/salter-scale-hook.scad b/salter-scale-hook.scad
index 68d603f..3a8cfa3 100644
--- a/salter-scale-hook.scad
+++ b/salter-scale-hook.scad
@@ -10,6 +10,7 @@ rod_offset = 14 + 2;
 mainheight = 25;
 width = 40;
 rearthick = 4;
+screw_head_depth = 2;
 
 // calculated
 
@@ -69,10 +70,22 @@ module Cut(less){
     CutProfile();
 }
 
+module ScrewHole(){
+  xd =  (screw_head_dia-screw_dia)/2;
+  translate([0,0,-50])
+    cylinder(h=100, r= screw_dia/2, $fn=20);
+  hull(){
+    translate([0,0,-xd])
+      cylinder(h=1, r= screw_dia/2, $fn=50);
+    cylinder(h=20, r= screw_head_dia/2, $fn=50);
+  }
+}
+
 module Hook(){
   difference(){
     translate([0,0, -width/2])
       linear_extrude(height=width) Profile();
+
     for (m=[0,1]) {
       mirror([0,0,m]) {
 	hull(){
@@ -81,6 +94,13 @@ module Hook(){
 	}
       }
     }
+
+    translate([rod_dia/2 + screw_head_depth,
+	       ymaxc - screw_head_dia,
+	       0]) {
+      rotate([0,-90,0])
+	ScrewHole();
+    }
   }
 }