2d3d/3D/pfeife.scad

$fn=90;

Breite=15;

Wandstaerke=1;
Delta=0.001;

difference() {
  union() {
    cylinder(d=Breite+2*Wandstaerke, h=Breite);
    translate([0,(Breite+2*Wandstaerke)/2-Breite/3,0]) cube([Breite*3/2,Breite/3,Breite]);
  }
  translate([0,0,-Delta]) cylinder(d=Breite, h=Breite+2*Delta);
  translate([Breite/3,Breite/2-Wandstaerke*3/2,Breite/2])  rotate([0,90,0]) hull() {
    translate([-Breite/3,0,0]) cylinder(d=(Breite-2*Wandstaerke)/4,h=2*Breite);
    translate([Breite/3,0,0]) cylinder(d=(Breite-2*Wandstaerke)/4,h=2*Breite);
  }
  mirror([1,0,0]) translate([-Breite*3/8,Breite*2/8,Breite/8])  rotate([0,0,30])cube([Breite*3/2,Breite/6,Breite*3/4]);
}