bike-lipo-box: move $sealingbox settings for testing into individual modules

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

diff --git a/bike-lipo-box.scad b/bike-lipo-box.scad
index b7c4cd6aeedf9b1e12ba14333bae6855c71ed3f5..6ad60b0a2a964d16a2aa0129b5758bd73c683501 100644 (file)
--- a/bike-lipo-box.scad
+++ b/bike-lipo-box.scad
@@ -2,6 +2,7 @@
 
 include <commitid.scad>
 include <utils.scad>
+include <sealing-box.scad>
 
 pxp6012_rad = 22.5 / 2 + 0.5; // make circular hole this size in outer wall
 pxp6012_rad_outer = 32.0 / 2 - 0.5;
@@ -68,43 +69,41 @@ module TestWall(){ ////toplevel
   }    
 }
 
-totx_outer = 30;
-toty_outer = 25;
-totz_inner = 8;
+ts_totx = 30;
+ts_toty = 25;
+ts_totz_inner = 8;
 
 $sealingbox_wallth = wallthick;
-$sealingbox_floorth = 2.5;
-$sealingbox_ceilth = 2.5;
-$sealingbox_xbox = totx_outer;
-$sealingbox_ybox = toty_outer;
-$sealingbox_zbox = totz_inner;
-
-innertube = 1.0 + 0.2;
-lidoverlap = 1.5;
-lidoverhang = 6;
-tubesealrad = 2.0;
-ts_cnrrad = 10;
-
-include <sealing-box.scad>
+$sealingbox_floorth = wallthick;
+$sealingbox_ceilth = wallthick;
 
 module TestSealBox(){ ////toplevel
-  TestSealBoxBox();
+  $sealingbox_xbox = ts_totx;
+  $sealingbox_ybox = ts_toty;
+  $sealingbox_zbox = ts_totz_inner;
+
+  SealingBox_RectBox();
+  ts_cidoff = ($sealingbox_cnrrad * (1-.7) + wallthick * .8) * [1,1];
   translate(ts_cidoff)
-    Commitid_BestCount([totx_outer,toty_outer] - 2*ts_cidoff);
+    Commitid_BestCount([ts_totx,ts_toty] - 2*ts_cidoff);
 }
 
 module TestSealLid(){ ////toplevel
+  $sealingbox_xbox = ts_totx;
+  $sealingbox_ybox = ts_toty;
+  $sealingbox_zbox = ts_totz_inner;
+
   difference(){
-    TestSealBoxLid();
+    SealingBox_RectLid();
 
-    translate([totx_outer * .75, toty_outer/2, 0])
+    translate([ts_totx * .75, ts_toty/2, 0])
       cylinder(h=100, r=5);
     
-    translate([-wallthick + ts_cnrrad*.5,
-              ts_cnrrad*.5 - wallthick,
-              totz_inner + $sealingbox_ceilth])
-      Commitid_BestCount([totx_outer * .75 - 2.5 - (ts_cnrrad*.5),
-                         toty_outer - (ts_cnrrad*.5 - wallthick)*2]);
+    translate([-wallthick + $sealingbox_cnrrad*.5,
+              $sealingbox_cnrrad*.5 - wallthick,
+              ts_totz_inner + $sealingbox_ceilth])
+      Commitid_BestCount([ts_totx * .75 - 2.5 - ($sealingbox_cnrrad*.5),
+                         ts_toty - ($sealingbox_cnrrad*.5 - wallthick)*2]);
   }
 }
 
@@ -113,11 +112,15 @@ module TestSealLidPrint(){ ////toplevel
 }
 
 module ProfileDemos(){ ////toplevel
+  $sealingbox_xbox = ts_totx;
+  $sealingbox_ybox = ts_toty;
+  $sealingbox_zbox = ts_totz_inner;
+
   SealingBox_WallProfile();
   color("blue") SealingBox_FloorProfile();
   SealingBox_LidProfile();
   color("blue") SealingBox_CeilProfile();
-  color("red") translate([-5,0]) square([1,totz_inner]);
+  color("red") translate([-5,0]) square([1,ts_totz_inner]);
 }
                          
 //TestWall();