// Zuurstoklamp (C) 2018 m4rc3lv

ViewLighthouse=true;
ViewTussenstuk=true;
ViewTop=true;
ViewBase=true;

if(ViewLighthouse) {
 color("silver") {
  difference() {
   LightHouse();
   translate([0,0,-1])cylinder(h=50,d=38,$fn=200);
  }
  // LED mount 
  difference() {
   translate([-19.5,-4,5]) cube([39,8,3]);
   translate([-2,0,4.9]) cylinder(d=1.8,h=10,$fn=90);
   translate([2,0,4.9]) cylinder(d=1.8,h=10,$fn=90);
  }
 }
}

if(ViewTop) {
 translate([0,0,70]) Top();
}

if(ViewTussenstuk) {
 translate([0,0,50])  Tussenstuk();
}

if(ViewBase) translate([0,0,-65]) Base();

module LightHouse() {
 union() {
  cylinder(d=40,h=10,$fn=30);
  translate([0,0,5])cylinder(d=40,h=34,$fn=20);
  translate([0,0,34]) cylinder(d=40,h=10,$fn=30);
 }
}

module Base() {
 difference() {
  cylinder(d1=64,d2=62,h=11,$fn=200);
  translate([0,0,-1.5]) cylinder(d1=63,d2=61,h=11,$fn=200);
    
  
  // Hole for micro USB cable
  translate([-35,-5,1.5])cube([20,11,8]);   
  // Hole for wiring from D1 Mini up (to the LED's)
  translate([8,-15,0]) cylinder(d=5.5,h=50,$fn=100);
  // Holes for tie wraps
  translate([1,-15,0]) cylinder(d=5,h=50,$fn=100);
  translate([1,15,0]) cylinder(d=5,h=50,$fn=100);
 } 
 
 // Long (top) cylinder
 difference() {
  difference() {
   translate([0,0,10]) cylinder(d=40,h=50,$fn=200);    
   translate([0,0,30]) cylinder(d=37.9,h=50,$fn=200);   
  }
  // Holes for wiring from D1 Mini up (to the LED's)
  translate([7,-15,0]) cylinder(d=5.5,h=50,$fn=100);
  // Holes for tie wraps
  translate([1,-15,0]) cylinder(d=5,h=50,$fn=100);
  translate([1,15,0]) cylinder(d=5,h=50,$fn=100);
 }
 
 difference() {
  translate([0,0,30]) cylinder(d=37.9,h=35,$fn=200); 
  translate([0,0,30]) cylinder(d=35.5,h=50,$fn=200); 
 }
}

module Base1() {
 difference() {
  union() {
   cylinder(d1=64,d2=62,h=8,$fn=200);
   translate([0,0,8])cylinder(d=40,h=50,$fn=200);
   translate([0,0,8])cylinder(d=41,h=3,$fn=200);
   translate([0,0,58]) cylinder(d=37.9,h=4,$fn=200); 
  }
  translate([0,0,2.4]) cylinder(h=80,d=36,$fn=200); // Make hollow
  
  // Hole for micro USB cable
  translate([-5,2,12.5])cube([10,20,5]);  
 } 
}

module Top() {
 cylinder(d=37.9,h=2.5,$fn=200); 
 translate([0,0,2.5]) cylinder(d=40,h=8,$fn=200);
 translate([0,0,2.5+8]) cylinder(d1=40,d2=2,h=9,$fn=200);
}

module Tussenstuk() {
 difference() {
  union() { 
   cylinder(d=37.9,h=4,$fn=200);
   translate([0,0,4]) cylinder(d=40,h=11,$fn=200);
   translate([0,0,4+11])cylinder(d=37.9,h=4,$fn=200);
  }
  // Hole for wires
  translate([0,0,-1]) cylinder(d=19,h=40,$fn=100);
 } 
}