- translate([0, basey + sideslop, 0])
- sheared_cube([basex, basebevelt, bevelz], 0, bevelslope);
- translate([0, -basebevelt - sideslop, 0])
- sheared_cube([basex, basebevelt, bevelz], 0, -bevelslope);
+ lidx = basex + endslop + endwallt;
+ for (mir=[0,1]) mirror([0,mir,0]) {
+ translate([0, basey/2 + sideslop + bevely, 0])
+ rotate([90,0,90])
+ linear_extrude(height = lidx)
+ polygon([[0, 0],
+ [-bevely, 0],
+ [0, bevelz],
+ [0, innerz + lidt + zslop],
+ [sidewallt, innerz + lidt + zslop],
+ [sidewallt, -tapethick],
+ [0, -tapethick]]);
+ translate([0, -1, innerz + zslop])
+ cube([lidx, 1 + basey/2 + sideslop + bevely + sidewallt, lidt]);
+ translate([basex + endslop, -1, -tapethick])
+ cube([endwallt, 1 + basey/2 + sideslop + bevely + sidewallt,
+ tapethick + innerz + zslop + 0.1]);
+ }
+}
+
+module LidT(){ ////toplevel
+ rotate([180,0,0]) Lid();
+}
+
+module BaseCMid(){ ////toplevel
+ Base(0);
+}
+
+module BaseCTop(){ ////toplevel
+ Base(basey/2 + bevely - cutoutsz/2);
+}
+
+module BaseCBot(){ ////toplevel
+ Base(-(basey/2 + bevely - cutoutsz/2));
+}
+
+module BaseCNone(){ ////toplevel
+ Base(basey);
+}
+
+module Demo(){ ////toplevel
+ BaseCTop();
+ %Lid();