16mm
/
GNAL
1
0
Fork 0
Code Issues 3 Pull Requests Projects Releases 3 Wiki Activity

Start v3. Render time breakthrough makes it the only viable design to iterate.

This commit is contained in:
mmcwilliams 2020-05-27 15:10:13 -04:00
parent e3c7913be2
commit 5d17925f9e
3 changed files with 27 additions and 32 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
100ft_v3/gnal_100ft.scad Normal file
View File

@ -0,0 +1,4 @@
include <../libraries/gnal_v3.scad>;
$fn = 200;
spiral(60, 45.55, 2.075, $fn);

4
50ft_v3/gnal_50ft.scad Normal file
View File

@ -0,0 +1,4 @@
include <../libraries/gnal_v3.scad>;
$fn = 200;
spiral(40, 45.55, 2.075, $fn);

51
libraries/gnal_v3.scad
View File

@ -1,29 +1,4 @@
D=47; // start diameter
N=40; // number of spirals
FN=500;
$fn=FN;
include <../libraries/path_extrude.scad>;
bottom = -7.1;
w = 1.2;
top_w = .4;
top_offset = (w - top_w);
h = 2.2;
facetProfile = [
[w, -bottom],
[0, -bottom],
[0, 0],
[top_offset, -h],
[w, -h],
[w, 0]
];
include <./path_extrude.scad>;
function X (start_r, spacing, fn, r, i) = (start_r + (r * spacing) + (i * calcIncrement(spacing, fn))) * cos(i * calcAngle(fn));
function Y (start_r, spacing, fn, r, i) = (start_r + (r * spacing) + (i * calcIncrement(spacing, fn))) * sin(i * calcAngle(fn));
@ -33,8 +8,8 @@ function calcFacetSize (end_d, fn) = circ( end_d ) / fn;
//function calcSteps(rotations, fn) = fn * rotations;
function calcAngle (fn) = 360 / fn;
function calcFn(start_d, start_fn, end_d, spacing, r) = start_fn +
( ((circ(calcR(start_d, spacing, r) * 2) - circ(start_d) )
/ (circ(end_d) - circ(start_d))) * ($fn - start_fn));
( ((circ(calcR(start_d, spacing, r) * 2) - circ(start_d) )
/ (circ(end_d) - circ(start_d))) * ($fn - start_fn));
function calcR(start_d, spacing, r) = (start_d / 2) + (spacing * r);
function calcIncrement(spacing, fn) = spacing / fn;
@ -45,6 +20,21 @@ function calcIncrement(spacing, fn) = spacing / fn;
**/
module spiral (rotations = 40, start_d = 48, spacing = 2.075, fn) {
bottom = -7.1;
w = 1.2;
top_w = .4;
top_offset = (w - top_w);
h = 2.2;
facetProfile = [
[w, -bottom],
[0, -bottom],
[0, 0],
[top_offset, -h],
[w, -h],
[w, 0]
];
end_d = start_d + (spacing * 2 * rotations);
end_r = end_d / 2;
start_r = start_d / 2;
@ -60,7 +50,4 @@ module spiral (rotations = 40, start_d = 48, spacing = 2.075, fn) {
0]
];
path_extrude(exShape=facetProfile, exPath=spiralPath);
}
spiral(N, D, 2.075, $fn);
}