chiark / gitweb /
5521392030984283a2ebe71eba6394cad63bc6a4
[reprap-play.git] / trackpump-mutlihead-clip.scad
1 // -*- C -*-
2
3 pump_main_dia = 38;
4 pump_side_width = 5;
5 pump_side_thick = 4;
6 pump_shaft_dia = 14;
7 baseplate = 3;
8
9 pump_protr_flat = 3;
10 pump_protr_slope = 0.9;
11
12 hose_inner_dia = 20;
13 hose_aperture = 11;
14 hose_side_width = 5;
15 hose_base_offset = 30;
16
17 hose_side_thick = 6;
18 hose_side_stalk_width = 6;
19
20 pump_protr_protr = 3;
21 pump_side_height = 20;
22
23 // calculated
24 pump_protr_slheight = pump_protr_protr / pump_protr_slope;
25
26 pump_side_outer_rad = pump_side_width + pump_main_dia/2;
27
28 baseplate_width_rad =
29   sqrt( pow(pump_side_outer_rad, 2)
30         -pow( pump_main_dia/2 - pump_protr_protr, 2) );
31
32 xm = baseplate + pump_main_dia/2;
33
34 pump_side_total_height =
35   pump_side_thick + pump_side_height + pump_protr_slheight + pump_protr_flat;
36
37 $fa=5;
38
39 module PumpSidePlan() {
40   or = pump_side_outer_rad;
41   difference(){
42     union(){
43       intersection(){
44         translate([-xm, 0]) circle(r=or);
45         translate([-(xm+or), -or]) square([xm+or, or*2]);
46       }
47     }
48     translate([-xm-or, 0])
49       square(center=true, [pump_side_width*4, pump_shaft_dia]);
50   }
51 }
52
53 module PumpSideElevation(){
54   x3 = 0;
55   x2 = x3 - baseplate;
56   x1 = x2 - pump_main_dia;
57   x0 = x1 - pump_side_width;
58   x2a = x2 - pump_protr_protr;
59
60   z0 = 0;
61   z1 = z0 - pump_side_thick;
62   z2 = z1 - pump_side_height;
63   z2a = z2 - pump_protr_slheight;
64   z2b = z2a - pump_protr_flat;
65
66   arcx = x2-x1;
67   arcy = z1-z2;
68
69   translate([x0,z1]) square([x1-x0, z0-z1]);
70
71   difference(){
72     translate([x1,z2]) square([x3-x1, z0-z2]);
73     translate([x1,z2]) scale([1,arcy/arcx]) circle(r=arcx);
74   }
75
76   translate([x2,z2a]) square([x3-x2, z0-z2a]);
77
78   hull(){
79     translate([x2,z2a]) square([x3-x2, z2-z2a]);
80     translate([x2a,z2b]) square([x3-x2a, z2a-z2b]);
81   }
82 }
83
84 module PumpSide(){
85   br = baseplate_width_rad;
86   brs = baseplate_width_rad/2;
87
88   difference(){
89     intersection(){
90       translate([0,100,0])
91         rotate([90,0,0])
92         linear_extrude(height=200)
93         PumpSideElevation();
94       union(){
95         translate([0,0,-100])
96           linear_extrude(height=200)
97           PumpSidePlan();
98         // baseplate
99         hull(){
100           mirror([0,0,1])
101             translate([-xm, -brs, 0])
102             cube([xm,
103                   brs*2,
104                   1]);
105           translate([-xm, -br, -pump_side_total_height])
106             cube([xm,
107                   br*2,
108                   pump_protr_flat]);
109         }
110       }
111     }
112     translate([-(baseplate + pump_main_dia/2), 0,
113                 -(pump_side_thick + pump_side_height)])
114       cylinder(r=pump_main_dia/2, h=200);
115   }
116 }
117
118 module HoseSidePlan(){
119   ro = hose_inner_dia/2 + hose_side_width;
120   ri = (hose_inner_dia/2);
121   st = hose_side_stalk_width/2;
122
123   apx = sqrt( ri*ri - (hose_aperture*hose_aperture)/4 );
124   apsq = hose_base_offset + apx - hose_aperture/2;
125   echo(apx,apsq);
126
127   difference(){
128     union(){
129       translate([-1, -st]) square([hose_base_offset+1, st*2]);
130       translate([hose_base_offset, 0]) circle(r= ro);
131     }
132     translate([hose_base_offset, 0]) circle(r= hose_inner_dia/2);
133     translate([apsq, 0])
134       rotate(-45)
135       square([50,50]);
136   }
137
138   //%translate([hose_base_offset + apx, 0]) square([50,50]);
139   //%square(center=true, [100, hose_aperture]);
140 }
141
142 module HoseSide(){
143   mirror([0,0,1])
144     linear_extrude(height=hose_side_thick)
145     HoseSidePlan();
146 }
147
148 module Clip(){
149   PumpSide();
150   HoseSide();
151 }
152
153 module ClipPrint(){
154   rotate([180,0,0])
155     Clip();
156 }
157
158 //PumpSidePlan();
159 //PumpSide();
160 //HoseSide();
161 //Clip();
162 ClipPrint();