]> www.fi.muni.cz Git - things.git/blob - koupelna-mrizka.scad
koupelna mrizka
[things.git] / koupelna-mrizka.scad
1 include <yenyalib.scad>
2
3 sdk = 12;
4 d_in = 104;
5 d_out = 140;
6 wall = 1.2;
7 h_out = 3;
8 h_in = h_out + 8.5;
9 out_angle = 60;
10 thin_wall = 0.70;
11 rib_angle = 60;
12 rib_w = 5;
13 rib_dist = 9;
14 rib_off = 1;
15 top_beam_w = 15;
16 top_beam_h = 2;
17
18 clip_wall = 3;
19 clip_mid = clip_wall + 3;
20
21 magnet_d = 10 + 0.5;
22 magnet_h = 0.8 + 0.1;
23
24 magnet_off = d_in/2 - 1.5*magnet_d;
25
26 $fn = 256;
27
28 difference() {
29         cylinder(r1 = d_out/2-h_out*cos(out_angle),
30                 r2 = d_out/2,
31                 h = h_out);
32         Tz(wall) cylinder(r1 = d_out/2-wall-h_out*cos(out_angle),
33                         r2 = d_out/2-wall,
34                         h = h_out);
35         Tz(-eps) cylinder(r = d_in/2-wall+eps,  h = wall+2*eps);
36 }
37
38 difference() {
39         cylinder(r = d_in/2, h = h_in);
40         Tz(-eps) cylinder(r = d_in/2-wall, h = h_in + 2*eps);
41 }
42
43 difference() {
44         intersection() {
45                 cylinder(r = d_in/2-wall/2, h = h_in);
46                 union() {
47                         for(i = [-d_in/2+rib_off:rib_dist:d_in/2]) Tx(i) Ty(-d_in/2) {
48                                 Tx(-rib_w/2) cube([rib_w, d_in, thin_wall]);
49                                 Tx(rib_w/2)Ry(-rib_angle) cube([h_in/cos(rib_angle), d_in, thin_wall]);
50                         }
51                         translate([-d_in/2, -top_beam_w/2, h_in-top_beam_h])
52                                 cube([d_in, top_beam_w, top_beam_h]);
53                 }
54         }
55         for (x = [-1, 1]) Sx(x) Tx(magnet_off) Tz(h_in-magnet_h)
56                 cylinder(r = magnet_d/2, h = magnet_h+eps);
57 }
58
59 Ty(d_out/2 + top_beam_w/2 + 5) difference() {
60         union() {
61                 hull() for(x = [-1, 1]) Sx(x) {
62                         Tx(d_out/2-top_beam_w/2)
63                                 cylinder(r = top_beam_w/2, h = clip_wall);
64                 }
65                 hull() for(x = [-1, 1]) Sx(x) {
66                         Tx(d_in/2-top_beam_w/2)
67                                 cylinder(r = top_beam_w/2, h = clip_mid);
68                 }
69         }
70         for (x = [-1, 1]) Sx(x) Tx(magnet_off) Tz(clip_mid-magnet_h)
71                 cylinder(r = magnet_d/2, h = magnet_h+eps);
72         
73 }