10 REM 3d-maze game 
100 EXTENSION (Index #0) (Token 0x80)
1000 DATA
1010 DATA
110 REM INITIALISE THE ARRAYS
120 REM *********************
130 DIM
140 RESTORE
150 FOR
160 FOR
170 READ
180 VARNAME
190 REM DRAW THE SCREEN
20 REM by Phil Lawson for Atari ST User (c) 1990
200 REM ***************
210 CLS
220 REM Put the back line in first 
230 REM ========================== 
240 SCREEN COPY
250 SCREEN COPY
260 REM Now put in line 3
270 REM =================
280 VARNAME
290 IF
30 MODE
300 SCREEN COPY
310 IF
320 IF
330 RETURN
340 REM Now put in line 2
350 REM =================
360 IF
370 IF
380 VARNAME
390 IF
40 REM SET UP THE SCREENS 
400 SCREEN$
410 SCREEN COPY
420 VARNAME
430 IF
440 REM Now the position directly in front 
450 REM ================================== 
460 SCREEN$
470 REM Draw the pieces directly left and right
480 REM =======================================
490 IF
50 REM ****************** 
500 IF
510 REM NOW DRAW THE BORDER AROUND THE IMAGE 
520 REM ************************************ 
530 VARNAME
540 REM NOW COPY THE DRAWN SCREEN TO THE DISPLAY 
550 REM **************************************** 
560 WAIT VBL
570 SCREEN COPY
580 VARNAME
590 VARNAME
60 RESERVE
600 IF
610 IF
620 VARNAME
630 IF
640 IF
650 IF
660 IF
670 IF
680 IF
690 GOTO
70 RESERVE
700 DATA
710 DATA
720 DATA
730 DATA
740 DATA
750 DATA
760 DATA
770 DATA
780 DATA
790 DATA
80 RESERVE
800 DATA
810 DATA
820 DATA
830 DATA
840 DATA
850 DATA
860 REM data for direction 1 
870 DATA
880 DATA
890 DATA
90 EXTENSION (Index #0) (Token 0x80)
900 REM data for direction 2 
910 DATA
920 DATA
930 DATA
940 REM data for direction 3 
950 DATA
960 DATA
970 DATA
980 REM data for direction 4 
990 DATA