openscad/dotSCAD
1
0
Fork 0
mirror of https://github.com/JustinSDK/dotSCAD.git synced 2025-08-04 13:57:33 +02:00
Code Issues Releases Wiki Activity

rename

Browse Source
This commit is contained in:
Justin Lin
2018-12-11 18:35:30 +08:00
parent 9aa4f3455c
commit 5a15e86ebd
1 changed files with 7 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
src/shape_starburst.scad
View File

@@ -12,20 +12,22 @@
* *
**/ **/
function __outer_points(r1, r2, n) = function __outer_points_shape_starburst(r1, r2, n) =
let( let(
a = 360 / n a = 360 / n
) )
[for(i = [0:n-1]) [r1 * cos(a * i), r1 * sin(a * i)]]; [for(i = [0:n-1]) [r1 * cos(a * i), r1 * sin(a * i)]];
function __inner_points(r1, r2, n) = function __inner_points_shape_starburst(r1, r2, n) =
let ( let (
a = 360 / n, a = 360 / n,
half_a = a / 2 half_a = a / 2
) )
[for(i = [0:n-1]) [r2 * cos(a * i + half_a), r2 * sin(a * i + half_a)]]; [for(i = [0:n-1]) [r2 * cos(a * i + half_a), r2 * sin(a * i + half_a)]];
function __one_by_one(outer_points, inner_points, i = 0) = function __one_by_one_shape_starburst(outer_points, inner_points, i = 0) =
len(outer_points) == i ? [] : len(outer_points) == i ? [] :
concat([outer_points[i], inner_points[i]], __one_by_one(outer_points, inner_points, i + 1)); concat([outer_points[i], inner_points[i]], __one_by_one_shape_starburst(outer_points, inner_points, i + 1));
function shape_starburst(r1, r2, n) = __one_by_one(__outer_points(r1, r2, n), __inner_points(r1, r2, n)); function shape_starburst(r1, r2, n) = __one_by_one_shape_starburst(
__outer_points_shape_starburst(r1, r2, n), __inner_points_shape_starburst(r1, r2, n)
);