Rev 4494 Rev 4508
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 include <polyScrewThread_r1.scad>
4 include <AWSCREEN01A_D03.scad> -  
5   4  
-   5  
-   6 AWSCREEN01A_D04();
-   7  
-   8  
-   9  
-   10  
-   11  
-   12  
-   13  
6 module AWSCREEN01A_D04(D03_vyska_zavitu,D03_tolerance_zavitu,D03_material_za_zavitem,D03_polomer_zavitu,D03_polomer_stitu,D03_tloustka_materialu,D03_vyska_stitu,D03_pocet_vyztuh,screen_bevel,D04_vyska_na_elektroniku,D04_vyska_zavitu,D04_vyska_zavitu_pro_drzak_elektorniky) 14 module AWSCREEN01A_D04()
7   15  
8 { 16 {
9 translate ([0,0,0]) -  
10 // screen upper rim -  
11 translate ([0,0,D04_vyska_zavitu+D04_vyska_na_elektroniku]) -  
12 difference () { -  
13 screw_thread((D03_polomer_zavitu-D03_tolerance_zavitu)*2,4,55,D03_vyska_zavitu,PI/2,2); -  
14 -  
15 cylinder (h=0.01+D03_vyska_zavitu,r = D03_polomer_zavitu-4,$fn=100); -  
16 } -  
17 -  
18 difference () { 17 difference()
19 18 {
20 cylinder (h=D04_vyska_zavitu+D04_vyska_na_elektroniku,r = D03_polomer_zavitu + D03_material_za_zavitem,$fn=100); -  
21 translate ([0,0,D04_vyska_zavitu]) -  
22 cylinder (h=0.01+D04_vyska_na_elektroniku,r = D03_polomer_zavitu-2,$fn=100); -  
23 translate ([0,0,-0.1]) -  
24 screw_thread(D03_polomer_zavitu*2,4,55,D04_vyska_zavitu+4,PI/2,2); -  
25 } 19 union()
26 -  
27 } -  
28 20 {
29 21
30 AWSCREEN01A_D04(D03_vyska_zavitu,D03_tolerance_zavitu,D03_material_za_zavitem,D03_polomer_zavitu,D03_polomer_stitu,D03_tloustka_materialu,D03_vyska_stitu,D03_pocet_vyztuh,screen_bevel,D04_vyska_na_elektroniku,D04_vyska_zavitu,D04_vyska_zavitu_pro_drzak_elektorniky); -  
31 22 difference()
-   23 {
-   24 translate([0,0,0])
-   25 cylinder (h = D04_sila_materialu_na_konektor, r=(S01_prumer_zavitu+2*D01_material_pred_zavitem)/2, $fn=100);
-   26
-   27
-   28 }
-   29
-   30 difference()
-   31 {
-   32 translate([0,0,D04_sila_materialu_na_konektor])
-   33 screw_thread(S01_prumer_zavitu-D01_material_za_zavitem-2*D03_tolerance_zavitu,4,55,D01_material_pod_zavitem,PI/2,2);
-   34
-   35 cylinder (h = 0.01+D01_material_pod_zavitem+D04_sila_materialu_na_konektor, r=(S01_prumer_zavitu-D01_material_za_zavitem-2*D03_tolerance_zavitu-D01_material_za_zavitem)/2, $fn=100);
-   36 }
-   37 }
-   38  
-   39 //otvor na konektor
-   40 translate([0,-(S01_prumer_zavitu-D01_material_za_zavitem-2*D03_tolerance_zavitu-D01_material_za_zavitem-2)/2+D04_konenektor_y/2,-0.01])
-   41 cube([D04_konenektor_x,D04_konenektor_y,18],true);
-   42  
-   43 //dotvoření otvoru
-   44 //pro nasunutí ve spodní části
-   45 translate([0,-(S01_prumer_zavitu-D01_material_za_zavitem-2*D03_tolerance_zavitu-D01_material_za_zavitem)/2,-0.01])
-   46 cube([D04_konenektor_x,D04_konenektor_y,18],true);
-   47  
-   48 translate([0,-(S01_prumer_zavitu-D01_material_za_zavitem-2*D03_tolerance_zavitu-D01_material_za_zavitem)/2,D04_sila_materialu_na_konektor+D01_material_pod_zavitem/2])
-   49 cube([D04_konenektor_x+6,D04_konenektor_y,D01_material_pod_zavitem],true);
-   50  
-   51 }
-   52 translate([0,7,(15+5.08)/2+D04_sila_materialu_na_konektor])
-   53 difference()
-   54 {
-   55 cube([10.16+2*D03_tloustka_materialu,3+2*D03_tloustka_materialu,15+5.08],true);
-   56 translate([0,0,(15+5.08)/2-(5.08+3.3+2)/2])
-   57 cube([10.16,3,5.08+3.3+2],true);
-   58 translate([0,15,(15+5.08)/2-(3.3)/2-2])
-   59 rotate ([90,0,0])
-   60 cylinder (h = 30, r=(3.3/2), $fn=100);
-   61 }
-   62 }
-   63
32 64