th-10254/tower-base.scad

   1
   2 motorwidth=35.2;
   3 motorheight=36.5;
   4
   5 pillarthick=8;
   6
   7 mw2=motorwidth/2;
   8
   9 module corner() {
  10         $fn=30;
  11         translate([-mw2,-mw2,0]) union(){
  12                 cylinder(r=pillarthick/2, h=motorheight);
  13                 translate([0,0,motorheight]) sphere(r=pillarthick/2);
  14         }
  15 }
  16
  17 module towerbase() {
  18         difference(){
  19                 union(){
  20                         for (angle=[0,90,180,270])
  21                                 rotate([0,0,angle]) corner();
  22                 }
  23                 translate([-mw2,-mw2,-1])
  24                         cube([motorwidth,motorwidth,motorheight]);
  25         }
  26 }
  27
  28 towerbase();