Maze generation: Difference between revisions

Content added Content deleted
Line 1,827: Line 1,827:
470 IF Z=3 AND V(C-1,R)=0 THEN W(C,R)=0:C=C-1:GOTO 400
470 IF Z=3 AND V(C-1,R)=0 THEN W(C,R)=0:C=C-1:GOTO 400
480 GOTO 430
480 GOTO 430
490 GOTO 420
500 C=PC(U):R=PR(U):U=U-1:REM POP
500 C=PC(U):R=PR(U):U=U-1:REM POP
510 IF U > 0 THEN GOTO 420
510 IF U > 0 THEN GOTO 420