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