Rev 4473 Rev 4474
Line 5... Line 5...
5 include <polyScrewThread_r1.scad> 5 include <polyScrewThread_r1.scad>
6   6  
7 PI=3.141592; 7 PI=3.141592;
8   8  
9   9  
-   10  
-   11  
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) 12 module WINDGAUGE02A_S02()
11 { 13 {
12 14
13 //valec se zavitem 15 //valec se zavitem
-   16 union() {
-   17  
-   18  
14 difference() 19 difference()
15 { 20 {
-   21
16 union() 22
-   23 cylinder (h = S01_vyska_horni_zavit+S01_sila_materialu, r=(S01_prumer_vnitrni+4*S01_sila_materialu)/2+S01_tolerance_zavit/2, $fn=100);
-   24 translate([0,0,S01_sila_materialu])
-   25 screw_thread((S01_prumer_vnitrni+2*S01_sila_materialu+S01_tolerance_zavit),S01_hloubka_zavitu,55,S01_vyska_horni_zavit,PI/2,2);
17 { 26
-   27 //otvor na pruchod hridelky
-   28 translate([0,0,S01_sila_materialu/2])
-   29 cylinder (h = S01_sila_materialu+0.01, r=(lozisko_prumer_vnitrni+0.2)/2+lozisko_prekryv, center = true, $fn=100);
-   30
-   31 //otvor na šroub 1
18 screw_thread(S01_prumer_zavitu-S01_tolerance_zavit,S01_hloubka_zavitu,55,S01_vyska_komponentu_na_lozisko,PI/2,2); 32 translate([-senzor_delka/2,-senzor_sirka/2,S01_vyska_komponentu_na_lozisko/2])
-   33 cylinder (h = S01_vyska_komponentu_na_lozisko+0.01, r=(prumer_sroubu)/2, center = true, $fn=100);
19 34
-   35 //otvor na šroub 2
-   36 translate([senzor_delka/2,-senzor_sirka/2,S01_vyska_komponentu_na_lozisko/2])
-   37 cylinder (h = S01_vyska_komponentu_na_lozisko+0.01, r=(prumer_sroubu)/2, center = true, $fn=100);
-   38
-   39 //otvor na šroub 3
-   40 translate([senzor_delka/2,senzor_sirka/2,S01_vyska_komponentu_na_lozisko/2])
-   41 cylinder (h = S01_vyska_komponentu_na_lozisko+0.01, r=(prumer_sroubu)/2, center = true, $fn=100);
-   42  
-   43 //otvor na šroub 4
-   44 translate([-senzor_delka/2,senzor_sirka/2,S01_vyska_komponentu_na_lozisko/2])
20 translate([0,0,(S01_vyska_komponentu_na_lozisko+S01_vyska_zuzene_casti+S01_vyska_prechodu)/2]) 45 cylinder (h = S01_vyska_komponentu_na_lozisko+0.01, r=(prumer_sroubu)/2, center = true, $fn=100);
-   46
-   47 }
-   48 translate([0,0,lozisko_vyska/2+S01_sila_materialu])
-   49 difference()
-   50 {
-   51
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); 52 cylinder (h = lozisko_vyska, r=(lozisko_prumer_vnejsi+2*S01_sila_materialu)/2, center = true, $fn=100);
-   53 cylinder (h = lozisko_vyska+0.01, r=(lozisko_prumer_vnejsi+0.2)/2, center = true, $fn=100);
-   54
-   55
-   56 }
-   57  
-   58 difference()
-   59 {
-   60 union()
-   61 {
-   62 //uchyty na modul
-   63 //sloupek 1
-   64 translate([-senzor_delka/2,-senzor_sirka/2,0])
-   65 SLOUPEK();
-   66  
-   67  
-   68 translate([senzor_delka/2,-senzor_sirka/2,0])
-   69 SLOUPEK();
-   70  
-   71 translate([senzor_delka/2,senzor_sirka/2,0])
-   72 SLOUPEK();
-   73  
-   74 translate([-senzor_delka/2,senzor_sirka/2,0])
-   75 SLOUPEK();
-   76 }
-   77 translate([0,0,S01_sila_materialu])
-   78 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);
-   79
-   80 }
-   81  
-   82  
-   83 }
-   84 }
22   85  
-   86  
-   87 //sloupek na senzor
-   88 module SLOUPEK()
-   89 {
-   90 translate([0,0,S01_sila_materialu])
-   91 difference () {
-   92
-   93 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);
-   94
-   95  
-   96
-   97  
-   98 translate([0,0,lozisko_vyska+2*S01_sila_materialu+2*S01_sila_materialu+vyska_hlavy_sroubu+magnet_vyska+vyska_matky-vyska_matky])
-   99 cylinder (h = vyska_matky+0.01, r= (sirka_matky+0.2)/2, $fn=6);
-   100
-   101
-   102 translate([0,0,-0.01])
-   103 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);
23 } 104 }
-   105 }
-   106
-   107  
-   108
-   109 WINDGAUGE02A_S02();
-   110  
-   111 /*
24 difference() 112 difference()
25 { 113 {
26 translate([0,0,S01_sila_materialu+S01_vyska_komponentu_na_lozisko/2]) 114 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); 115 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 116
Line 209... Line 297...
209 } 297 }
210 } 298 }
211 */ 299 */
212   300  
213   301  
214   302 /*
215 303
216 304