30 lines
692 B
OpenSCAD
30 lines
692 B
OpenSCAD
|
/*
|
||
|
|
* Multiplication along certain curves
|
||
|
|
*
|
||
|
|
* Copyright by Elmo Mäntynen, 2012.
|
||
|
|
* Licenced under LGPL2 or later
|
||
|
|
*/
|
||
|
|
|
||
|
|
include <units.scad>
|
||
|
|
|
||
|
|
use <utilities.scad>
|
||
|
|
|
||
|
|
// TODO check that the axis parameter works as intended
|
||
|
|
// Duplicate everything $no of times around an $axis, for $angle/360 rounds
|
||
|
|
module spin(no, angle=360, axis=Z){
|
||
|
|
for (i = [1:no]){
|
||
|
|
rotate(normalized_axis(axis)*angle*no/i) union(){
|
||
|
|
for (i = [0 : $children-1]) child(i);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
//Doesn't work currently
|
||
|
|
module duplicate(axis=Z) spin(no=2, axis=axis) child(0);
|
||
|
|
|
||
|
|
module linear_multiply(no, separation, axis=Z){
|
||
|
|
for (i = [0:no-1]){
|
||
|
|
translate(i*separation*axis) child(0);
|
||
|
|
}
|
||
|
|
}
|