summaryrefslogtreecommitdiffabout
Unidiff
Diffstat (more/less context) (ignore whitespace changes)
-rw-r--r--fanduct.scad6
1 files changed, 4 insertions, 2 deletions
diff --git a/fanduct.scad b/fanduct.scad
index a18ce56..132b9e8 100644
--- a/fanduct.scad
+++ b/fanduct.scad
@@ -1,74 +1,76 @@
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 6 type="circular"; // circular|3jets
7 ductshape="square"; // square|round 7 ductshape="square"; // square|round
8 dual=true; // dual or single 8 dual=true; // dual or single
9 9
10 nozzles_apart = 18; // distance between nozzles for dual hotend 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 11 space_behind_nozzle = 10;// space behind the nozzle where we're allowed to go
12 // without the fear of hitting carriage 12 // without the fear of hitting carriage
13 13
14 inlet_w = 12.5; // inlet width 14 inlet_w = 12.5; // inlet width
15 inlet_h = 17; // inlet height 15 inlet_h = 17; // inlet height
16 inlet_short_l = 7;// inlet length of protrusion (or depth of intrusion:)) 16 inlet_short_l = 7;// inlet length of protrusion (or depth of intrusion:))
17 inlet_away = 15;// how far away inlet is 17 inlet_away = 15;// how far away inlet is
18 18
19inlet_long_l = inlet_short_l+inlet_h; 19inlet_long_l = inlet_short_l+inlet_h;
20function hypothenuse(a,b) = sqrt(pow(a,2)+pow(b,2)); 20function hypothenuse(a,b) = sqrt(pow(a,2)+pow(b,2));
21 21
22silicone_shell = 2; 22silicone_shell = 2;
23heater_clearance = max( 23heater_clearance = dual
24 ? max(20,15.5) - 4.5 + silicone_shell
25 : max(
24 hypothenuse(16/2 +silicone_shell, 20-4.5 +silicone_shell),// E3D v6 26 hypothenuse(16/2 +silicone_shell, 20-4.5 +silicone_shell),// E3D v6
25 hypothenuse(11.5-4.5 +silicone_shell, 15.5 +silicone_shell)// E3D volcano 27 hypothenuse(11.5-4.5 +silicone_shell, 15.5 +silicone_shell)// E3D volcano
26); 28 );
27 29
28 fanduct_elevation = 3; // fanduct elevation above nozzle tip 30 fanduct_elevation = 3; // fanduct elevation above nozzle tip
29 fanduct_blowtarget = -2; // what to blow at 31 fanduct_blowtarget = -2; // what to blow at
30 fanduct_h = 6; // inner height of the duct 32 fanduct_h = 6; // inner height of the duct
31 fanduct_w = 7; // inner width of the duct 33 fanduct_w = 7; // inner width of the duct
32 fanduct_shell=1.2; // shell thickness 34 fanduct_shell=1.2; // shell thickness
33 fanduct_ir = heater_clearance+5; // inner radius 35 fanduct_ir = heater_clearance+5; // inner radius
34 36
35 jet_angle = 60-2; // angular width of the jet 37 jet_angle = 60-2; // angular width of the jet
36 38
37hotend_clearance = heater_clearance; 39hotend_clearance = heater_clearance;
38 40
39 snapper_d = 8; snapper_overlap=0.2;// snip snap 41 snapper_d = 8; snapper_overlap=0.2;// snip snap
40 42
41smooth_f = 120; 43smooth_f = 120;
42 44
43to_midduct = fanduct_ir+fanduct_shell+fanduct_w/2; 45to_midduct = fanduct_ir+fanduct_shell+fanduct_w/2;
44dual_spots = [ [+space_behind_nozzle, -(to_midduct+nozzles_apart/2)], 46dual_spots = [ [+space_behind_nozzle, -(to_midduct+nozzles_apart/2)],
45 [- to_midduct, -(to_midduct+nozzles_apart/2)], 47 [- to_midduct, -(to_midduct+nozzles_apart/2)],
46 [- to_midduct, 0] ]; 48 [- to_midduct, 0] ];
47 49
48module fanduct(type=type,ductshape=ductshape,dual=dual) { 50module fanduct(type=type,ductshape=ductshape,dual=dual) {
49 // ***duct is all around! 51 // ***duct is all around!
50 module duct(what) { 52 module duct(what) {
51 module single() { 53 module single() {
52 if(what=="in") { 54 if(what=="in") {
53 sh = fanduct_w+2*fanduct_shell; sv = fanduct_h+2*fanduct_shell; 55 sh = fanduct_w+2*fanduct_shell; sv = fanduct_h+2*fanduct_shell;
54 smax = max(sh,sv); 56 smax = max(sh,sv);
55 rotate_extrude($fn=smooth_f) 57 rotate_extrude($fn=smooth_f)
56 if(ductshape=="round") 58 if(ductshape=="round")
57 translate([sh/2+fanduct_ir,sv/2]) 59 translate([sh/2+fanduct_ir,sv/2])
58 scale([sh/smax,sv/smax]) 60 scale([sh/smax,sv/smax])
59 circle(d=smax,$fn=4*smax); 61 circle(d=smax,$fn=4*smax);
60 else if(ductshape=="square") 62 else if(ductshape=="square")
61 translate([fanduct_ir,0]) 63 translate([fanduct_ir,0])
62 square([sh,sv]); 64 square([sh,sv]);
63 }else if(what=="out") { 65 }else if(what=="out") {
64 sh = fanduct_w; sv = fanduct_h; 66 sh = fanduct_w; sv = fanduct_h;
65 smax = max(sh,sv); 67 smax = max(sh,sv);
66 rotate_extrude($fn=smooth_f) 68 rotate_extrude($fn=smooth_f)
67 if(ductshape=="round") 69 if(ductshape=="round")
68 translate([sh/2+fanduct_shell+fanduct_ir,sv/2+fanduct_shell]) 70 translate([sh/2+fanduct_shell+fanduct_ir,sv/2+fanduct_shell])
69 scale([sh/smax,sv/smax]) 71 scale([sh/smax,sv/smax])
70 circle(d=smax,$fn=4*smax); 72 circle(d=smax,$fn=4*smax);
71 else if(ductshape=="square") 73 else if(ductshape=="square")
72 translate([fanduct_ir+fanduct_shell,fanduct_shell]) 74 translate([fanduct_ir+fanduct_shell,fanduct_shell])
73 union() { 75 union() {
74 square([sh,sv/2]); 76 square([sh,sv/2]);