Rev 4553 Rev 4554
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 19 //spodní kruh
20 difference () { 20 difference () {
-   21
-   22
21 cylinder (h=3*D03_tloustka_materialu,r = D03_polomer_stitu,$fn=100); 23 cylinder (h=3*D03_tloustka_materialu,r = D03_polomer_stitu,$fn=100);
22 translate ([0,0,-0.005]) 24 translate ([0,0,-0.005])
23 cylinder (h=3*D03_tloustka_materialu+0.01,r = D03_polomer_stitu-D03_tloustka_materialu,$fn=100); 25 cylinder (h=3*D03_tloustka_materialu+0.01,r = D03_polomer_stitu-D03_tloustka_materialu,$fn=100);
24 26
25 } 27 }
26   28  
27   29  
28 //horni zavit 30 //horni zavit
29 translate ([0,0,D03_vyska_stitu]) 31 translate ([0,0,D03_vyska_stitu])
30 // screen upper rim 32 // screen upper rim
31 difference () { 33 difference () {
32 screw_thread((D03_polomer_zavitu-D03_tolerance_zavitu)*2,4,55,D03_vyska_zavitu+5,PI/2,2); 34 screw_thread((D03_polomer_zavitu-D03_tolerance_zavitu)*2,4,55,D03_vyska_zavitu+5,PI/2,2);
33 35
34 translate ([0,0,-0.01]) 36 translate ([0,0,-0.01])
35 cylinder (h=D03_vyska_zavitu+0.02 ,r= D03_polomer_zavitu -D03_tolerance_zavitu- D03_material_za_zavitem ,$fn=100); 37 cylinder (h=D03_vyska_zavitu+0.02 ,r= D03_polomer_zavitu -D03_tolerance_zavitu- D03_material_za_zavitem ,$fn=100);
36 38
37 39
38 translate ([0,0,D03_vyska_zavitu-0.01]) 40 translate ([0,0,D03_vyska_zavitu-0.01])
39 cylinder (h=D03_vyska_zavitu+0.02 ,r= D03_polomer_zavitu ,$fn=100); 41 cylinder (h=D03_vyska_zavitu+0.02 ,r= D03_polomer_zavitu ,$fn=100);
40 42
41 } 43 }
42   44  
43   45  
44   46  
45 //screen 47 //screen
46 48
47 translate ([0,0,3*D03_tloustka_materialu]) 49 translate ([0,0,3*D03_tloustka_materialu])
48 difference () { 50 difference () {
49 cylinder (h=D03_vyska_stitu-3*D03_tloustka_materialu,r1=D03_polomer_stitu ,r2=D03_polomer_zavitu-D03_tolerance_zavitu,$fn=100); 51 cylinder (h=D03_vyska_stitu-3*D03_tloustka_materialu,r1=D03_polomer_stitu ,r2=D03_polomer_zavitu-D03_tolerance_zavitu,$fn=100);
50 translate ([0,0,-0.01/2]) 52 translate ([0,0,-0.01/2])
51 cylinder (h=D03_vyska_stitu-3*D03_tloustka_materialu+0.01,r1=D03_polomer_stitu-D03_tloustka_materialu ,r2=D03_polomer_zavitu- D03_material_za_zavitem-D03_tolerance_zavitu,$fn=100); 53 cylinder (h=D03_vyska_stitu-3*D03_tloustka_materialu+0.01,r1=D03_polomer_stitu-D03_tloustka_materialu ,r2=D03_polomer_zavitu- D03_material_za_zavitem-D03_tolerance_zavitu,$fn=100);
52 54
53 55
54 } 56 }
55   57  
56   58  
57 //inner ring 59 //inner ring
58   60  
59   -  
-   61 //spodní závit
60 difference () { 62 difference () {
61 cylinder (h=D03_vyska_zavitu,r = D03_polomer_zavitu + D03_material_za_zavitem/2,$fn=100); -  
62 translate([0,0,-1]) -  
63 screw_thread(D03_polomer_zavitu*2,4,55,D03_vyska_zavitu+2,PI/2,2); -  
64 } -  
65   63
-   64 union(){
-   65 cylinder (h=D03_vyska_zavitu,r = D03_polomer_zavitu + D03_material_za_zavitem/2,$fn=100);
66   66
-   67 //výztuhy
67 // center ribs 68 // center ribs
68 for (i = [0 : (D03_pocet_vyztuh-1)]) { 69 for (i = [0 : (D03_pocet_vyztuh-1)]) {
69 rotate ([90,0,angle_sep* i]) 70 rotate ([90,0,angle_sep* i])
70 translate ([0,0,-D03_tloustka_materialu/2]) 71 translate ([0,0,-D03_tloustka_materialu/2])
71 linear_extrude (height = D03_tloustka_materialu, convexity = 10) 72 linear_extrude (height = D03_tloustka_materialu, convexity = 10)
72 polygon(points=[[D03_polomer_zavitu- D03_material_za_zavitem-D03_tolerance_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]]); 73 polygon(points=[[D03_polomer_zavitu- D03_material_za_zavitem-D03_tolerance_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]]);
73   74  
74 } 75 }
-   76
-   77
-   78 }
-   79 translate([0,0,-1])
-   80 screw_thread(D03_polomer_zavitu*2,4,55,D03_vyska_zavitu+2,PI/2,2);
-   81 }
-   82  
-   83  
-   84  
75 } 85 }