uilleann

stock-chanter.scad

 1include <BOSL2/std.scad>
 2
 3$fn = $preview ? 0 : 180;
 4
 5h = 50;
 6id = 12.5;
 7od = 33;
 8head_h = 30;
 9head_d = od+5;
10
11diff()
12cyl(h=h-head_h, d=od, rounding=1/2, anchor=BOTTOM) {
13  for (z = [5, 10, 15]) {
14    tag("remove") up(z) attach(BOTTOM) tube(h=2, id=od-1, od=od+1, chamfer=0.2);
15  }
16  attach(TOP) cyl(d=head_d, h=10, anchor=BOTTOM) {
17    attach(TOP) cyl(h=head_h-10, d1=head_d, d2=id+10, anchor=BOTTOM);
18  }
19  tag("remove") attach(BOTTOM) cyl(h=h, d=id, chamfer=-1, anchor=TOP);
20}
21
22