Rev 4536 Rev 4538
Line 3... Line 3...
3 include <polyScrewThread_r1.scad> 3 include <polyScrewThread_r1.scad>
4 PI=3.141592; 4 PI=3.141592;
5   5  
6 //Drzak rotoru se závitem 6 //Drzak rotoru se závitem
7   7  
8 WINDGAUGE02A_R02(); -  
9   8  
-   9  
-   10 WINDGAUGE01A_R02();
-   11  
10 module WINDGAUGE02A_R02() 12 module WINDGAUGE01A_R02()
-   13 {
-   14
-   15 difference()
-   16 {
-   17 union()
11 { 18 {
-   19
12 //setihrana matice 20 //kužel na závit
-   21 cylinder(h=R02_zavit_vyska, r1=S01_prumer_vnitrni/2+5*S01_sila_materialu, r2=R03_prumer_zavitu/2+S01_sila_materialu, center=false,$fn=100);
-   22
-   23 //křídlo
-   24 translate([0,R02_vyska_kridla+R03_prumer_zavitu/2+S01_sila_materialu,0])
-   25 rotate([0, 90, 0])
13 difference() 26 difference()
14 { 27 {
15 union() 28 //zakladní materiál
16 { -  
17 //závit 29 translate([0,0,0])
18 screw_thread((11-S01_tolerance_zavit),3,55,R01_vyska_preryti_statoru,PI/2,2); 30 cylinder (h = S01_sila_materialu, r=R02_vyska_kridla, $fn=100);
-   31
19 32 translate([-R02_vyska_kridla,0,-0.01])
20 //spodní podložka 33 cube([R02_vyska_kridla,R02_vyska_kridla,S01_sila_materialu+0.02],center=false);
-   34
21 translate([0,0,-R01_mezera_mezi_statorem_rotorem/2]) 35 translate([0,-R02_vyska_kridla,-0.01])
22 cylinder (h = R01_mezera_mezi_statorem_rotorem, r=(lozisko_prumer_vnitrni+2*lozisko_prekryv+2)/2, center = true, $fn=100); 36 cube([R02_vyska_kridla,R02_vyska_kridla,S01_sila_materialu+0.02],center=false);
23 } 37
24 38 translate([0,0,-0.01])
-   39 cube([R02_vyska_kridla,R02_vyska_kridla,S01_sila_materialu+0.02],center=false);
25 //otvor 40
26 translate([0,0,-R01_mezera_mezi_statorem_rotorem-0.05]) 41 translate([-R02_vyska_kridla,-R03_prumer_zavitu/2-S01_sila_materialu+3,-0.01])
27 cylinder (h = R01_vyska_preryti_statoru+R01_mezera_mezi_statorem_rotorem+0.1, r=prumer_osicky/2, $fn=100); 42 cube([R02_vyska_kridla,R02_vyska_kridla,S01_sila_materialu+0.02],center=false);
-   43
-   44 }
28   45  
-   46 //kvádr pod tyčí
-   47 translate([-R02_hrana_drzaku/2,-(R02_delka_vyrovnnavaci_tyce+R03_prumer_zavitu/2+S01_sila_materialu),0])
-   48 cube([R02_hrana_drzaku,R02_delka_vyrovnnavaci_tyce+R03_prumer_zavitu/2+S01_sila_materialu,R02_sila_materialu_pod_tyci],center=false);
-   49
-   50 //prední tyč
-   51 translate([0,0,5])
-   52 rotate([-90, 0, 180])
-   53 difference()
-   54 {
-   55 translate([0,0,0])
-   56 cylinder (h = R02_delka_vyrovnnavaci_tyce+R03_prumer_zavitu/2+S01_sila_materialu, r=R02_hrana_drzaku/2, $fn=100);
-   57
-   58 translate([-R02_hrana_drzaku/2,0,-0.01])
-   59 cube([R02_hrana_drzaku,R02_hrana_drzaku,R02_delka_vyrovnnavaci_tyce+R03_prumer_zavitu/2+S01_sila_materialu+0.02],center=false);
-   60 }
29 } 61
30   62  
-   63 //spodní tyč pod křídlem
-   64 translate([-R02_hrana_drzaku/2,0,0])
-   65 cube([R02_hrana_drzaku,R02_delka_kridla+(S01_prumer_vnitrni/2+5*S01_sila_materialu)-R02_hrana_drzaku/2,S01_sila_materialu],center=false);
-   66
-   67 //zakulacení spodní tyče
-   68 translate([0,R02_delka_kridla+(S01_prumer_vnitrni/2+5*S01_sila_materialu)-R02_hrana_drzaku/2,0])
-   69 cylinder (h = S01_sila_materialu, r=R02_hrana_drzaku/2, $fn=100);
-   70  
-   71  
-   72
-   73 }
-   74
-   75
31 } 76
-   77
-   78 //odečet závitu
-   79 translate([0,0,-10])
-   80 screw_thread((R03_prumer_zavitu),S01_hloubka_zavitu,55,R04_zavit_vyska+R02_zavit_vyska+R01_zavit_vyska,PI/2,2);
-   81
-   82 //otvor na hlavu šroubu
-   83
-   84
-   85
-   86 translate([-(prumer_hlavy_sroubu+1)/2,-(R02_delka_vyrovnnavaci_tyce+R03_prumer_zavitu/2)+S01_sila_materialu,-0.01])
-   87 cube([prumer_hlavy_sroubu+1,vyska_hlavy_sroubu+1,R02_sila_materialu_pod_tyci+prumer_hlavy_sroubu/2+0.5],center=false);
-   88
-   89 //otvor na sroub - valec
-   90 translate([0,-(R02_delka_vyrovnnavaci_tyce+R03_prumer_zavitu/2)-(S01_sila_materialu)-0.01,R02_sila_materialu_pod_tyci])
-   91 rotate([-90, 0, 0])
-   92
-   93 cylinder (h = S01_sila_materialu+0.01, r=prumer_sroubu/2+0.2, $fn=100);
-   94
-   95 //otvor na sroub - valec pro zasunutí hlavy šroubu
-   96 translate([0,-(R02_delka_vyrovnnavaci_tyce+R03_prumer_zavitu/2)-0.01,R02_sila_materialu_pod_tyci])
-   97 rotate([-90, 0, 0])
-   98
-   99 cylinder (h = S01_sila_materialu+0.5, r=prumer_hlavy_sroubu/2+0.3, $fn=100);
-   100
-   101 //otvor pro vsunutí sroubu
-   102
-   103 translate([-(prumer_sroubu+0.2)/2,-(R02_delka_vyrovnnavaci_tyce+R03_prumer_zavitu/2)-S01_sila_materialu-0.01,-0.01])
-   104 cube([prumer_sroubu+0.2,2*S01_sila_materialu+0.2,R02_sila_materialu_pod_tyci],center=false);
-   105  
-   106 }
-   107 }