openscad/dotSCAD
1
0
Fork 0
mirror of https://github.com/JustinSDK/dotSCAD.git synced 2025-04-21 14:41:51 +02:00
Code Issues Releases Wiki Activity

return cells

Browse Source
This commit is contained in:
Justin Lin 2020-03-30 15:25:09 +08:00
parent 7c92e0ac5a
commit a2a68f11af
3 changed files with 40 additions and 18 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
src/experimental/_impl/_nz_worley2_impl.scad
View File

@ -16,10 +16,14 @@ function _neighbors(fcord, seed, cell_w) = [
];
function _nz_worley2_classic(p, nbrs, dist) =
min([
for(nbr = nbrs)
_distance(nbr, p, dist)
]);
let(
cells = [
for(nbr = nbrs)
[nbr[0], nbr[1], _distance(nbr, p, dist)]
],
sorted = sort(cells, by = "idx", idx = 2)
)
sorted[0];
function _nz_worley2_border(p, nbrs, dist) =
let(
@ -32,7 +36,7 @@ function _nz_worley2_border(p, nbrs, dist) =
b = [sorted[1][0], sorted[1][1]],
m = (a + b) / 2
)
(p - m) * (a - m);
[a[0], a[1], (p - m) * (a - m)];
function _nz_worley2(p, seed, cell_w, dist) =
let(

22
src/experimental/demo/nz_worley2_demo.scad
View File

@ -1,4 +1,5 @@
use <experimental/nz_worley2.scad>;
use <util/dedup.scad>;
size = [100, 50];
cell_w = 10;
@ -8,14 +9,23 @@ seed = 51;
points = [
for(y = [0:size[1] - 1])
for(x = [0:size[0] - 1])
[x, y, nz_worley2(x, y, seed, cell_w, dist)]
[x, y]
];
max_dist = max([for(p = points) p[2]]);
for(p = points) {
c = p[2] / max_dist;
cells = [for(p = points) nz_worley2(p[0], p[1], seed, cell_w, dist)];
max_dist = max([for(c = cells) c[2]]);
for(i = [0:len(cells) - 1]) {
c = cells[i][2] / max_dist;
color([c, c, c])
linear_extrude(c * max_dist)
translate([p[0], p[1]])
linear_extrude(cells[i][2])
translate(points[i])
square(1);
}
cells_pts = dedup([for(c = cells) [c[0], c[1]]]);
for(p = cells_pts) {
translate(p)
linear_extrude(max_dist)
square(1);
}

22
src/experimental/demo/nz_worley2s_demo.scad
View File

@ -1,23 +1,31 @@
use <experimental/nz_worley2s.scad>;
use <util/dedup.scad>;
size = [100, 50];
cell_w = 10;
dist = "euclidean"; // [euclidean, manhattan, chebyshev, border]
seed = 5;
seed = 51;
points = [
for(y = [0:size[1] - 1])
for(x = [0:size[0] - 1])
[x, y]
];
noises = nz_worley2s(points, seed, cell_w, dist);
max_dist = max(noises);
for(i = [0:len(noises) - 1]) {
c = noises[i] / max_dist;
cells = nz_worley2s(points, seed, cell_w, dist);
max_dist = max([for(c = cells) c[2]]);
for(i = [0:len(cells) - 1]) {
c = cells[i][2] / max_dist;
color([c, c, c])
linear_extrude(c * max_dist)
linear_extrude(cells[i][2])
translate(points[i])
square(1);
}
cells_pts = dedup([for(c = cells) [c[0], c[1]]]);
for(p = cells_pts) {
translate(p)
linear_extrude(max_dist)
square(1);
}