Rev 4498 Rev 4508
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_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); 6 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);
7   7  
8   8  
9   9  
10   10  
11   11  
12   12  
13   13  
14 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) 14 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)
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 cylinder (h=3*D03_tloustka_materialu,r = D03_polomer_stitu,$fn=100); 21 cylinder (h=3*D03_tloustka_materialu,r = D03_polomer_stitu,$fn=100);
22 translate ([0,0,-0.005]) 22 translate ([0,0,-0.005])
23 cylinder (h=3*D03_tloustka_materialu+0.01,r = D03_polomer_stitu-D03_tloustka_materialu,$fn=100); 23 cylinder (h=3*D03_tloustka_materialu+0.01,r = D03_polomer_stitu-D03_tloustka_materialu,$fn=100);
24 24
25 } 25 }
26   26  
27   27  
28   28  
29 29
30   30  
31   31  
32   32  
33 //screen - velky kuzel 33 //screen - velky kuzel
34 34
35 translate ([0,0,3*D03_tloustka_materialu]) 35 translate ([0,0,3*D03_tloustka_materialu])
36 difference () { 36 difference () {
37 cylinder (h=D03_vyska_stitu-3*D03_tloustka_materialu,r1=D03_polomer_stitu ,r2=D03_polomer_zavitu,$fn=100); 37 cylinder (h=D03_vyska_stitu-3*D03_tloustka_materialu,r1=D03_polomer_stitu ,r2=D03_polomer_zavitu,$fn=100);
38 translate ([0,0,-0.01/2]) 38 translate ([0,0,-0.01/2])
39 cylinder (h=D03_vyska_stitu-3*D03_tloustka_materialu+0.01,r1=D03_polomer_stitu-D03_tloustka_materialu ,r2=D03_polomer_zavitu -D03_tloustka_materialu,$fn=100); 39 cylinder (h=D03_vyska_stitu-3*D03_tloustka_materialu+0.01,r1=D03_polomer_stitu-D03_tloustka_materialu ,r2=D03_polomer_zavitu -D03_tloustka_materialu,$fn=100);
40 40
41 41
42 } 42 }
43 43
44 //horni kuzel 44 //horni kuzel
45 45
46 translate ([0,0,D03_vyska_stitu]) 46 translate ([0,0,D03_vyska_stitu])
47 difference () { 47 difference () {
48 cylinder (h=5,r1=D03_polomer_zavitu ,r2=1,$fn=100); 48 cylinder (h=5,r1=D03_polomer_zavitu ,r2=1,$fn=100);
49 translate ([0,0,-0.01/2]) 49 translate ([0,0,-0.01/2])
50 cylinder (h=5,r1=D03_polomer_zavitu-D03_tloustka_materialu ,r2=0,$fn=100); 50 cylinder (h=5-D03_tloustka_materialu,r1=D03_polomer_zavitu-D03_tloustka_materialu ,r2=0,$fn=100);
51 51
52 52
53 } 53 }
54   54  
55   55  
56 //inner ring 56 //inner ring
57   57  
58   58  
59 difference () { 59 difference () {
60 cylinder (h=D03_vyska_zavitu,r = D03_polomer_zavitu + D03_material_za_zavitem/2,$fn=100); 60 cylinder (h=D03_vyska_zavitu,r = D03_polomer_zavitu + D03_material_za_zavitem/2,$fn=100);
61 translate([0,0,-1]) 61 translate([0,0,-1])
62 screw_thread(D03_polomer_zavitu*2,4,55,D03_vyska_zavitu+2,PI/2,2); 62 screw_thread(D03_polomer_zavitu*2,4,55,D03_vyska_zavitu+2,PI/2,2);
63 } 63 }
64   64  
65   65  
66 // center ribs 66 // center ribs
67 for (i = [0 : (D03_pocet_vyztuh-1)]) { 67 for (i = [0 : (D03_pocet_vyztuh-1)]) {
68 rotate ([90,0,angle_sep* i]) 68 rotate ([90,0,angle_sep* i])
69 translate ([0,0,-D03_tloustka_materialu/2]) 69 translate ([0,0,-D03_tloustka_materialu/2])
70 linear_extrude (height = D03_tloustka_materialu, convexity = 10) 70 linear_extrude (height = D03_tloustka_materialu, convexity = 10)
71 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]]); 71 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]]);
72   72  
73 } 73 }
74 } 74 }