Rev 4475 Rev 4476
Line 3... Line 3...
3   3  
4 include <polyScrewThread_r1.scad> 4 include <polyScrewThread_r1.scad>
5   5  
6 PI=3.141592; 6 PI=3.141592;
7   7  
8 S01_vyska=80; -  
9 S01_prumer_vnitrni=30; -  
10 S01_sila_materialu=2; -  
11 S01_vyska_horni_zavit=10; -  
12 S01_vyska_spodniho_zavitu=10; -  
13 S01_sila_drzaku_RJ11=2; -  
14   8  
15   9  
16 module WINDGAUGE02A_S01(S01_vyska,S01_prumer_vnitrni,S01_sila_materialu) 10 module WINDGAUGE02A_S01()
17 { 11 {
18 difference() 12 difference()
19 { 13 {
20 union() 14 union()
21 { 15 {
22 //základní válec 16 //základní válec
23 cylinder (h = S01_vyska-S01_vyska_horni_zavit, r=(S01_prumer_vnitrni)/2+S01_sila_materialu, $fn=100); 17 cylinder (h = S01_vyska, r=(S01_prumer_vnitrni)/2+S01_sila_materialu, $fn=100);
-   18  
-   19
-   20  
-   21 }
24   22
25 //horní závit 23 //horní závit
26 translate([0,0,S01_vyska-S01_vyska_horni_zavit]) 24 translate([0,0,S01_vyska-S01_vyska_horni_zavit])
27 screw_thread((S01_prumer_vnitrni+2*S01_sila_materialu),S01_hloubka_zavitu,55,S01_vyska_horni_zavit,PI/2,2); 25 screw_thread(S01_prumer_vnitrni,S01_hloubka_zavitu,55,S01_vyska_horni_zavit,PI/2,2);
28   26  
29 } -  
30   27
31 //vystouplá část -  
32 translate([0,0,S01_vyska_spodniho_zavitu+S01_sila_drzaku_RJ11-0.3]) -  
33 cylinder (h = S01_sila_drzaku_RJ11, r=(S01_prumer_vnitrni)/2-1-S01_hloubka_zavitu/2, $fn=100); -  
34 //otvor na drzak rj11 28 //otvor na drzak rj11
-   29 translate([0,0,S01_vyska_spodniho_zavitu+S01_sila_drzaku_RJ11-0.3])
-   30 cylinder( 2*S01_sila_drzaku_RJ11, d1=(S01_prumer_vnitrni)-1-1.5*S01_hloubka_zavitu,d2=(S01_prumer_vnitrni) );
-   31
35 translate([0,0,S01_vyska_spodniho_zavitu]) 32 translate([0,0,S01_vyska_spodniho_zavitu])
36 cylinder (h = S01_sila_drzaku_RJ11-0.3, r=(S01_prumer_vnitrni)/2-S01_hloubka_zavitu/2, $fn=100); 33 cylinder (h = S01_sila_drzaku_RJ11-0.3, r=(S01_prumer_vnitrni)/2-S01_hloubka_zavitu/2+0.5, $fn=100);
-   34
37   35  
38 //spodní závit 36 //spodní závit
39 screw_thread((S01_prumer_vnitrni),S01_hloubka_zavitu,55,S01_vyska_spodniho_zavitu+0.01,PI/2,2); 37 screw_thread((S01_prumer_vnitrni),S01_hloubka_zavitu,55,S01_vyska_spodniho_zavitu+0.01,PI/2,2);
40   38  
41 //otvor skrz 39 //otvor skrz
42 translate([0,0,S01_vyska_spodniho_zavitu+2*S01_sila_drzaku_RJ11-0.3]) 40 translate([0,0,S01_vyska_spodniho_zavitu+3*S01_sila_drzaku_RJ11-0.3])
43 cylinder (h = S01_vyska, r=(S01_prumer_vnitrni)/2-1, $fn=100); 41 cylinder (h = S01_vyska-S01_vyska_horni_zavit-(S01_vyska_spodniho_zavitu+3*S01_sila_drzaku_RJ11-0.3), r=(S01_prumer_vnitrni)/2, $fn=100);
44 cube(100); // cut to show internal relief 42 cube(300); // cut to show internal relief
45 } 43 }
46 } 44 }
47   45  
48   46  
49 WINDGAUGE02A_S01(S01_vyska,S01_prumer_vnitrni,S01_sila_materialu); 47 WINDGAUGE02A_S01();
50   48  
51   49  
52   50  
53   51  
54   52