bike-lipo-box: wip StrapKeepers

[reprap-play.git] / bike-lipo-box.scad

diff --git a/bike-lipo-box.scad b/bike-lipo-box.scad
index 95c95c0e33c57c67d44addd2f527a51420bdd745..e5281cedf9a24fdac8571fad5043ff258c345d4f 100644 (file)
--- a/bike-lipo-box.scad
+++ b/bike-lipo-box.scad
@@ -3,6 +3,7 @@
 include <commitid.scad>
 include <utils.scad>
 include <sealing-box.scad>
+include <bike-lipo-box-gland.scad>
 
 pxp6012_rad = 22.5 / 2 + 0.5; // make circular hole this size in outer wall
 pxp6012_rad_outer = 32.0 / 2 - 0.5;
@@ -22,12 +23,16 @@ totz_inner = 28.0;
 
 wallthick = 2.5;
 
-strap_w = 5;
+cabledia = 8.7;
+
+strap_w = 5 + 1;
 strap_th = 4;
 strap_pillar = 3;
 strap_pillard = 5;
 strap_over = 2;
 
+strap_every = 30;
+
 // calculated
 
 totx_outer = totx_inner + wallthick*2;
@@ -137,6 +142,30 @@ module ProfileDemos(){ ////toplevel
   color("red") translate([-5,0]) square([1,ts_totz_inner]);
 }
 
+module AtGlands(){
+  for (dgy=[-15,-45]) {
+    translate([totx_inner + wallthick - $sealingbox_cnrrad * .3,
+              toty_inner + dgy,
+              totz_inner/2])
+      children();
+  }
+}
+
+module StrapKeepers(){
+  strap_x_tot = strap_w + strap_pillar*2;
+
+  for (sx=[strap_every : strap_every : totx_inner - strap_every]) {
+    echo("strapkeeper at ",sx);
+    translate([sx - strap_x_tot, 0, 0])
+      difference(){
+      translate([0,0, -0.1])
+       cube([strap_x_tot, strap_pillard, strap_th + strap_over]);
+      translate([strap_pillar, -1, 0])
+       cube([strap_w, strap_pillard+2, strap_th]);
+    }
+  }
+}
+
 module Box(){ ////toplevel
   $sealingbox_sz = sb_box_sz;
 
@@ -144,8 +173,6 @@ module Box(){ ////toplevel
   switch_x = chargingconn_x + pxp6012_rad_outer
     + s1930_y_outer/2 + s1930_around;
 
-  strap_x_tot = strap_w + strap_pillar*2;
-
   difference(){
     union(){
       rotate([90,0,0])
@@ -156,18 +183,14 @@ module Box(){ ////toplevel
        rotate([90,0,90])
        S1930_Positive();
 
-      // straps for lipo
-      for (sx= [ 45, 80, 110 ]) {
-       for (sy= [ 10, 40 ]) {
-         translate([sx - strap_x_tot, sy, 0])
-         difference(){
-           translate([0,0, -0.1])
-             cube([strap_x_tot, strap_pillard, strap_th + strap_over]);
-           translate([strap_pillar, -1, 0])
-             cube([strap_w, strap_pillard+2, strap_th]);
-         }
-       }
+      // keepers for lipo
+      for (kx= [ 40, 80, 120 ]) {
+       translate([kx, 40, -1])
+         cube([10, 5, 8 +1]);
       }
+
+      AtGlands()
+       GlandPositive(cabledia);
     }
 
     // charging connector
@@ -179,9 +202,21 @@ module Box(){ ////toplevel
     translate([switch_x, toty_inner, totz_inner/2])
       rotate([90,0,90])
       S1930_Negative();
+
+    AtGlands()
+      GlandNegative(cabledia);
+
+    translate($sealingbox_cnrrad * [1,1,0] +
+             [0, toty_inner/2, -wallthick])
+      Commitid_Full16_M();
   }
 }
 
+module BoxPrint(){ ////toplevel
+  rotate([-90,0,0])
+    Box();
+}
+
 //TestWall();
 //ProfileDemos();
 //TestSealBox();