th-10254/huxley-spindle.scad

   1 /*      Printable Filament Spool Spindle for Huxley\r
   2         by Ian Jackson License, GPL v2 or later\r
   3                 based on Printable Filament Spool Spindle for Reprap\r
   4                 by Travis Howse <tjhowse@gmail.com>\r
   5                 2011.   License, GPL v2 or later\r
   6                 Based on:\r
   7                 Makerbottable Filament Spool v2.0\r
   8                 by Randy Young <dadick83@hotmail.com>\r
   9                 2010, 2011.   License, GPL v2 or later\r
  10 **************************************************/\r
  11 \r
  12 include <Libs.scad> //  Libs.scad is @ http://www.thingiverse.com/thing:6021\r
  13 include <SpindleTeeth.scad>\r
  14 \r
  15 d=0.01;\r
  16 \r
  17 module HuxleySpindleTower(height=125, sideways=27.5,\r
  18                 doveheight=10, dovewidth=17, mainthick=6, mainwidth=10) {\r
  19 \r
  20         curvemidintheethx = -4;\r
  21         curvemidr = sideways + curvemidintheethx;\r
  22         sticklen = height-doveheight-curvemidr + 1;\r
  23 \r
  24         translate([curvemidintheethx, -curvemidr, 0]) {\r
  25                 intersection(){\r
  26                         difference(){\r
  27                                 cylinder(h=mainthick, r=curvemidr+mainwidth/2);\r
  28                                 translate([0,0,-1])\r
  29                                          cylinder(h=mainthick+2,\r
  30                                                   r=curvemidr-mainwidth/2);\r
  31                         }\r
  32                         translate([-100,-d,-50])\r
  33                                 cube([100,100,100]);\r
  34                 }\r
  35         }\r
  36         translate([-sideways-mainwidth/2, -sticklen-curvemidr, 0])\r
  37                 cube([mainwidth, sticklen, mainthick]);\r
  38 \r
  39         SpindleTeeth(baseheight=20,baseyoff=-1.5);\r
  40 \r
  41         translate([-sideways, -height, doveheight/2-d]) {\r
  42                 rotate([0,0,90])\r
  43                 difference(){\r
  44                         translate([d,-dovewidth/2,d-5])\r
  45                                 cube([doveheight+d*2, dovewidth,\r
  46                                       doveheight-d*2]);\r
  47                         dovetail(height=doveheight+1, male=false);\r
  48                 }\r
  49         }\r
  50 }\r
  51 \r
  52 difference(){\r
  53         HuxleySpindleTower();\r
  54         translate([-200,-200,-1]) cube([400,400,1.01]);\r
  55 }\r