openscad/dotSCAD
1
0
Fork 0
mirror of https://github.com/JustinSDK/dotSCAD.git synced 2025-08-20 05:21:38 +02:00
Code Issues Releases Wiki Activity

add sierpinski_triangle

Browse Source
This commit is contained in:
Justin Lin
2019-07-29 20:46:06 +08:00
parent c0c98c125e
commit c71b612d01
1 changed files with 56 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

56
examples/sierpinski_triangle.scad Normal file
View File

@@ -0,0 +1,56 @@
include <line2d.scad>;
include <turtle/turtle2d.scad>;
module triangle(t, side_leng, width) {
$fn = 48;
angle = 120;
t_p1 = turtle2d("forward", t, side_leng);
line2d(
turtle2d("pt", t), turtle2d("pt", t_p1),
width, p1Style = "CAP_ROUND", p2Style = "CAP_ROUND"
);
t_p2 = turtle2d("forward", turtle2d("turn", t_p1, angle), side_leng);
line2d(
turtle2d("pt", t_p1), turtle2d("pt", t_p2),
width, p1Style = "CAP_ROUND", p2Style = "CAP_ROUND"
);
t_p3 = turtle2d("forward", turtle2d("turn", t_p2, angle), side_leng);
line2d(
turtle2d("pt", t_p2), turtle2d("pt", t_p3),
width, p1Style = "CAP_ROUND", p2Style = "CAP_ROUND"
);
}
module two_triangles(t, side_len, len_limit, width) {
angle = 60;
triangle(t, side_len, width);
next_t = turtle2d("turn", turtle2d("forward", t, side_len / 2), angle);
triangle(next_t, side_len / 2, width);
}
module sierpinski_triangle(t, side_len, len_limit, width) {
if(side_len >= len_limit) {
two_triangles(t, side_len, len_limit, width);
sierpinski_triangle(t, side_len / 2, len_limit, width);
sierpinski_triangle(
turtle2d("forward", t, side_len / 2),
side_len / 2, len_limit, width
);
sierpinski_triangle(
turtle2d("turn", turtle2d("forward", turtle2d("turn", t, 60), side_len / 2), -60),
side_len / 2, len_limit, width
);
}
}
side_len = 150;
len_limit = 4;
width = 0.5;
t = turtle2d("create", 0, 0, 0);
sierpinski_triangle(t, side_len, len_limit, width);