ts_toty = 25;
ts_totz_inner = 8;
+ts_box_sz = [ts_totx, ts_toty, ts_totz_inner];
+
$sealingbox_wallth = wallthick;
$sealingbox_floorth = wallthick;
$sealingbox_ceilth = wallthick;
module TestSealBox(){ ////toplevel
- $sealingbox_xbox = ts_totx;
- $sealingbox_ybox = ts_toty;
- $sealingbox_zbox = ts_totz_inner;
+ $sealingbox_sz = ts_box_sz;
SealingBox_RectBox();
ts_cidoff = ($sealingbox_cnrrad * (1-.7) + wallthick * .8) * [1,1];
}
module TestSealLid(){ ////toplevel
- $sealingbox_xbox = ts_totx;
- $sealingbox_ybox = ts_toty;
- $sealingbox_zbox = ts_totz_inner;
+ $sealingbox_sz = ts_box_sz;
difference(){
SealingBox_RectLid();
}
module ProfileDemos(){ ////toplevel
- $sealingbox_xbox = ts_totx;
- $sealingbox_ybox = ts_toty;
- $sealingbox_zbox = ts_totz_inner;
+ $sealingbox_sz = ts_box_sz;
SealingBox_WallProfile();
color("blue") SealingBox_FloorProfile();
// 1. include <sealing-box.scad>
// 2. assign() values to (xxx these should be $ variables)
// $sealingbox_wallth
-// $sealingbox_xbox (outer dimension)
-// $sealingbox_ybox (outer dimension)
-// $sealingbox_zbox (inner dimension)
+// $sealingbox_sz[0] (outer dimension)
+// $sealingbox_sz[1] (outer dimension)
+// $sealingbox_sz[2] (inner dimension)
// $sealingbox_ceilth
// $sealingbox_floorth
// $sealingbox_wallth
$sealingbox_cnrrad = 10;
m4_define(`BoxLocals',`
- xbox = $sealingbox_xbox;
- ybox = $sealingbox_ybox;
- zbox = $sealingbox_zbox;
+ xbox = $sealingbox_sz[0];
+ ybox = $sealingbox_sz[1];
+ zbox = $sealingbox_sz[2];
wall = $sealingbox_wallth;
floorth = $sealingbox_floorth;
ceilth = $sealingbox_ceilth;