diff options
| author | Erich Eckner <git@eckner.net> | 2023-03-31 07:28:40 +0200 |
|---|---|---|
| committer | Erich Eckner <git@eckner.net> | 2023-03-31 07:28:40 +0200 |
| commit | e8c637b5bb3dee24d68b00368d906c9af1e2d178 (patch) | |
| tree | 8c5fb3da73bddd2f4c293917eb52075669ec9f88 | |
| parent | 02fdd5be0ddd6c9d8066cdb172ff664f453558be (diff) | |
| download | Trinkflaschenboden-e8c637b5bb3dee24d68b00368d906c9af1e2d178.tar.xz | |
| -rw-r--r-- | Trinkflaschenboden.scad | 30 |
1 files changed, 30 insertions, 0 deletions
diff --git a/Trinkflaschenboden.scad b/Trinkflaschenboden.scad new file mode 100644 index 0000000..5a438f4 --- /dev/null +++ b/Trinkflaschenboden.scad @@ -0,0 +1,30 @@ +Wanddicke = 2; +Radius = 83/2; +Woelbungsradius = (1+(6.5/2)*6.5/2)/2; + +rotate_extrude(angle = 360, $fn=100) { + translate([0,-Wanddicke,0]) + square([Radius,Wanddicke]); + intersection() { + translate([Radius,-Wanddicke,0]) + square(Wanddicke); + translate([Radius,0,0]) + circle(r = Wanddicke); + } + difference() { + translate([Radius,0,0]) + square([Wanddicke,14.5]); + translate([Radius+1-Woelbungsradius,7+6.5/2,0]) + circle(r = Woelbungsradius); + } + intersection() { + translate([Radius,14.5,0]) + square([Wanddicke,Wanddicke/2]); + translate([Radius+Wanddicke/2,14.5,0]) + circle(r = Wanddicke/2); + } +} + +// r² = (r-1)² + (6.5/2)² +// => +// 2r = 1² + (6.5/2)²
\ No newline at end of file |