sewing-table: tests: bigger hole

[reprap-play.git] / sewing-table.scad.m4

diff --git a/sewing-table.scad.m4 b/sewing-table.scad.m4
index 83d04e0278629a794a11ff5746d7d0ec5bd3d573..1c0842d734b1c6df0a4134de1fa555723e911c4d 100644 (file)
--- a/sewing-table.scad.m4
+++ b/sewing-table.scad.m4
@@ -30,6 +30,8 @@ demo_slop = 0.1;
 
 // calculated
 
+TEST = false;
+
 ply_edge_hole_dist = ply_edge_min + ply_hole_dia/2;
 
 echo(str("HOLES IN PLY ctr dist from PLY edge = ", ply_edge_hole_dist));
@@ -63,6 +65,13 @@ module Post(){
        cylinder(r= screw_dia/2, h= ply_th, $fn=20);
       }
     }
+    if (TEST) {
+      tsz = tile_hard_edge_hole_dist - test_edge + 1;
+      translate([0,0, tile_th/2]) {
+       cube([post_dia, tsz*2, tile_th], center=true);
+       cube([tsz*2, post_dia, tile_th], center=true);
+      }
+    }
   }
 }
 
@@ -81,11 +90,23 @@ module TileBase(botleft, topright){
     mirror([0,0,1])
       translate(concat(botleft, [0]))
       cube(concat(size, [tile_th]));
-    translate( concat(botleft_post, [-tile_th])
-              + 0.5 * [ post_dia, post_dia, 0 ] )
-      Commitid_BestCount_M( topright_post-botleft_post
-                           + [-post_dia,-post_dia]
-                           + [0, thehd[1]]);
+    if (!TEST) {
+      translate( concat(botleft_post, [ -tile_th ])
+                + 0.5 * [ post_dia, post_dia, 0 ] )
+       Commitid_BestCount_M( topright_post-botleft_post
+                             + [-post_dia,-post_dia]
+                             + [0, thehd[1]]);
+    }
+    if (TEST) {
+      translate( concat(botleft + [thehd[0], 0], [0]) )
+       Commitid_BestCount([ size[0] - thehd[0]*2, thehd[1] ]);
+      mirror([0,0,1]) {
+       translate(concat(botleft + [test_edge,test_edge], [test_tile_th]))
+         cube(concat(size - [test_edge,test_edge]*2, [tile_th]));
+       translate(concat(botleft_post, [-1]))
+         cube(concat(topright_post-botleft_post, [tile_th+2]));
+      }
+    }
   }
 }