sealing-box, bike-lipo-box: $-ise cnrrad

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

diff --git a/bike-lipo-box.scad b/bike-lipo-box.scad
index ec0b43b398b5dc052a688b2b17fe1a40e5a209c1..6056d61304db0732715ff7caf9d77d3a4c11a640 100644 (file)
--- a/bike-lipo-box.scad
+++ b/bike-lipo-box.scad
@@ -68,38 +68,42 @@ module TestWall(){ ////toplevel
   }    
 }
 
-floorth = 2.5;
-ceilth = 2.5;
+totx_outer = 30;
+toty_outer = 25;
+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_xbox = 30;
-ts_ybox = 25;
-ts_cnrrad = 10;
-ts_zbox = 8;
-
 include <sealing-box.scad>
 
 module TestSealBox(){ ////toplevel
   TestSealBoxBox();
   translate(ts_cidoff)
-    Commitid_BestCount([ts_xbox,ts_ybox] - 2*ts_cidoff);
+    Commitid_BestCount([totx_outer,toty_outer] - 2*ts_cidoff);
 }
 
 module TestSealLid(){ ////toplevel
   difference(){
     TestSealBoxLid();
 
-    translate([ts_xbox * .75, ts_ybox/2, 0])
+    translate([totx_outer * .75, toty_outer/2, 0])
       cylinder(h=100, r=5);
     
-    translate([-wallthick + ts_cnrrad*.5,
-              ts_cnrrad*.5 - wallthick,
-              ts_zbox + ceilth])
-      Commitid_BestCount([ts_xbox * .75 - 2.5 - (ts_cnrrad*.5),
-                         ts_ybox - (ts_cnrrad*.5 - wallthick)*2]);
+    translate([-wallthick + $sealingbox_cnrrad*.5,
+              $sealingbox_cnrrad*.5 - wallthick,
+              totz_inner + $sealingbox_ceilth])
+      Commitid_BestCount([totx_outer * .75 - 2.5 - ($sealingbox_cnrrad*.5),
+                         toty_outer - ($sealingbox_cnrrad*.5 - wallthick)*2]);
   }
 }
 
@@ -107,11 +111,12 @@ module TestSealLidPrint(){ ////toplevel
   rotate([180,0,0]) TestSealLid();
 }
 
-module ProfileDemos(){
-  WallProfile();
-  color("blue") FloorProfile();
-  LidProfile();
-  color("blue") CeilProfile();
+module ProfileDemos(){ ////toplevel
+  SealingBox_WallProfile();
+  color("blue") SealingBox_FloorProfile();
+  SealingBox_LidProfile();
+  color("blue") SealingBox_CeilProfile();
+  color("red") translate([-5,0]) square([1,totz_inner]);
 }
                          
 //TestWall();