rohrreiniger.scad 985 B

12345678910111213141516171819202122232425262728293031323334353637383940
  1. use <threads.scad>
  2. $fn=180;
  3. Delta = 0.01;
  4. Inch = 25.4;
  5. Gewinde=12;
  6. Bohrung=10;
  7. Kugel=25;
  8. module austritt() {
  9. cylinder(d1=2, d2=2.5, h=15);
  10. }
  11. intersection() {
  12. difference() {
  13. union() {
  14. // Duschkopf-Gewinde an Schlauch
  15. english_thread (diameter=20/Inch, threads_per_inch=14, length=Gewinde/Inch, leadin=2, test=false);
  16. // Außenform Oval
  17. translate([0,0,Gewinde+25/2-2]) scale([1,1,1.5]) difference() {
  18. sphere(d=Kugel);
  19. // Ein Strahl zentral nach vorne
  20. austritt();
  21. // 5x Strahl nach schräg vorne
  22. for(i=[0:360/5:360]) rotate([0,0,i]) rotate([45,0,0]) austritt();
  23. // 6x breiter Strahl nach hinten
  24. for(i=[0:360/8:360]) hull() {
  25. rotate([0,0,i]) rotate([110,0,0]) austritt();
  26. rotate([0,0,i+6]) rotate([110,0,0]) austritt();
  27. }
  28. }
  29. }
  30. // Innenbohrung
  31. hull() {
  32. translate([0,0,-Delta]) cylinder(d=Bohrung, h=Gewinde);
  33. translate([0,0,Gewinde+Kugel*2/3]) sphere(d=Bohrung);
  34. }
  35. }
  36. translate([0,0,0]) cube(100, center=true);
  37. }