Compare commits

..

3 commits

Author SHA1 Message Date
djerun 541b80970c pressfit_horn v0.1 2024-06-01 17:50:52 +02:00
djerun c26753f0ed pressfit_catears v0.1 2024-05-25 19:55:56 +02:00
djerun 5463192ec9 [refactor] extract globals from headband to separate file 2024-05-25 19:48:08 +02:00
6 changed files with 126 additions and 21 deletions

View file

@ -1,6 +1,6 @@
include <headband.scad>
include <globals.scad>;
use <headband.scad>
use <headband.scad>;
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) {
$A=[0, side_len/2];

19
globals.scad Normal file
View file

@ -0,0 +1,19 @@
$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="cone";
INSERTICLE_X = 4.6;
INSERTICLE_Y = 7.4;
INSERTICLE_Z = 5.4;

View file

@ -1,20 +1,5 @@
$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>
include <chamfer.scad>
include <globals.scad>
module partial_ring(part, radius, thickness, height) {
rotate(180-180*part, [0, 0, 1])

32
pressfit_catears.scad Normal file
View file

@ -0,0 +1,32 @@
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,7 +1,9 @@
include <headband.scad>
include <globals.scad>
use <headband.scad>
module inserticle() {
cube([4.6, 7.4, 5.4], center=true);
cube([INSERTICLE_X, INSERTICLE_Y, INSERTICLE_Z], 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) {

67
pressfit_horns.scad Normal file
View 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);