Maze generation: Difference between revisions
Content added Content deleted
m (Moved Wren entry into correct alphabetical order.) |
|||
Line 2,667: | Line 2,667: | ||
=={{header|EasyLang}}== |
=={{header|EasyLang}}== |
||
[https://easylang.dev/show/#cod=fZPLbqswEIb3fopP6iYXQe20WWTBkyB0RLE5sRrsCHJ6e/rKxBhQq7MB/P8z9vibYbBfhgJ1FI6CAzuGoOxRog26lDyycWTI/LgVF+PoygrHDiceEC918/q39/+cRkoprr1vGM7+/U9XfxlycgE0F1P34aP1PTZsy80T9wo6YFu60lYUyKgAHxRsLBlqS+c1brY+F5a2b0ur8RffczqdZqnzb4YPdrRktDxy4HO5miN709xo2aHy4/SO7niX8TFcjLkic6lELnzbDmUovEThyBSbzG2pAp6RR3eHcfXDBKQrr35Id028wkKnrQ488Uy15PaM9u/u5lGxJE1BXztt3Q07abanYKxKl7qaAIdvCnRpV8hDVfuQU419qZ1OYpiGyVigXKcsurW4Z0peo8uFcTr4xX2CQvsio/rVrGbmP6MS50Sldqxi3TrqkJbhxN8kMlwY+J+Wi9acNR53jn/KBF4dY1zIWRtixnK+N/4OIJGLPPYFTuQiURDzTHwD Run it] |
|||
[https://easylang.dev/show/#cod=fZNLboMwEIb3PsVI2eShUJuGRRY5CUIVxSaxAnZk0qTt6TtjjDFqVRaB+efl+TxZQV9/Kzgro1x919awFbBBo3QCUTCDrxy24JUdCNaSzjm8wNrAHnhWbFinDPRlBQYDff573VzPzn4YCZxzdnO2geFin2++VwYZA4CmU7Wjj9Y60FQW7hZCLdLx0S0aukInDwo+n2iuNTYXG+itxJbR9ZW4pH6krsZ22Od4PM5Sbx8Kq22hxYwWR8qxQGLNkU41d9S2ILJiegevn8X/DJ1SNyTCBcuYbduhpIOXOBeSErDemw1UhMfz6EcYNztMQPoSjThr5EWGjKVyeIUDVCm3A0j7NMhOhCNJFF1tpO1BT5J2KPpDyVJWE1/6Rl0i45Q4HWpHOZW/FiwVRVqGyZGQXKYkl5WMGZOX5DKmjCT/aVwgur2AqL6qxcr8sylhTUS8jUWsWUbl0aSOf0l4CEP7/ttlgmvO8u0u4Y8SuIsihFHKQmczlMt46+P4kVugsUMcyCYyYPNC/AA= Run it] |
|||
<syntaxhighlight |
<syntaxhighlight> |
||
size = 15 |
size = 15 |
||
n = 2 * size + 1 |
n = 2 * size + 1 |
||
f = 100 / (n - 0.5) |
f = 100 / (n - 0.5) |
||
len m[] n * n |
len m[] n * n |
||
# |
# |
||
background 000 |
background 000 |
||
proc show_maze . . |
proc show_maze . . |
||
Line 2,690: | Line 2,690: | ||
. |
. |
||
offs[] = [ 1 n -1 (-n) ] |
offs[] = [ 1 n -1 (-n) ] |
||
# |
# |
||
proc m_maze pos . . |
proc m_maze pos . . |
||
m[pos] = 0 |
m[pos] = 0 |
||
Line 2,696: | Line 2,696: | ||
d[] = [ 1 2 3 4 ] |
d[] = [ 1 2 3 4 ] |
||
for i = 4 downto 1 |
for i = 4 downto 1 |
||
d = |
d = randint i |
||
dir = offs[d[d]] |
dir = offs[d[d]] |
||
d[d] = d[i] |
d[d] = d[i] |
||
Line 2,716: | Line 2,716: | ||
m[n * n - n + i] = 2 |
m[n * n - n + i] = 2 |
||
. |
. |
||
h = 2 * |
h = 2 * randint 15 - n + n * 2 * randint 15 |
||
m_maze h |
m_maze h |
||
m[endpos] = 0 |
m[endpos] = 0 |