uilleann

assembly.scad

 1include <../../common.scad>
 2
 3plunge = 60;                    // How far in can the butt go?
 4height = 135.2;                 // as measured by my calipers
 5
 6tubeh = 72;
 7tubed = 9.6;
 8
 9endh = height - plunge;
10endid = 5.0;
11endod = 10.0;
12
13module drone_tenor_tuner_barrel() {
14  brass_tube(h=tubeh, id=tubed);
15}
16
17module drone_tenor_tuner_end() {
18  stopod = tubed - (clearance * 2);
19  stoph = height / 30;
20  stop_elevation = endh - (height - tubeh);
21
22  union() {
23    derlin_tube(h=endh, id=endid, od=endod);
24    derlin_tube(h=stop_elevation, id=endid, od=tubed - clearance*2);
25    translate([0, 0, stop_elevation]) derlin_stop(h=stoph, id=endod, od=tubed + brass_thickness*2);
26    translate([0, 0, endh-bell_height]) derlin_bell(id=endod);
27  }
28}
29
30module drone_tenor_tuner() {
31  drone_tenor_tuner_barrel();
32  translate([0, 0, plunge]) drone_tenor_tuner_end();
33}
34
35module drone_tenor() {
36  drone_tenor_tuner();
37}
38
39drone_tenor();