� A-MAZE-ING
#� COPYRIGHT (C) G.LUDINSKI 1983
	� � �
$�6:�23;8202;0;0;0;19,7,0;0;:�ins
�4:�23;8202;0;0;0;
(� M%(25,22)
2
�:�1:�128
4�19,0,1;0;
6�23;8202;0;0;0;
</LA$=�(136):RA$=�(137):DA$=�(138):UA$=�(139)
F	�tL@
PݤB(N$)
ZTF=0
d
�L=0�7
n  TF=TF+(2^L)*�(�N$,8-L,1))
x  �
�=TF
��23,224,3,3,3,3,3,3,3,3
��23,225,0,0,0,0,0,0,255,255
�+�23,226,192,192,192,192,192,192,192,192
��23,227,255,255,0,0,0,0,0,0
�5�23,228,3,3,3,�B("00011011"),�B("00011011"),3,3,3
�9�23,229,0,0,0,�B("00011000"),�B("00011000"),0,255,255
�A�23,230,192,192,192,�B("11011000"),�B("11011000"),192,192,192
�9�23,231,255,255,0,�B("00011000"),�B("00011000"),0,0,0
��:�:�:�:�:�
��I=1�20
�  �:�"        ";
�
  �J=1�24

    M%(J,I)=�(�(1)*4)

    �(224+M%(J,I));

	  �:�

"�256,174:�256,790

,�1028,174:�1028,790

6ST=0:X=1:Y=21:X1=0:Y1=0:�=0

J�X+7,Y+6)".";�(8);

T
*FX4,1

^SC=ST+�(�/500)

hvI$=�(0):� I$="" � I$ < �(136) � I$ > �(139) � �0,1);�(�/100);" secs"�12,1)"Score = ";SC;�25,1)"Steps = ";ST:�DhA

rR� (X=1 � I$=LA$) � (X=24 � I$=RA$) � (Y=1 � I$=UA$) � (Y=21 � I$=DA$) � � �D^A

|B� I$ = LA$ � ((M%(X-1,Y) <> 0 � M%(X,Y) <> 2 ) � Y=21) � X=X-1

�B� I$ = RA$ � ((M%(X+1,Y) <> 2 � M%(X,Y) <> 0 ) � Y=21) � X=X+1

�B� I$ = DA$ � ((M%(X,Y+1) <> 3 � M%(X,Y) <> 1 ) � Y=21) � Y=Y+1

�B� I$ = UA$ � ((M%(X,Y-1) <> 1 � M%(X,Y) <> 3 ) � Y=21) � Y=Y-1

�ST=ST+1

� � Y=21 � �X+7,27)".";:�dBA

�#�X+7,Y+6);�(M%(X,Y)+228);�(8);

�!� X=X1 � Y=Y1 � � 1,-15,53,10

�
X1=X:Y1=Y

�
� �D^A

�:

�	��ins

�3�(14);"A-MAZE-ING"'�(10);"Genevieve Ludinski"'

���'"YOU must venture through a complicated  maze; your objective being to reach the top right hand corner in the fewest"'"possible number of moves."
��'"Every step counts as a point and every  time you try to cross a barrier counts  as a point. Aim for the exit nearest to the top right hand one."
��'"Moving is via the Cursor keys."''"Your score, number of steps taken and   time taken is displayed at the top of   the screen."
S�'"When you have reached the outside of themaze again, press the <ESCAPE> key."
&�19,0,4;0;19,7,7;0;
0!�13,24)"PRESS SPACE!";:*FX21
:
���=32
D�
�

00000000  0d 00 0a 10 f4 20 41 2d  4d 41 5a 45 2d 49 4e 47  |..... A-MAZE-ING|
00000010  0d 00 14 23 f4 20 43 4f  50 59 52 49 47 48 54 20  |...#. COPYRIGHT |
00000020  28 43 29 20 47 2e 4c 55  44 49 4e 53 4b 49 20 31  |(C) G.LUDINSKI 1|
00000030  39 38 33 0d 00 16 09 ee  20 85 20 f9 0d 00 19 24  |983..... . ....$|
00000040  eb 36 3a ef 32 33 3b 38  32 30 32 3b 30 3b 30 3b  |.6:.23;8202;0;0;|
00000050  30 3b 31 39 2c 37 2c 30  3b 30 3b 3a f2 69 6e 73  |0;19,7,0;0;:.ins|
00000060  0d 00 1e 16 eb 34 3a ef  32 33 3b 38 32 30 32 3b  |.....4:.23;8202;|
00000070  30 3b 30 3b 30 3b 0d 00  28 0f de 20 4d 25 28 32  |0;0;0;..(.. M%(2|
00000080  35 2c 32 32 29 0d 00 32  0d db 3a fb 31 3a fb 31  |5,22)..2..:.1:.1|
00000090  32 38 0d 00 34 0e ef 31  39 2c 30 2c 31 3b 30 3b  |28..4..19,0,1;0;|
000000a0  0d 00 36 13 ef 32 33 3b  38 32 30 32 3b 30 3b 30  |..6..23;8202;0;0|
000000b0  3b 30 3b 0d 00 3c 2f 4c  41 24 3d bd 28 31 33 36  |;0;..</LA$=.(136|
000000c0  29 3a 52 41 24 3d bd 28  31 33 37 29 3a 44 41 24  |):RA$=.(137):DA$|
000000d0  3d bd 28 31 33 38 29 3a  55 41 24 3d bd 28 31 33  |=.(138):UA$=.(13|
000000e0  39 29 0d 00 46 09 e5 8d  74 4c 40 0d 00 50 0b dd  |9)..F...tL@..P..|
000000f0  a4 42 28 4e 24 29 0d 00  5a 08 54 46 3d 30 0d 00  |.B(N$)..Z.TF=0..|
00000100  64 0a e3 4c 3d 30 b8 37  0d 00 6e 1f 20 20 54 46  |d..L=0.7..n.  TF|
00000110  3d 54 46 2b 28 32 5e 4c  29 2a bb 28 c1 4e 24 2c  |=TF+(2^L)*.(.N$,|
00000120  38 2d 4c 2c 31 29 29 0d  00 78 07 20 20 ed 0d 00  |8-L,1))..x.  ...|
00000130  82 07 3d 54 46 0d 00 8c  1b ef 32 33 2c 32 32 34  |..=TF.....23,224|
00000140  2c 33 2c 33 2c 33 2c 33  2c 33 2c 33 2c 33 2c 33  |,3,3,3,3,3,3,3,3|
00000150  0d 00 96 1f ef 32 33 2c  32 32 35 2c 30 2c 30 2c  |.....23,225,0,0,|
00000160  30 2c 30 2c 30 2c 30 2c  32 35 35 2c 32 35 35 0d  |0,0,0,0,255,255.|
00000170  00 a0 2b ef 32 33 2c 32  32 36 2c 31 39 32 2c 31  |..+.23,226,192,1|
00000180  39 32 2c 31 39 32 2c 31  39 32 2c 31 39 32 2c 31  |92,192,192,192,1|
00000190  39 32 2c 31 39 32 2c 31  39 32 0d 00 aa 1f ef 32  |92,192,192.....2|
000001a0  33 2c 32 32 37 2c 32 35  35 2c 32 35 35 2c 30 2c  |3,227,255,255,0,|
000001b0  30 2c 30 2c 30 2c 30 2c  30 0d 00 b4 35 ef 32 33  |0,0,0,0,0...5.23|
000001c0  2c 32 32 38 2c 33 2c 33  2c 33 2c a4 42 28 22 30  |,228,3,3,3,.B("0|
000001d0  30 30 31 31 30 31 31 22  29 2c a4 42 28 22 30 30  |0011011"),.B("00|
000001e0  30 31 31 30 31 31 22 29  2c 33 2c 33 2c 33 0d 00  |011011"),3,3,3..|
000001f0  be 39 ef 32 33 2c 32 32  39 2c 30 2c 30 2c 30 2c  |.9.23,229,0,0,0,|
00000200  a4 42 28 22 30 30 30 31  31 30 30 30 22 29 2c a4  |.B("00011000"),.|
00000210  42 28 22 30 30 30 31 31  30 30 30 22 29 2c 30 2c  |B("00011000"),0,|
00000220  32 35 35 2c 32 35 35 0d  00 c8 41 ef 32 33 2c 32  |255,255...A.23,2|
00000230  33 30 2c 31 39 32 2c 31  39 32 2c 31 39 32 2c a4  |30,192,192,192,.|
00000240  42 28 22 31 31 30 31 31  30 30 30 22 29 2c a4 42  |B("11011000"),.B|
00000250  28 22 31 31 30 31 31 30  30 30 22 29 2c 31 39 32  |("11011000"),192|
00000260  2c 31 39 32 2c 31 39 32  0d 00 d2 39 ef 32 33 2c  |,192,192...9.23,|
00000270  32 33 31 2c 32 35 35 2c  32 35 35 2c 30 2c a4 42  |231,255,255,0,.B|
00000280  28 22 30 30 30 31 31 30  30 30 22 29 2c a4 42 28  |("00011000"),.B(|
00000290  22 30 30 30 31 31 30 30  30 22 29 2c 30 2c 30 2c  |"00011000"),0,0,|
000002a0  30 0d 00 dc 0f f1 3a f1  3a f1 3a f1 3a f1 3a f1  |0.....:.:.:.:.:.|
000002b0  0d 00 e6 0b e3 49 3d 31  b8 32 30 0d 00 f0 14 20  |.....I=1.20.... |
000002c0  20 f1 3a f1 22 20 20 20  20 20 20 20 20 22 3b 0d  | .:."        ";.|
000002d0  00 fa 0d 20 20 e3 4a 3d  31 b8 32 34 0d 01 04 19  |...  .J=1.24....|
000002e0  20 20 20 20 4d 25 28 4a  2c 49 29 3d a8 28 b3 28  |    M%(J,I)=.(.(|
000002f0  31 29 2a 34 29 0d 01 0e  18 20 20 20 20 f1 bd 28  |1)*4)....    ..(|
00000300  32 32 34 2b 4d 25 28 4a  2c 49 29 29 3b 0d 01 18  |224+M%(J,I));...|
00000310  09 20 20 ed 3a ed 0d 01  22 15 ec 32 35 36 2c 31  |.  .:..."..256,1|
00000320  37 34 3a df 32 35 36 2c  37 39 30 0d 01 2c 17 ec  |74:.256,790..,..|
00000330  31 30 32 38 2c 31 37 34  3a df 31 30 32 38 2c 37  |1028,174:.1028,7|
00000340  39 30 0d 01 36 1f 53 54  3d 30 3a 58 3d 31 3a 59  |90..6.ST=0:X=1:Y|
00000350  3d 32 31 3a 58 31 3d 30  3a 59 31 3d 30 3a d1 3d  |=21:X1=0:Y1=0:.=|
00000360  30 0d 01 4a 17 f1 8a 58  2b 37 2c 59 2b 36 29 22  |0..J...X+7,Y+6)"|
00000370  2e 22 3b bd 28 38 29 3b  0d 01 54 0a 2a 46 58 34  |.";.(8);..T.*FX4|
00000380  2c 31 0d 01 5e 12 53 43  3d 53 54 2b a8 28 91 2f  |,1..^.SC=ST+.(./|
00000390  35 30 30 29 0d 01 68 76  49 24 3d bf 28 30 29 3a  |500)..hvI$=.(0):|
000003a0  e7 20 49 24 3d 22 22 20  84 20 49 24 20 3c 20 bd  |. I$="" . I$ < .|
000003b0  28 31 33 36 29 20 84 20  49 24 20 3e 20 bd 28 31  |(136) . I$ > .(1|
000003c0  33 39 29 20 8c 20 f1 8a  30 2c 31 29 3b a8 28 91  |39) . ..0,1);.(.|
000003d0  2f 31 30 30 29 3b 22 20  73 65 63 73 22 8a 31 32  |/100);" secs".12|
000003e0  2c 31 29 22 53 63 6f 72  65 20 3d 20 22 3b 53 43  |,1)"Score = ";SC|
000003f0  3b 8a 32 35 2c 31 29 22  53 74 65 70 73 20 3d 20  |;.25,1)"Steps = |
00000400  22 3b 53 54 3a e5 8d 44  68 41 0d 01 72 52 e7 20  |";ST:..DhA..rR. |
00000410  28 58 3d 31 20 80 20 49  24 3d 4c 41 24 29 20 84  |(X=1 . I$=LA$) .|
00000420  20 28 58 3d 32 34 20 80  20 49 24 3d 52 41 24 29  | (X=24 . I$=RA$)|
00000430  20 84 20 28 59 3d 31 20  80 20 49 24 3d 55 41 24  | . (Y=1 . I$=UA$|
00000440  29 20 84 20 28 59 3d 32  31 20 80 20 49 24 3d 44  |) . (Y=21 . I$=D|
00000450  41 24 29 20 8c 20 e5 20  8d 44 5e 41 0d 01 7c 42  |A$) . . .D^A..|B|
00000460  e7 20 49 24 20 3d 20 4c  41 24 20 80 20 28 28 4d  |. I$ = LA$ . ((M|
00000470  25 28 58 2d 31 2c 59 29  20 3c 3e 20 30 20 80 20  |%(X-1,Y) <> 0 . |
00000480  4d 25 28 58 2c 59 29 20  3c 3e 20 32 20 29 20 84  |M%(X,Y) <> 2 ) .|
00000490  20 59 3d 32 31 29 20 8c  20 58 3d 58 2d 31 0d 01  | Y=21) . X=X-1..|
000004a0  86 42 e7 20 49 24 20 3d  20 52 41 24 20 80 20 28  |.B. I$ = RA$ . (|
000004b0  28 4d 25 28 58 2b 31 2c  59 29 20 3c 3e 20 32 20  |(M%(X+1,Y) <> 2 |
000004c0  80 20 4d 25 28 58 2c 59  29 20 3c 3e 20 30 20 29  |. M%(X,Y) <> 0 )|
000004d0  20 84 20 59 3d 32 31 29  20 8c 20 58 3d 58 2b 31  | . Y=21) . X=X+1|
000004e0  0d 01 90 42 e7 20 49 24  20 3d 20 44 41 24 20 80  |...B. I$ = DA$ .|
000004f0  20 28 28 4d 25 28 58 2c  59 2b 31 29 20 3c 3e 20  | ((M%(X,Y+1) <> |
00000500  33 20 80 20 4d 25 28 58  2c 59 29 20 3c 3e 20 31  |3 . M%(X,Y) <> 1|
00000510  20 29 20 84 20 59 3d 32  31 29 20 8c 20 59 3d 59  | ) . Y=21) . Y=Y|
00000520  2b 31 0d 01 9a 42 e7 20  49 24 20 3d 20 55 41 24  |+1...B. I$ = UA$|
00000530  20 80 20 28 28 4d 25 28  58 2c 59 2d 31 29 20 3c  | . ((M%(X,Y-1) <|
00000540  3e 20 31 20 80 20 4d 25  28 58 2c 59 29 20 3c 3e  |> 1 . M%(X,Y) <>|
00000550  20 33 20 29 20 84 20 59  3d 32 31 29 20 8c 20 59  | 3 ) . Y=21) . Y|
00000560  3d 59 2d 31 0d 01 a4 0b  53 54 3d 53 54 2b 31 0d  |=Y-1....ST=ST+1.|
00000570  01 ae 20 e7 20 59 3d 32  31 20 8c 20 f1 8a 58 2b  |.. . Y=21 . ..X+|
00000580  37 2c 32 37 29 22 2e 22  3b 3a e5 8d 64 42 41 0d  |7,27)".";:..dBA.|
00000590  01 b8 23 f1 8a 58 2b 37  2c 59 2b 36 29 3b bd 28  |..#..X+7,Y+6);.(|
000005a0  4d 25 28 58 2c 59 29 2b  32 32 38 29 3b bd 28 38  |M%(X,Y)+228);.(8|
000005b0  29 3b 0d 01 c2 21 e7 20  58 3d 58 31 20 80 20 59  |);...!. X=X1 . Y|
000005c0  3d 59 31 20 8c 20 d4 20  31 2c 2d 31 35 2c 35 33  |=Y1 . . 1,-15,53|
000005d0  2c 31 30 0d 01 cc 0d 58  31 3d 58 3a 59 31 3d 59  |,10....X1=X:Y1=Y|
000005e0  0d 01 d6 0a e5 20 8d 44  5e 41 0d 01 e0 05 3a 0d  |..... .D^A....:.|
000005f0  01 ea 09 dd f2 69 6e 73  0d 01 f4 33 f1 89 28 31  |.....ins...3..(1|
00000600  34 29 3b 22 41 2d 4d 41  5a 45 2d 49 4e 47 22 27  |4);"A-MAZE-ING"'|
00000610  89 28 31 30 29 3b 22 47  65 6e 65 76 69 65 76 65  |.(10);"Genevieve|
00000620  20 4c 75 64 69 6e 73 6b  69 22 27 0d 01 fe 97 f1  | Ludinski"'.....|
00000630  27 22 59 4f 55 20 6d 75  73 74 20 76 65 6e 74 75  |'"YOU must ventu|
00000640  72 65 20 74 68 72 6f 75  67 68 20 61 20 63 6f 6d  |re through a com|
00000650  70 6c 69 63 61 74 65 64  20 20 6d 61 7a 65 3b 20  |plicated  maze; |
00000660  79 6f 75 72 20 6f 62 6a  65 63 74 69 76 65 20 62  |your objective b|
00000670  65 69 6e 67 20 74 6f 20  72 65 61 63 68 20 74 68  |eing to reach th|
00000680  65 20 74 6f 70 20 72 69  67 68 74 20 68 61 6e 64  |e top right hand|
00000690  20 63 6f 72 6e 65 72 20  69 6e 20 74 68 65 20 66  | corner in the f|
000006a0  65 77 65 73 74 22 27 22  70 6f 73 73 69 62 6c 65  |ewest"'"possible|
000006b0  20 6e 75 6d 62 65 72 20  6f 66 20 6d 6f 76 65 73  | number of moves|
000006c0  2e 22 0d 02 08 97 f1 27  22 45 76 65 72 79 20 73  |.".....'"Every s|
000006d0  74 65 70 20 63 6f 75 6e  74 73 20 61 73 20 61 20  |tep counts as a |
000006e0  70 6f 69 6e 74 20 61 6e  64 20 65 76 65 72 79 20  |point and every |
000006f0  20 74 69 6d 65 20 79 6f  75 20 74 72 79 20 74 6f  | time you try to|
00000700  20 63 72 6f 73 73 20 61  20 62 61 72 72 69 65 72  | cross a barrier|
00000710  20 63 6f 75 6e 74 73 20  20 61 73 20 61 20 70 6f  | counts  as a po|
00000720  69 6e 74 2e 20 41 69 6d  20 66 6f 72 20 74 68 65  |int. Aim for the|
00000730  20 65 78 69 74 20 6e 65  61 72 65 73 74 20 74 6f  | exit nearest to|
00000740  20 74 68 65 20 74 6f 70  20 72 69 67 68 74 20 68  | the top right h|
00000750  61 6e 64 20 6f 6e 65 2e  22 0d 02 12 85 f1 27 22  |and one.".....'"|
00000760  4d 6f 76 69 6e 67 20 69  73 20 76 69 61 20 74 68  |Moving is via th|
00000770  65 20 43 75 72 73 6f 72  20 6b 65 79 73 2e 22 27  |e Cursor keys."'|
00000780  27 22 59 6f 75 72 20 73  63 6f 72 65 2c 20 6e 75  |'"Your score, nu|
00000790  6d 62 65 72 20 6f 66 20  73 74 65 70 73 20 74 61  |mber of steps ta|
000007a0  6b 65 6e 20 61 6e 64 20  20 20 74 69 6d 65 20 74  |ken and   time t|
000007b0  61 6b 65 6e 20 69 73 20  64 69 73 70 6c 61 79 65  |aken is displaye|
000007c0  64 20 61 74 20 74 68 65  20 74 6f 70 20 6f 66 20  |d at the top of |
000007d0  20 20 74 68 65 20 73 63  72 65 65 6e 2e 22 0d 02  |  the screen."..|
000007e0  1c 53 f1 27 22 57 68 65  6e 20 79 6f 75 20 68 61  |.S.'"When you ha|
000007f0  76 65 20 72 65 61 63 68  65 64 20 74 68 65 20 6f  |ve reached the o|
00000800  75 74 73 69 64 65 20 6f  66 20 74 68 65 6d 61 7a  |utside of themaz|
00000810  65 20 61 67 61 69 6e 2c  20 70 72 65 73 73 20 74  |e again, press t|
00000820  68 65 20 3c 45 53 43 41  50 45 3e 20 6b 65 79 2e  |he <ESCAPE> key.|
00000830  22 0d 02 26 17 ef 31 39  2c 30 2c 34 3b 30 3b 31  |"..&..19,0,4;0;1|
00000840  39 2c 37 2c 37 3b 30 3b  0d 02 30 21 f1 8a 31 33  |9,7,7;0;..0!..13|
00000850  2c 32 34 29 22 50 52 45  53 53 20 53 50 41 43 45  |,24)"PRESS SPACE|
00000860  21 22 3b 3a 2a 46 58 32  31 0d 02 3a 0a f5 fd a5  |!";:*FX21..:....|
00000870  3d 33 32 0d 02 44 05 e1  0d ff                    |=32..D....|
0000087a