Compare commits

..

No commits in common. "trunk" and "headband" have entirely different histories.

13 changed files with 106 additions and 456 deletions

1
.gitignore vendored
View file

@ -1,2 +1 @@
stls/
private

View file

@ -26,16 +26,6 @@
*/
include <write/Write.scad>
use <catear_headband.scad>
$fn = 360;
NAME = "c3cat";
LOGO_FILE = ""; // empty string is catear model
RENDER_COLOR_ONE = true;
RENDER_COLOR_TWO = true;
RENDER_COLOR_THREE = true;
USE_TINY_EARS = true;
/**
* Creates one instance of a bottle clip name tag. The default values are
@ -54,58 +44,32 @@ USE_TINY_EARS = true;
* font: the path to a font for Write.scad.
*/
/**
* currently openscad fails to render the original `Ohren_4.stl` outside of the preview mode
* according to [the wiki](https://en.wikibooks.org/wiki/OpenSCAD_User_Manual/FAQ#Why_is_my_imported_STL_file_appearing_with_F5_but_not_F6?) this is the stls fault
* using meshlab to run `Filters` -> `Cleaning and Repairing` -> `Remove T-Vertices` by `Edge-Flip` with `Ratio` of `1000000` before importing the stl works but but two errors remain.
*/
scale([0.2, 0.2, 0.2]) {
/* currently openscad fails to render `Ohren_4.stl` outside of the preview mode */
//difference() {
rotate(45, [0, 0, 1]) bottle_clip(name="c3cat");
// translate([ 15, 0, 18]) rotate(80, [0, 1, 0]) catear();
// translate([-15, 0, 18]) rotate(-80, [0, 1, 0]) catear();
//}
//
//translate([0, 5, 0]) catear();
//rotate(180) translate([0, 5, 0]) catear();
module bottle_clip(ru=13, rl=17.5, ht=26, width=2.5, name="c3cat", font="write/orbitron.dxf", logo="") {
e=100; // should be big enough, used for the outer boundary of the text/logo
difference() {
scale([5, 5, 5]) rotate(45, [0, 0, 1]) bottle_clip(name=NAME);
translate([ 15*5, 0*5, 18*5]) rotate(80, [0, 1, 0]) catear();
translate([-15*5, 0*5, 18*5]) rotate(-80, [0, 1, 0]) catear();
}
rotate([0,0,-45]) union() {
// main cylinder
cylinder(r1=rl+width, r2=ru+width, h=ht);
// text and logo
if(logo == "") {
color("orange") writecylinder(name, [0,0,0], rl+0.5, ht/13*7, h=ht/13*4, t=max(rl,ru), font=font);
translate([4.7, -rl, ht*1.08]) rotate(-10, [1, 0, 0]) rotate(76, [0, 1, 0]) scale([0.08, 2, 0.08]) color("red") import("catears.stl");
} else {
color("orange") writecylinder(name, [0,0,0], rl+0.5, ht/13*7, h=ht/13*4, t=max(rl,ru), font=font);
translate([0, 5*5, 0]) catear();
rotate(180) translate([0, 5*5, 0]) catear();
}
module name(name, font, rl, ht, ru) {
writecylinder(
text=name,
where=[0,0,0],
radius=rl+0.5,
height=ht/13*7,
h=ht/13*4,
t=max(rl,ru),
font=font);
}
module logo(logo, rl, ht, ru, width) {
echo("logo: ", logo);
if(logo == "") {
ear_size=ht;
echo("ht: ", ht);
echo("ru: ", ru);
echo("rl: ", rl);
echo("width: ", width);
translate([0,-max(ru,rl),ht*3/4+.5])
rotate([90,0,0])
scale([1,1,1])
scale([ht/100,ht/100,1])
translate([0, -ht/2,0])
rotate(-90, [0, 0, 1])
catear_headband(
size=ear_size,
height=max(ru,rl),
thickness=width,
stretch_len=0,
tip_len=0,
details=false,
with_rake=false
);
} else {
// The logo has been split in 3 parts. // well was... TODO
// The logo has been split in 3 parts.
/*
rotate([0,0,-48]) translate([0,0,ht*3/4-0.1])
rotate([90,0,0])
@ -131,32 +95,6 @@ module logo(logo, rl, ht, ru, width) {
linear_extrude(height=max(ru,rl)*2)
import("logo_3.dxf");
*/
}
}
module bottle_clip(ru=13, rl=17.5, ht=26, width=2.5, name="c3cat", font="write/orbitron.dxf", logo="") {
e=100; // should be big enough, used for the outer boundary of the text/logo
difference() {
rotate([0,0,-45]) union() {
// main cylinder
if (RENDER_COLOR_ONE) {
color("black")
difference() {
cylinder(r1=rl+width, r2=ru+width, h=ht);
name(name=name, font=font, rl=rl, ht=ht, ru=ru);
logo(logo=logo, rl=rl, ht=ht, ru=ru, width=width);
}
}
// text
if (RENDER_COLOR_TWO) {
color("orange")
name(name=name, font=font, rl=rl, ht=ht, ru=ru);
}
// logo
if (RENDER_COLOR_THREE) {
color("yellow") logo(logo=logo, rl=rl, ht=ht, ru=ru, width=2*width);
}
}
// inner cylinder which is substracted
@ -177,11 +115,9 @@ module bottle_clip(ru=13, rl=17.5, ht=26, width=2.5, name="c3cat", font="write/o
}
module catear() {
if (USE_TINY_EARS) {
rotate(-90, [0, 0, 1]) union() {
scale([1, 1 ,1]) translate([0, -85]) import("catear.stl");
scale([1, -1, 1]) translate([0, -85]) import("catear.stl");
}
rotate(-90, [0, 0, 1]) union() {
scale([0.2, 0.2, 0.2]) translate([0, -85]) import("catear.stl");
scale([0.2, -0.2, 0.2]) translate([0, -85]) import("catear.stl");
}
}

View file

@ -1 +0,0 @@
../catear_headband.scad

View file

@ -1,80 +1,61 @@
include <globals.scad>;
include <headband.scad>
use <headband.scad>;
use <chamfer.scad>;
module catear(height, thickness, fractal=0, side_len=30, bend_factor=0.5, stretch_factor=1.2, debug=false) {
$A=[0, side_len/2];
$B=[0,-side_len/2];
$C=[-(side_len/2/sin(120))*1.5*stretch_factor, 0];
$c=sqrt(pow($A.x-$B.x, 2)+pow($A.y-$B.y, 2));
$b=sqrt(pow($A.x-$C.x, 2)+pow($A.y-$C.y, 2));
$a=sqrt(pow($C.x-$B.x, 2)+pow($C.y-$B.y, 2));
$hc=-$C.x;
$alpha=asin($hc/$b);
$beta=$alpha;
$gamma=180-$alpha-$beta;
$delta=180*bend_factor;
$bend_radius=$a/(2*cos(90-$delta/2));
$bend_offset=$bend_radius*sin(90-$delta/2);
module catear(height, thickness, fractal=0, side_len=30, bend_factor=0.5, stretch_factor=1.2, debug=false, chamfer=CHAMFER, chamfer_shape=CHAMFER_SHAPE, details=true) {
$A=[0, side_len/2];
$B=[0,-side_len/2];
$C=[-(side_len/2/sin(120))*1.5*stretch_factor, 0];
$c=sqrt(pow($A.x-$B.x, 2)+pow($A.y-$B.y, 2));
$b=sqrt(pow($A.x-$C.x, 2)+pow($A.y-$C.y, 2));
$a=sqrt(pow($C.x-$B.x, 2)+pow($C.y-$B.y, 2));
$hc=-$C.x;
$alpha=asin($hc/$b);
$beta=$alpha;
$gamma=180-$alpha-$beta;
$delta=180*bend_factor;
$bend_radius=$a/(2*cos(90-$delta/2));
$bend_offset=$bend_radius*sin(90-$delta/2);
translate([0, -$c/2, 0])
rotate($beta, [0, 0, 1])
translate([0, $a/2, 0])
translate([$bend_offset, 0, 0])
color("#00ffff")
chamfer(size=(details)?chamfer:0, child_h=height, child_bot=-height/2, shape=chamfer_shape)
partial_ring(
part=$delta/360,
radius=$bend_radius,
thickness=thickness,
height=height
);
translate([0, $c/2, 0])
rotate(-$alpha, [0, 0, 1])
translate([0, -$b/2, 0])
translate([$bend_offset, 0, 0])
color("#ff00ff")
chamfer(size=(details)?chamfer:0, child_h=height, child_bot=-height/2, shape=chamfer_shape)
partial_ring(
part=$delta/360,
radius=$bend_radius,
thickness=thickness,
height=height
);
translate($A) color("#aaaaaa")
chamfer(size=chamfer, child_h=height, child_bot=-height/2, shape=chamfer_shape)
cylinder(h=height, d=thickness, center=true);
translate($B) color("#bbbbbb")
chamfer(size=chamfer, child_h=height, child_bot=-height/2, shape=chamfer_shape)
cylinder(h=height, d=thickness, center=true);
translate($C) color("#cccccc")
chamfer(size=chamfer, child_h=height, child_bot=-height/2, shape=chamfer_shape)
cylinder(h=height, d=thickness, center=true);
if (debug) {
echo("A", $A, "a", $a, "alpha", $alpha);
echo("B", $B, "b", $b, "beta ", $beta);
echo("C", $C, "c", $c, "gamma", $gamma);
echo("bend_factor", bend_factor);
echo("delta:", $delta);
echo("bend_radius", $bend_radius);
echo("bend_offset", $bend_offset);
color("#000000") cylinder(h=4, d=4);
translate($C/2) color("red") cube([$hc, thickness, height*1.1], center=true);
color("red") cube([thickness, $c, height*1.1], center=true);
color("red") translate([0, $c/2, 0])
rotate(-$alpha, [0, 0, 1])
translate([0, -$b/2, 0])
cube([thickness,$b, height*1.1], center=true);
color("red") translate([0, -$c/2, 0])
translate([0, -$c/2, 0])
rotate($beta, [0, 0, 1])
translate([0, $a/2, 0])
cube([thickness, $a, height*1.1], center=true);
}
translate([$bend_offset, 0, 0])
color("#00ffff") partial_ring(
part=$delta/360,
radius=$bend_radius,
thickness=thickness,
height=height
);
translate([0, $c/2, 0])
rotate(-$alpha, [0, 0, 1])
translate([0, -$b/2, 0])
translate([$bend_offset, 0, 0])
color("#ff00ff") partial_ring(
part=$delta/360,
radius=$bend_radius,
thickness=thickness,
height=height
);
translate($A) color("#aaaaaa") cylinder(h=height, d=thickness, center=true);
translate($B) color("#bbbbbb") cylinder(h=height, d=thickness, center=true);
translate($C) color("#cccccc") cylinder(h=height, d=thickness, center=true);
if (debug) {
echo("A", $A, "a", $a, "alpha", $alpha);
echo("B", $B, "b", $b, "beta ", $beta);
echo("C", $C, "c", $c, "gamma", $gamma);
echo("bend_factor", bend_factor);
echo("delta:", $delta);
echo("bend_radius", $bend_radius);
echo("bend_offset", $bend_offset);
color("#000000") cylinder(h=4, d=4);
translate($C/2) color("red") cube([$hc, thickness, height*1.1], center=true);
color("red") cube([thickness, $c, height*1.1], center=true);
color("red")translate([0, $c/2, 0]) rotate(-$alpha, [0, 0, 1]) translate([0, -$b/2, 0]) cube([thickness,$b, height*1.1], center=true);
color("red")translate([0, -$c/2, 0]) rotate($beta, [0, 0, 1]) translate([0, $a/2, 0]) cube([thickness, $a, height*1.1], center=true);
}
}
module catear_headband(debug=DEBUG, size=SIZE, height=HEIGHT, thickness=THICKNESS, part=PART, stretch_len=STRETCH_LEN, tip_len=TIP_LEN, tip_bend=TIP_BEND, ear_scale=1.5, ear_bend_factor=0.15, ear_stretch_factor=1.2, ear_angle=42, chamfer=CHAMFER, chamfer_shape=CHAMFER_SHAPE, with_rake=true, details=true) {
module catear_headband(debug=DEBUG, size=SIZE, height=HEIGHT, thickness=THICKNESS, part=PART, stretch_len=STRETCH_LEN, tip_len=TIP_LEN, tip_bend=TIP_BEND, ear_scale=1.5, ear_bend_factor=0.15, ear_stretch_factor=1.2, ear_angle=42) {
$a=size/2*ear_scale;
$delta=2*(acos($a/(size*2))-90);
@ -88,10 +69,7 @@ module catear_headband(debug=DEBUG, size=SIZE, height=HEIGHT, thickness=THICKNES
thickness=thickness,
side_len=size/2*ear_scale,
bend_factor=ear_bend_factor,
stretch_factor=ear_stretch_factor,
chamfer=chamfer,
chamfer_shape=chamfer_shape,
details=details
stretch_factor=ear_stretch_factor
);
}
rotate(-ear_angle, [0, 0, 1]) {
@ -101,10 +79,7 @@ module catear_headband(debug=DEBUG, size=SIZE, height=HEIGHT, thickness=THICKNES
thickness=thickness,
side_len=size/2*ear_scale,
bend_factor=ear_bend_factor,
stretch_factor=ear_stretch_factor,
chamfer=chamfer,
chamfer_shape=chamfer_shape,
details=details
stretch_factor=ear_stretch_factor
);
}
headband(
@ -114,9 +89,7 @@ module catear_headband(debug=DEBUG, size=SIZE, height=HEIGHT, thickness=THICKNES
part=part,
stretch_len=stretch_len,
tip_len=tip_len,
tip_bend=tip_bend,
with_rake=with_rake,
details=details
tip_bend=tip_bend
);
};
}

View file

@ -1,49 +0,0 @@
include <globals.scad>
use <catear_headband.scad>
SCALE_FACTOR=SIZE/9;
echo("scale factor: ", SCALE_FACTOR);
echo("bottom diameter: ", SIZE/SCALE_FACTOR);
difference() {
union()
for (i=[-1,1])
translate([i*2, 0, 0])
rotate(i*90, [0, 1, 0])
scale(1/SCALE_FACTOR)
union() {
translate([0, 0, SIZE+20+60])
rotate(90, [0, 1, 0])
scale(1.6)
catear_headband(thickness=5, with_rake=false);
translate([0, 0, 20])
cylinder(h=10, r=SIZE, $fn=360);
cylinder(h=20, d=SIZE, $fn=360);
}
translate([0, 0, -SIZE*(1/SCALE_FACTOR)*5])
cube(SIZE*10*(1/SCALE_FACTOR), center=true);
}
/*
scale(1/SCALE_FACTOR) {
translate([0, 0, 30])
scale([1, 1, -1])
difference() {
union() {
translate([0, 0, 20])
cylinder(h=10, r=SIZE, $fn=360);
cylinder(h=20, d=SIZE, $fn=360);
}
translate([0, 0, SIZE+20+60])
rotate(90, [0, 1, 0])
scale(1.6)
catear_headband(thickness=5, with_rake=false);
}
scale(1.6)
translate([0, 0, HEIGHT/2])
catear_headband(thickness=5, with_rake=false);
}
*/

View file

@ -1,7 +1,7 @@
use <catear_headband.scad>
include <headband.scad>
module foxear_headband(debug=DEBUG, size=SIZE, height=HEIGHT, thickness=THICKNESS, part=PART, stretch_len=STRETCH_LEN, tip_len=TIP_LEN, tip_bend=TIP_BEND, ear_scale=1.2, ear_bend_factor=0.05, ear_stretch_factor=1.2, ear_angle=30) {
module foxear_headband(debug=DEBUG, size=SIZE, height=HEIGHT, thickness=THICKNESS, part=PART, stretch_len=STRETCH_LEN, tip_len=TIP_LEN, tip_bend=TIP_BEND, ear_scale=1.2, ear_bend_factor=0.01, ear_stretch_factor=1.2, ear_angle=30) {
catear_headband(
debug=debug,
size=size,

View file

@ -1,19 +0,0 @@
$fn=90;
DEBUG=false;
SIZE=60;
HEIGHT=4.6;
THICKNESS=3;
PART=0.7;
STRETCH_LEN=40;
TIP_LEN=0.05;
TIP_BEND=20;
RAKE_DEPTH=1;
RAKE_WIDTH=1;
RAKE_STRETCH=1;
RAKE_CHAMFER=0.5;
CHAMFER=1;
CHAMFER_SHAPE="curve";
INSERTICLE_X = 4.6;
INSERTICLE_Y = 7.4;
INSERTICLE_Z = 5.4;

View file

@ -1,4 +1,19 @@
include <globals.scad>
$fn=360;
DEBUG=false;
SIZE=60;
HEIGHT=4.6;
THICKNESS=3;
PART=0.7;
STRETCH_LEN=40;
TIP_LEN=0.05;
TIP_BEND=20;
RAKE_DEPTH=1;
RAKE_WIDTH=1;
RAKE_STRETCH=1;
RAKE_CHAMFER=0.5;
CHAMFER=1;
CHAMFER_SHAPE="cone";
use <chamfer.scad>
module partial_ring(part, radius, thickness, height) {
@ -8,9 +23,9 @@ module partial_ring(part, radius, thickness, height) {
square([thickness, height], center=true);
}
module headband(debug=DEBUG, size=SIZE, height=HEIGHT, thickness=THICKNESS, part=PART, stretch_len=STRETCH_LEN, tip_len=TIP_LEN, tip_bend=TIP_BEND, rake_depth=RAKE_DEPTH, rake_width=RAKE_WIDTH, rake_stretch=RAKE_STRETCH, rake_chamfer=RAKE_CHAMFER, chamfer=CHAMFER, chamfer_shape=CHAMFER_SHAPE, with_rake=true, details=true) {
module headband(debug=DEBUG, size=SIZE, height=HEIGHT, thickness=THICKNESS, part=PART, stretch_len=STRETCH_LEN, tip_len=TIP_LEN, tip_bend=TIP_BEND, rake_depth=RAKE_DEPTH, rake_width=RAKE_WIDTH, rake_stretch=RAKE_STRETCH, rake_chamfer=RAKE_CHAMFER, chamfer=CHAMFER, chamfer_shape=CHAMFER_SHAPE) {
union() {
chamfer(size=(details)?chamfer:0, child_h=height, child_bot=-height/2, shape=chamfer_shape) union() {
chamfer(size=chamfer, child_h=height, child_bot=-height/2, shape=chamfer_shape) union() {
color("purple")
partial_ring(part, radius=size, thickness=thickness, height=height);
rotate( 90-180*part, [0, 0, 1])
@ -41,7 +56,7 @@ module headband(debug=DEBUG, size=SIZE, height=HEIGHT, thickness=THICKNESS, part
);
}
}
if (with_rake) for (i=[-size/2:size/2]) {
for (i=[-size/2:size/2]) {
rotate(i*2-rake_width/2, [0, 0, 1])
intersection() {
scale([1, 1, rake_stretch/(rake_depth/height)])
@ -54,6 +69,6 @@ module headband(debug=DEBUG, size=SIZE, height=HEIGHT, thickness=THICKNESS, part
color("red")
cube([2*rake_depth, rake_width, height], center=true);
}
}
}
};
};
}

View file

@ -1,83 +0,0 @@
/**
* This requires
* https://files.printables.com/media/prints/451501/stls/4205518_58958bba-4c36-4995-b4e7-da5abd1ba821/loveboard-cover-r2.stl
*
* to be placed under `./stls/LoveBoard-cover-R2.stl` in order to work
* but it needs a run in meshlabs uniform fcae orientation filter for
* openscad to be happy with it
*
* if rendering is missing the ear infill, `Design` > `Flush Caches`
* may be required.
*/
include <headband.scad>
use <catear_headband.scad>
HEIGHT=11;
THICKNESS=1;
SIDE_LEN=20;
BEND_FACTOR=0.15;
STRETCH_FACTOR=1.2;
CHAMFER=0;
CHAMFER_SHAPE="none";
DEBUG=false;
FILL=true;
FILL_HEIGHT_FACTOR=0.9;
FILL_HEIGHT_FALLOFF_STEP=0;
FILL_HEIGHT_FALLOFF_FACTOR=0.98;
FILL_HEIGHT_FALLOFF_EXPONENT_FACTOR=3;
FILL_STEP=0.5;
module loveboard_cover_r2_cat() {
$fn=90;
union() {
difference() {
union() {
for (i=[-1,1])
scale([i, 1, 1])
translate([-23, 23, 5.5])
rotate(-65) {
catear(
height=HEIGHT,
thickness=THICKNESS,
side_len=SIDE_LEN,
bend_factor=BEND_FACTOR,
stretch_factor=STRETCH_FACTOR,
debug=DEBUG,
chamfer=CHAMFER,
chamfer_shape=CHAMFER_SHAPE
);
if (FILL) {
echo("BEGIN FILL");
for (i=[FILL_STEP:FILL_STEP:(SIDE_LEN-FILL_STEP)])
color([0, (256-i*8)/256,0]) {
fill_height=(
HEIGHT * FILL_HEIGHT_FACTOR
* pow(FILL_HEIGHT_FALLOFF_FACTOR,
(SIDE_LEN-1-i)*FILL_HEIGHT_FALLOFF_EXPONENT_FACTOR)
- ((SIDE_LEN-1-i)*FILL_HEIGHT_FALLOFF_STEP)
);
echo([i, fill_height]);
translate([0, 0, (fill_height-HEIGHT)/2])
catear(
height=fill_height,
thickness=THICKNESS,
side_len=i,
bend_factor=BEND_FACTOR,
stretch_factor=STRETCH_FACTOR,
chamfer=0,
chamfer_shape=CHAMFER_SHAPE
);
}
echo("END FILL");
}
}
}
scale(0.9999) hull() import("stls/LoveBoard-cover-R2.stl");
}
color("red") import("stls/LoveBoard-cover-R2.stl");
}
}
loveboard_cover_r2_cat();

View file

@ -1,20 +0,0 @@
use <catear_headband.scad>
include <headband.scad>
module mouseear_headband(debug=DEBUG, size=SIZE, height=HEIGHT, thickness=THICKNESS, part=PART, stretch_len=STRETCH_LEN, tip_len=TIP_LEN, tip_bend=TIP_BEND, ear_scale=1, ear_bend_factor=0.65, ear_stretch_factor=1, ear_angle=40) {
catear_headband(
debug=debug,
size=size,
height=height,
thickness=thickness,
part=part,
stretch_len=stretch_len,
tip_len=tip_len,
tip_bend=tip_bend,
ear_scale=ear_scale,
ear_bend_factor=ear_bend_factor,
ear_stretch_factor=ear_stretch_factor,
ear_angle=ear_angle);
}
mouseear_headband();

View file

@ -1,32 +0,0 @@
include <globals.scad>;
use <catear_headband.scad>;
use <pressfit_headband.scad>;
use <chamfer.scad>;
EAR_SCALE = 1.5;
EAR_BEND_FACTOR = 0.15;
EAR_STRETCH_FACTOR = 1.2;
difference() {
translate([20*pow(0.99, SIZE/2*EAR_SCALE-1-THICKNESS), 0, -THICKNESS/2])
union() for (i=[0:SIZE/2*EAR_SCALE-1]) {
j=pow(0.99, i);
chamfer_ = floor(abs(2*i/(SIZE/2*EAR_SCALE-1)-1));
translate([-j*20, 0, 0])
rotate(90, [0, 1, 0])
/*chamfer(size=1, child_h=1, child_bot=-0.5, shape=CHAMFER_SHAPE)*/
catear(
debug=DEBUG,
height=INSERTICLE_Z*1.2,
thickness=THICKNESS,
side_len=SIZE/2*EAR_SCALE-i,
bend_factor=EAR_BEND_FACTOR,
stretch_factor=EAR_STRETCH_FACTOR,
chamfer=chamfer_,
chamfer_shape=CHAMFER_SHAPE
);
}
translate([0, 0, -THICKNESS]) cube([100, 100, THICKNESS], center=true);
scale([1, 1, 2]) inserticle();
}

View file

@ -1,9 +1,7 @@
include <globals.scad>
use <headband.scad>
include <headband.scad>
module inserticle() {
cube([INSERTICLE_X, INSERTICLE_Y, INSERTICLE_Z], center=true);
cube([4.6, 7.4, 5.4], center=true);
}
module pressfit_headband(debug=DEBUG, size=SIZE, height=HEIGHT, thickness=THICKNESS, part=PART, stretch_len=STRETCH_LEN, tip_len=TIP_LEN, tip_bend=TIP_BEND) {

View file

@ -1,67 +0,0 @@
include <globals.scad>;
use <pressfit_headband.scad>;
$fn=360;
A=30;
N=4;
R=45;
LENGTH=100;
TWIST=720;
STEPS=360;
SLICES=max(TWIST, STEPS, LENGTH);
SHEIGHT=LENGTH/STEPS;
BEND_X_FACTOR=0.5;
BEND_Y_FACTOR=1;
COLORS=[
"#f00",
"#f70",
"#7f0",
"#0f0",
"#0f7",
"#07f",
"#00f",
"#70f",
"#f07"
];
difference() {
union() for (step=[1:STEPS]) {
a = A*(1-(step-1)/STEPS);
b = A*(1-step/STEPS);
r = TWIST/STEPS*(step-1);
sh_xy = 0;
sh_yx = 0;
sh_xz = 1/STEPS*step*BEND_X_FACTOR;
sh_yz = 1/STEPS*step*BEND_Y_FACTOR;
sh_zx = 0;
sh_zy = 0;
t_x = sh_xz*SHEIGHT*(step-1)*0.5;
t_y = sh_yz*SHEIGHT*(step-1)*0.5;
t_z = LENGTH/STEPS*(step-1);
sc_x = 1;
sc_y = 1;
sc_z = 1;
mm = [
[sc_x, sh_xy, sh_xz, t_x],
[sh_yx, sc_y, sh_yz, t_y],
[sh_zx, sh_zy, sc_z, t_z],
];
echo(a, b, b/a, r, mm);
multmatrix(mm)
color(COLORS[(step-1)%9])
linear_extrude(
SHEIGHT,
center=false,
twist=TWIST/STEPS,
scale=b/a,
slices=SLICES/STEPS
) rotate(R-r)
circle(d=a, $fn=N);
}
translate([0, 0, INSERTICLE_Z/2])
inserticle();
}
echo("twist angle: ", TWIST/STEPS);