Rev Author Line No. Line
4431 jacho 1 $fn=40; // model faces resolution.
2 include <../configuration.scad>
3  
4  
4436 jacho 5 include <polyScrewThread_r1.scad>
6  
7 PI=3.141592;
8  
4473 jacho 9  
10 module WINDGAUGE02A_S02(S01_sila_materialu,S01_vyska_komponentu_na_lozisko,S01_prumer_zavitu,lozisko_vyska,lozisko_prumer_vnejsi,lozisko_prumer_vnitrni,lozisko_prekryv,vyska_matky,prumer_orechu,prumer_sroubu,senzor_delka,senzor_sirka,S01_tolerance_zavit,sirka_matky,magnet_vyska,S01_vyska_zuzene_casti,S01_vyska_prechodu)
11 {
12  
13 //valec se zavitem
14 difference()
15 {
16 union()
17 {
18 screw_thread(S01_prumer_zavitu-S01_tolerance_zavit,S01_hloubka_zavitu,55,S01_vyska_komponentu_na_lozisko,PI/2,2);
19  
20 translate([0,0,(S01_vyska_komponentu_na_lozisko+S01_vyska_zuzene_casti+S01_vyska_prechodu)/2])
21 cylinder (h = S01_vyska_komponentu_na_lozisko+S01_vyska_zuzene_casti+S01_vyska_prechodu, r=(lozisko_prumer_vnejsi+2*S01_sila_materialu)/2, center = true, $fn=100);
22  
23 }
24 difference()
25 {
26 translate([0,0,S01_sila_materialu+S01_vyska_komponentu_na_lozisko/2])
27 cylinder (h = S01_vyska_komponentu_na_lozisko+0.01, r=((S01_prumer_zavitu-S01_sila_materialu)-S01_tolerance_zavit)/2-S01_hloubka_zavitu/2, center = true, $fn=100);
28  
29 translate([0,0,S01_sila_materialu+S01_vyska_komponentu_na_lozisko/2])
30 cylinder (h = S01_vyska_komponentu_na_lozisko+0.01, r=lozisko_prumer_vnejsi/2+S01_sila_materialu, center = true, $fn=100);
31  
32 translate([-((S01_prumer_zavitu-S01_sila_materialu)-S01_tolerance_zavit)-S01_hloubka_zavitu,-S01_sila_materialu/2,0])
33 cube([2*((S01_prumer_zavitu-S01_sila_materialu)-S01_tolerance_zavit)-S01_hloubka_zavitu,S01_sila_materialu,S01_vyska_komponentu_na_lozisko]);
34  
35 rotate ([0,0,90])
36 translate([-((S01_prumer_zavitu-S01_sila_materialu)-S01_tolerance_zavit)-S01_hloubka_zavitu,-S01_sila_materialu/2,0])
37 cube([2*((S01_prumer_zavitu-S01_sila_materialu)-S01_tolerance_zavit)-S01_hloubka_zavitu,S01_sila_materialu,S01_vyska_komponentu_na_lozisko]);
38  
39  
40 }
41  
42 //otvor na pruchod hridelky
43 translate([0,0,S01_sila_materialu/2])
44 cylinder (h = S01_sila_materialu+0.01, r=(lozisko_prumer_vnejsi+0.2)/2, center = true, $fn=100);
45  
46 //otvor na šroub 1
47 translate([-senzor_delka/2,-senzor_sirka/2,S01_vyska_komponentu_na_lozisko/2])
48 cylinder (h = S01_vyska_komponentu_na_lozisko+0.01, r=(prumer_sroubu)/2, center = true, $fn=100);
49  
50 //otvor na šroub 2
51 translate([senzor_delka/2,-senzor_sirka/2,S01_vyska_komponentu_na_lozisko/2])
52 cylinder (h = S01_vyska_komponentu_na_lozisko+0.01, r=(prumer_sroubu)/2, center = true, $fn=100);
53  
54 //otvor na šroub 3
55 translate([senzor_delka/2,senzor_sirka/2,S01_vyska_komponentu_na_lozisko/2])
56 cylinder (h = S01_vyska_komponentu_na_lozisko+0.01, r=(prumer_sroubu)/2, center = true, $fn=100);
57  
58 //otvor na šroub 4
59 translate([-senzor_delka/2,senzor_sirka/2,S01_vyska_komponentu_na_lozisko/2])
60 cylinder (h = S01_vyska_komponentu_na_lozisko+0.01, r=(prumer_sroubu)/2, center = true, $fn=100);
61  
62  
63  
64 //otvory na ložisko
65 translate([0,0,(S01_vyska_komponentu_na_lozisko+S01_vyska_zuzene_casti+S01_vyska_prechodu)/2])
66  
67  
68  
69 cylinder (h = S01_vyska_komponentu_na_lozisko+S01_vyska_zuzene_casti+S01_vyska_prechodu+0.01, r=(lozisko_prumer_vnejsi+0.2)/2, center = true, $fn=100);
70  
71  
72  
73  
74  
75  
76  
77  
78  
79  
80  
81  
82  
83 }
84  
85  
86 //sloupek na senzor
87 module SLOUPEK()
88 {
89 translate([0,0,S01_sila_materialu])
90 difference () {
91  
92 cylinder (h = lozisko_vyska+2*S01_sila_materialu+2*S01_sila_materialu+vyska_hlavy_sroubu+magnet_vyska+vyska_matky, r= sirka_matky/2+S01_sila_materialu, $fn=20);
93  
94  
95  
96  
97 translate([0,0,lozisko_vyska+2*S01_sila_materialu+2*S01_sila_materialu+vyska_hlavy_sroubu+magnet_vyska+vyska_matky-vyska_matky])
98 cylinder (h = vyska_matky+0.01, r= (sirka_matky+0.2)/2, $fn=6);
99  
100  
101 translate([0,0,-0.01])
102 cylinder (h = lozisko_vyska+2*S01_sila_materialu+2*S01_sila_materialu+vyska_hlavy_sroubu+magnet_vyska+vyska_matky+0.01, r= (prumer_sroubu+0.2)/2, $fn=10);
103 }
104 }
105 }
106  
107 WINDGAUGE02A_S02(S01_sila_materialu,S01_vyska_komponentu_na_lozisko,S01_prumer_zavitu,lozisko_vyska,lozisko_prumer_vnejsi,lozisko_prumer_vnitrni,lozisko_prekryv,vyska_matky,prumer_orechu,prumer_sroubu,senzor_delka,senzor_sirka,S01_tolerance_zavit,sirka_matky,magnet_vyska,S01_vyska_zuzene_casti,S01_vyska_prechodu);
108  
109  
110 //původní díl
111 /*
4465 jacho 112 module WINDGAUGE02A_S02(S01_sila_materialu,S01_vyska_komponentu_na_lozisko,S01_prumer_zavitu,lozisko_vyska,lozisko_prumer_vnejsi,lozisko_prumer_vnitrni,lozisko_prekryv,vyska_matky,prumer_orechu,prumer_sroubu,senzor_delka,senzor_sirka,S01_tolerance_zavit,sirka_matky,magnet_vyska)
4431 jacho 113 {
4462 jacho 114 union()
115 {
116 //valec se zavitem
4431 jacho 117 difference()
118 {
4462 jacho 119  
120 screw_thread(S01_prumer_zavitu-S01_tolerance_zavit,S01_hloubka_zavitu,55,S01_vyska_komponentu_na_lozisko,PI/2,2);
121  
122 translate([0,0,S01_sila_materialu+S01_vyska_komponentu_na_lozisko/2])
123 cylinder (h = S01_vyska_komponentu_na_lozisko+0.01, r=((S01_prumer_zavitu-S01_sila_materialu)-S01_tolerance_zavit)/2-S01_hloubka_zavitu/2, center = true, $fn=100);
4435 jacho 124  
4462 jacho 125 //otvor na pruchod hridelky
126 translate([0,0,S01_sila_materialu/2])
127 cylinder (h = S01_sila_materialu+0.01, r=(lozisko_prumer_vnitrni+2*lozisko_prekryv+0.2)/2, center = true, $fn=100);
128  
129 //otvor na šroub 1
4431 jacho 130 translate([-senzor_delka/2,-senzor_sirka/2,S01_vyska_komponentu_na_lozisko/2])
131 cylinder (h = S01_vyska_komponentu_na_lozisko+0.01, r=(prumer_sroubu)/2, center = true, $fn=100);
132  
4462 jacho 133 //otvor na šroub 2
4431 jacho 134 translate([senzor_delka/2,-senzor_sirka/2,S01_vyska_komponentu_na_lozisko/2])
135 cylinder (h = S01_vyska_komponentu_na_lozisko+0.01, r=(prumer_sroubu)/2, center = true, $fn=100);
136  
137 //otvor na šroub 3
138 translate([senzor_delka/2,senzor_sirka/2,S01_vyska_komponentu_na_lozisko/2])
139 cylinder (h = S01_vyska_komponentu_na_lozisko+0.01, r=(prumer_sroubu)/2, center = true, $fn=100);
140  
141 //otvor na šroub 4
142 translate([-senzor_delka/2,senzor_sirka/2,S01_vyska_komponentu_na_lozisko/2])
4462 jacho 143 cylinder (h = S01_vyska_komponentu_na_lozisko+0.01, r=(prumer_sroubu)/2, center = true, $fn=100);
144  
145 }
4431 jacho 146  
4462 jacho 147 //otvory na ložisko
148 translate([0,0,lozisko_vyska/2+S01_sila_materialu])
149 difference()
4465 jacho 150 {
151  
4462 jacho 152 cylinder (h = lozisko_vyska, r=(lozisko_prumer_vnejsi+2*S01_sila_materialu)/2, center = true, $fn=100);
153 cylinder (h = lozisko_vyska+0.01, r=(lozisko_prumer_vnejsi+0.2)/2, center = true, $fn=100);
154  
155  
156 }
157  
4465 jacho 158 difference()
159 {
160 union()
161 {
162 //uchyty na modul
163 //sloupek 1
164 translate([-senzor_delka/2,-senzor_sirka/2,0])
165 SLOUPEK();
4462 jacho 166  
167  
4465 jacho 168 translate([senzor_delka/2,-senzor_sirka/2,0])
169 SLOUPEK();
4462 jacho 170  
4465 jacho 171 translate([senzor_delka/2,senzor_sirka/2,0])
172 SLOUPEK();
4462 jacho 173  
4465 jacho 174 translate([-senzor_delka/2,senzor_sirka/2,0])
175 SLOUPEK();
176 }
177 translate([0,0,S01_sila_materialu])
178 cylinder (h = lozisko_vyska+2*S01_sila_materialu+2*S01_sila_materialu+vyska_hlavy_sroubu+magnet_vyska+vyska_matky+0.01, r=(lozisko_prumer_vnejsi+0.2)/2, $fn=100);
179  
180 }
4462 jacho 181  
182  
183  
184  
185  
186  
187  
4431 jacho 188 }
4465 jacho 189 }
4431 jacho 190  
191  
4465 jacho 192 //sloupek na senzor
193 module SLOUPEK()
194 {
195 translate([0,0,S01_sila_materialu])
196 difference () {
197  
198 cylinder (h = lozisko_vyska+2*S01_sila_materialu+2*S01_sila_materialu+vyska_hlavy_sroubu+magnet_vyska+vyska_matky, r= sirka_matky/2+S01_sila_materialu, $fn=20);
199  
4431 jacho 200  
4465 jacho 201  
4431 jacho 202  
4465 jacho 203 translate([0,0,lozisko_vyska+2*S01_sila_materialu+2*S01_sila_materialu+vyska_hlavy_sroubu+magnet_vyska+vyska_matky-vyska_matky])
204 cylinder (h = vyska_matky+0.01, r= (sirka_matky+0.2)/2, $fn=6);
4431 jacho 205  
206  
4465 jacho 207 translate([0,0,-0.01])
208 cylinder (h = lozisko_vyska+2*S01_sila_materialu+2*S01_sila_materialu+vyska_hlavy_sroubu+magnet_vyska+vyska_matky+0.01, r= (prumer_sroubu+0.2)/2, $fn=10);
209 }
210 }
4473 jacho 211 */
212  
213  
214  
4465 jacho 215  
4473 jacho 216