X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=blobdiff_plain;f=trackpump-mutlihead-clip.scad;h=2ae634d63b8eba85974fd1c765cc309ee285303e;hb=aa82218852b7888008dc25b29125aa08d92a2033;hp=893dea71d3c7cb5c27276469611623213e4156a6;hpb=7a126194221558eb0df30978dce558f288b40d42;p=reprap-play.git

diff --git a/trackpump-mutlihead-clip.scad b/trackpump-mutlihead-clip.scad
index 893dea7..2ae634d 100644
--- a/trackpump-mutlihead-clip.scad
+++ b/trackpump-mutlihead-clip.scad
@@ -2,23 +2,88 @@
 
 pump_main_dia = 38;
 pump_side_width = 5;
+pump_side_thick = 5;
 pump_shaft_dia = 14;
+baseplate = 4;
+
+pump_protr_flat = 3;
+pump_protr_slope = 1.0;
+
+// need reconfirm:
+pump_protr_protr = 3;
+pump_side_height = 20;
 
 // calculated
+pump_protr_slheight = pump_protr_protr / pump_protr_slope;
 
 pump_side_outer_rad = pump_side_width + pump_main_dia/2;
 
+$fa=5;
+
 module PumpSidePlan() {
+  xm = baseplate + pump_main_dia/2;
   or = pump_side_outer_rad;
   difference(){
     union(){
-      translate([-or, 0]) circle(r=or);
-      translate([-or, -or]) square([or, or*2]);
+      intersection(){
+	translate([-xm, 0]) circle(r=or);
+	translate([-(xm+or), -or]) square([xm+or, or*2]);
+      }
+      translate([-xm, -or]) square([xm, or*2]);
+    }
+    translate([-xm-or, 0])
+      square(center=true, [pump_side_width*4, pump_shaft_dia]);
+  }
+}
+
+module PumpSideElevation(){
+  x3 = 0;
+  x2 = x3 - baseplate;
+  x1 = x2 - pump_main_dia;
+  x0 = x1 - pump_side_width;
+  x2a = x2 - pump_protr_protr;
+
+  z0 = 0;
+  z1 = z0 - pump_side_thick;
+  z2 = z1 - pump_side_height;
+  z2a = z2 - pump_protr_slheight;
+  z2b = z2a - pump_protr_flat;
+
+  arcx = x2-x1;
+  arcy = z1-z2;
+
+  translate([x0,z1]) square([x1-x0, z0-z1]);
+
+  difference(){
+    translate([x1,z2]) square([x3-x1, z0-z2]);
+    translate([x1,z2]) scale([1,arcy/arcx]) circle(r=arcx);
+  }
+
+  translate([x2,z2a]) square([x3-x2, z0-z2a]);
+
+  hull(){
+    translate([x2,z2a]) square([x3-x2, z2-z2a]);
+    translate([x2a,z2b]) square([x3-x2a, z2a-z2b]);
+  }
+}
+
+module PumpSide(){
+  difference(){
+    intersection(){
+      translate([0,100,0])
+	rotate([90,0,0])
+	linear_extrude(height=200)
+      PumpSideElevation();
+      translate([0,0,-100])
+	linear_extrude(height=200)
+	PumpSidePlan();
     }
-    translate([-or, 0]) circle(r=pump_main_dia/2);
-    translate([-or*2, 0])
-      square(center=true, [pump_side_width*3, pump_shaft_dia]);
+    translate([-(baseplate + pump_main_dia/2), 0,
+		-(pump_side_thick + pump_side_height)])
+      cylinder(r=pump_main_dia/2, h=200);
   }
 }
 
-PumpSidePlan();
+//PumpSidePlan();
+//PumpSideElevation();
+PumpSide();