summaryrefslogtreecommitdiffabout
path: root/fanduct.scad
authorMichael Krelin <hacker@klever.net>2016-06-13 19:49:45 (UTC)
committer Michael Krelin <hacker@klever.net>2016-06-13 19:49:45 (UTC)
commit8c7f2ad8328d741b1e901ca985f666507f744c09 (patch) (unidiff)
treeaba063fc30b0c437349dbb33789323c12725b3da /fanduct.scad
parent9ea9868b95605c7a89e13720fe70cb68b88d3820 (diff)
downloadfanductory-8c7f2ad8328d741b1e901ca985f666507f744c09.zip
fanductory-8c7f2ad8328d741b1e901ca985f666507f744c09.tar.gz
fanductory-8c7f2ad8328d741b1e901ca985f666507f744c09.tar.bz2
shorten space behind the nozzle, otherwise I can't properly X-home
Diffstat (limited to 'fanduct.scad') (more/less context) (ignore whitespace changes)
-rw-r--r--fanduct.scad2
1 files changed, 1 insertions, 1 deletions
diff --git a/fanduct.scad b/fanduct.scad
index da89aac..6407a96 100644
--- a/fanduct.scad
+++ b/fanduct.scad
@@ -1,80 +1,80 @@
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_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 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 32 space_behind_nozzle = 10;// space behind the nozzle where we're allowed to go
33 // without the fear of hitting carriage 33 // without the fear of hitting carriage
34 34
35 snapper_d = 8; snapper_overlap=0.2;// snip snap 35 snapper_d = 8; snapper_overlap=0.2;// snip snap
36 36
37smooth_f = 120; 37smooth_f = 120;
38 38
39 type="circular"; // circular|3jets 39 type="circular"; // circular|3jets
40 ductshape="square"; // square|round 40 ductshape="square"; // square|round
41 dual=false; // dual or single 41 dual=false; // dual or single
42 42
43to_midduct = fanduct_ir+fanduct_shell+fanduct_w/2; 43to_midduct = fanduct_ir+fanduct_shell+fanduct_w/2;
44dual_spots = [ [+space_behind_nozzle, -(to_midduct+nozzles_apart/2)], 44dual_spots = [ [+space_behind_nozzle, -(to_midduct+nozzles_apart/2)],
45 [- to_midduct, -(to_midduct+nozzles_apart/2)], 45 [- to_midduct, -(to_midduct+nozzles_apart/2)],
46 [- to_midduct, 0] ]; 46 [- to_midduct, 0] ];
47 47
48module fanduct(type=type,ductshape=ductshape,dual=dual) { 48module fanduct(type=type,ductshape=ductshape,dual=dual) {
49 // ***duct is all around! 49 // ***duct is all around!
50 module duct(what) { 50 module duct(what) {
51 module single() { 51 module single() {
52 if(what=="in") { 52 if(what=="in") {
53 sh = fanduct_w+2*fanduct_shell; sv = fanduct_h+2*fanduct_shell; 53 sh = fanduct_w+2*fanduct_shell; sv = fanduct_h+2*fanduct_shell;
54 smax = max(sh,sv); 54 smax = max(sh,sv);
55 rotate_extrude($fn=smooth_f) 55 rotate_extrude($fn=smooth_f)
56 if(ductshape=="round") 56 if(ductshape=="round")
57 translate([sh/2+fanduct_ir,sv/2]) 57 translate([sh/2+fanduct_ir,sv/2])
58 scale([sh/smax,sv/smax]) 58 scale([sh/smax,sv/smax])
59 circle(d=smax,$fn=4*smax); 59 circle(d=smax,$fn=4*smax);
60 else if(ductshape=="square") 60 else if(ductshape=="square")
61 translate([fanduct_ir,0]) 61 translate([fanduct_ir,0])
62 square([sh,sv]); 62 square([sh,sv]);
63 }else if(what=="out") { 63 }else if(what=="out") {
64 sh = fanduct_w; sv = fanduct_h; 64 sh = fanduct_w; sv = fanduct_h;
65 smax = max(sh,sv); 65 smax = max(sh,sv);
66 rotate_extrude($fn=smooth_f) 66 rotate_extrude($fn=smooth_f)
67 if(ductshape=="round") 67 if(ductshape=="round")
68 translate([sh/2+fanduct_shell+fanduct_ir,sv/2+fanduct_shell]) 68 translate([sh/2+fanduct_shell+fanduct_ir,sv/2+fanduct_shell])
69 scale([sh/smax,sv/smax]) 69 scale([sh/smax,sv/smax])
70 circle(d=smax,$fn=4*smax); 70 circle(d=smax,$fn=4*smax);
71 else if(ductshape=="square") 71 else if(ductshape=="square")
72 translate([fanduct_ir+fanduct_shell,fanduct_shell]) 72 translate([fanduct_ir+fanduct_shell,fanduct_shell])
73 union() { 73 union() {
74 square([sh,sv/2]); 74 square([sh,sv/2]);
75 translate([sh/2,sv/2]) 75 translate([sh/2,sv/2])
76 scale([sh/smax,sv/smax]) 76 scale([sh/smax,sv/smax])
77 circle(d=smax,$fn=36); 77 circle(d=smax,$fn=36);
78 } 78 }
79 } 79 }
80 } 80 }