// -*- C -*-

cubez = 12;

shaftz = cubez;

tests = [[4 + 0.5,  10 + 1.0]];

cubexy = 20;

module RecessScrewCutout_RecessCylinder(recessdia,zbelow, h){
  translate([0,0,-zbelow]) cylinder(r=recessdia/2, h=h+1, $fn=40);
}

RecessedScrewCutout_defaultrecessdepth_flat = -0.35;
RecessedScrewCutout_defaultrecessdepth_hex = -0.70;

module RecessedScrewCutout(shaftdia, recessdia,
        recessdepth_arg=RecessedScrewCutout_defaultrecessdepth_flat,
        zbelow=1) {
  // pass recessdepth_arg=-1 for the default for flat heads
  // pass recessdepth_arg=-1 for the default for flat heads
  recessdepth = recessdepth_arg >= 0 ? recessdepth_arg
    : -recessdepth_arg * recessdia;
  recesstopz = recessdepth + 0.5*recessdia + 0.1;
  xblocky = shaftdia + 0.1;

  translate([0,0,-zbelow]) cylinder(r=shaftdia/2, h=shaftz+1+zbelow, $fn=20);
  RecessScrewCutout_RecessCylinder(recessdia,zbelow, recessdepth);
  intersection(){
    translate([-recessdia*1.5, -xblocky/2, -zbelow])
      cube([recessdia*3, xblocky, recesstopz+2+zbelow]);
    translate([0, -recessdia, recesstopz])
      rotate([0,135,0]) cube([recessdia, recessdia*2, 10]);
    RecessScrewCutout_RecessCylinder(recessdia,zbelow, recesstopz+1);
  }
}

module Test(){
  difference(){
    translate([-cubexy/2, -cubexy/2, 0])
      cube([cubexy,cubexy,cubez]);
  }
}

module Hole(){
    RecessedScrewCutout(tests[0][0],
			tests[0][1]);
}

//Test();
Hole();