add maze3d

examples/maze/maze3d.scad

@@ -0,0 +1,63 @@
+use <experimental/mz_cube.scad>;
+use <experimental/mz_cube_get.scad>;
+use <polyhedra/octahedron.scad>;
+use <util/has.scad>;
+
+layers = 5;
+rows = 5;
+columns = 5;
+cell_width = 5;
+road_width = 2.5;
+
+maze3d();
+
+module maze3d() {
+    cells = mz_cube(layers, rows, columns);
+
+    for(z = [0:layers - 1], y = [0:rows - 1], x = [0:columns - 1]) {
+        cell = cells[z][y][x];
+        type = mz_cube_get(cell, "t");
+        
+        channels = [
+            z_road(type),
+            z != 0 && z_road(mz_cube_get(cells[z - 1][y][x], "t")),
+            y_road(type),
+            x_road(type),
+            y != 0 && y_road(mz_cube_get(cells[z][y - 1][x], "t")),
+            x != 0 && x_road(mz_cube_get(cells[z][y][x - 1], "t"))
+        ];
+        
+        translate([x, y, z] * cell_width)
+            drawCell(cell_width, road_width, channels);
+    }
+
+    function z_road(type) = !has(["Z_WALL", "Z_Y_WALL", "Z_X_WALL", "Z_Y_X_WALL"], type);
+
+    function y_road(type) = !has(["Y_WALL", "Y_X_WALL", "Z_Y_WALL", "Z_Y_X_WALL"], type);
+
+    function x_road(type) = !has(["X_WALL", "Y_X_WALL", "Z_X_WALL", "Z_Y_X_WALL"], type);
+
+    module drawCell(cell_width, road_width, channels) {
+        half_cw = cell_width / 2;
+        half_rw = road_width / 2;
+
+        octahedron(half_rw);
+        
+        rots = [
+            [0, 0, 0],
+            [180, 0, 0],
+            [-90, 0, 0],
+            [0, 90, 0],
+            [90, 0, 0],
+            [0, -90, 0]
+        ];
+        
+        for(i = [0:5]) {
+            if(channels[i]) {
+                rotate(rots[i])
+                linear_extrude(half_cw)
+                    circle(half_rw, $fn = 4);
+            }
+        }
+    }
+}