summaryrefslogtreecommitdiffabout
Unidiff
Diffstat (more/less context) (ignore whitespace changes)
-rw-r--r--fanduct.scad96
1 files changed, 66 insertions, 30 deletions
diff --git a/fanduct.scad b/fanduct.scad
index 3e2a15e..b9689c9 100644
--- a/fanduct.scad
+++ b/fanduct.scad
@@ -19,64 +19,100 @@ fanduct_shell=1.2; // shell thickness
19 fanduct_ir = heater_clearance+5; // inner radius 19 fanduct_ir = heater_clearance+5; // inner radius
20 20
21 jet_angle = 60-2; // angular width of the jet 21 jet_angle = 60-2; // angular width of the jet
22 22
23 inlet_w = 12.5; // inlet width 23 inlet_w = 12.5; // inlet width
24 inlet_h = 17; // inlet height 24 inlet_h = 17; // inlet height
25 inlet_short_l = 7;// inlet length of protrusion (or depth of intrusion:)) 25 inlet_short_l = 7;// inlet length of protrusion (or depth of intrusion:))
26 inlet_away = 15;// how far away inlet is 26 inlet_away = 15;// how far away inlet is
27 27
28inlet_long_l = inlet_short_l+inlet_h; 28inlet_long_l = inlet_short_l+inlet_h;
29hotend_clearance = heater_clearance; 29hotend_clearance = heater_clearance;
30 30
31 nozzles_apart = 18; // distance between nozzles for dual hotend
32 space_behind_nozzle = 15;// space behind the nozzle where we're allowed to go
33 // without the fear of hitting carriage
34
31 snapper_d = 8; snapper_overlap=0.2;// snip snap 35 snapper_d = 8; snapper_overlap=0.2;// snip snap
32 36
33smooth_f = 120; 37smooth_f = 120;
34 38
35type="3jets"; // "3jets" ; // circular|3jets 39 type="circular"; // circular|3jets
36ductshape="square"; // square|round 40 ductshape="square"; // square|round
37 41 dual=true; // dual or single
38 42
39module fanduct(type=type,ductshape=ductshape) { 43to_midduct = fanduct_ir+fanduct_shell+fanduct_w/2;
44dual_spots = [ [+space_behind_nozzle, -(to_midduct+nozzles_apart/2)],
45 [- to_midduct, -(to_midduct+nozzles_apart/2)],
46 [- to_midduct, 0] ];
40 47
48module fanduct(type=type,ductshape=ductshape,dual=dual) {
41 // ***duct is all around! 49 // ***duct is all around!
42 module duct(what) { 50 module duct(what) {
43 if(what=="in") { 51 module single() {
44 sh = fanduct_w+2*fanduct_shell; sv = fanduct_h+2*fanduct_shell; 52 if(what=="in") {
45 smax = max(sh,sv); 53 sh = fanduct_w+2*fanduct_shell; sv = fanduct_h+2*fanduct_shell;
46 rotate_extrude($fn=smooth_f) 54 smax = max(sh,sv);
47 if(ductshape=="round") 55 rotate_extrude($fn=smooth_f)
48 translate([sh/2+fanduct_ir,sv/2]) 56 if(ductshape=="round")
49 scale([sh/smax,sv/smax]) 57 translate([sh/2+fanduct_ir,sv/2])
50 circle(d=smax,$fn=4*smax);
51 else if(ductshape=="square")
52 translate([fanduct_ir,0])
53 square([sh,sv]);
54 }else if(what=="out") {
55 sh = fanduct_w; sv = fanduct_h;
56 smax = max(sh,sv);
57 rotate_extrude($fn=smooth_f)
58 if(ductshape=="round")
59 translate([sh/2+fanduct_shell+fanduct_ir,sv/2+fanduct_shell])
60 scale([sh/smax,sv/smax])
61 circle(d=smax,$fn=4*smax);
62 else if(ductshape=="square")
63 translate([fanduct_ir+fanduct_shell,fanduct_shell])
64 union() {
65 square([sh,sv/2]);
66 translate([sh/2,sv/2])
67 scale([sh/smax,sv/smax]) 58 scale([sh/smax,sv/smax])
68 circle(d=smax,$fn=36); 59 circle(d=smax,$fn=4*smax);
69 } 60 else if(ductshape=="square")
61 translate([fanduct_ir,0])
62 square([sh,sv]);
63 }else if(what=="out") {
64 sh = fanduct_w; sv = fanduct_h;
65 smax = max(sh,sv);
66 rotate_extrude($fn=smooth_f)
67 if(ductshape=="round")
68 translate([sh/2+fanduct_shell+fanduct_ir,sv/2+fanduct_shell])
69 scale([sh/smax,sv/smax])
70 circle(d=smax,$fn=4*smax);
71 else if(ductshape=="square")
72 translate([fanduct_ir+fanduct_shell,fanduct_shell])
73 union() {
74 square([sh,sv/2]);
75 translate([sh/2,sv/2])
76 scale([sh/smax,sv/smax])
77 circle(d=smax,$fn=36);
78 }
79 }
80 }
81 module dual() {
82 module hulls(spots=dual_spots) {
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();
85 }
86 }
87 if(what=="in") {
88 hulls() cylinder(d=fanduct_w+2*fanduct_shell,h=fanduct_h+2*fanduct_shell);
89 }else if(what=="out") {
90 sh = fanduct_w; sv = fanduct_h;
91 smax = max(sh,sv);
92 translate([0,0,fanduct_shell]) hulls() {
93 cylinder(d=fanduct_w,h=fanduct_h/2);
94 translate([0,0,fanduct_h/2])
95 scale([sh/smax,sh/smax,sv/smax])
96 intersection() {
97 sphere(d=smax,$fn=36);
98 translate([0,0,-1])
99 cylinder(d=smax+2,h=smax+2,$fn=36);
100 }
101 }
102 }
70 } 103 }
104
105 if(dual) dual();
106 else single();
71 } 107 }
72 108
73 // ***bumps for easier position adjustments in line with hotend 109 // ***bumps for easier position adjustments in line with hotend
74 module marks(what) { 110 module marks(what) {
75 if(what=="in") { 111 if(what=="in") {
76 for(y=[-1,1]) 112 for(y=[-1,1])
77 hull() for(z=[0,-fanduct_shell-fanduct_h/2]) 113 hull() for(z=[0,-fanduct_shell-fanduct_h/2])
78 translate([0,y*(fanduct_ir+fanduct_shell+fanduct_w/2),fanduct_shell*2+fanduct_h+z]) 114 translate([0,y*(fanduct_ir+fanduct_shell+fanduct_w/2),fanduct_shell*2+fanduct_h+z])
79 rotate([90,0,0]) { 115 rotate([90,0,0]) {
80 cylinder(r=fanduct_shell,h=fanduct_w,center=true,$fn=30); 116 cylinder(r=fanduct_shell,h=fanduct_w,center=true,$fn=30);
81 for(z=[-1,1]) translate([0,0,z*fanduct_w/2]) 117 for(z=[-1,1]) translate([0,0,z*fanduct_w/2])
82 sphere(r=fanduct_shell,$fn=30); 118 sphere(r=fanduct_shell,$fn=30);