Rev 4694 Rev 4713
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   6  
7   7  
8 difference () { 8 difference () {
9 AWSCREEN01A_D02(D03_vyska_zavitu,D03_tolerance_zavitu,D03_material_za_zavitem,D03_polomer_zavitu,D03_polomer_stitu,D03_tloustka_materialu,3*D03_vyska_zavitu,D03_pocet_vyztuh,screen_bevel); 9 AWSCREEN01A_D02(D03_vyska_zavitu,D03_tolerance_zavitu,D03_material_za_zavitem,D03_polomer_zavitu,D03_polomer_stitu,D03_tloustka_materialu,3*D03_vyska_zavitu,D03_pocet_vyztuh,screen_bevel);
10   10  
11   11  
12 cube([180,180,180]); 12 cube([180,180,180]);
13   13  
14 } 14 }
15   15  
16   16  
17   17  
18   18  
19   19  
20 module AWSCREEN01A_D02(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) 20 module AWSCREEN01A_D02(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)
21   21  
22 { 22 {
23 angle_sep = 360/D03_pocet_vyztuh; 23 angle_sep = 360/D03_pocet_vyztuh;
24   24  
25 //spodní kruh 25 //spodní kruh
26 difference () { 26 difference () {
27 cylinder (h=3*D03_tloustka_materialu,r = D03_polomer_stitu,$fn=100); 27 cylinder (h=3*D03_tloustka_materialu,r = D03_polomer_stitu,$fn=100);
28 translate ([0,0,-0.005]) 28 translate ([0,0,-0.005])
29 cylinder (h=2*D03_tloustka_materialu+0.01,r = D03_polomer_stitu-D03_tloustka_materialu,$fn=100); 29 cylinder (h=2*D03_tloustka_materialu+0.01,r = D03_polomer_stitu-D03_tloustka_materialu,$fn=100);
30 30
31 translate ([0,0,3*D03_tloustka_materialu]) 31 translate ([0,0,3*D03_tloustka_materialu])
32 translate ([0,0,-D03_tloustka_materialu-0.01/2]) 32 translate ([0,0,-D03_tloustka_materialu-0.01/2])
33 cylinder (h=D03_vyska_stitu-3*D03_tloustka_materialu-0.4,r1=D03_polomer_stitu ,r2=D03_polomer_zavitu,$fn=100); 33 cylinder (h=D03_vyska_stitu-3*D03_tloustka_materialu-0.4,r1=D03_polomer_stitu ,r2=D03_polomer_zavitu,$fn=100);
34 34
35 35
36 } 36 }
37 37
38 //spodní kruh - kvůli doplnění výkroje 38 //spodní kruh - kvůli doplnění výkroje
39 difference () { 39 difference () {
40 40
41 41
42 cylinder (h=3*D03_tloustka_materialu,r = D03_polomer_stitu,$fn=100); 42 cylinder (h=3*D03_tloustka_materialu,r = D03_polomer_stitu,$fn=100);
43 translate ([0,0,-0.005]) 43 translate ([0,0,-0.005])
44 cylinder (h=3*D03_tloustka_materialu+0.01,r = D03_polomer_stitu-D03_tloustka_materialu,$fn=100); 44 cylinder (h=3*D03_tloustka_materialu+0.01,r = D03_polomer_stitu-D03_tloustka_materialu,$fn=100);
45 45
46 46
47 47
48 } 48 }
49 49
50   50  
51   51  
52   52  
53 53
54   54  
55   55  
56   56  
57 //screen - velky kuzel 57 //screen - velky kuzel
58 58
59 translate ([0,0,3*D03_tloustka_materialu]) 59 translate ([0,0,3*D03_tloustka_materialu])
60 difference () { 60 difference () {
61 cylinder (h=D03_vyska_stitu-3*D03_tloustka_materialu,r1=D03_polomer_stitu ,r2=D03_polomer_zavitu,$fn=100); 61 cylinder (h=D03_vyska_stitu-3*D03_tloustka_materialu,r1=D03_polomer_stitu ,r2=D03_polomer_zavitu,$fn=100);
62 translate ([0,0,-D03_tloustka_materialu-0.01/2]) 62 translate ([0,0,-D03_tloustka_materialu-0.01/2])
63 cylinder (h=D03_vyska_stitu-3*D03_tloustka_materialu-0.4,r1=D03_polomer_stitu ,r2=D03_polomer_zavitu,$fn=100); 63 cylinder (h=D03_vyska_stitu-3*D03_tloustka_materialu-0.4,r1=D03_polomer_stitu ,r2=D03_polomer_zavitu,$fn=100);
64 64
65 65
66 } 66 }
67 67
68 //horni kuzel 68 //horni kuzel
69 69
70 translate ([0,0,D03_vyska_stitu]) 70 translate ([0,0,D03_vyska_stitu-0.01])
71 71
72 cylinder (h=5,r1=D03_polomer_zavitu ,r2=1,$fn=100); 72 cylinder (h=5,r1=D03_polomer_zavitu ,r2=1,$fn=100);
73 73
74   74  
75   75  
76 //inner ring 76 //inner ring
77   77  
78   78  
79 difference () { 79 difference () {
80 cylinder (h=D03_vyska_zavitu,r = D03_polomer_zavitu + D03_material_za_zavitem/2,$fn=100); 80 cylinder (h=D03_vyska_zavitu,r = D03_polomer_zavitu + D03_material_za_zavitem/2,$fn=100);
81 translate([0,0,-1]) 81 translate([0,0,-1])
82 screw_thread(D03_polomer_zavitu*2,4,55,D03_vyska_zavitu+2,PI/2,2); 82 screw_thread(D03_polomer_zavitu*2,4,55,D03_vyska_zavitu+2,PI/2,2);
83 } 83 }
84   84  
85   85  
86 // center ribs 86 // center ribs
87 for (i = [0 : (D03_pocet_vyztuh-1)]) { 87 for (i = [0 : (D03_pocet_vyztuh-1)]) {
88 rotate ([90,0,angle_sep* i]) 88 rotate ([90,0,angle_sep* i])
89 translate ([0,0,-D03_tloustka_materialu/2]) 89 translate ([0,0,-D03_tloustka_materialu/2])
90 linear_extrude (height = D03_tloustka_materialu, convexity = 10) 90 linear_extrude (height = D03_tloustka_materialu, convexity = 10)
91 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]]); 91 polygon(points=[[D03_polomer_zavitu,D03_vyska_stitu+0.01],[D03_polomer_zavitu, 0],[D03_polomer_stitu - D03_tloustka_materialu+0.01,0],[D03_polomer_stitu- D03_tloustka_materialu+0.01,3*D03_tloustka_materialu]]);
92   92  
93 } 93 }
94 } 94 }