Rev 4554 Rev 4689
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 difference () {
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 cube([180,180,180]);
9   10  
-   11 }
10   12  
11   13  
12   14  
13   15  
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) 16 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   17  
16 { 18 {
17 angle_sep = 360/D03_pocet_vyztuh; 19 angle_sep = 360/D03_pocet_vyztuh;
18   20  
19 //spodní kruh 21 //spodní kruh - kvůli výkroji
-   22 difference () {
-   23
-   24
-   25 cylinder (h=3*D03_tloustka_materialu,r = D03_polomer_stitu,$fn=100);
-   26 translate ([0,0,-0.005])
-   27 cylinder (h=2*D03_tloustka_materialu+0.01,r = D03_polomer_stitu-D03_tloustka_materialu,$fn=100);
-   28
-   29 translate ([0,0,3*D03_tloustka_materialu])
-   30
-   31 translate ([0,0,-0.01/2-D03_tloustka_materialu])
-   32 cylinder (h=D03_vyska_stitu-3*D03_tloustka_materialu+0.01,r1=D03_polomer_stitu ,r2=D03_polomer_zavitu -D03_tolerance_zavitu- D03_material_za_zavitem,$fn=100);
-   33
-   34
-   35
-   36
-   37 }
-   38
-   39 //spodní kruh - kvůli doplnění výkroje
20 difference () { 40 difference () {
21 41
22 42
23 cylinder (h=3*D03_tloustka_materialu,r = D03_polomer_stitu,$fn=100); 43 cylinder (h=3*D03_tloustka_materialu,r = D03_polomer_stitu,$fn=100);
24 translate ([0,0,-0.005]) 44 translate ([0,0,-0.005])
25 cylinder (h=3*D03_tloustka_materialu+0.01,r = D03_polomer_stitu-D03_tloustka_materialu,$fn=100); 45 cylinder (h=3*D03_tloustka_materialu+0.01,r = D03_polomer_stitu-D03_tloustka_materialu,$fn=100);
26 46
-   47
-   48
27 } 49 }
28   50  
29   51  
30 //horni zavit 52 //horni zavit
31 translate ([0,0,D03_vyska_stitu]) 53 translate ([0,0,D03_vyska_stitu])
32 // screen upper rim 54 // screen upper rim
33 difference () { 55 difference () {
34 screw_thread((D03_polomer_zavitu-D03_tolerance_zavitu)*2,4,55,D03_vyska_zavitu+5,PI/2,2); 56 screw_thread((D03_polomer_zavitu-D03_tolerance_zavitu)*2,4,55,D03_vyska_zavitu+5,PI/2,2);
35 57
36 translate ([0,0,-0.01]) 58 translate ([0,0,-0.01])
37 cylinder (h=D03_vyska_zavitu+0.02 ,r= D03_polomer_zavitu -D03_tolerance_zavitu- D03_material_za_zavitem ,$fn=100); 59 cylinder (h=D03_vyska_zavitu+0.02 ,r= D03_polomer_zavitu -D03_tolerance_zavitu- D03_material_za_zavitem ,$fn=100);
38 60
39 61
40 translate ([0,0,D03_vyska_zavitu-0.01]) 62 translate ([0,0,D03_vyska_zavitu-0.01])
41 cylinder (h=D03_vyska_zavitu+0.02 ,r= D03_polomer_zavitu ,$fn=100); 63 cylinder (h=D03_vyska_zavitu+0.02 ,r= D03_polomer_zavitu ,$fn=100);
42 64
43 } 65 }
44   66  
-   67 //materiál pod horním závitem
-   68 translate ([0,0,D03_vyska_stitu-D03_tloustka_materialu])
-   69 difference () {
-   70 translate ([0,0,0])
-   71 cylinder (h=D03_tloustka_materialu ,r=D03_polomer_zavitu -D03_tolerance_zavitu- D03_material_za_zavitem+D03_tloustka_materialu ,$fn=100);
-   72
-   73
-   74 translate ([0,0,-0.01])
-   75 cylinder (h=D03_tloustka_materialu+0.02 ,r= D03_polomer_zavitu -D03_tolerance_zavitu- D03_material_za_zavitem ,$fn=100);
-   76
-   77 }
-   78  
45   79  
46   80  
47 //screen 81 //screen
48 82
49 translate ([0,0,3*D03_tloustka_materialu]) 83 translate ([0,0,3*D03_tloustka_materialu])
50 difference () { 84 difference () {
51 cylinder (h=D03_vyska_stitu-3*D03_tloustka_materialu,r1=D03_polomer_stitu ,r2=D03_polomer_zavitu-D03_tolerance_zavitu,$fn=100); 85 cylinder (h=D03_vyska_stitu-3*D03_tloustka_materialu,r1=D03_polomer_stitu ,r2=D03_polomer_zavitu -D03_tolerance_zavitu- D03_material_za_zavitem,$fn=100);
52 translate ([0,0,-0.01/2]) 86 translate ([0,0,-0.01/2-D03_tloustka_materialu])
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); 87 cylinder (h=D03_vyska_stitu-3*D03_tloustka_materialu+0.01,r1=D03_polomer_stitu ,r2=D03_polomer_zavitu -D03_tolerance_zavitu- D03_material_za_zavitem,$fn=100);
-   88
-   89 translate ([0,0,D03_vyska_stitu-D03_vyska_zavitu-3*D03_tloustka_materialu])
-   90 cylinder (h=D03_vyska_zavitu+0.02 ,r= D03_polomer_zavitu -D03_tolerance_zavitu- D03_material_za_zavitem ,$fn=100);
54 91
55 92
56 } 93 }
57   94  
58   95  
59 //inner ring 96 //inner ring
60   97  
61 //spodní závit 98 //spodní závit
62 difference () { 99 difference () {
63 100
64 union(){ 101 union(){
65 cylinder (h=D03_vyska_zavitu,r = D03_polomer_zavitu + D03_material_za_zavitem/2,$fn=100); 102 cylinder (h=D03_vyska_zavitu,r = D03_polomer_zavitu + D03_material_za_zavitem/2,$fn=100);
66 103
67 //výztuhy 104 //výztuhy
68 // center ribs 105 // center ribs
69 for (i = [0 : (D03_pocet_vyztuh-1)]) { 106 for (i = [0 : (D03_pocet_vyztuh-1)]) {
70 rotate ([90,0,angle_sep* i]) 107 rotate ([90,0,angle_sep* i])
71 translate ([0,0,-D03_tloustka_materialu/2]) 108 translate ([0,0,-D03_tloustka_materialu/2])
72 linear_extrude (height = D03_tloustka_materialu, convexity = 10) 109 linear_extrude (height = D03_tloustka_materialu, convexity = 10)
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]]); 110 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]]);
74   111  
75 } 112 }
76 113
77 114
78 } 115 }
79 translate([0,0,-1]) 116 translate([0,0,-1])
80 screw_thread(D03_polomer_zavitu*2,4,55,D03_vyska_zavitu+2,PI/2,2); 117 screw_thread(D03_polomer_zavitu*2,4,55,D03_vyska_zavitu+2,PI/2,2);
81 } 118 }
82   119  
83   120  
84   121  
85 } 122 }