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

add arc_tiled_lines

Browse Source
This commit is contained in:
Justin Lin
2020-02-13 17:19:46 +08:00
parent d7f8885135
commit 3bbed7e8c0
1 changed files with 40 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

40
examples/arc_tiled_lines.scad Normal file
View File

@@ -0,0 +1,40 @@
use <util/rand.scad>;
use <hull_polyline2d.scad>;
use <arc.scad>;
use <experimental/tf_ring.scad>;
module arc_tiled_lines(size, angle, step, line_width = 1) {
sizexy = is_num(size) ? [size, size] : size;
s = is_undef(step) ? line_width * 2 : step;
function rand_diagonal_line_pts(x, y, size) =
rand(0, 1) >= 0.5 ? [[x, y], [x + size, y + size]] : [[x + size, y], [x, y + size]];
lines = [
for(x = [0:s:sizexy[0] - s])
for(y = [0:s:sizexy[1] - s])
rand_diagonal_line_pts(x, y, s)
];
for(line = lines) {
pts = [for(p = line) tf_ring(size, p, size[0], angle)];
hull_polyline2d(pts, width = line_width);
}
arc_width = line_width * 2;
arc(radius = size[0], angle = angle, width = arc_width, $fn = 36);
arc(radius = size[0] * 2, angle = angle, width = arc_width, $fn = 36);
if(angle != 360) {
hull_polyline2d([[size[0], 0], [size[0] * 2, 0]], width = arc_width);
rotate(angle)
hull_polyline2d([[size[0], 0], [size[0] * 2, 0]], width = arc_width);
}
}
size = [20, 100];
line_width = .5;
step = 1;
angle = 360;
arc_tiled_lines(size, angle, step, line_width);