chiark / gitweb /
screw-recess-test: Break out RecessedScrewCutout (wip generalisation) (nfc)
authorIan Jackson <ijackson@chiark.greenend.org.uk>
Wed, 11 Feb 2015 21:18:25 +0000 (21:18 +0000)
committerIan Jackson <ijackson@chiark.greenend.org.uk>
Wed, 11 Feb 2015 21:18:29 +0000 (21:18 +0000)
screw-recess-test.scad

index 2e4fb5c..5079008 100644 (file)
@@ -2,30 +2,29 @@
 
 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;
+tests = [[4 + 0.5,  10 + 1.0]];
 
-cubexy = recessdia + 10;
+cubexy = 20;
 
-module RecessCylinder(h){
+module RecessScrewCutout_RecessCylinder(recessdia, h){
   translate([0,0,-1]) cylinder(r=recessdia/2, h=h+1, $fn=40);
 }
 
-module Hole(){
+module RecessedScrewCutout(shaftdia, recessdia) {
+  recesstopz = recessz + 0.5*recessdia + 0.1;
+  xblocky = shaftdia + 0.1;
+
   translate([0,0,-1]) cylinder(r=shaftdia/2, h=shaftz+2, $fn=20);
-  RecessCylinder(recessz);
+  RecessScrewCutout_RecessCylinder(recessdia, 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);
+    RecessScrewCutout_RecessCylinder(recessdia, recesstopz+1);
   }
 }
 
@@ -33,9 +32,14 @@ module Test(){
   difference(){
     translate([-cubexy/2, -cubexy/2, 0])
       cube([cubexy,cubexy,cubez]);
-    Hole();
   }
 }
 
-Test();
-//Hole();
+module Hole(){
+    RecessedScrewCutout(tests[0][0],
+                       tests[0][1],
+                       -1);
+}
+
+//Test();
+Hole();