<<Artlandia`

Truchet[key:0 | 1, {x_, y_}] :=
  {Line[{{x, 1/2 + y}, {1/2 + x, y + Mod[key + 1, 2]}}],
   Line[{{1/2 + x, y + key}, {1 + x, 1/2 + y}}]}

TruchetMatrix[mat_] := MapIndexed[Truchet, mat, {2}]

Maze[fun_, dim_] := Show[
  Graphics[
    TruchetMatrix[
      ArrayOf[{0, 1}, dim, GeneratingFunction -> fun]
    ],
    AspectRatio -> Automatic, 
    Background -> Black, PlotRange -> All
  ]
]

Maze[RandomArray, {30, 30}]

Maze[NaturalArray, {30, 30}]

Maze[RandomWalkArray, {30, 30}]

Return