summaryrefslogtreecommitdiff
path: root/Duschvorhangshaken.scad
blob: 23cc12d463b28dc0905575c0ffb767189725a4cf (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
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
dAchse = 3;
dAchseAuszen = 6;
Huckel = 0.1;
rippelTiefe = 0.5;
rippelAnzahl = 5;
d = 5;
dSeil = 3;
l1 = 10;
l2 = 30;
alpha = acos((d+dSeil)/l2);
epsilon = 0.025;

Teil = 0;
$fn = 300;

module Stift() {
  translate([0,0,-d])
    cylinder(h = 2*d, r = dAchse/2 - epsilon);
  translate([0,0,d])
    sphere(r = dAchse/2 + Huckel);
}

module Loch() {
  translate([0,0,-d-1])
    cylinder(h = 2*d+2, r = dAchse/2 + epsilon);
  translate([0,0,-d])
    sphere(r = dAchse/2 + Huckel);
}

if(Teil == 0 || Teil == 1) {
  difference() {
    union() {
      translate([-d,-l1,-d])
        cube([d-rippelTiefe,d,2*d]);
      translate([0,-l1,-d])
        for(i=[0:rippelAnzahl-1])
          linear_extrude(2*d)
            translate([0,i*d/rippelAnzahl])
              polygon([[-rippelTiefe,0],[-rippelTiefe,d/rippelAnzahl],[0,d/rippelAnzahl]]);
      translate([-d,d-l1,-d])
        cube([d-rippelTiefe,l1-d,d]);
      rotate([0,0,-alpha])
        union() {
          translate([-d,0,-d])
            cube([d,l2,d]);
          translate([-d/2,l2,-d])
            cylinder(r = dAchseAuszen/2, h = d);
          if(Teil == 1)
            translate([-d/2,l2,0])
              Stift();
        }
      intersection(){
        translate([-d,0,-d])
          cube([d,d,d]);
        translate([0,0,-d])
          cylinder(r = d, h = d);
      }
      translate([0,0,-d])
        cylinder(r = dAchseAuszen/2, h = d);
      if(Teil == 0)
        Stift();
    }
    if(Teil == 1)
      Loch();
    if(Teil == 0)
      rotate([0,0,-alpha])
        translate([-d/2,l2,0])
          Loch();
  }
}

if(Teil == 2) {
  difference() {
    union() {
      translate([-dAchseAuszen/2,0,-d])
        cube([dAchseAuszen,l2,d]);
      translate([0,l2,-d])
        cylinder(r = dAchseAuszen/2, h = d);
      translate([0,l2,0])
        Stift();
      translate([0,0,-d])
        cylinder(r = dAchseAuszen/2, h = d);
    }
    Loch();
  }
}