summaryrefslogtreecommitdiffabout
path: root/fanduct.scad
Unidiff
Diffstat (limited to 'fanduct.scad') (more/less context) (ignore whitespace changes)
-rw-r--r--fanduct.scad29
1 files changed, 21 insertions, 8 deletions
diff --git a/fanduct.scad b/fanduct.scad
index 53630a3..746f753 100644
--- a/fanduct.scad
+++ b/fanduct.scad
@@ -11,68 +11,81 @@ heater_clearance = max(
11 hypothenuse(11.5-4.5 +silicone_shell, 15.5 +silicone_shell)// E3D volcano 11 hypothenuse(11.5-4.5 +silicone_shell, 15.5 +silicone_shell)// E3D volcano
12); 12);
13 13
14 fanduct_elevation = 3; // fanduct elevation above nozzle tip 14 fanduct_elevation = 3; // fanduct elevation above nozzle tip
15 fanduct_blowtarget = -2; // what to blow at 15 fanduct_blowtarget = -2; // what to blow at
16 fanduct_h = 6; // inner height of the duct 16 fanduct_h = 6; // inner height of the duct
17 fanduct_w = 7; // inner width of the duct 17 fanduct_w = 7; // inner width of the duct
18 fanduct_shell=1.2; // shell thickness 18 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_l = 7; // inlet length of protrusion (or depth of intrusion:)) 25 inlet_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
28hotend_clearance = heater_clearance; 28hotend_clearance = heater_clearance;
29 29
30 snapper_d = 8; snapper_overlap=0.2;// snip snap 30 snapper_d = 8; snapper_overlap=0.2;// snip snap
31 31
32smooth_f = 120; 32smooth_f = 120;
33 33
34type="3jets"; // "3jets" ; // circular|3jets 34type="3jets"; // "3jets" ; // circular|3jets
35ductshape="square"; // square|round
35 36
36 37
37module fanduct(type=type) { 38module fanduct(type=type,ductshape=ductshape) {
38 39
39 // ***duct is all around! 40 // ***duct is all around!
40 module duct(what) { 41 module duct(what) {
41 if(what=="in") { 42 if(what=="in") {
42 sh = fanduct_w+2*fanduct_shell; sv = fanduct_h+2*fanduct_shell; 43 sh = fanduct_w+2*fanduct_shell; sv = fanduct_h+2*fanduct_shell;
43 smax = max(sh,sv); 44 smax = max(sh,sv);
44 rotate_extrude($fn=smooth_f) 45 rotate_extrude($fn=smooth_f)
45 translate([sh/2+fanduct_ir,sv/2]) 46 if(ductshape=="round")
46 scale([sh/smax,sv/smax]) 47 translate([sh/2+fanduct_ir,sv/2])
47 circle(d=smax,$fn=4*smax); 48 scale([sh/smax,sv/smax])
49 circle(d=smax,$fn=4*smax);
50 else if(ductshape=="square")
51 translate([fanduct_ir,0])
52 square([sh,sv]);
48 }else if(what=="out") { 53 }else if(what=="out") {
49 sh = fanduct_w; sv = fanduct_h; 54 sh = fanduct_w; sv = fanduct_h;
50 smax = max(sh,sv); 55 smax = max(sh,sv);
51 rotate_extrude($fn=smooth_f) 56 rotate_extrude($fn=smooth_f)
52 translate([sh/2+fanduct_shell+fanduct_ir,sv/2+fanduct_shell]) 57 if(ductshape=="round")
53 scale([sh/smax,sv/smax]) 58 translate([sh/2+fanduct_shell+fanduct_ir,sv/2+fanduct_shell])
54 circle(d=smax,$fn=4*smax); 59 scale([sh/smax,sv/smax])
60 circle(d=smax,$fn=4*smax);
61 else if(ductshape=="square")
62 translate([fanduct_ir+fanduct_shell,fanduct_shell])
63 union() {
64 square([fanduct_w,fanduct_h/2]);
65 translate([fanduct_w/2,fanduct_h-fanduct_w/2])
66 rotate([0,0,90]) circle(d=fanduct_w,$fn=36);
67 }
55 } 68 }
56 } 69 }
57 70
58 // ***bumps for easier position adjustments in line with hotend 71 // ***bumps for easier position adjustments in line with hotend
59 module marks(what) { 72 module marks(what) {
60 if(what=="in") { 73 if(what=="in") {
61 for(y=[-1,1]) 74 for(y=[-1,1])
62 hull() for(z=[0,-fanduct_shell-fanduct_h/2]) 75 hull() for(z=[0,-fanduct_shell-fanduct_h/2])
63 translate([0,y*(fanduct_ir+fanduct_shell+fanduct_w/2),fanduct_shell*2+fanduct_h+z]) 76 translate([0,y*(fanduct_ir+fanduct_shell+fanduct_w/2),fanduct_shell*2+fanduct_h+z])
64 rotate([90,0,0]) { 77 rotate([90,0,0]) {
65 cylinder(r=fanduct_shell,h=fanduct_w,center=true,$fn=30); 78 cylinder(r=fanduct_shell,h=fanduct_w,center=true,$fn=30);
66 for(z=[-1,1]) translate([0,0,z*fanduct_w/2]) 79 for(z=[-1,1]) translate([0,0,z*fanduct_w/2])
67 sphere(r=fanduct_shell,$fn=30); 80 sphere(r=fanduct_shell,$fn=30);
68 } 81 }
69 } 82 }
70 } 83 }
71 84
72 // ***output 85 // ***output
73 module output(what,type=type) { 86 module output(what,type=type) {
74 module guideline(xyxy) { 87 module guideline(xyxy) {
75 module pin(xy) { 88 module pin(xy) {
76 translate([xy[0],xy[1],0]) 89 translate([xy[0],xy[1],0])
77 cylinder(d=2*extrusion_width,h=2*fanduct_shell+inlet_h,$fn=6); 90 cylinder(d=2*extrusion_width,h=2*fanduct_shell+inlet_h,$fn=6);
78 } 91 }
@@ -219,42 +232,42 @@ module fanduct(type=type) {
219 union() { 232 union() {
220 duct(what); 233 duct(what);
221 marks(what); 234 marks(what);
222 output(what); 235 output(what);
223 intake(what); 236 intake(what);
224 tails(what); 237 tails(what);
225 } 238 }
226 } 239 }
227 240
228 difference() { 241 difference() {
229 parts("in"); 242 parts("in");
230 parts("out"); 243 parts("out");
231 } 244 }
232 intersection() { 245 intersection() {
233 union() { 246 union() {
234 output("airguides"); 247 output("airguides");
235 sphere(d=epsilon); 248 sphere(d=epsilon);
236 } 249 }
237 union() { 250 union() {
238 duct("in"); output("in"); intake("in"); 251 duct("in"); output("in"); intake("in");
239 } 252 }
240 } 253 }
241} 254}
242 255
243view="full"; // hcut|vcut|* 256view="vcut"; // hcut|vcut|*
244 257
245hinfinity=4*(fanduct_ir+fanduct_shell*2+fanduct_w+inlet_away); 258hinfinity=4*(fanduct_ir+fanduct_shell*2+fanduct_w+inlet_away);
246vinfinity=2*(fanduct_shell*2+fanduct_h+inlet_h); 259vinfinity=2*(fanduct_shell*2+fanduct_h+inlet_h);
247if(view=="hcut") { 260if(view=="hcut") {
248 difference() { 261 difference() {
249 fanduct(); 262 fanduct();
250 translate([-hinfinity/2,-hinfinity/2,fanduct_shell+fanduct_h/2]) 263 translate([-hinfinity/2,-hinfinity/2,fanduct_shell+fanduct_h/2])
251 cube(size=[hinfinity,hinfinity,vinfinity]); 264 cube(size=[hinfinity,hinfinity,vinfinity]);
252 } 265 }
253}else if(view=="vcut") { 266}else if(view=="vcut") {
254 difference() { 267 difference() {
255 fanduct(); 268 fanduct();
256 translate([-hinfinity/2,0,-vinfinity/2]) 269 translate([-hinfinity/2,0,-vinfinity/2])
257 cube(size=[hinfinity,hinfinity,vinfinity]); 270 cube(size=[hinfinity,hinfinity,vinfinity]);
258 } 271 }
259}else fanduct(); 272}else fanduct();
260/* vim:set sw=1 ai: */ 273/* vim:set sw=1 ai: */