Maze generation: Difference between revisions

Content added Content deleted
Line 4,284: Line 4,284:
Dim maze$(1 to w+1, 1 to h+1)="#"
Dim maze$(1 to w+1, 1 to h+1)="#"
Include=Lambda w,h (a,b) ->a>=1 and a<=w and b>=1 and b<=h
Include=Lambda w,h (a,b) ->a>=1 and a<=w and b>=1 and b<=h
pMaze=maze$()
Flush ' empty stack
Flush ' empty stack
if random(1,2)=1 then {
if random(1,2)=1 then {