MCAD-Library/multiply.scad

31 lines
1.1 KiB
OpenSCAD

/*
* Multiplication along certain curves
*
* Copyright by Elmo Mäntynen, 2012.
* Licenced under LGPL2 or later
*/
include <units.scad>
use <utilities.scad>
// Copy everything $no of times around an $axis, spread over $angle
// If $strict==true or $angle==360, then spacing will leave an empty at $angle,
// otherwise, $no will be distributed so first is at 0deg, last copy at $angle degrees
// NOTE: $axis works (rotates around that axis), but pass parameter as lower case string
// eg: "x", "y", or "z". Alternatively, use units.scad vector definitions: X, Y, Z
module spin(no, angle=360, axis=Z, strict=false){
divisor = (strict || angle==360) ? no : no-1;
for (i = [0:no-1])
rotate(normalized_axis(axis)*angle*i/divisor)
children();
}
// Make a copy of children by rotating around $axis by 180 degrees
module duplicate(axis=Z) spin(no=2, axis=axis) children();
// Make $no copies along the $axis, separated by $separation
module linear_multiply(no, separation, axis=Z)
for (i = [0:no-1])
translate(i*separation*normalized_axis(axis)) children();