4431 |
jacho |
1 |
$fn=40; // model faces resolution. |
|
|
2 |
include <../configuration.scad> |
|
|
3 |
|
4440 |
jacho |
4 |
include <WINDGAUGE02A_D02.scad> |
|
|
5 |
include <polyScrewThread_r1.scad> |
4431 |
jacho |
6 |
|
4440 |
jacho |
7 |
PI=3.141592; |
|
|
8 |
|
|
|
9 |
|
|
|
10 |
|
4465 |
jacho |
11 |
module WINDGAUGE02A_D01(S01_vyska_komponentu_na_lozisko,S01_prumer_zavitu,D01_material_pod_zavitem,D01_material_za_zavitem,D01_material_pred_zavitem,D01_delka_tyce,D01_sirka_tyce,D02_sila_materialu,D02_vyska_uchytky,D02_prumer_obruby,D02_delka_celeho_uchytu,D02_dotahova_vzdalenost,D02_prumer_uchytneho_sroubu,S01_tolerance_zavit) |
4431 |
jacho |
12 |
{ |
|
|
13 |
|
|
|
14 |
difference() |
|
|
15 |
{ |
|
|
16 |
|
4440 |
jacho |
17 |
union() |
|
|
18 |
{ |
|
|
19 |
//zavit |
|
|
20 |
translate([0,0,D01_material_pod_zavitem]) |
4465 |
jacho |
21 |
screw_thread(S01_prumer_zavitu-S01_tolerance_zavit,4,55,S01_vyska_komponentu_na_lozisko,PI/2,2); |
4431 |
jacho |
22 |
|
4440 |
jacho |
23 |
//spodnĂ valec |
|
|
24 |
translate([0,0,D01_material_pod_zavitem/2]) |
|
|
25 |
cylinder (h = D01_material_pod_zavitem, r=(S01_prumer_zavitu+D01_material_pred_zavitem*2)/2, center = true, $fn=100); |
4431 |
jacho |
26 |
|
4440 |
jacho |
27 |
//uchyt na tyc |
|
|
28 |
translate([0,D01_delka_tyce/2+S01_prumer_zavitu/2+D01_material_pred_zavitem,D01_material_pod_zavitem/2]) |
|
|
29 |
cube([D01_sirka_tyce,D01_delka_tyce,D01_material_pod_zavitem],center=true); |
|
|
30 |
//uchyt na tyc ovalna cast |
|
|
31 |
translate([0,S01_prumer_zavitu/2+D01_material_pred_zavitem,D01_material_pod_zavitem/2]) |
|
|
32 |
cube([D01_sirka_tyce,D01_material_za_zavitem+D01_material_pred_zavitem,D01_material_pod_zavitem],center=true); |
|
|
33 |
|
|
|
34 |
|
|
|
35 |
//material kolem uchytu na sloupek |
|
|
36 |
translate([0,D01_delka_tyce+S01_prumer_zavitu/2+D01_material_pred_zavitem+(D02_sila_materialu+D02_prumer_obruby/2)/2-D02_dotahova_vzdalenost,D01_material_pod_zavitem/2]) |
|
|
37 |
difference() |
4431 |
jacho |
38 |
{ |
4440 |
jacho |
39 |
cube([D01_sirka_tyce,D02_sila_materialu+D02_prumer_obruby/2,D01_material_pod_zavitem],center=true); |
|
|
40 |
translate([0,D02_prumer_obruby/2-D02_dotahova_vzdalenost-D02_sila_materialu,0]) |
|
|
41 |
cylinder(h=D02_vyska_uchytky+0.01,r=D02_prumer_obruby/2,center=true); |
|
|
42 |
|
|
|
43 |
} |
|
|
44 |
|
4431 |
jacho |
45 |
|
|
|
46 |
|
4440 |
jacho |
47 |
//uchyt na sloupek |
|
|
48 |
|
|
|
49 |
translate([0,D01_delka_tyce+S01_prumer_zavitu/2+D01_material_pred_zavitem+D02_sila_materialu+(D02_prumer_obruby)/2,D02_vyska_uchytky/2]) |
|
|
50 |
rotate(a=[0,0,270]) |
|
|
51 |
WINDGAUGE02A_D02(D02_sila_materialu,D02_vyska_uchytky,D02_prumer_obruby,D02_delka_celeho_uchytu,D02_dotahova_vzdalenost,D02_prumer_uchytneho_sroubu); |
4431 |
jacho |
52 |
|
4440 |
jacho |
53 |
} |
4431 |
jacho |
54 |
|
4440 |
jacho |
55 |
//otvor |
|
|
56 |
translate([0,0,(D01_material_pod_zavitem+S01_vyska_komponentu_na_lozisko)/2]) |
|
|
57 |
cylinder (h = D01_material_pod_zavitem+S01_vyska_komponentu_na_lozisko+0.02, r=(S01_prumer_zavitu-2*D01_material_za_zavitem)/2, center = true, $fn=100); |
4431 |
jacho |
58 |
|
4440 |
jacho |
59 |
} |
|
|
60 |
} |
|
|
61 |
|
4465 |
jacho |
62 |
WINDGAUGE02A_D01(S01_vyska_komponentu_na_lozisko,S01_prumer_zavitu,D01_material_pod_zavitem,D01_material_za_zavitem,D01_material_pred_zavitem,D01_delka_tyce,D01_sirka_tyce,D02_sila_materialu,D02_vyska_uchytky,D02_prumer_obruby,D02_delka_celeho_uchytu,D02_dotahova_vzdalenost,D02_prumer_uchytneho_sroubu,S01_tolerance_zavit); |
4431 |
jacho |
63 |
|
|
|
64 |
|
|
|
65 |
|
4440 |
jacho |
66 |
|