pressfit_horn v0.1
This commit is contained in:
parent
c26753f0ed
commit
541b80970c
67
pressfit_horns.scad
Normal file
67
pressfit_horns.scad
Normal file
|
@ -0,0 +1,67 @@
|
|||
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);
|
Loading…
Reference in a new issue