summaryrefslogtreecommitdiffabout
path: root/fanduct.scad
Unidiff
Diffstat (limited to 'fanduct.scad') (more/less context) (show whitespace changes)
-rw-r--r--fanduct.scad2
1 files changed, 1 insertions, 1 deletions
diff --git a/fanduct.scad b/fanduct.scad
index 975f1cc..53630a3 100644
--- a/fanduct.scad
+++ b/fanduct.scad
@@ -1,76 +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
6function hypothenuse(a,b) = sqrt(pow(a,2)+pow(b,2)); 6function hypothenuse(a,b) = sqrt(pow(a,2)+pow(b,2));
7 7
8silicone_shell = 2; 8silicone_shell = 2;
9heater_clearance = max( 9heater_clearance = max(
10 hypothenuse(16/2 +silicone_shell, 20-4.5 +silicone_shell),// E3D v6 10 hypothenuse(16/2 +silicone_shell, 20-4.5 +silicone_shell),// E3D v6
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 = 12; 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
35 35
36 36
37module fanduct(type=type) { 37module fanduct(type=type) {
38 38
39 // ***duct is all around! 39 // ***duct is all around!
40 module duct(what) { 40 module duct(what) {
41 if(what=="in") { 41 if(what=="in") {
42 sh = fanduct_w+2*fanduct_shell; sv = fanduct_h+2*fanduct_shell; 42 sh = fanduct_w+2*fanduct_shell; sv = fanduct_h+2*fanduct_shell;
43 smax = max(sh,sv); 43 smax = max(sh,sv);
44 rotate_extrude($fn=smooth_f) 44 rotate_extrude($fn=smooth_f)
45 translate([sh/2+fanduct_ir,sv/2]) 45 translate([sh/2+fanduct_ir,sv/2])
46 scale([sh/smax,sv/smax]) 46 scale([sh/smax,sv/smax])
47 circle(d=smax,$fn=4*smax); 47 circle(d=smax,$fn=4*smax);
48 }else if(what=="out") { 48 }else if(what=="out") {
49 sh = fanduct_w; sv = fanduct_h; 49 sh = fanduct_w; sv = fanduct_h;
50 smax = max(sh,sv); 50 smax = max(sh,sv);
51 rotate_extrude($fn=smooth_f) 51 rotate_extrude($fn=smooth_f)
52 translate([sh/2+fanduct_shell+fanduct_ir,sv/2+fanduct_shell]) 52 translate([sh/2+fanduct_shell+fanduct_ir,sv/2+fanduct_shell])
53 scale([sh/smax,sv/smax]) 53 scale([sh/smax,sv/smax])
54 circle(d=smax,$fn=4*smax); 54 circle(d=smax,$fn=4*smax);
55 } 55 }
56 } 56 }
57 57
58 // ***bumps for easier position adjustments in line with hotend 58 // ***bumps for easier position adjustments in line with hotend
59 module marks(what) { 59 module marks(what) {
60 if(what=="in") { 60 if(what=="in") {
61 for(y=[-1,1]) 61 for(y=[-1,1])
62 hull() for(z=[0,-fanduct_shell-fanduct_h/2]) 62 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]) 63 translate([0,y*(fanduct_ir+fanduct_shell+fanduct_w/2),fanduct_shell*2+fanduct_h+z])
64 rotate([90,0,0]) { 64 rotate([90,0,0]) {
65 cylinder(r=fanduct_shell,h=fanduct_w,center=true,$fn=30); 65 cylinder(r=fanduct_shell,h=fanduct_w,center=true,$fn=30);
66 for(z=[-1,1]) translate([0,0,z*fanduct_w/2]) 66 for(z=[-1,1]) translate([0,0,z*fanduct_w/2])
67 sphere(r=fanduct_shell,$fn=30); 67 sphere(r=fanduct_shell,$fn=30);
68 } 68 }
69 } 69 }
70 } 70 }
71 71
72 // ***output 72 // ***output
73 module output(what,type=type) { 73 module output(what,type=type) {
74 module guideline(xyxy) { 74 module guideline(xyxy) {
75 module pin(xy) { 75 module pin(xy) {
76 translate([xy[0],xy[1],0]) 76 translate([xy[0],xy[1],0])