introduce simple dual fanduct

1 files changed, 61 insertions, 5 deletions

diff --git a/fanduct.scad b/fanduct.scad
index 52aee0e..a17b261 100644
--- a/fanduct.scad
+++ b/fanduct.scad
@@ -1,30 +1,30 @@
 use <snapper.scad>;
 extrusion_width=.5; layer_height=.2;		// print parameters
 
 epsilon=.005;		// for finer cuts
 
-type="circular"; 	// circular|3jets
+type="simple"; 	// circular|3jets
 ductshape="square"; 	// square|round
 dual=true;		// dual or single
 
 nozzles_apart = 18;		// distance between nozzles for dual hotend
 space_behind_nozzle = 10;	// space behind the nozzle where we're allowed to go
 				// without the fear of hitting carriage
 
 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;
 function hypothenuse(a,b) = sqrt(pow(a,2)+pow(b,2));
 
 silicone_shell = 2;
 heater_clearance = dual
        ? max(20,15.5) - 4.5 + silicone_shell
        : 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
@@ -83,51 +83,83 @@ module fanduct(type=type,ductshape=ductshape,dual=dual) {
   }
   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);
      }
     }
    }
   }
+  module dual_simple() {
+   for(my=[0,1]) mirror([0,my,0])
+   if(what=="in") {
+    sh = fanduct_w+2*fanduct_shell; sv = fanduct_h+2*fanduct_shell;
+    translate([0,nozzles_apart/2,0])
+    intersection() {
+     rotate_extrude($fn=smooth_f)
+      translate([fanduct_ir,0]) square([sh,sv]);
+     translate([-fanduct_ir-sh-1,0,-1])
+     cube(size=[fanduct_ir+sh+2,fanduct_ir+sh+2,sv+2]);
+    }
+    translate([-fanduct_ir-sh,-epsilon,0])
+    cube(size=[sh,nozzles_apart/2+2*epsilon,sv]);
+    translate([0,sh/2+fanduct_ir+nozzles_apart/2,0]) cylinder(d=sh,h=sv,$fn=36);
+   }else if(what=="out") {
+    sh = fanduct_w; sv = fanduct_h;
+    translate([0,nozzles_apart/2,fanduct_shell])
+    intersection() {
+     rotate_extrude($fn=smooth_f)
+      translate([fanduct_ir+fanduct_shell,0]) square([sh,sv]);
+     translate([-fanduct_ir-2*fanduct_shell-sh-1,-1,0])
+     cube(size=[fanduct_ir+2*fanduct_shell+sh+2,fanduct_ir+2*fanduct_shell+sh+2,sv]);
+    }
+    translate([-fanduct_ir-fanduct_shell-sh,-epsilon,fanduct_shell])
+    cube(size=[sh,nozzles_apart/2+2*epsilon,sv]);
+    translate([0,sh/2+fanduct_shell+fanduct_ir+nozzles_apart/2,fanduct_shell])
+    cylinder(d=sh,h=sv,$fn=36);
+   }
+  }
 
-  if(dual) dual();
-  else single();
+  if(dual) {
+   if(type=="simple")
+    dual_simple();
+   else dual();
+  }else single();
  }
 
  //	***	bumps for easier position adjustments in line with hotend
  module marks(what) {
   if(what=="in") {
    for(y=[-1,1]) translate([0,dual?y*nozzles_apart/2:0,0])
     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,dual?nozzles_apart/2:0]]);
@@ -234,50 +266,74 @@ module fanduct(type=type,ductshape=ductshape,dual=dual) {
      for(s=[-1,1]) translate([0,s*nozzles_apart/2,-1])
       rotate([0,0,180/cfn]) cylinder(r=hotend_clearance/cos(180/cfn),h=fanduct_h+2*fanduct_shell+2,$fn=cfn);
     }
    }else if(what=="out") {
     hulls() {
      translate([0,0,fanduct_shell]) cylinder(d=fanduct_w,h=fanduct_h/2-fanduct_shell/2);
      translate([0,-nozzles_apart/2,-fanduct_elevation+fanduct_blowtarget]) sphere(d=.1);
     }
    }else if(what=="airguides") {
     far = fanduct_ir+fanduct_shell+fanduct_w;
     near = fanduct_ir;
     union() {
      for(my=[0,1]) mirror([0,my,0]) {
       guideline([ [-far             ,0], [0, nozzles_apart/8] ]);
       guideline([ [-far             ,inlet_w/2/4 ],
                   [-near            ,to_midduct/2] ]);
       guideline([ [-near-fanduct_w/3,  to_midduct/2       ],
                   [-near            ,nozzles_apart/2+near ] ]);
       guideline([ [0                ,nozzles_apart/2+near+fanduct_w*space_behind_nozzle/to_midduct] ]);
      }
     }
    }
   }
 
-  if(dual) dual(what);
-  else if(type=="circular") circus(what);
+  module dual_simple(what=what) {
+   for(my=[0:1]) mirror([0,my,0]) if(what=="in") {
+    difference() {
+     hull() {
+      translate([0,nozzles_apart/2+fanduct_ir+fanduct_shell+fanduct_w/2,0])
+      cylinder(d=fanduct_w+2*fanduct_shell,h=fanduct_h*2/3+2*fanduct_shell);
+      translate([0,nozzles_apart/2,-fanduct_elevation+fanduct_blowtarget])
+      rotate([0,90,0]) cylinder(r=.5,h=fanduct_w*2,center=true);
+     }
+     rr = 2*(fanduct_ir+fanduct_shell*2+fanduct_w+2);
+     translate([-rr/2,0,0]) mirror([0,0,1]) cube(size=[rr,rr,rr]);
+    }
+   }else if(what=="out") {
+    hull() {
+     translate([0,nozzles_apart/2+fanduct_ir+fanduct_shell+fanduct_w/2,fanduct_shell])
+     cylinder(d=fanduct_w,h=fanduct_h*2/3);
+     translate([0,nozzles_apart/2,-fanduct_elevation+fanduct_blowtarget])
+     rotate([0,90,0]) cylinder(d=.5,h=fanduct_w*2,center=true);
+    }
+   }
+  }
+
+  if(dual) {
+   if(type=="simple") dual_simple(what);
+   else dual(what);
+  }else if(type=="circular") circus(what);
   else if(type=="3jets") jets(what);
  }
 
  //	***	air intake
  module intake(what) {
   module placeit() {
    translate([-fanduct_ir-2*fanduct_shell-fanduct_w-inlet_away,0,fanduct_shell])
    rotate([0,-90,0])
    children();
   }
   if(what=="in") {
    placeit() translate([0,-inlet_w/2,0]) {
     difference() {
      cube(size=[inlet_h,inlet_w,inlet_long_l+fanduct_shell]); translate([inlet_h+fanduct_shell,0,inlet_long_l+fanduct_shell])
      rotate([-90,0,0])
      translate([0,0,-1])
      cylinder(r=inlet_h,h=inlet_w+2*fanduct_shell+2,$fn=inlet_h*4);
     }
     // supports
     for(i=[-1,0,1])
      translate([-fanduct_shell,
       (i+1)*(inlet_w-extrusion_width)/2,
      -inlet_away-fanduct_w/2])
      cube(size=[fanduct_shell+1,