summaryrefslogtreecommitdiffabout
authorMichael Krelin <hacker@klever.net>2016-07-01 13:21:49 (UTC)
committer Michael Krelin <hacker@klever.net>2016-07-01 13:21:49 (UTC)
commitf61be2097df0d1ff480b177bd300688c5d89d1a0 (patch) (unidiff)
tree4e11baa7c8ae08e4b2fe159edb4b96fb3653ec9c
parentd2047c9ea37c0d61e1ec0e8210ec73cd25fc9003 (diff)
downloadfanductory-f61be2097df0d1ff480b177bd300688c5d89d1a0.zip
fanductory-f61be2097df0d1ff480b177bd300688c5d89d1a0.tar.gz
fanductory-f61be2097df0d1ff480b177bd300688c5d89d1a0.tar.bz2
moved definitions around
Diffstat (more/less context) (ignore whitespace changes)
-rw-r--r--fanduct.scad28
1 files changed, 14 insertions, 14 deletions
diff --git a/fanduct.scad b/fanduct.scad
index 302ea07..a18ce56 100644
--- a/fanduct.scad
+++ b/fanduct.scad
@@ -1,90 +1,90 @@
1use <snapper.scad>; 1use <snapper.scad>;
2 extrusion_width=.5; layer_height=.2; // print parameters 2 extrusion_width=.5; layer_height=.2; // print parameters
3 3
4 epsilon=.005; // for finer cuts 4 epsilon=.005; // for finer cuts
5 5
6 type="circular"; // circular|3jets
7 ductshape="square"; // square|round
8 dual=true; // dual or single
9
10 nozzles_apart = 18; // distance between nozzles for dual hotend
11 space_behind_nozzle = 10;// space behind the nozzle where we're allowed to go
12 // without the fear of hitting carriage
13
14 inlet_w = 12.5; // inlet width
15 inlet_h = 17; // inlet height
16 inlet_short_l = 7;// inlet length of protrusion (or depth of intrusion:))
17 inlet_away = 15;// how far away inlet is
18
19inlet_long_l = inlet_short_l+inlet_h;
6function hypothenuse(a,b) = sqrt(pow(a,2)+pow(b,2)); 20function hypothenuse(a,b) = sqrt(pow(a,2)+pow(b,2));
7 21
8silicone_shell = 2; 22silicone_shell = 2;
9heater_clearance = max( 23heater_clearance = max(
10 hypothenuse(16/2 +silicone_shell, 20-4.5 +silicone_shell),// E3D v6 24 hypothenuse(16/2 +silicone_shell, 20-4.5 +silicone_shell),// E3D v6
11 hypothenuse(11.5-4.5 +silicone_shell, 15.5 +silicone_shell)// E3D volcano 25 hypothenuse(11.5-4.5 +silicone_shell, 15.5 +silicone_shell)// E3D volcano
12); 26);
13 27
14 fanduct_elevation = 3; // fanduct elevation above nozzle tip 28 fanduct_elevation = 3; // fanduct elevation above nozzle tip
15 fanduct_blowtarget = -2; // what to blow at 29 fanduct_blowtarget = -2; // what to blow at
16 fanduct_h = 6; // inner height of the duct 30 fanduct_h = 6; // inner height of the duct
17 fanduct_w = 7; // inner width of the duct 31 fanduct_w = 7; // inner width of the duct
18 fanduct_shell=1.2; // shell thickness 32 fanduct_shell=1.2; // shell thickness
19 fanduct_ir = heater_clearance+5; // inner radius 33 fanduct_ir = heater_clearance+5; // inner radius
20 34
21 jet_angle = 60-2; // angular width of the jet 35 jet_angle = 60-2; // angular width of the jet
22 36
23 inlet_w = 12.5; // inlet width
24 inlet_h = 17; // inlet height
25 inlet_short_l = 7;// inlet length of protrusion (or depth of intrusion:))
26 inlet_away = 15;// how far away inlet is
27
28inlet_long_l = inlet_short_l+inlet_h;
29hotend_clearance = heater_clearance; 37hotend_clearance = heater_clearance;
30 38
31 nozzles_apart = 18; // distance between nozzles for dual hotend
32 space_behind_nozzle = 10;// space behind the nozzle where we're allowed to go
33 // without the fear of hitting carriage
34
35 snapper_d = 8; snapper_overlap=0.2;// snip snap 39 snapper_d = 8; snapper_overlap=0.2;// snip snap
36 40
37smooth_f = 120; 41smooth_f = 120;
38 42
39 type="circular"; // circular|3jets
40 ductshape="square"; // square|round
41 dual=false; // dual or single
42
43to_midduct = fanduct_ir+fanduct_shell+fanduct_w/2; 43to_midduct = fanduct_ir+fanduct_shell+fanduct_w/2;
44dual_spots = [ [+space_behind_nozzle, -(to_midduct+nozzles_apart/2)], 44dual_spots = [ [+space_behind_nozzle, -(to_midduct+nozzles_apart/2)],
45 [- to_midduct, -(to_midduct+nozzles_apart/2)], 45 [- to_midduct, -(to_midduct+nozzles_apart/2)],
46 [- to_midduct, 0] ]; 46 [- to_midduct, 0] ];
47 47
48module fanduct(type=type,ductshape=ductshape,dual=dual) { 48module fanduct(type=type,ductshape=ductshape,dual=dual) {
49 // ***duct is all around! 49 // ***duct is all around!
50 module duct(what) { 50 module duct(what) {
51 module single() { 51 module single() {
52 if(what=="in") { 52 if(what=="in") {
53 sh = fanduct_w+2*fanduct_shell; sv = fanduct_h+2*fanduct_shell; 53 sh = fanduct_w+2*fanduct_shell; sv = fanduct_h+2*fanduct_shell;
54 smax = max(sh,sv); 54 smax = max(sh,sv);
55 rotate_extrude($fn=smooth_f) 55 rotate_extrude($fn=smooth_f)
56 if(ductshape=="round") 56 if(ductshape=="round")
57 translate([sh/2+fanduct_ir,sv/2]) 57 translate([sh/2+fanduct_ir,sv/2])
58 scale([sh/smax,sv/smax]) 58 scale([sh/smax,sv/smax])
59 circle(d=smax,$fn=4*smax); 59 circle(d=smax,$fn=4*smax);
60 else if(ductshape=="square") 60 else if(ductshape=="square")
61 translate([fanduct_ir,0]) 61 translate([fanduct_ir,0])
62 square([sh,sv]); 62 square([sh,sv]);
63 }else if(what=="out") { 63 }else if(what=="out") {
64 sh = fanduct_w; sv = fanduct_h; 64 sh = fanduct_w; sv = fanduct_h;
65 smax = max(sh,sv); 65 smax = max(sh,sv);
66 rotate_extrude($fn=smooth_f) 66 rotate_extrude($fn=smooth_f)
67 if(ductshape=="round") 67 if(ductshape=="round")
68 translate([sh/2+fanduct_shell+fanduct_ir,sv/2+fanduct_shell]) 68 translate([sh/2+fanduct_shell+fanduct_ir,sv/2+fanduct_shell])
69 scale([sh/smax,sv/smax]) 69 scale([sh/smax,sv/smax])
70 circle(d=smax,$fn=4*smax); 70 circle(d=smax,$fn=4*smax);
71 else if(ductshape=="square") 71 else if(ductshape=="square")
72 translate([fanduct_ir+fanduct_shell,fanduct_shell]) 72 translate([fanduct_ir+fanduct_shell,fanduct_shell])
73 union() { 73 union() {
74 square([sh,sv/2]); 74 square([sh,sv/2]);
75 translate([sh/2,sv/2]) 75 translate([sh/2,sv/2])
76 scale([sh/smax,sv/smax]) 76 scale([sh/smax,sv/smax])
77 circle(d=smax,$fn=36); 77 circle(d=smax,$fn=36);
78 } 78 }
79 } 79 }
80 } 80 }
81 module dual() { 81 module dual() {
82 module hulls(spots=dual_spots) { 82 module hulls(spots=dual_spots) {
83 for(my=[0,1]) mirror([0,my,0]) for(pn=[0:1:len(spots)-2]) hull() { 83 for(my=[0,1]) mirror([0,my,0]) for(pn=[0:1:len(spots)-2]) hull() {
84 for(p=[spots[pn],spots[pn+1]]) translate(p) children(); 84 for(p=[spots[pn],spots[pn+1]]) translate(p) children();
85 } 85 }
86 } 86 }
87 if(what=="in") { 87 if(what=="in") {
88 hulls() cylinder(d=fanduct_w+2*fanduct_shell,h=fanduct_h+2*fanduct_shell); 88 hulls() cylinder(d=fanduct_w+2*fanduct_shell,h=fanduct_h+2*fanduct_shell);
89 }else if(what=="out") { 89 }else if(what=="out") {
90 sh = fanduct_w; sv = fanduct_h; 90 sh = fanduct_w; sv = fanduct_h;