URSAProject/spoolShaftTeeth.scad at master · FromAlaska/URSAProject · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
// Jim Samson
// Spool for rat project
// November 13, 2018

offsetForEnds=6;

beltHeight=60+(offsetForEnds); // millimeters
diameterForBelt=30;

diameterForEdgesHeight=2;
diameterForEdges = diameterForBelt + 4;

bearingDiameter=22.2;
bearingHeight=8;

spoolHolder();

module spoolHolder() {
    union() {
        difference() {
            spool();
            bearings();
            middleShaft();
        }
        gripHolders();
    }
}

module gripHolders() {
    n=20;
    for(i=[0:n]) {
        rotate([0,0,i*360/n]) {
            translate([(diameterForBelt/2)-1.7,0,2]) {
                cube([2,2,beltHeight-4]);
            }
        }
    }
}

module middleShaft() {
    cylinder(d=bearingDiameter/1.08,h=beltHeight);
}

module bearings() {
    translate([0,0,-1]) {
        cylinder(d=bearingDiameter,h=bearingHeight);
    }

    translate([0,0,beltHeight-bearingHeight+1]) {
        cylinder(d=bearingDiameter,h=bearingHeight);
    }
}

module spool() {
    cylinder(d=diameterForBelt,h=beltHeight);

    cylinder(d=diameterForEdges,h=diameterForEdgesHeight);
    translate([0,0,beltHeight-2]) {
        cylinder(d=diameterForEdges,h=diameterForEdgesHeight);
    }
}