summaryrefslogtreecommitdiff
path: root/Patronenhuelle.scad
blob: 64f23f41a2714f2ada36e58039fb889454c4f6a9 (plain)
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
Patronendicke = 7.5;
Patronenlaenge = 40;
Wanddicke = 3;
Gewindelaenge = 10;
Gang = 2;
epsilon = 0.05;

P = Gang;
H = sqrt(3)/2 * P;

step = 0.01;

auszen = 1;

module einTrapez(n) {
  rotate([360*n,0,0])
    translate([Gang*n,Patronendicke/2+Wanddicke*2/3-3*H/8,0])
      linear_extrude(0.0001)
        polygon([
          [-(6+auszen)/16*P+epsilon,(auszen*5-2)/8*H],
          [-(P+auszen)/16+epsilon,(3-5*auszen)/8*H],
          [(P+auszen)/16-epsilon,(3-5*auszen)/8*H],
          [(6+auszen)/16*P-epsilon,(auszen*5-2)/8*H]
        ]);
};

module dasGewinde() {
  difference() {
    rotate([0,-90,0])
      for (i = [-1:step:Gewindelaenge/Gang + 1-step])
        hull() {
          einTrapez(i);
          einTrapez(i+step);
        }
    translate([0,0,Gewindelaenge])
      cylinder(h = 3*Gang, r = Patronendicke + 2*Wanddicke);
    translate([0,0,-3*Gang])
      cylinder(h = 3*Gang, r = Patronendicke + 2*Wanddicke);
  };
}

difference() {
  union() {
    translate([0,0,-Wanddicke])
      cylinder(h = Patronenlaenge/2 - Gewindelaenge/2 + Wanddicke, r = Patronendicke/2 + Wanddicke, $fn = 100);
    translate([0,0,Patronenlaenge/2])
      cylinder(h = Gewindelaenge, r = Patronendicke/2 + Wanddicke/3, $fn = 100, center = true);
    translate([0,0,Patronenlaenge/2 - Gewindelaenge/2]) {
      dasGewinde();
      difference() {
        cylinder(h = Gewindelaenge, r = Patronendicke/2 + Wanddicke*auszen, $fn = 100);
        cylinder(h = Gewindelaenge, r = Patronendicke/2 + Wanddicke*2/3 + epsilon, $fn = 100);
      };
    };
  };
  cylinder(h = Patronenlaenge + Wanddicke, r = Patronendicke/2, $fn = 100);
  translate([0,0,(Patronenlaenge-Gewindelaenge)/2])
    cylinder(h = Patronenlaenge + Wanddicke, r = Patronendicke/2 + auszen * (Wanddicke/3 + epsilon), $fn = 100);
}