Rev Author Line No. Line
4442 jacho 1 $fn=40; // model faces resolution.
2 include <../configuration.scad>
3  
4 include <AWSCREEN01A_D06.scad>
5 include <polyScrewThread_r1.scad>
6  
7 PI=3.141592;
8  
9  
10  
4508 jacho 11 module AWSCREEN01A_D05(S01_vyska_komponentu_na_lozisko,S01_prumer_zavitu,D01_material_pod_zavitem,D01_material_za_zavitem,D01_material_pred_zavitem,D01_delka_tyce,D01_sirka_tyce,D02_sila_materialu,D02_vyska_uchytky,D02_prumer_obruby,D02_delka_celeho_uchytu,D02_dotahova_vzdalenost,D02_prumer_uchytneho_sroubu,D03_tolerance_zavitu)
4442 jacho 12 {
13  
14 difference()
15 {
16  
17 union()
4508 jacho 18 {
19 //výstuha
20 //translate ([0,0,-D03_tloustka_materialu/2])
21 rotate ([0,-90,0])
22 linear_extrude (height = D03_tloustka_materialu, convexity = 10)
23 polygon(points=[[D02_vyska_uchytky/2,D01_delka_tyce+S01_prumer_zavitu/2+D01_material_pred_zavitem+D02_sila_materialu],[0, D01_delka_tyce+S01_prumer_zavitu/2+D01_material_pred_zavitem+D02_sila_materialu],[0,D03_polomer_stitu+D01_material_pred_zavitem],[D01_material_pod_zavitem,D03_polomer_stitu+D01_material_pred_zavitem]]);
24  
25  
4442 jacho 26 //zavit
4543 jacho 27 translate([0,0,D01_material_pod_zavitem-2])
28 screw_thread(S01_prumer_zavitu-2*D03_tolerance_zavitu,4,55,S01_vyska_komponentu_na_lozisko+5,PI/2,2);
4442 jacho 29  
4508 jacho 30  
31 difference()
32 {
4442 jacho 33 //spodní valec
34 translate([0,0,D01_material_pod_zavitem/2])
35 cylinder (h = D01_material_pod_zavitem, r=(S01_prumer_zavitu+D01_material_pred_zavitem*2)/2, center = true, $fn=100);
4508 jacho 36  
37 translate([0,0,-4])
4544 jacho 38 screw_thread(S01_prumer_zavitu-2*D01_material_za_zavitem-2*D03_tolerance_zavitu,4,55,D01_material_pod_zavitem+4,PI/2,2);
4442 jacho 39  
4508 jacho 40  
41 }
42  
4442 jacho 43 //uchyt na tyc
44 translate([0,D01_delka_tyce/2+S01_prumer_zavitu/2+D01_material_pred_zavitem,D01_material_pod_zavitem/2])
45 cube([D01_sirka_tyce,D01_delka_tyce,D01_material_pod_zavitem],center=true);
46 //uchyt na tyc ovalna cast
47 translate([0,S01_prumer_zavitu/2+D01_material_pred_zavitem,D01_material_pod_zavitem/2])
48 cube([D01_sirka_tyce,D01_material_za_zavitem+D01_material_pred_zavitem,D01_material_pod_zavitem],center=true);
49  
50  
51 //material kolem uchytu na sloupek
52 translate([0,D01_delka_tyce+S01_prumer_zavitu/2+D01_material_pred_zavitem+(D02_sila_materialu+D02_prumer_obruby/2)/2-D02_dotahova_vzdalenost,D01_material_pod_zavitem/2])
53 difference()
54 {
55 cube([D01_sirka_tyce,D02_sila_materialu+D02_prumer_obruby/2,D01_material_pod_zavitem],center=true);
56 translate([0,D02_prumer_obruby/2-D02_dotahova_vzdalenost-D02_sila_materialu,0])
57 cylinder(h=D02_vyska_uchytky+0.01,r=D02_prumer_obruby/2,center=true);
58  
59 }
60  
61  
62  
63 //uchyt na sloupek
64  
65 translate([0,D01_delka_tyce+S01_prumer_zavitu/2+D01_material_pred_zavitem+D02_sila_materialu+(D02_prumer_obruby)/2,D02_vyska_uchytky/2])
66 rotate(a=[0,0,270])
4543 jacho 67 AWSCREEN01A_D06_2();
4442 jacho 68  
69 }
70  
4544 jacho 71 //otvor válcový
4543 jacho 72 translate([0,0,D01_material_pod_zavitem-1+S01_vyska_komponentu_na_lozisko/2])
4544 jacho 73 cylinder (h = S01_vyska_komponentu_na_lozisko+2+0.02, r=(S01_prumer_zavitu-2*D03_tolerance_zavitu-2*D01_material_za_zavitem)/2, center = true, $fn=100);
4442 jacho 74  
4543 jacho 75 //odecet vrchního závitu aby byl rovný
76 translate([0,0,D01_material_pod_zavitem+S01_vyska_komponentu_na_lozisko])
4508 jacho 77  
4543 jacho 78 cylinder (h = S01_vyska_komponentu_na_lozisko+0.02, r=(S01_prumer_zavitu-2*D03_tolerance_zavitu)/2, $fn=100);
4544 jacho 79  
80  
81 // cube([200,200,200]);
82  
83 }
4442 jacho 84 }
85  
4508 jacho 86 AWSCREEN01A_D05(S01_vyska_komponentu_na_lozisko,S01_prumer_zavitu,D01_material_pod_zavitem,D01_material_za_zavitem,D01_material_pred_zavitem,D01_delka_tyce,D01_sirka_tyce,D02_sila_materialu,D02_vyska_uchytky,D02_prumer_obruby,D02_delka_celeho_uchytu,D02_dotahova_vzdalenost,D02_prumer_uchytneho_sroubu,D03_tolerance_zavitu);
4442 jacho 87  
88  
89  
90