add sma_open
This commit is contained in:
Pierre Lecomte
parent
a83fcd74c8
commit
80ea4acde5
265
cad/sma_open.scad
Normal file
265
cad/sma_open.scad
Normal file
@ -0,0 +1,265 @@
|
||||
include <threads.scad>;
|
||||
//$fn=128;
|
||||
|
||||
/*[ Array parameters ]*/
|
||||
// Last parameter is for support attach.
|
||||
|
||||
// sphere radius (mm):
|
||||
r = [150, 150, 150, 150, 150, 150, 150, 150, 150, 150, 150, 150, 150, 150, 150, 150, 150, 150, 150, 150, 150, 150, 150, 150, 150, 150, 270];
|
||||
|
||||
// microphones zenith coordinates (°):
|
||||
theta = [0., 90., 90., 90., 90., 180., 54.7356, 54.7356, 54.7356, 54.7356, 125.264, 125.264, 125.264, 125.264, 45., 45., 45., 45., 90., 90., 90., 90., 135., 135., 135., 135., 180];
|
||||
|
||||
// microphone azimuth coordinates (°):
|
||||
phi = [0., 0., 90., 180., 270., 0., 45., 135., 225., 315., 45., 135., 225., 315., 0., 90., 180., 270., 45., 135., 225., 315., 0., 90., 180., 270., 0];
|
||||
|
||||
// connection matrix
|
||||
neighbors =
|
||||
[
|
||||
[14, 15, 16, 17], //0
|
||||
[14, 21, 22, 18], //1
|
||||
[15, 18, 23, 19], //2
|
||||
[16, 19, 24, 20], //3
|
||||
[17, 21, 25, 20], //4
|
||||
[22, 23, 24, 25], //5
|
||||
[14, 15, 18], //6
|
||||
[15, 16, 19], //7
|
||||
[16, 17, 20], //8
|
||||
[17, 14, 21], //9
|
||||
[22, 23, 18, 26], //10
|
||||
[23, 24, 19, 26], //11
|
||||
[24, 25, 20, 26], //12
|
||||
[21, 22, 25, 26], //13
|
||||
[0, 1, 6, 9], //14
|
||||
[0, 2, 6, 7], //15
|
||||
[0, 3, 7, 8], //16
|
||||
[0, 4, 8, 9], //17
|
||||
[1, 2, 6, 10], //18
|
||||
[2, 3, 7, 11], //19
|
||||
[3, 4, 8, 12], //20
|
||||
[4, 1, 9, 13], //21
|
||||
[1, 5, 10, 13], //22
|
||||
[2, 5, 10, 11], //23
|
||||
[3, 5, 11, 12], //24
|
||||
[4, 5, 12, 13], //25
|
||||
[10, 11, 12, 13], // support
|
||||
];
|
||||
|
||||
module attach(id_mic, rmic=3.82, rstud=1.75, color="yellow"){
|
||||
rtp = [r[id_mic], theta[id_mic], phi[id_mic]];
|
||||
center = sph2cart(rtp);
|
||||
|
||||
difference(){
|
||||
union(){
|
||||
for (i=[0:len(neighbors[id_mic])-1]){
|
||||
neighbor =
|
||||
sph2cart(
|
||||
[
|
||||
r[neighbors[id_mic][i]],
|
||||
theta[neighbors[id_mic][i]],
|
||||
phi[neighbors[id_mic][i]]
|
||||
]
|
||||
);
|
||||
rtp2=cart2sph(neighbor-center);
|
||||
translate(center)
|
||||
rotate([0, rtp2[1], rtp2[2]]){
|
||||
difference(){
|
||||
cylinder(r=rstud+2,h=22);
|
||||
translate([0,0,16])
|
||||
cylinder(r=rstud,h=25);
|
||||
}
|
||||
}
|
||||
}
|
||||
translate(center)
|
||||
rotate([0, rtp[1], rtp[2]]){
|
||||
cylinder(r=rmic+2,h=20,center=true);
|
||||
}
|
||||
}
|
||||
translate(center)
|
||||
{
|
||||
rotate([0, rtp[1], rtp[2]]){
|
||||
cylinder(r=rmic,h=40, center=true);
|
||||
translate([rmic,0,5])
|
||||
rotate([90,0,90])
|
||||
linear_extrude(3)
|
||||
text(str(id_mic+1), size=4, valign="center", halign="center");}}
|
||||
}
|
||||
}
|
||||
|
||||
support();
|
||||
|
||||
// treaded attach
|
||||
module support(stud=1.75){
|
||||
id_mic = len(r)-1;
|
||||
rtp = [r[id_mic], theta[id_mic], phi[id_mic]];
|
||||
center = sph2cart(rtp);
|
||||
difference(){
|
||||
color("red")
|
||||
hull(){
|
||||
for(i=[0:len(neighbors[id_mic])-1]){
|
||||
neighbor =
|
||||
sph2cart(
|
||||
[
|
||||
r[neighbors[id_mic][i]],
|
||||
theta[neighbors[id_mic][i]],
|
||||
phi[neighbors[id_mic][i]]
|
||||
]
|
||||
);
|
||||
rtp2=cart2sph(neighbor-center);
|
||||
translate(center)
|
||||
rotate([0, rtp2[1], rtp2[2]]){
|
||||
cylinder(r=stud+2,h=22);
|
||||
}
|
||||
}
|
||||
translate(center)
|
||||
rotate([0, rtp[1], rtp[2]])
|
||||
translate([0, 0, -10])
|
||||
cylinder(r=6,h=20, center=false);
|
||||
}
|
||||
for(i=[0:len(neighbors[id_mic])-1]){
|
||||
neighbor =
|
||||
sph2cart(
|
||||
[
|
||||
r[neighbors[id_mic][i]],
|
||||
theta[neighbors[id_mic][i]],
|
||||
phi[neighbors[id_mic][i]]
|
||||
]
|
||||
);
|
||||
rtp2=cart2sph(neighbor-center);
|
||||
translate(center)
|
||||
rotate([0, rtp2[1], rtp2[2]]){
|
||||
translate([0,0,16])
|
||||
cylinder(r=stud,h=25);
|
||||
};
|
||||
};
|
||||
translate(center)
|
||||
rotate([0, rtp[1], rtp[2]])
|
||||
translate([0,0,-30])
|
||||
render()
|
||||
english_thread(3/8,16,2,internal=true);
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
|
||||
for (i = [0:len(theta)-2]){
|
||||
attach(i);
|
||||
studs(i);
|
||||
};
|
||||
|
||||
module studs(id_mic, rstud=1.75){
|
||||
rtp = [r[id_mic], theta[id_mic], phi[id_mic]];
|
||||
center = sph2cart(rtp);
|
||||
for (i=[0:len(neighbors[id_mic])-1]){
|
||||
neighbor = sph2cart([r[neighbors[id_mic][i]], theta[neighbors[id_mic][i]], phi[neighbors[id_mic][i]]]);
|
||||
rtp2=cart2sph(neighbor-center);
|
||||
translate(center)
|
||||
rotate([0, rtp2[1], rtp2[2]])
|
||||
color("blue")
|
||||
translate([0,0,16])
|
||||
cylinder(r=rstud,h=norm(neighbor-center)-2*16);
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
function cart2sph(vec)
|
||||
= [norm(vec), acos(vec[2]/norm(vec)), atan2(vec[1],vec[0])];
|
||||
|
||||
function sph2cart(vec)
|
||||
= [vec[0]*sin(vec[1])*cos(vec[2]), vec[0]*sin(vec[1])*sin(vec[2]), vec[0]*cos(vec[1])];
|
||||
|
||||
|
||||
|
||||
// Support for mic stand
|
||||
|
||||
// Mic pointing at center
|
||||
//center = supp;
|
||||
//rtp = cart2sph(center);
|
||||
//echo(rtp);
|
||||
//rotate([0, -rtp[1], 0])
|
||||
//rotate([0, 0,-rtp[2]])
|
||||
//attach(
|
||||
//center=supp,neighbourgs=[
|
||||
//[x[0],y[0],z[0]],
|
||||
//[x[1],y[1],z[1]],
|
||||
//[x[2],y[2],z[2]]
|
||||
//]);
|
||||
|
||||
// Support attach
|
||||
|
||||
//attach3(center = support, neighbourgs=[
|
||||
//[x[1], y[1], z[1]],
|
||||
//[x[2], y[2], z[2]],
|
||||
//[x[3], y[3], z[3]]
|
||||
//]);
|
||||
|
||||
|
||||
// Mic #0
|
||||
//attach(
|
||||
//center=[x[0], y[0], z[0]],neighbourgs=[
|
||||
//supp,
|
||||
//[x[1],y[1],z[1]],
|
||||
//[x[2],y[2],z[2]],
|
||||
//[x[3],y[3],z[3]]
|
||||
//]);
|
||||
|
||||
// Mic #1
|
||||
//center = [x[1],y[1],z[1]];
|
||||
//rtp = cart2sph(center);
|
||||
//echo(rtp);
|
||||
//rotate([0, -rtp[1], 0])
|
||||
//rotate([0, 0,-rtp[2]])
|
||||
//attach(
|
||||
//center=[x[1], y[1], z[1]],neighbourgs=[
|
||||
//supp,
|
||||
//support,
|
||||
//[x[0],y[0],z[0]],
|
||||
//[x[2],y[2],z[2]],
|
||||
//[x[3],y[3],z[3]],
|
||||
//]);
|
||||
|
||||
module dist(i,j){
|
||||
echo(
|
||||
sqrt(
|
||||
pow((x[i]-x[j]),2) +
|
||||
pow((y[i]-y[j]),2) +
|
||||
pow((z[i]-z[j]),2)
|
||||
)
|
||||
- 2 * 16
|
||||
);
|
||||
}
|
||||
|
||||
|
||||
// Mic #2
|
||||
//center = [x[2],y[2],z[2]];
|
||||
//rtp = cart2sph(center);
|
||||
//echo(rtp);
|
||||
//rotate([0, -rtp[1], 0])
|
||||
//rotate([0, 0,-rtp[2]])
|
||||
//attach(
|
||||
//center=[x[2], y[2], z[2]],neighbourgs=[
|
||||
//support,
|
||||
//supp,
|
||||
//[x[0],y[0],z[0]],
|
||||
//[x[1],y[1],z[1]],
|
||||
//[x[3],y[3],z[3]],
|
||||
//]);
|
||||
|
||||
|
||||
// Mic #3
|
||||
//center = [x[3],y[3],z[3]];
|
||||
//rtp = cart2sph(center);
|
||||
//echo(rtp);
|
||||
//rotate([0, -rtp[1], 0])
|
||||
//rotate([0, 0,-rtp[2]])
|
||||
//attach(
|
||||
//center=[x[3], y[3], z[3]],neighbourgs=[
|
||||
//support,
|
||||
//[x[0],y[0],z[0]],
|
||||
//[x[1],y[1],z[1]],
|
||||
//[x[2],y[2],z[2]],
|
||||
//]);
|
||||
Loading…
Reference in New Issue
Block a user