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

auto-calculating angles when angles is undef

Browse Source
This commit is contained in:
Justin Lin
2017-05-19 11:14:09 +08:00
parent d8eced7a40
commit aedca84aa2
1 changed files with 35 additions and 12 deletions
Download Patch File Download Diff File Expand all files Collapse all files

47
src/along_with.scad
View File

@@ -11,25 +11,48 @@
*
**/
include <__private__/__angy_angz.scad>;
module along_with(points, angles) {
module rotOrNot(i) {
if(angles == undef) {
children(0);
} else {
rotate(angles[i])
children(0);
}
}
function _path_angles(path_pts, leng_path_pts, i = 0) =
i == leng_path_pts - 1 ?
[] :
concat(
[__angy_angz(path_pts[i], path_pts[i + 1])],
_path_angles(path_pts, leng_path_pts, i + 1)
);
function path_angles(path_pts) =
let(
leng_path_pts = len(path_pts),
angs = _path_angles(path_pts, leng_path_pts)
)
concat(
[[0, -angs[0][0], angs[0][1]]],
[for(a = angs) [0, -a[0], a[1]]]
);
angles_defined = angles != undef;
angs = angles_defined ? angles : path_angles(path_pts);
module align(i) {
translate(points[i])
rotate(angs[i])
if(angles_defined) {
children(0);
} else {
rotate([90, 0, -90])
children(0);
}
}
if($children == 1) {
for(i = [0:len(points) - 1]) {
translate(points[i])
rotOrNot(i) children(0);
align(i) children(0);
}
} else {
for(i = [0:min(len(points), $children) - 1]) {
translate(points[i])
rotOrNot(i) children(i);
align(i) children(i);
}
}
}