Rev 4517 Rev 4524
Line 1... Line 1...
1 $fn=40; // model faces resolution. 1 $fn=40; // model faces resolution.
2 include <../configuration.scad> 2 include <../configuration.scad>
-   3 include <polyScrewThread_r1.scad>
3   4 PI=3.141592;
4 WINDGAUGE02A_L01(); 5 WINDGAUGE02A_L01();
5   6  
6 //Model lopatky 7 //Model lopatky
-   8 module WINDGAUGE02A_L01()
-   9 {
-   10 difference()
-   11 {
-   12 union()
-   13 {
-   14 //koule vrchní
-   15 translate([0,0,R01_vyska_preryti_statoru])
-   16 sphere(d = (S01_prumer_vnitrni/2+3*S01_sila_materialu)*2, $fn=100);
-   17
-   18
-   19 //spodní válec
-   20 cylinder (h = R01_vyska_preryti_statoru, r=S01_prumer_vnitrni/2+3*S01_sila_materialu, $fn=100);
-   21
-   22
-   23 //lopatka 1
-   24 translate([-L01_hrana_drzaku_a/2,-(S01_prumer_vnitrni/2+2*S01_sila_materialu+L01_delka_uchytu+L01_prumer_lopatky/2),0])
-   25 lopatka();
-   26
-   27 //lopatka 2
-   28 rotate([0, 0, 120])
-   29 translate([-L01_hrana_drzaku_a/2,-(S01_prumer_vnitrni/2+2*S01_sila_materialu+L01_delka_uchytu+L01_prumer_lopatky/2),0])
-   30 lopatka();
-   31  
-   32 //lopatka 3
-   33 rotate([0, 0, 240])
-   34 translate([-L01_hrana_drzaku_a/2,-(S01_prumer_vnitrni/2+2*S01_sila_materialu+L01_delka_uchytu+L01_prumer_lopatky/2),0])
-   35 lopatka();
-   36  
7   37  
-   38
-   39 }
8   40  
-   41 //Odečet spodního válce
-   42 translate([0,0,-(S01_prumer_vnitrni/2+2*S01_sila_materialu)])
-   43 cylinder (h = R01_vyska_preryti_statoru+(S01_prumer_vnitrni/2+2*S01_sila_materialu), r=S01_prumer_vnitrni/2+2*S01_sila_materialu, $fn=100);
-   44 //odecet koule
-   45 translate([0,0,R01_vyska_preryti_statoru])
-   46 sphere(d = (S01_prumer_vnitrni/2+2*S01_sila_materialu)*2, $fn=100);
-   47
-   48 }
-   49 difference()
-   50 {
-   51 union()
-   52 {
-   53 //závit na ukotvení rotoru
-   54 //zakladni material
-   55
-   56 cylinder (h = (S01_prumer_vnitrni/2+2*S01_sila_materialu)+R01_vyska_preryti_statoru, r=(lozisko_prumer_vnejsi/2-1), $fn=100);
-   57
-   58 vyztuhy();
-   59 }
-   60  
-   61
-   62
-   63 translate([0,0,-5])
-   64 screw_thread((11-S01_tolerance_zavit),3,55,R01_vyska_preryti_statoru+10,PI/2,2);
-   65 }
-   66 }
-   67 module vyztuhy()
-   68 {
-   69 difference()
-   70 {
-   71  
-   72 translate([0,0,R01_vyska_preryti_statoru])
-   73 cylinder(h=(S01_prumer_vnitrni/2+3*S01_sila_materialu), r1=(lozisko_prumer_vnejsi/2-1), r2=(lozisko_prumer_vnejsi/2-1)+(S01_prumer_vnitrni/2+3*S01_sila_materialu)-R01_vyska_preryti_statoru, center=false, $fn=100);
-   74
-   75
-   76 //vykousnutí 1
-   77 translate([S01_sila_materialu/2,S01_sila_materialu/2,R01_vyska_preryti_statoru-0.005])
-   78 cube([(lozisko_prumer_vnejsi/2-1)+(S01_prumer_vnitrni/2+3*S01_sila_materialu),(lozisko_prumer_vnejsi/2-1)+(S01_prumer_vnitrni/2+3*S01_sila_materialu),(S01_prumer_vnitrni/2+3*S01_sila_materialu)+0.01],center=false);
-   79
-   80 //vykousnutí 2
-   81 rotate([0, 0, 90])
-   82 translate([S01_sila_materialu/2,S01_sila_materialu/2,R01_vyska_preryti_statoru-0.005])
-   83 cube([(lozisko_prumer_vnejsi/2-1)+(S01_prumer_vnitrni/2+3*S01_sila_materialu),(lozisko_prumer_vnejsi/2-1)+(S01_prumer_vnitrni/2+3*S01_sila_materialu),(S01_prumer_vnitrni/2+3*S01_sila_materialu)+0.01],center=false);
-   84
-   85 //vykousnutí 3
-   86 rotate([0, 0, 180])
-   87 translate([S01_sila_materialu/2,S01_sila_materialu/2,R01_vyska_preryti_statoru-0.005])
-   88 cube([(lozisko_prumer_vnejsi/2-1)+(S01_prumer_vnitrni/2+3*S01_sila_materialu),(lozisko_prumer_vnejsi/2-1)+(S01_prumer_vnitrni/2+3*S01_sila_materialu),(S01_prumer_vnitrni/2+3*S01_sila_materialu)+0.01],center=false);
-   89
-   90 //vykousnutí 4
-   91 rotate([0, 0, 270])
-   92 translate([S01_sila_materialu/2,S01_sila_materialu/2,R01_vyska_preryti_statoru-0.005])
-   93 cube([(lozisko_prumer_vnejsi/2-1)+(S01_prumer_vnitrni/2+3*S01_sila_materialu),(lozisko_prumer_vnejsi/2-1)+(S01_prumer_vnitrni/2+3*S01_sila_materialu),(S01_prumer_vnitrni/2+3*S01_sila_materialu)+0.01],center=false);
-   94 difference()
-   95 {
-   96 translate([0,0,R01_vyska_preryti_statoru])
-   97 sphere(d = (S01_prumer_vnitrni/2+12*S01_sila_materialu)*2, $fn=100);
-   98
-   99 translate([0,0,R01_vyska_preryti_statoru])
-   100 sphere(d = (S01_prumer_vnitrni/2+3*S01_sila_materialu)*2, $fn=100);
-   101  
-   102 }
-   103 }
-   104 }
-   105
-   106  
-   107
-   108 module lopatka()
-   109 {
-   110 difference()
-   111 {
-   112 union()
-   113 {
-   114
-   115 translate([0,0,L01_prumer_lopatky/2])
-   116 sphere(d = L01_prumer_lopatky, $fn=100);
-   117
-   118 translate([0,0,0])
-   119 cube([L01_hrana_drzaku_a,L01_delka_uchytu+L01_prumer_lopatky/2+10,L01_hrana_drzaku_b],center=false);
-   120
-   121
-   122
-   123 }
-   124 translate([0,0,L01_prumer_lopatky/2])
-   125 sphere(d = L01_prumer_lopatky-L01_sila_materialu_lopatky*2, $fn=100);
-   126
-   127 translate([-L01_prumer_lopatky+0.01,-L01_prumer_lopatky,0])
-   128 cube([L01_prumer_lopatky+0.01,2*(L01_delka_uchytu+L01_prumer_lopatky/2+10),L01_prumer_lopatky],center=false);
-   129
-   130
-   131 }
-   132 }
9   133  
-   134 //starý model
-   135 /*
10 module WINDGAUGE02A_L01() 136 module WINDGAUGE02A_L01()
11 137
12 union() 138 union()
13 { 139 {
14 140