URSAProject/spoolTeeth.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
62
63
64
65
66
67
68
69
// Jim Samson
// Spool with teeth for rat project
// November 14, 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();
            middleShaft();
            bearings();
            gear();
            tube();
        }
    }
}

module tube() {
    translate([0,0,-1]) {
        cylinder(d=5.6,h=beltHeight+1,$fn=100);
    }
}

module gear() {
   //translate([-11,-11.1,-1]) {
        //import("SGearSpurV1_fixed.stl", convexity=10);
    //}
    translate([0,0,0]) {
        cube([15.3,15.3,30],center=true);
    }
}

module teethHolder() {
    cylinder(d=bearingDiameter,h=beltHeight);
}

module middleShaft() {
    translate([0,0,16]) {
        cylinder(d=bearingDiameter/1.08,h=beltHeight);
    }
}

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

module spool() {
    translate([0,0,beltHeight/2]) {
        intersection() {
            cube([beltHeight,beltHeight,beltHeight], center=true);
            resize([diameterForBelt,diameterForBelt,beltHeight*2])
            sphere(r=10);
        }
    }
}