From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Wed, 11 Feb 2015 18:30:51 +0000 (+0000)
Subject: screw-recess-test: initial
X-Git-Tag: filamentspool-v2-release~210
X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=commitdiff_plain;h=2dc84836b06a8aa771dd7a0df65ccf230f8c0eaa;p=reprap-play.git

screw-recess-test: initial
---

diff --git a/screw-recess-test.scad b/screw-recess-test.scad
new file mode 100644
index 0000000..2e4fb5c
--- /dev/null
+++ b/screw-recess-test.scad
@@ -0,0 +1,41 @@
+// -*- C -*-
+
+cubez = 12;
+
+shaftdia = 4 + 0.5;
+recessdia = 10 + 1.0;
+
+shaftz = cubez;
+recessz = 5;
+
+recesstopz = recessz + 0.5*recessdia + 0.1;
+xblocky = shaftdia + 0.1;
+
+cubexy = recessdia + 10;
+
+module RecessCylinder(h){
+  translate([0,0,-1]) cylinder(r=recessdia/2, h=h+1, $fn=40);
+}
+
+module Hole(){
+  translate([0,0,-1]) cylinder(r=shaftdia/2, h=shaftz+2, $fn=20);
+  RecessCylinder(recessz);
+  intersection(){
+    translate([-recessdia*1.5, -xblocky/2, -1])
+      cube([recessdia*3, xblocky, recesstopz+3]);
+    translate([0, -recessdia, recesstopz])
+      rotate([0,135,0]) cube([recessdia, recessdia*2, 10]);
+    RecessCylinder(recesstopz+1);
+  }
+}
+
+module Test(){
+  difference(){
+    translate([-cubexy/2, -cubexy/2, 0])
+      cube([cubexy,cubexy,cubez]);
+    Hole();
+  }
+}
+
+Test();
+//Hole();