2d3d/Walimex-Fokushilfe.scad

$fn=120;

D_Aussen=98;
D_Spiegel=43;
D_Linse=90;
Dicke=2;

difference() {
  union(){
    difference() {
      union(){
        cylinder(d=D_Aussen+4, h=20);
      }
      union(){
        translate([0,0,Dicke]) cylinder(d=D_Aussen, h=20);
        cylinder(d=D_Spiegel-5, h=20, center=true);
        for(i=[0:360/3:359]) 
          rotate([0,0,i]) translate([(D_Linse+D_Spiegel)/4,0,0]) cylinder(d1=(D_Linse-D_Spiegel)/2, d2=3/2*Dicke+(D_Linse-D_Spiegel)/2, h=Dicke);
      }
    }
    translate([0,0,12.5+2]) difference() {
      cylinder(d=D_Aussen, h=1, center=true);
      cylinder(d1=D_Aussen-2, d2=D_Aussen, h=1, center=true);
      cylinder(d2=D_Aussen-2, d1=D_Aussen, h=1, center=true);
    }
  }
  translate([-60,10,10]) cube([120,60,60]);
  mirror([0,1,0]) translate([-60,10,10]) cube([120,60,60]);
}