openscad/dotSCAD
1
0
Fork 0
mirror of https://github.com/JustinSDK/dotSCAD.git synced 2025-01-16 21:58:26 +01:00
Code Issues Releases Wiki Activity

add golden_spiral_jigsaw

Browse Source
This commit is contained in:
Justin Lin 2022-06-05 19:01:46 +08:00
parent 98ae52b828
commit 0fc6e05d8f
1 changed files with 158 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

158
examples/spiral/golden_spiral_jigsaw.scad Normal file
View File

@ -0,0 +1,158 @@
use <polyline_join.scad>;
use <util/radians.scad>;
use <ptf/ptf_rotate.scad>;
use <util/lerp.scad>;
spirals = 8;
degrees = 150;
thickness = 3;
offset_r = 0.4;
$fn = 24;
golden_spiral_jigsaw();
module golden_spiral_jigsaw() {
offset_rr = offset_r / 40;
start = 360 / spirals;
phi = (1 + sqrt(5)) / 2;
function piece_polygons(start, step, to) =
let(
points = [
for(d = [start:step / 4:to])
let(
theta = radians(d),
r = pow(phi, theta * 2 / PI)
)
r * [cos(d), sin(d)]
]
)
[
for(i = 0; !is_undef(points[5 + i]); i = i + 1)
[
points[i],
ptf_rotate(points[4 + i], -step),
ptf_rotate(points[5 + i], -step),
points[1 + i]
]
];
module interlocking_part1(poly, offset_r) {
v = poly[1] - poly[0];
r = norm(v) / 7;
translate(lerp(poly[0], poly[1], 0.25))
rotate(atan2(v.y, v.x))
offset(offset_r) {
square(sqrt(2) * [r / 2, 2 * r], center = true);
translate([0, -r - 0.04])
circle(r);
}
}
module interlocking_part2(poly, offset_r) {
v = poly[3] - poly[0];
r = norm(v) / 7;
translate(lerp(poly[0], poly[3], 0.25))
rotate(atan2(v.y, v.x))
offset(offset_r) {
square(sqrt(2) * [r / 2, 2 * r], center = true);
translate([0, r + 0.04])
circle(r);
}
}
linear_extrude(thickness)
scale(40)
{
a_step = 360 / spirals;
polygons = piece_polygons(start, a_step, degrees * 2);
for(i = [0:spirals - 1]) {
rotate(a_step * i)
for(j = [0:len(polygons) - 5]) {
poly = polygons[j];
u_poly = polygons[j + 1];
r_poly = [
for(p = polygons[j + 4])
ptf_rotate(p, a_step * (spirals - 1))
];
// a piece with blanks
difference() {
offset(-offset_rr / 2)
polygon(poly);
interlocking_part1(u_poly, offset_rr);
interlocking_part2(r_poly, offset_rr);
}
// tabs
interlocking_part1(poly, 0);
interlocking_part2(poly, 0);
}
}
// plate
polygons2 = piece_polygons(-a_step, a_step, start * 3);
points = [
for(d = [-start:a_step / 4:start])
let(
theta = radians(d),
r = pow(phi, theta * 2 / PI)
)
r * [cos(d), sin(d)]
];
render()
difference() {
union() {
for(i = [0:spirals - 1]) {
rotate(a_step * i)
difference() {
offset(-offset_rr / 2)
union()
for(j = [0:len(polygons2) - 5]) {
poly = polygons2[j];
polygon(poly);
}
for(j = [0:len(polygons2) - 5]) {
poly = polygons2[j];
// a piece with blanks
difference() {
//polygon(poly);
u_poly = polygons2[j + 1];
r_poly = [
for(p = polygons2[j + 4])
ptf_rotate(p, a_step * (spirals - 1))
];
union() {
if(j > 3) {
interlocking_part2(r_poly, offset_rr);
}
if(j > 6) {
interlocking_part1(u_poly, offset_rr);
}
}
}
}
}
}
circle(pow(phi, radians(start) / PI) * 0.95);
}
union()
for(i = [0:spirals - 1]) {
rotate(a_step * i)
polyline_join(points)
circle(offset_rr / 2);
}
}
}
}