| -rw-r--r-- | fanduct.scad | 96 |
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 @@ -7,88 +7,124 @@ function hypothenuse(a,b) = sqrt(pow(a,2)+pow(b,2)); silicone_shell = 2; heater_clearance = max( hypothenuse(16/2 +silicone_shell, 20-4.5 +silicone_shell), // E3D v6 hypothenuse(11.5-4.5 +silicone_shell, 15.5 +silicone_shell) // E3D volcano ); fanduct_elevation = 3; // fanduct elevation above nozzle tip fanduct_blowtarget = -2; // what to blow at fanduct_h = 6; // inner height of the duct fanduct_w = 7; // inner width of the duct fanduct_shell=1.2; // shell thickness fanduct_ir = heater_clearance+5; // inner radius jet_angle = 60-2; // angular width of the jet inlet_w = 12.5; // inlet width inlet_h = 17; // inlet height inlet_short_l = 7; // inlet length of protrusion (or depth of intrusion:)) inlet_away = 15; // how far away inlet is inlet_long_l = inlet_short_l+inlet_h; hotend_clearance = heater_clearance; +nozzles_apart = 18; // distance between nozzles for dual hotend +space_behind_nozzle = 15; // space behind the nozzle where we're allowed to go + // without the fear of hitting carriage + snapper_d = 8; snapper_overlap=0.2; // snip snap smooth_f = 120; -type="3jets"; // "3jets" ; // circular|3jets -ductshape="square"; // square|round - +type="circular"; // circular|3jets +ductshape="square"; // square|round +dual=true; // dual or single -module fanduct(type=type,ductshape=ductshape) { +to_midduct = fanduct_ir+fanduct_shell+fanduct_w/2; +dual_spots = [ [+space_behind_nozzle, -(to_midduct+nozzles_apart/2)], + [- to_midduct, -(to_midduct+nozzles_apart/2)], + [- to_midduct, 0] ]; +module fanduct(type=type,ductshape=ductshape,dual=dual) { // *** duct is all around! module duct(what) { - if(what=="in") { - sh = fanduct_w+2*fanduct_shell; sv = fanduct_h+2*fanduct_shell; - smax = max(sh,sv); - rotate_extrude($fn=smooth_f) - if(ductshape=="round") - translate([sh/2+fanduct_ir,sv/2]) - scale([sh/smax,sv/smax]) - circle(d=smax,$fn=4*smax); - else if(ductshape=="square") - translate([fanduct_ir,0]) - square([sh,sv]); - }else if(what=="out") { - sh = fanduct_w; sv = fanduct_h; - smax = max(sh,sv); - rotate_extrude($fn=smooth_f) - if(ductshape=="round") - translate([sh/2+fanduct_shell+fanduct_ir,sv/2+fanduct_shell]) - scale([sh/smax,sv/smax]) - circle(d=smax,$fn=4*smax); - else if(ductshape=="square") - translate([fanduct_ir+fanduct_shell,fanduct_shell]) - union() { - square([sh,sv/2]); - translate([sh/2,sv/2]) + module single() { + if(what=="in") { + sh = fanduct_w+2*fanduct_shell; sv = fanduct_h+2*fanduct_shell; + smax = max(sh,sv); + rotate_extrude($fn=smooth_f) + if(ductshape=="round") + translate([sh/2+fanduct_ir,sv/2]) scale([sh/smax,sv/smax]) - circle(d=smax,$fn=36); - } + circle(d=smax,$fn=4*smax); + else if(ductshape=="square") + translate([fanduct_ir,0]) + square([sh,sv]); + }else if(what=="out") { + sh = fanduct_w; sv = fanduct_h; + smax = max(sh,sv); + rotate_extrude($fn=smooth_f) + if(ductshape=="round") + translate([sh/2+fanduct_shell+fanduct_ir,sv/2+fanduct_shell]) + scale([sh/smax,sv/smax]) + circle(d=smax,$fn=4*smax); + else if(ductshape=="square") + translate([fanduct_ir+fanduct_shell,fanduct_shell]) + union() { + square([sh,sv/2]); + translate([sh/2,sv/2]) + scale([sh/smax,sv/smax]) + circle(d=smax,$fn=36); + } + } + } + module dual() { + module hulls(spots=dual_spots) { + for(my=[0,1]) mirror([0,my,0]) for(pn=[0:1:len(spots)-2]) hull() { + for(p=[spots[pn],spots[pn+1]]) translate(p) children(); + } + } + if(what=="in") { + hulls() cylinder(d=fanduct_w+2*fanduct_shell,h=fanduct_h+2*fanduct_shell); + }else if(what=="out") { + sh = fanduct_w; sv = fanduct_h; + smax = max(sh,sv); + translate([0,0,fanduct_shell]) hulls() { + cylinder(d=fanduct_w,h=fanduct_h/2); + translate([0,0,fanduct_h/2]) + scale([sh/smax,sh/smax,sv/smax]) + intersection() { + sphere(d=smax,$fn=36); + translate([0,0,-1]) + cylinder(d=smax+2,h=smax+2,$fn=36); + } + } + } } + + if(dual) dual(); + else single(); } // *** bumps for easier position adjustments in line with hotend module marks(what) { if(what=="in") { for(y=[-1,1]) hull() for(z=[0,-fanduct_shell-fanduct_h/2]) translate([0,y*(fanduct_ir+fanduct_shell+fanduct_w/2),fanduct_shell*2+fanduct_h+z]) rotate([90,0,0]) { cylinder(r=fanduct_shell,h=fanduct_w,center=true,$fn=30); for(z=[-1,1]) translate([0,0,z*fanduct_w/2]) sphere(r=fanduct_shell,$fn=30); } } } // *** output module output(what,type=type) { module guideline(xyxy) { module pin(xy) { translate([xy[0],xy[1],0]) cylinder(d=2*extrusion_width,h=2*fanduct_shell+inlet_h,$fn=6); } xyxyxy=concat(xyxy,[[0,0]]); |