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