author | Michael Krelin <hacker@klever.net> | 2016-06-13 14:10:26 (UTC) |
---|---|---|
committer | Michael Krelin <hacker@klever.net> | 2016-06-13 14:10:26 (UTC) |
commit | 96c68b7fc20735d0cacb027827282f070403d885 (patch) (unidiff) | |
tree | fd4adc6046f2b8b3d2e01b9ea415fbb9f96b3726 | |
parent | 2d09f1c09a64adab3a756e5d7108a2138682a2f3 (diff) | |
download | fanductory-96c68b7fc20735d0cacb027827282f070403d885.zip fanductory-96c68b7fc20735d0cacb027827282f070403d885.tar.gz fanductory-96c68b7fc20735d0cacb027827282f070403d885.tar.bz2 |
dualism: the duct
-rw-r--r-- | fanduct.scad | 42 |
1 files changed, 39 insertions, 3 deletions
diff --git a/fanduct.scad b/fanduct.scad index 3e2a15e..b9689c9 100644 --- a/fanduct.scad +++ b/fanduct.scad | |||
@@ -1,119 +1,155 @@ | |||
1 | use <snapper.scad>; | 1 | use <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 | ||
6 | function hypothenuse(a,b) = sqrt(pow(a,2)+pow(b,2)); | 6 | function hypothenuse(a,b) = sqrt(pow(a,2)+pow(b,2)); |
7 | 7 | ||
8 | silicone_shell = 2; | 8 | silicone_shell = 2; |
9 | heater_clearance = max( | 9 | heater_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 | ||
28 | inlet_long_l = inlet_short_l+inlet_h; | 28 | inlet_long_l = inlet_short_l+inlet_h; |
29 | hotend_clearance = heater_clearance; | 29 | hotend_clearance = heater_clearance; |
30 | 30 | ||
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 | ||
33 | // without the fear of hitting carriage | ||
34 | |||
31 | snapper_d = 8; snapper_overlap=0.2;// snip snap | 35 | snapper_d = 8; snapper_overlap=0.2;// snip snap |
32 | 36 | ||
33 | smooth_f = 120; | 37 | smooth_f = 120; |
34 | 38 | ||
35 | type="3jets"; // "3jets" ; // circular|3jets | 39 | type="circular"; // circular|3jets |
36 | ductshape="square"; // square|round | 40 | ductshape="square"; // square|round |
41 | dual=true; // dual or single | ||
37 | 42 | ||
43 | to_midduct = fanduct_ir+fanduct_shell+fanduct_w/2; | ||
44 | dual_spots = [ [+space_behind_nozzle, -(to_midduct+nozzles_apart/2)], | ||
45 | [- to_midduct, -(to_midduct+nozzles_apart/2)], | ||
46 | [- to_midduct, 0] ]; | ||
38 | 47 | ||
39 | module fanduct(type=type,ductshape=ductshape) { | 48 | module fanduct(type=type,ductshape=ductshape,dual=dual) { |
40 | |||
41 | // ***duct is all around! | 49 | // ***duct is all around! |
42 | module duct(what) { | 50 | module duct(what) { |
51 | module single() { | ||
43 | if(what=="in") { | 52 | if(what=="in") { |
44 | 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; |
45 | smax = max(sh,sv); | 54 | smax = max(sh,sv); |
46 | rotate_extrude($fn=smooth_f) | 55 | rotate_extrude($fn=smooth_f) |
47 | if(ductshape=="round") | 56 | if(ductshape=="round") |
48 | translate([sh/2+fanduct_ir,sv/2]) | 57 | translate([sh/2+fanduct_ir,sv/2]) |
49 | scale([sh/smax,sv/smax]) | 58 | scale([sh/smax,sv/smax]) |
50 | circle(d=smax,$fn=4*smax); | 59 | circle(d=smax,$fn=4*smax); |
51 | else if(ductshape=="square") | 60 | else if(ductshape=="square") |
52 | translate([fanduct_ir,0]) | 61 | translate([fanduct_ir,0]) |
53 | square([sh,sv]); | 62 | square([sh,sv]); |
54 | }else if(what=="out") { | 63 | }else if(what=="out") { |
55 | sh = fanduct_w; sv = fanduct_h; | 64 | sh = fanduct_w; sv = fanduct_h; |
56 | smax = max(sh,sv); | 65 | smax = max(sh,sv); |
57 | rotate_extrude($fn=smooth_f) | 66 | rotate_extrude($fn=smooth_f) |
58 | if(ductshape=="round") | 67 | if(ductshape=="round") |
59 | translate([sh/2+fanduct_shell+fanduct_ir,sv/2+fanduct_shell]) | 68 | translate([sh/2+fanduct_shell+fanduct_ir,sv/2+fanduct_shell]) |
60 | scale([sh/smax,sv/smax]) | 69 | scale([sh/smax,sv/smax]) |
61 | circle(d=smax,$fn=4*smax); | 70 | circle(d=smax,$fn=4*smax); |
62 | else if(ductshape=="square") | 71 | else if(ductshape=="square") |
63 | translate([fanduct_ir+fanduct_shell,fanduct_shell]) | 72 | translate([fanduct_ir+fanduct_shell,fanduct_shell]) |
64 | union() { | 73 | union() { |
65 | square([sh,sv/2]); | 74 | square([sh,sv/2]); |
66 | translate([sh/2,sv/2]) | 75 | translate([sh/2,sv/2]) |
67 | scale([sh/smax,sv/smax]) | 76 | scale([sh/smax,sv/smax]) |
68 | circle(d=smax,$fn=36); | 77 | circle(d=smax,$fn=36); |
69 | } | 78 | } |
70 | } | 79 | } |
71 | } | 80 | } |
81 | module dual() { | ||
82 | module hulls(spots=dual_spots) { | ||
83 | for(my=[0,1]) mirror([0,my,0]) for(pn=[0:1:len(spots)-2]) hull() { | ||
84 | for(p=[spots[pn],spots[pn+1]]) translate(p) children(); | ||
85 | } | ||
86 | } | ||
87 | if(what=="in") { | ||
88 | hulls() cylinder(d=fanduct_w+2*fanduct_shell,h=fanduct_h+2*fanduct_shell); | ||
89 | }else if(what=="out") { | ||
90 | sh = fanduct_w; sv = fanduct_h; | ||
91 | smax = max(sh,sv); | ||
92 | translate([0,0,fanduct_shell]) hulls() { | ||
93 | cylinder(d=fanduct_w,h=fanduct_h/2); | ||
94 | translate([0,0,fanduct_h/2]) | ||
95 | scale([sh/smax,sh/smax,sv/smax]) | ||
96 | intersection() { | ||
97 | sphere(d=smax,$fn=36); | ||
98 | translate([0,0,-1]) | ||
99 | cylinder(d=smax+2,h=smax+2,$fn=36); | ||
100 | } | ||
101 | } | ||
102 | } | ||
103 | } | ||
104 | |||
105 | if(dual) dual(); | ||
106 | else single(); | ||
107 | } | ||
72 | 108 | ||
73 | // ***bumps for easier position adjustments in line with hotend | 109 | // ***bumps for easier position adjustments in line with hotend |
74 | module marks(what) { | 110 | module marks(what) { |
75 | if(what=="in") { | 111 | if(what=="in") { |
76 | for(y=[-1,1]) | 112 | for(y=[-1,1]) |
77 | hull() for(z=[0,-fanduct_shell-fanduct_h/2]) | 113 | hull() for(z=[0,-fanduct_shell-fanduct_h/2]) |
78 | translate([0,y*(fanduct_ir+fanduct_shell+fanduct_w/2),fanduct_shell*2+fanduct_h+z]) | 114 | translate([0,y*(fanduct_ir+fanduct_shell+fanduct_w/2),fanduct_shell*2+fanduct_h+z]) |
79 | rotate([90,0,0]) { | 115 | rotate([90,0,0]) { |
80 | cylinder(r=fanduct_shell,h=fanduct_w,center=true,$fn=30); | 116 | cylinder(r=fanduct_shell,h=fanduct_w,center=true,$fn=30); |
81 | for(z=[-1,1]) translate([0,0,z*fanduct_w/2]) | 117 | for(z=[-1,1]) translate([0,0,z*fanduct_w/2]) |
82 | sphere(r=fanduct_shell,$fn=30); | 118 | sphere(r=fanduct_shell,$fn=30); |
83 | } | 119 | } |
84 | } | 120 | } |
85 | } | 121 | } |
86 | 122 | ||
87 | // ***output | 123 | // ***output |
88 | module output(what,type=type) { | 124 | module output(what,type=type) { |
89 | module guideline(xyxy) { | 125 | module guideline(xyxy) { |
90 | module pin(xy) { | 126 | module pin(xy) { |
91 | translate([xy[0],xy[1],0]) | 127 | translate([xy[0],xy[1],0]) |
92 | cylinder(d=2*extrusion_width,h=2*fanduct_shell+inlet_h,$fn=6); | 128 | cylinder(d=2*extrusion_width,h=2*fanduct_shell+inlet_h,$fn=6); |
93 | } | 129 | } |
94 | xyxyxy=concat(xyxy,[[0,0]]); | 130 | xyxyxy=concat(xyxy,[[0,0]]); |
95 | for(i=[0:1:len(xyxyxy)-2]) | 131 | for(i=[0:1:len(xyxyxy)-2]) |
96 | hull() for(j=[i,i+1]) pin(xyxyxy[j]); | 132 | hull() for(j=[i,i+1]) pin(xyxyxy[j]); |
97 | } | 133 | } |
98 | 134 | ||
99 | module circus(what) { | 135 | module circus(what) { |
100 | if(what=="in") { | 136 | if(what=="in") { |
101 | difference() { | 137 | difference() { |
102 | rotate_extrude($fn=smooth_f) | 138 | rotate_extrude($fn=smooth_f) |
103 | polygon([ | 139 | polygon([ |
104 | [0,-fanduct_elevation+fanduct_blowtarget+epsilon], | 140 | [0,-fanduct_elevation+fanduct_blowtarget+epsilon], |
105 | [fanduct_ir+fanduct_shell,fanduct_shell+fanduct_h/2], | 141 | [fanduct_ir+fanduct_shell,fanduct_shell+fanduct_h/2], |
106 | [fanduct_ir+fanduct_shell+fanduct_w/2,0], | 142 | [fanduct_ir+fanduct_shell+fanduct_w/2,0], |
107 | [0,-fanduct_elevation+fanduct_blowtarget-epsilon]]); | 143 | [0,-fanduct_elevation+fanduct_blowtarget-epsilon]]); |
108 | translate([0,0,-1]) | 144 | translate([0,0,-1]) |
109 | cylinder(r=hotend_clearance,h=fanduct_h+2*fanduct_shell+2,$fn=smooth_f); | 145 | cylinder(r=hotend_clearance,h=fanduct_h+2*fanduct_shell+2,$fn=smooth_f); |
110 | mirror([0,0,1]) | 146 | mirror([0,0,1]) |
111 | translate([0,0,-epsilon]) | 147 | translate([0,0,-epsilon]) |
112 | cylinder(r=fanduct_ir+2*fanduct_shell+fanduct_w+1,h=fanduct_elevation+.1+2); | 148 | cylinder(r=fanduct_ir+2*fanduct_shell+fanduct_w+1,h=fanduct_elevation+.1+2); |
113 | } | 149 | } |
114 | }else if(what=="out") { | 150 | }else if(what=="out") { |
115 | rotate_extrude($fn=smooth_f) | 151 | rotate_extrude($fn=smooth_f) |
116 | polygon([ | 152 | polygon([ |
117 | [0,-fanduct_elevation+fanduct_blowtarget+epsilon], | 153 | [0,-fanduct_elevation+fanduct_blowtarget+epsilon], |
118 | [fanduct_ir+fanduct_shell+1,fanduct_h/2], | 154 | [fanduct_ir+fanduct_shell+1,fanduct_h/2], |
119 | [fanduct_ir+fanduct_w/2+fanduct_shell+1,fanduct_shell], | 155 | [fanduct_ir+fanduct_w/2+fanduct_shell+1,fanduct_shell], |