mirror of
https://github.com/JustinSDK/dotSCAD.git
synced 2025-08-20 05:21:38 +02:00
filled
This commit is contained in:
@@ -1,13 +1,17 @@
|
||||
use <shape_circle.scad>;
|
||||
use <midpt_smooth.scad>;
|
||||
use <polyline_join.scad>;
|
||||
use <in_shape.scad>;
|
||||
use <polyhedra/icosahedron.scad>;
|
||||
use <triangle/tri_delaunay.scad>;
|
||||
use <triangle/tri_incenter.scad>;
|
||||
use <surface/sf_thickenT.scad>;
|
||||
use <experimental/differential_line_growth.scad>;
|
||||
use <experimental/ptf_c2sphere.scad>;
|
||||
|
||||
$fn = 24;
|
||||
r = 10;
|
||||
times = 50;
|
||||
times = 80;
|
||||
line_r = 2;
|
||||
smooth = true;
|
||||
smooth_times = 2;
|
||||
@@ -24,5 +28,15 @@ poly = differential_line_growth(init_shape, node_option, times);
|
||||
smoothed = smooth ? midpt_smooth(poly, smooth_times, true) : poly;
|
||||
|
||||
sphere_r = norm(max(smoothed));
|
||||
polyline_join([for(p = [each smoothed, smoothed[0]]) ptf_c2sphere(p, sphere_r)])
|
||||
sphere_path = [for(p = smoothed) ptf_c2sphere(p, sphere_r)];
|
||||
|
||||
triangles = [
|
||||
for(t = tri_delaunay(smoothed))
|
||||
let(tri = [for(i = t) smoothed[i]])
|
||||
if(in_shape(smoothed, tri_incenter(tri))) t
|
||||
];
|
||||
|
||||
sf_thickenT(sphere_path, line_r, triangles);
|
||||
|
||||
polyline_join([each sphere_path, sphere_path[0]])
|
||||
icosahedron(line_r);
|
||||
|
Reference in New Issue
Block a user