sewing-table: wip interlock

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

diff --git a/sewing-table.scad.m4 b/sewing-table.scad.m4
index 1fa1df07fe73d605e1f01095bd45c74ecaf73186..e8f6b7a7c68a4e79ee2c6310a0a7200708d48609 100644 (file)
--- a/sewing-table.scad.m4
+++ b/sewing-table.scad.m4
@@ -17,6 +17,8 @@ screw_big_len = 4.0;
 
 round_edge_rad = 2.0;
 
+interlock_dia = 10;
+
 // calculated
 
 ply_edge_hole_dist = ply_edge_min + ply_hole_dia/2;
@@ -27,6 +29,9 @@ hole_slop = (ply_hole_dia - post_dia)/2;
 tile_hard_edge_hole_dist = ply_edge_hole_dist + hole_slop;
 thehd = [ tile_hard_edge_hole_dist, tile_hard_edge_hole_dist ];
 
+interlock_rad = interlock_dia/2;
+interlock_negative_rad = interlock_rad + 0.25;
+
 module Post(){
   mirror([0,0,1]) {
     difference(){
@@ -97,7 +102,19 @@ module RoundLeftCorner(this_post, right_post) {
   }
 }
 
+module InterlockCore(r) {
+  translate([0, -thehd[0], 1]){
+    mirror([0,0,1]){
+      linear_extrude(height=tile_th+2){
+       circle(r=r, $fn=40);
+      }
+    }
+  }
+}
+
 module InterlockNegative(this_post, right_post) {
+  INREFFRAME(this_post, right_post)
+    InterlockCore(interlock_negative_rad);
 }
 
 module TestPiece1(){