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 tri_arc_path

Browse Source
This commit is contained in:
Justin Lin
2021-08-26 21:13:12 +08:00
parent b6d86ab4ba
commit 30f83865f1
1 changed files with 41 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

41
src/experimental/tri_arc_path.scad Normal file
View File

@@ -0,0 +1,41 @@
use <__comm__/__frags.scad>;
use <angle_between.scad>;
use <triangle/tri_circumcenter.scad>;
use <ptf/ptf_rotate.scad>;
use <util/reverse.scad>;
use <experimental/tri_is_ccw.scad>;
function _tri_arc_ct_clk(shape_pts) =
let(
c = tri_circumcenter(shape_pts),
v0 = shape_pts[0] - c,
v2 = shape_pts[2] - c,
r = norm(v0),
v0_a = atan2(v0[1], v0[0]),
a = angle_between(v0, v2, ccw = true),
a_step = a / __frags(r)
)
[for(a = [0:a_step:a]) c + ptf_rotate([r * cos(a), r * sin(a)], v0_a)];
function tri_arc_path(shape_pts) =
tri_is_ccw(shape_pts) ?
_tri_arc_ct_clk(shape_pts) :
reverse(_tri_arc_ct_clk(reverse(shape_pts)));
/*
use <experimental/tri_arc_path.scad>;
use <util/zip.scad>;
use <hull_polyline2d.scad>;
$fn = 24;
pts = zip([rands(0, 20, 3), rands(0, 20, 3)]);
hull_polyline2d(tri_arc_path(pts));
#for(i = [0:len(pts) - 1]) {
translate(pts[i])
sphere(1);
translate(pts[i])
text(str(i), 2);
}
*/