uilleann

reed-body.scad

 1include<../../common.scad>
 2
 3id = 6;
 4od = 8;
 5pluglen = 5;  // Length of the plug at the end
 6opening = [2, 10, 6]; // Opening size
 7cutaway = [10, 0.74, 28]; // Tongue cutaway
 8
 9module reed_body() {
10  difference() {
11    // The main piece
12    cylinder(h=100, d=od, $fn=6);
13
14    // Inner bore
15    translate([0, 0, pluglen]) {
16      cylinder(h=100, d=id, $fn=6);
17    }
18
19    // Opening
20    translate([-opening[0]/2, 0, pluglen]) cube(opening);
21  }
22}
23
24reed_body();