openscad/dotSCAD
1
0
Fork 0
mirror of https://github.com/JustinSDK/dotSCAD.git synced 2025-08-23 14:54:12 +02:00
Code Issues Releases Wiki Activity

add klein bottle

Browse Source
This commit is contained in:
Justin Lin
2019-07-12 16:38:49 +08:00
parent dac87e49c5
commit d3640830c4
1 changed files with 126 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

126
examples/klein_bottle.scad Normal file
View File

@@ -0,0 +1,126 @@
include <polysections.scad>;
include <arc_path.scad>;
include <circle_path.scad>;
include <path_extrude.scad>;
include <bezier_curve.scad>;
include <polyline2d.scad>;
include <line2d.scad>;
include <rotate_p.scad>;
radius1 = 10;
radius2 = 20;
bottom_height = 60;
thickness = 1.5;
t_step = 0.025;
fn = 24;
cut = false; // [true,false]
module klein_bottle(radius1, radius2, bottom_height, thickness, t_step, fn) {
$fn = fn;
module bottom() {
rotate(180) rotate_extrude() {
translate([radius1 + radius2, 0, 0])
polyline2d(
arc_path(radius = radius2, angle = [180, 360])
,thickness
);
polyline2d(
bezier_curve(t_step, [
[radius1 + radius2 * 2, 0, 0],
[radius1 + radius2 * 2, bottom_height * 0.25, 0],
[radius1 + radius2 * 0.5, bottom_height * 0.5, 0],
[radius1, bottom_height * 0.75, 0],
[radius1, bottom_height, 0]
]),
thickness
);
}
}
module tube() {
mid_pts = [
[0, 0, bottom_height + radius1],
[0, 0, bottom_height + radius1 * 2],
[0, radius1, bottom_height + radius1 * 3],
[0, radius1 * 2, bottom_height + radius1 * 3],
[0, radius1 * 3, bottom_height + radius1 * 3],
[0, radius1 * 4, bottom_height + radius1 * 2],
[0, radius1 * 4, bottom_height + radius1],
[0, radius1 * 4, bottom_height],
[0, radius1 * 3, bottom_height - radius1],
[0, radius1 * 2, bottom_height - radius1 * 2],
[0, radius1, bottom_height + thickness / 2 - radius1 * 3],
[0, 0, bottom_height - radius1 * 4],
[0, 0, bottom_height - radius1 * 5]
];
tube_path = bezier_curve(
t_step,
concat(
concat([[0, 0, bottom_height]], mid_pts),
[[0, 0, 0]]
)
);
tube_path2 = bezier_curve(
t_step,
concat(
concat([[0, 0, bottom_height - thickness]], mid_pts),
[[0, 0, -thickness] ]
)
);
difference() {
union() {
bottom();
path_extrude(
circle_path(radius1 + thickness / 2),
tube_path
);
}
path_extrude(
circle_path(radius1 - thickness / 2),
tube_path2
);
}
}
tube();
}
module cutted_klein_bottle(radius1, radius2, bottom_height, thickness, t_step, fn) {
difference() {
union() {
translate([radius2 + thickness, 0, 0])
rotate([0, 90, 0]) klein_bottle(radius1, radius2, bottom_height, thickness, t_step, fn);
translate([-radius2 - thickness, 0, 0])
rotate([0, -90, 0]) klein_bottle(radius1, radius2, bottom_height, thickness, t_step, fn);
}
h = (radius1 + radius2) * 2;
w = 2 * h;
l = bottom_height * 4;
translate([0, 0, h / 2])
cube([l, w, h], center = true);
}
}
if(cut) {
cutted_klein_bottle(radius1, radius2, bottom_height, thickness, t_step, fn);
} else {
klein_bottle(radius1, radius2, bottom_height, thickness, t_step, fn);
}