trackpump-mutlihead-clip.scad

   1 // -*- C -*-
   2
   3 pump_main_dia = 38;
   4 pump_side_width = 5;
   5 pump_side_thick = 5;
   6 pump_shaft_dia = 14;
   7 baseplate = 4;
   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_head_dia = 28;
  18 hose_side_thick = 5;
  19 hose_head_width = 22;
  20
  21 pump_protr_protr = 3;
  22 pump_side_height = 20;
  23
  24 // calculated
  25 pump_protr_slheight = pump_protr_protr / pump_protr_slope;
  26
  27 pump_side_outer_rad = pump_side_width + pump_main_dia/2;
  28
  29 $fa=5;
  30
  31 module PumpSidePlan() {
  32   xm = baseplate + pump_main_dia/2;
  33   or = pump_side_outer_rad;
  34   difference(){
  35     union(){
  36       intersection(){
  37         translate([-xm, 0]) circle(r=or);
  38         translate([-(xm+or), -or]) square([xm+or, or*2]);
  39       }
  40       translate([-xm, -or]) square([xm, or*2]);
  41     }
  42     translate([-xm-or, 0])
  43       square(center=true, [pump_side_width*4, pump_shaft_dia]);
  44   }
  45 }
  46
  47 module PumpSideElevation(){
  48   x3 = 0;
  49   x2 = x3 - baseplate;
  50   x1 = x2 - pump_main_dia;
  51   x0 = x1 - pump_side_width;
  52   x2a = x2 - pump_protr_protr;
  53
  54   z0 = 0;
  55   z1 = z0 - pump_side_thick;
  56   z2 = z1 - pump_side_height;
  57   z2a = z2 - pump_protr_slheight;
  58   z2b = z2a - pump_protr_flat;
  59
  60   arcx = x2-x1;
  61   arcy = z1-z2;
  62
  63   translate([x0,z1]) square([x1-x0, z0-z1]);
  64
  65   difference(){
  66     translate([x1,z2]) square([x3-x1, z0-z2]);
  67     translate([x1,z2]) scale([1,arcy/arcx]) circle(r=arcx);
  68   }
  69
  70   translate([x2,z2a]) square([x3-x2, z0-z2a]);
  71
  72   hull(){
  73     translate([x2,z2a]) square([x3-x2, z2-z2a]);
  74     translate([x2a,z2b]) square([x3-x2a, z2a-z2b]);
  75   }
  76 }
  77
  78 module PumpSide(){
  79   difference(){
  80     intersection(){
  81       translate([0,100,0])
  82         rotate([90,0,0])
  83         linear_extrude(height=200)
  84       PumpSideElevation();
  85       translate([0,0,-100])
  86         linear_extrude(height=200)
  87         PumpSidePlan();
  88     }
  89     translate([-(baseplate + pump_main_dia/2), 0,
  90                 -(pump_side_thick + pump_side_height)])
  91       cylinder(r=pump_main_dia/2, h=200);
  92   }
  93 }
  94
  95 module HoseSideElevation(){
  96   or = hose_head_dia/2 + hose_side_thick;
  97
  98   x3 = 0;
  99   x4 = x3 + hose_base_offset;
 100   x5 = x4 + hose_head_dia/2;
 101   x6 = x4 + hose_head_dia;
 102   x7 = x5 + or;
 103
 104   z0 = 0;
 105   zm = -or;
 106
 107   difference(){
 108     intersection(){
 109       translate([-100,-100]) square([x7+210, 100]);
 110       hull(){
 111         translate([x5, 0]) circle(r=or);
 112         translate([-1, zm]) square([1,z0-zm]);
 113       }
 114     }
 115     translate([x5,0]) circle(r=hose_head_dia/2);
 116   }
 117 }
 118
 119 module HoseSidePlan(){
 120   ro = hose_inner_dia/2 + hose_side_width;
 121
 122   difference(){
 123     hull(){
 124       translate([-1, -ro]) square([1, ro*2]);
 125       translate([hose_base_offset, 0]) circle(r= ro);
 126     }
 127     translate([hose_base_offset, 0]) circle(r= hose_inner_dia/2);
 128   }
 129 }
 130
 131 module HoseSide(){
 132   for (m=[0,1]) {
 133     mirror([0,m,0])
 134       translate([0, hose_head_width, 0])
 135       rotate([90,0,0])
 136       linear_extrude(height= hose_side_width)
 137       HoseSideElevation();
 138   }
 139 }
 140
 141 module Clip(){
 142   PumpSide();
 143   HoseSide();
 144 }
 145
 146 module ClipPrint(){
 147   rotate([180,0,0])
 148     Clip();
 149 }
 150
 151 //PumpSidePlan();
 152 //PumpSideElevation();
 153 HoseSidePlan();
 154 //PumpSide();
 155 //HoseSide();
 156 //Clip();
 157 //ClipPrint();