1 |
$fn=40; // model faces resolution. |
1 |
$fn=40; // model faces resolution. |
2 |
include <../configuration.scad> |
2 |
include <../configuration.scad> |
3 |
include <polyScrewThread_r1.scad> |
3 |
include <polyScrewThread_r1.scad> |
4 |
|
4 |
|
5 |
|
5 |
|
6 |
AWSCREEN01A_D03(D03_vyska_zavitu,D03_tolerance_zavitu,D03_material_za_zavitem,D03_polomer_zavitu,D03_polomer_stitu,D03_tloustka_materialu,D03_vyska_stitu,D03_pocet_vyztuh,screen_bevel); |
6 |
AWSCREEN01A_D03(D03_vyska_zavitu,D03_tolerance_zavitu,D03_material_za_zavitem,D03_polomer_zavitu,D03_polomer_stitu,D03_tloustka_materialu,D03_vyska_stitu,D03_pocet_vyztuh,screen_bevel); |
7 |
|
7 |
|
8 |
|
8 |
|
9 |
|
9 |
|
10 |
|
10 |
|
11 |
|
11 |
|
12 |
|
12 |
|
13 |
|
13 |
|
14 |
module AWSCREEN01A_D03(D03_vyska_zavitu,D03_tolerance_zavitu,D03_material_za_zavitem,D03_polomer_zavitu,D03_polomer_stitu,D03_tloustka_materialu,D03_vyska_stitu,D03_pocet_vyztuh,screen_bevel) |
14 |
module AWSCREEN01A_D03(D03_vyska_zavitu,D03_tolerance_zavitu,D03_material_za_zavitem,D03_polomer_zavitu,D03_polomer_stitu,D03_tloustka_materialu,D03_vyska_stitu,D03_pocet_vyztuh,screen_bevel) |
15 |
|
15 |
|
16 |
{ |
16 |
{ |
17 |
angle_sep = 360/D03_pocet_vyztuh; |
17 |
angle_sep = 360/D03_pocet_vyztuh; |
18 |
|
18 |
|
- |
|
19 |
//spodnĂ kruh |
- |
|
20 |
difference () { |
- |
|
21 |
cylinder (h=3*D03_tloustka_materialu,r = D03_polomer_stitu,$fn=100); |
- |
|
22 |
translate ([0,0,-0.005]) |
- |
|
23 |
cylinder (h=3*D03_tloustka_materialu+0.01,r = D03_polomer_stitu-D03_tloustka_materialu,$fn=100); |
- |
|
24 |
|
- |
|
25 |
} |
- |
|
26 |
|
19 |
|
27 |
|
20 |
//horni zavit |
28 |
//horni zavit |
21 |
translate ([0,0,D03_vyska_stitu]) |
29 |
translate ([0,0,D03_vyska_stitu]) |
22 |
// screen upper rim |
30 |
// screen upper rim |
23 |
difference () { |
31 |
difference () { |
24 |
screw_thread((D03_polomer_zavitu-D03_tolerance_zavitu)*2,4,55,D03_vyska_zavitu,PI/2,2); |
32 |
screw_thread((D03_polomer_zavitu-D03_tolerance_zavitu)*2,4,55,D03_vyska_zavitu,PI/2,2); |
25 |
|
33 |
|
26 |
translate ([0,0,-0.01]) |
34 |
translate ([0,0,-0.01]) |
27 |
cylinder (h=D03_vyska_zavitu+0.02 ,r= D03_polomer_zavitu -D03_tolerance_zavitu- D03_material_za_zavitem ,$fn=100); |
35 |
cylinder (h=D03_vyska_zavitu+0.02 ,r= D03_polomer_zavitu -D03_tolerance_zavitu- D03_material_za_zavitem ,$fn=100); |
28 |
} |
36 |
} |
29 |
|
37 |
|
30 |
|
38 |
|
31 |
|
39 |
|
32 |
//screen |
40 |
//screen |
33 |
|
41 |
|
- |
|
42 |
translate ([0,0,3*D03_tloustka_materialu]) |
34 |
difference () { |
43 |
difference () { |
35 |
cylinder (h=D03_vyska_stitu,r1=D03_polomer_stitu ,r2=D03_polomer_zavitu,$fn=100); |
44 |
cylinder (h=D03_vyska_stitu-3*D03_tloustka_materialu,r1=D03_polomer_stitu ,r2=D03_polomer_zavitu,$fn=100); |
36 |
translate ([0,0,-0.01/2]) |
45 |
translate ([0,0,-0.01/2]) |
37 |
cylinder (h=D03_vyska_stitu+0.01,r1=D03_polomer_stitu-D03_tloustka_materialu ,r2=D03_polomer_zavitu -D03_tolerance_zavitu- D03_material_za_zavitem,$fn=100); |
46 |
cylinder (h=D03_vyska_stitu-3*D03_tloustka_materialu+0.01,r1=D03_polomer_stitu-D03_tloustka_materialu ,r2=D03_polomer_zavitu -D03_tolerance_zavitu- D03_material_za_zavitem,$fn=100); |
38 |
|
47 |
|
39 |
|
48 |
|
40 |
} |
49 |
} |
41 |
|
50 |
|
42 |
|
51 |
|
43 |
//inner ring |
52 |
//inner ring |
44 |
|
53 |
|
45 |
|
54 |
|
46 |
difference () { |
55 |
difference () { |
47 |
cylinder (h=D03_vyska_zavitu,r = D03_polomer_zavitu + D03_material_za_zavitem/2,$fn=100); |
56 |
cylinder (h=D03_vyska_zavitu,r = D03_polomer_zavitu + D03_material_za_zavitem/2,$fn=100); |
48 |
translate([0,0,-1]) |
57 |
translate([0,0,-1]) |
49 |
screw_thread(D03_polomer_zavitu*2,4,55,D03_vyska_zavitu+2,PI/2,2); |
58 |
screw_thread(D03_polomer_zavitu*2,4,55,D03_vyska_zavitu+2,PI/2,2); |
50 |
} |
59 |
} |
51 |
|
60 |
|
52 |
|
61 |
|
53 |
// center ribs |
62 |
// center ribs |
54 |
for (i = [0 : (D03_pocet_vyztuh-1)]) { |
63 |
for (i = [0 : (D03_pocet_vyztuh-1)]) { |
55 |
rotate ([90,0,angle_sep* i]) |
64 |
rotate ([90,0,angle_sep* i]) |
56 |
translate ([0,0,-D03_tloustka_materialu/2]) |
65 |
translate ([0,0,-D03_tloustka_materialu/2]) |
57 |
linear_extrude (height = D03_tloustka_materialu, convexity = 10) |
66 |
linear_extrude (height = D03_tloustka_materialu, convexity = 10) |
58 |
polygon(points=[[D03_polomer_zavitu, D03_vyska_zavitu],[D03_polomer_zavitu, 0],[D03_polomer_stitu - D03_tloustka_materialu,0],[D03_polomer_zavitu,D03_vyska_stitu]]); |
67 |
polygon(points=[[D03_polomer_zavitu,D03_vyska_stitu],[D03_polomer_zavitu, 0],[D03_polomer_stitu - D03_tloustka_materialu,0],[D03_polomer_stitu- D03_tloustka_materialu,3*D03_tloustka_materialu]]); |
59 |
|
68 |
|
60 |
} |
69 |
} |
61 |
} |
70 |
} |