makita-drill-handle-blivet.scad

   1 // -*- C -*-
   2
   3 include <utils.scad>
   4
   5 hex_across = 12.70 - 0.3;
   6 screw_dia = 8.0 + 0.0;
   7
   8 min_th = 0.425;
   9 extra_th = 1.0;
  10
  11 // calculated
  12
  13 total_th = min_th + extra_th;
  14 hex_rad = hex_across / 2 / cos(30);
  15
  16 module Plan(){
  17   difference(){
  18     circle(r = hex_rad, $fn = 6);
  19     circle(r = screw_dia/2);
  20   }
  21 }
  22
  23 module Elevation(){
  24   hull(){
  25     rectfromto([ -hex_rad, -1],
  26                [ 0.1, min_th]);
  27     translate([ hex_rad, 0 ])
  28       rectfromto([ 0, -1 ],
  29                  [ 1, total_th]);
  30   }
  31 }
  32
  33 module Blivet(){
  34   intersection(){
  35     linextr(0, total_th + 1)
  36       Plan();
  37     linextr_y_xz(-hex_across, hex_across)
  38       Elevation();
  39   }
  40 }
  41
  42 Blivet();