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_side_thick = 5;
  18 hose_side_stalk_thick = 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 $fa=5;
  33
  34 module PumpSidePlan() {
  35   xm = baseplate + pump_main_dia/2;
  36   or = pump_side_outer_rad;
  37   br = baseplate_width_rad;
  38   difference(){
  39     union(){
  40       intersection(){
  41         translate([-xm, 0]) circle(r=or);
  42         translate([-(xm+or), -or]) square([xm+or, or*2]);
  43       }
  44       translate([-xm, -br]) square([xm, br*2]);
  45     }
  46     translate([-xm-or, 0])
  47       square(center=true, [pump_side_width*4, pump_shaft_dia]);
  48   }
  49 }
  50
  51 module PumpSideElevation(){
  52   x3 = 0;
  53   x2 = x3 - baseplate;
  54   x1 = x2 - pump_main_dia;
  55   x0 = x1 - pump_side_width;
  56   x2a = x2 - pump_protr_protr;
  57
  58   z0 = 0;
  59   z1 = z0 - pump_side_thick;
  60   z2 = z1 - pump_side_height;
  61   z2a = z2 - pump_protr_slheight;
  62   z2b = z2a - pump_protr_flat;
  63
  64   arcx = x2-x1;
  65   arcy = z1-z2;
  66
  67   translate([x0,z1]) square([x1-x0, z0-z1]);
  68
  69   difference(){
  70     translate([x1,z2]) square([x3-x1, z0-z2]);
  71     translate([x1,z2]) scale([1,arcy/arcx]) circle(r=arcx);
  72   }
  73
  74   translate([x2,z2a]) square([x3-x2, z0-z2a]);
  75
  76   hull(){
  77     translate([x2,z2a]) square([x3-x2, z2-z2a]);
  78     translate([x2a,z2b]) square([x3-x2a, z2a-z2b]);
  79   }
  80 }
  81
  82 module PumpSide(){
  83   difference(){
  84     intersection(){
  85       translate([0,100,0])
  86         rotate([90,0,0])
  87         linear_extrude(height=200)
  88       PumpSideElevation();
  89       translate([0,0,-100])
  90         linear_extrude(height=200)
  91         PumpSidePlan();
  92     }
  93     translate([-(baseplate + pump_main_dia/2), 0,
  94                 -(pump_side_thick + pump_side_height)])
  95       cylinder(r=pump_main_dia/2, h=200);
  96   }
  97 }
  98
  99 module HoseSidePlan(){
 100   ro = hose_inner_dia/2 + hose_side_width;
 101   ri = (hose_inner_dia/2);
 102   st = hose_side_stalk_thick/2;
 103
 104   apx = sqrt( ri*ri - (hose_aperture*hose_aperture)/4 );
 105   apsq = hose_base_offset + apx - hose_aperture/2;
 106   echo(apx,apsq);
 107
 108   difference(){
 109     union(){
 110       translate([-1, -st]) square([hose_base_offset+1, st*2]);
 111       translate([hose_base_offset, 0]) circle(r= ro);
 112     }
 113     translate([hose_base_offset, 0]) circle(r= hose_inner_dia/2);
 114     translate([apsq, 0])
 115       rotate(-45)
 116       square([50,50]);
 117   }
 118
 119   //%translate([hose_base_offset + apx, 0]) square([50,50]);
 120   //%square(center=true, [100, hose_aperture]);
 121 }
 122
 123 module HoseSide(){
 124   mirror([0,0,1])
 125     linear_extrude(height=hose_side_thick)
 126     HoseSidePlan();
 127 }
 128
 129 module Clip(){
 130   PumpSide();
 131   HoseSide();
 132 }
 133
 134 module ClipPrint(){
 135   rotate([180,0,0])
 136     Clip();
 137 }
 138
 139 //PumpSidePlan();
 140 //PumpSide();
 141 //HoseSide();
 142 //Clip();
 143 ClipPrint();