Rosetta Code

Maze generation: Difference between revisions

Page Discussion

Maze generation (view source)

Revision as of 08:27, 9 June 2017

182 bytes removed ,  7 years ago
→‎{{header|Aime}}
No edit summary
Line 348:
integer p, q;
p = x + l_q_integer(x_offsets,p = x_offsets[(r + i) & 3]);
q = y + l_q_integer(y_offsets, q = y_offsets[(r + i) & 3)];
q += y;
if (-1 < p && p < line_size
&& -1 < q && q < line_size * (N * 2 + 1)) {
if (b_text(b, [q + p)] == '*') {
walk_cell(b, N, line_size, p, q, x_offsets, y_offsets);
b_replace(b, (q + y) / 2 + (p + x) / 2, ' ');
Line 375 ⟶ 376:
line_size = N * 4 + 1 + 1;
lb_p_integerl_bill(x_offsets, 0, 4, 0, -4, 0);
lb_p_integerl_bill(y_offsets, 0, 0, line_size * 2, 0, line_size * -2);
lb_p_integer(x_offsets, 0);
lb_p_integer(y_offsets, line_size * 2);
lb_p_integer(x_offsets, -4);
lb_p_integer(y_offsets, 0);
lb_p_integer(x_offsets, 0);
lb_p_integer(y_offsets, line_size * -2);
x = drand(N - 1) * 4 + 2;
Anonymous user
Retrieved from "https://rosettacode.org/wiki/Special:MobileDiff/167622"