Rev 4442 Rev 4494
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> 4 include <AWSCREEN01A_D03.scad>
5   5  
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) 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)
7   7  
8 { 8 {
9 translate ([0,0,0]) 9 translate ([0,0,0])
10 // screen upper rim 10 // screen upper rim
11 translate ([0,0,D04_vyska_zavitu+D04_vyska_na_elektroniku]) 11 translate ([0,0,D04_vyska_zavitu+D04_vyska_na_elektroniku])
12 difference () { 12 difference () {
13 screw_thread((D03_polomer_zavitu-D03_tolerance_zavitu)*2,4,55,D03_vyska_zavitu,PI/2,2); 13 screw_thread((D03_polomer_zavitu-D03_tolerance_zavitu)*2,4,55,D03_vyska_zavitu,PI/2,2);
14 14
15 cylinder (h=0.01+D03_vyska_zavitu,r = D03_polomer_zavitu-4,$fn=100); 15 cylinder (h=0.01+D03_vyska_zavitu,r = D03_polomer_zavitu-4,$fn=100);
16 } 16 }
17 17
18 difference () { 18 difference () {
19 19
20 cylinder (h=D04_vyska_zavitu+D04_vyska_na_elektroniku,r = D03_polomer_zavitu + D03_material_za_zavitem,$fn=100); 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]) 21 translate ([0,0,D04_vyska_zavitu])
22 cylinder (h=0.01+D04_vyska_na_elektroniku,r = D03_polomer_zavitu-2,$fn=100); 22 cylinder (h=0.01+D04_vyska_na_elektroniku,r = D03_polomer_zavitu-2,$fn=100);
23 translate ([0,0,-0.1]) 23 translate ([0,0,-0.1])
24 screw_thread(D03_polomer_zavitu*2,4,55,D04_vyska_zavitu+4,PI/2,2); 24 screw_thread(D03_polomer_zavitu*2,4,55,D04_vyska_zavitu+4,PI/2,2);
25 } 25 }
26 26
27 } 27 }
28 28
29 29
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 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
32 32