2d3d/absaug-adapter.scad

$fn=180;

Absatz=0;
Ring=15;
Wand=3;
d_aussen=110;
d_innen=78;

module adapter(Da, Di) {
    cylinder(h=Absatz, d=Da);
    Konus=20;
    translate([0,0,Absatz]) cylinder(d1=Da, d2=Di, h=Konus);
    translate([0,0,Konus+Absatz]) cylinder(d=Di, h=40);
}

difference() {
    union() {
        adapter(d_aussen,d_innen);
        translate([0,0,Absatz]) difference() {
            cylinder(h=Wand, d=d_aussen+2*Ring);
            for (i=[0:360/6:359]) {
            rotate([0,0,i]) translate([(d_aussen+Ring)/2,0,-0.1]) cylinder(d=4, h=15);
            }
        }
    }
    adapter(d_aussen-2*Wand,d_innen-2*Wand);
}