mic-table-clamp.scad

   1 // -*- C -*-
   2
   3 // print on High Detail
   4 // but adjust infill to 50%, shell thickness to 2mm
   5
   6 include <threads.scad>
   7 include <camera-mount.scad>
   8
   9 positive_dia = inch * 3/8. - 0.375;
  10 positive_l = inch * 1/2.;
  11
  12 stem_l = 7;
  13 stem_dia = 12;
  14
  15 base_th = 3;
  16 base_dia = 60;
  17
  18 module Base(){
  19   translate([0,0,-0.1])
  20     english_thread(diameter=positive_dia/inch, threads_per_inch=16,
  21                    leadin=1, test=$test,
  22                    length= (positive_l + 0.1) / inch);
  23
  24   rotate([180,0,0]) {
  25     cylinder(r= stem_dia/2 * 1/(0.5 * sqrt(3)),
  26              h = stem_l + 1,
  27              $fn=6);
  28     translate([0,0, stem_l])
  29       cylinder(r= base_dia/2, h= base_th);
  30   }
  31 }
  32
  33 Base();