diff --git a/examples/maze/random_scala.scad b/examples/maze/random_scala.scad
index bbb8d736..4a347d3f 100644
--- a/examples/maze/random_scala.scad
+++ b/examples/maze/random_scala.scad
@@ -1,112 +1,26 @@
-use <experimental/mz_blocks.scad>;
-use <experimental/mz_get.scad>;
-use <experimental/dedup.scad>;
-use <experimental/has.scad>;
+use <experimental/mz_hamiltonian.scad>;
 
-module random_scala(rows, columns, width, height) {
-    blocks = mz_blocks(
-        [1, 1],  
-        rows, columns
-    );
-    
-    function upper(x, y) =
-        let(
-            nx = (x - 1) * 2,
-            ny = (y - 1) * 2
-        )
-        [[nx, ny + 2], [nx + 1, ny + 2], [nx + 2, ny + 2]];
-
-    function right(x, y) =
-        let(
-            nx = (x - 1) * 2,
-            ny = (y - 1) * 2
-        )
-        [[nx + 2, ny + 2], [nx + 2, ny + 1], [nx + 2, ny]];
-        
-    function upper_right(x, y) =
-        let(
-            nx = (x - 1) * 2,
-            ny = (y - 1) * 2
-        )
-        [[nx, ny + 2], [nx + 1, ny + 2], [nx + 2, ny + 2], [nx + 2, ny + 1], [nx + 2, ny]];
-
-    dot_pts = dedup(
-        concat(
-            [
-                for(block = blocks)
-                let(
-                    x = mz_get(block, "x"),
-                    y = mz_get(block, "y"),
-                    wall_type = mz_get(block, "w"),
-                    pts = wall_type == "UPPER_WALL" ? upper(x, y) :
-                wall_type == "RIGHT_WALL" ? right(x, y) :
-                wall_type == "UPPER_RIGHT_WALL" ? upper_right(x, y) : []
-                )
-                each pts
-            ],
-            [for(x = [0:columns * 2 - 1]) [x, 0]],
-            [for(y = [0:rows * 2 - 1]) [0, y]]
-        )
-    );   
-
-    function corner_value(dots, x, y) =
-        let(
-            c1 = has(dots, [x, y]) ? 1 : 0,
-            c2 = has(dots, [x, y + 1]) ? 2 : 0,
-            c3 = has(dots, [x + 1, y + 1]) ? 4 : 0,
-            c4 = has(dots, [x + 1, y]) ? 8 : 0
-        )
-        c1 + c2 + c3 + c4;
- 
-    function dir(cr_value) = 
-        lookup(cr_value, [
-            [4,  0], [12, 0], [13, 0], // UP
-            [1,  1], [3,  1], [7,  1], // DOWN
-            [2,  2], [6,  2], [14, 2], // LEFT
-            [8,  3], [9,  3], [11, 3]  // RIGHT
-        ]);
-
-    function travel(dot_pts, p, leng, i = 0) = 
-        i == leng ? [] :
-        let(
-            dir_i = dir(corner_value(dot_pts, p[0], p[1])),
-            nxt_p = p + [
-                [0,  1],  // UP
-                [0, -1],  // DOWN
-                [-1, 0],  // LEFT
-                [1,  0]   // RIGHT
-            ][dir_i]
-        )
-        concat(
-            [p], travel(dot_pts, nxt_p, leng, i + 1)
-        );
-
-    line = travel(dot_pts, [0, 0], rows * columns * 4);
+module random_scala(start, rows, columns, width, height) {
+    line = mz_hamiltonian(start, rows, columns);
     
     for(i = [0:len(line) - 1]) {
-        p = line[i];
-        translate(p)
+        p1 = line[i];
+        translate(p1)
         linear_extrude(height * i * 2 + height)
             square(width + 0.01, center = true);
-
-        dir_i = dir(corner_value(dot_pts, p[0], p[1]));
             
-        translate(
-            p + [
-                [0,  .5],  // UP
-                [0, -.5],  // DOWN
-                [-.5, 0],  // LEFT
-                [.5,  0]   // RIGHT
-            ][dir_i]
-        )        
+        p2 = line[(i + 1) % len(line)];
+        
+        translate(p1 + (p2 - p1) / 2)        
         linear_extrude(height * (2 * i + 1) + height)
             square(width + 0.01, center = true);
     }
 }
 
 random_scala(
+    start = [0, 0],
     rows = 2, 
-    columns = 3,
+    columns = 5,
     width = .5,
     height = .25
 );
\ No newline at end of file