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

refactor deps

Browse Source
This commit is contained in:
Justin Lin 2020-01-27 10:32:40 +08:00
parent 3683beaae6
commit 9e563e92e3
3 changed files with 53 additions and 50 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

49
src/_impl/_bezier_curve_impl.scad Normal file
View File

@ -0,0 +1,49 @@
use <__comm__/__to2d.scad>;
function _combi(n, k) =
let(
bi_coef = [
[1], // n = 0: for padding
[1,1], // n = 1: for Linear curves, how about drawing a line directly?
[1,2,1], // n = 2: for Quadratic curves
[1,3,3,1] // n = 3: for Cubic Bézier curves
]
)
n < len(bi_coef) ? bi_coef[n][k] : (
k == 0 ? 1 : (_combi(n, k - 1) * (n - k + 1) / k)
);
function bezier_curve_coordinate(t, pn, n, i = 0) =
i == n + 1 ? 0 :
(_combi(n, i) * pn[i] * pow(1 - t, n - i) * pow(t, i) +
bezier_curve_coordinate(t, pn, n, i + 1));
function _bezier_curve_point(t, points) =
let(n = len(points) - 1)
[
bezier_curve_coordinate(
t,
[for(p = points) p[0]],
n
),
bezier_curve_coordinate(
t,
[for(p = points) p[1]],
n
),
bezier_curve_coordinate(
t,
[for(p = points) p[2]],
n
)
];
function _bezier_curve_impl(t_step, points) =
let(
t_end = ceil(1 / t_step),
pts = concat([
for(t = 0; t < t_end; t = t + 1)
_bezier_curve_point(t * t_step, points)
], [_bezier_curve_point(1, points)])
)
len(points[0]) == 3 ? pts : [for(pt = pts) __to2d(pt)];

50
src/bezier_curve.scad
View File

@ -8,52 +8,6 @@
*
**/
include <__comm__/__to2d.scad>;
use <_impl/_bezier_curve_impl.scad>;
function _combi(n, k) =
let(
bi_coef = [
[1], // n = 0: for padding
[1,1], // n = 1: for Linear curves, how about drawing a line directly?
[1,2,1], // n = 2: for Quadratic curves
[1,3,3,1] // n = 3: for Cubic Bézier curves
]
)
n < len(bi_coef) ? bi_coef[n][k] : (
k == 0 ? 1 : (_combi(n, k - 1) * (n - k + 1) / k)
);
function bezier_curve_coordinate(t, pn, n, i = 0) =
i == n + 1 ? 0 :
(_combi(n, i) * pn[i] * pow(1 - t, n - i) * pow(t, i) +
bezier_curve_coordinate(t, pn, n, i + 1));
function _bezier_curve_point(t, points) =
let(n = len(points) - 1)
[
bezier_curve_coordinate(
t,
[for(p = points) p[0]],
n
),
bezier_curve_coordinate(
t,
[for(p = points) p[1]],
n
),
bezier_curve_coordinate(
t,
[for(p = points) p[2]],
n
)
];
function bezier_curve(t_step, points) =
let(
t_end = ceil(1 / t_step),
pts = concat([
for(t = 0; t < t_end; t = t + 1)
_bezier_curve_point(t * t_step, points)
], [_bezier_curve_point(1, points)])
)
len(points[0]) == 3 ? pts : [for(pt = pts) __to2d(pt)];
function bezier_curve(t_step, points) = _bezier_curve_impl(t_step, points);

4
test/test_bezier_curve.scad
View File

@ -1,5 +1,5 @@
include <unittest.scad>;
include <bezier_curve.scad>;
use <unittest.scad>;
use <bezier_curve.scad>;
module test_bezier_curve() {
echo("==== test_bezier_curve ====");