// Adapt a simple penholder from thingiverse
// (http://www.thingiverse.com/thing:140136) to attach to the post on my Ott
// Lite desk lamp.

slop=0.5;

basedia=16.93;
baseheight=7.4;
postdia=12.73;
slotdia=9.82;
tall=34;
solidbottom=13;

outerdia=basedia+slop+4;


// import("PenHolder75.stl");

module hanger() {
   difference() {
      union() {
         cylinder(h=tall,r=(outerdia/2));
         cylinder(h=2.3,r=15);
      }
      translate([0,0,-1])
         cylinder(h=tall+2,r=((postdia+slop)/2));
      translate([0,0,-1])
      cylinder(h=1+baseheight+slop,r=((basedia+slop)/2));
      translate([0,-(slotdia+slop)/2,-1])
         cube([50,slotdia+slop,tall+2]);
   }
}

difference() {
   union() {
      translate([(66.56/2)+(outerdia/2)-2.3,0,0])
         hanger();
      translate([-66.56/2, -66.68/2, 0])
         import("PenHolder75.stl");
      difference() {
         cylinder(r=((66.56+66.68)/2)/2, h=solidbottom, $fn=64);
         translate([0,0,-1])
            cylinder(r=(((66.56+66.68)/2)/2)-2.4, h=solidbottom+2, $fn=64);
      }
   }
   translate([(66.56/2)+(outerdia/2)-2.3,0,0])
      cylinder(h=baseheight+slop,r=((basedia+slop)/2));
}