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