c=2:c2=2
in=0:play=100:out=0
dead=0:sh=0:�l%(5,100)
(�lo=1�5:�lo2=1�100
2�l%(lo,lo2):�,
<�hin,ti
F�Store MODE,del. Here
P�note:�screen:�note
Z�key:�note:�think:�DP@
d��screen
n�l=1�39:�m=1�5
x�l,m);�(l%(l+sh,m))
��,:�1,10);"IN:";in
��12,17);"Out:";out
��14,16);"Dead:";dead
��:��key
�x=�(1):A$=�(x)
�#�A$="Z"��lev%(c-1,c2)=128�c=c-1
�#�A$="X"��lev%(c+1,c2)=128�c=c+1
�%�A$="/"��lev%(c,c2+1)=128�c2=c2+1
�%�A$=":"��lev%(c,c2-1)=128�c2=c2-1
�L�(A$)<58��(A$)>48��lev(c,c2+1)=129�lev(c,c2+1)=130�lev(c,c-2)=x-47+128
��
�
��note
��A,B:�A=0���TlA:�

�A=-1�S=0�S=-15

� 1,S,A,B*2

�

",�96,6,128,6,124,6,-1,1,124,6,116,3,112,3

,�116,6,96,6,-1,1,96,6,100,6

6�96,6,88,6,80,6,76,6

@"�80,6,76,3,80,3,68,6,-1,2,96,6

J'�128,6,124,6,-1,1,124,6,116,3,112,3

T�116,6,96,6,-1,1,96,6,100,6

^�96,6,88,6,80,6,76,6

h�68,6,48,6,20,6,-1,20,0,0

r1�116,6,-1,1,116,6,108,6,-1,1,108,6,100,6,-1,1

|�100,6,96,6,-1,1,96,6,104,6

��112,6,116,6,112,6,116,6

��124,6,96,6,-1,1,96,6,124,6

�(� 128,6,124,6,-1,1,124,6,116,3,112,3

��116,6,96,6,-1,1,96,6,88,6

��80,6,76,6,68,6,64,6

��68,6,48,6,20,6,-1,20,0,0

���think

��lo=1�5:�lo2=1�100

��lev%(lo,lo2)<128��d`A��,

�\�lev%(lo,lo2)=129��lev%(lo+1,lo2)=0�lev%(lo+1,lo2)=129:lev%(lo,lo2)=0�lev%(lo+1,lo2)=130

�Z�lev%(lo,lo2)=130��lev%(lo-1,lo2)=0�lev%(lo-1,lo2)=129:lev%(lo,lo2)=0�lev%(lo,lo2)=129

�"�note:�key:�note:�screen:�note

�I�lev%(lo,lo2)=131��lev%(lo,lo2+1)=7�lev%(lo,lo2)=0:lev%(lo,lo2+1)=131
;�lev%(lo,lo2)=131��lev%(lo,lo2+1)<>135�lev%(lo,lo2)=129
e�lev%(lo,lo2)=132��lev%(lo,lo2+1)=135��lev%(lo-1,lo2+1)=135�lev%(lo,lo2+1)=0:lev%(lo-1,lo2+1)=132
;�lev%(lo,lo2)=132��lev%(lo,lo2+1)<>135�lev%(lo,lo2)=129
&=�lev%(lo,lo2)=132��lev%(lo-1,lo2+1)<>135�lev%(lo,lo2)=129
0e�lev%(lo,lo2)=133��lev%(lo,lo2+1)=135��lev%(lo+1,lo2+1)=135�lev%(lo,lo2+1)=0:lev%(lo+1,lo2+1)=133
:;�lev%(lo,lo2)=133��lev%(lo,lo2+1)<>135�lev%(lo,lo2)=129
D=�lev%(lo,lo2)=133��lev%(lo+1,lo2+1)<>135�lev%(lo,lo2)=129
N"�note:�key:�note:�screen:�note
X��lev%(lo,lo2)=134��lev%(lo,lo2-1)=128��lev%(lo+1,lo2+1)=128�lev%(lo+1,lo2)=128�lev%(lo+1,lo2)=137:lev%(lo,lo2+1)=134:lev%(lo,lo2)=128
b1�lev%(lo,lo2)=138��lev%(lo,lo2-1)=130�in=in+1
l�,:�in>hinTHENCHAIN"LEVEL2"
v�
�
�dater
�

00000000  0d 00 0a 0c 63 3d 32 3a  63 32 3d 32 0d 00 14 17  |....c=2:c2=2....|
00000010  69 6e 3d 30 3a 70 6c 61  79 3d 31 30 30 3a 6f 75  |in=0:play=100:ou|
00000020  74 3d 30 0d 00 1e 1a 64  65 61 64 3d 30 3a 73 68  |t=0....dead=0:sh|
00000030  3d 30 3a de 6c 25 28 35  2c 31 30 30 29 0d 00 28  |=0:.l%(5,100)..(|
00000040  16 e3 6c 6f 3d 31 b8 35  3a e3 6c 6f 32 3d 31 b8  |..lo=1.5:.lo2=1.|
00000050  31 30 30 0d 00 32 12 f3  6c 25 28 6c 6f 2c 6c 6f  |100..2..l%(lo,lo|
00000060  32 29 3a ed 2c 0d 00 3c  0b f3 68 69 6e 2c 74 69  |2):.,..<..hin,ti|
00000070  0d 00 46 19 f4 53 74 6f  72 65 20 4d 4f 44 45 2c  |..F..Store MODE,|
00000080  64 65 6c 2e 20 48 65 72  65 0d 00 50 17 f2 6e 6f  |del. Here..P..no|
00000090  74 65 3a f2 73 63 72 65  65 6e 3a f2 6e 6f 74 65  |te:.screen:.note|
000000a0  0d 00 5a 1b f2 6b 65 79  3a f2 6e 6f 74 65 3a f2  |..Z..key:.note:.|
000000b0  74 68 69 6e 6b 3a e5 8d  44 50 40 0d 00 64 0c dd  |think:..DP@..d..|
000000c0  f2 73 63 72 65 65 6e 0d  00 6e 12 e3 6c 3d 31 b8  |.screen..n..l=1.|
000000d0  33 39 3a e3 6d 3d 31 b8  35 0d 00 78 18 f1 8a 6c  |39:.m=1.5..x...l|
000000e0  2c 6d 29 3b bd 28 6c 25  28 6c 2b 73 68 2c 6d 29  |,m);.(l%(l+sh,m)|
000000f0  29 0d 00 82 17 ed 2c 3a  f1 8a 31 2c 31 30 29 3b  |).....,:..1,10);|
00000100  22 49 4e 3a 22 3b 69 6e  0d 00 8c 17 f1 8a 31 32  |"IN:";in......12|
00000110  2c 31 37 29 3b 22 4f 75  74 3a 22 3b 6f 75 74 0d  |,17);"Out:";out.|
00000120  00 96 19 f1 8a 31 34 2c  31 36 29 3b 22 44 65 61  |.....14,16);"Dea|
00000130  64 3a 22 3b 64 65 61 64  0d 00 a0 0b e1 3a dd f2  |d:";dead.....:..|
00000140  6b 65 79 0d 00 aa 12 78  3d a6 28 31 29 3a 41 24  |key....x=.(1):A$|
00000150  3d bd 28 78 29 0d 00 b4  23 e7 41 24 3d 22 5a 22  |=.(x)...#.A$="Z"|
00000160  8c e7 6c 65 76 25 28 63  2d 31 2c 63 32 29 3d 31  |..lev%(c-1,c2)=1|
00000170  32 38 8c 63 3d 63 2d 31  0d 00 be 23 e7 41 24 3d  |28.c=c-1...#.A$=|
00000180  22 58 22 8c e7 6c 65 76  25 28 63 2b 31 2c 63 32  |"X"..lev%(c+1,c2|
00000190  29 3d 31 32 38 8c 63 3d  63 2b 31 0d 00 c8 25 e7  |)=128.c=c+1...%.|
000001a0  41 24 3d 22 2f 22 8c e7  6c 65 76 25 28 63 2c 63  |A$="/"..lev%(c,c|
000001b0  32 2b 31 29 3d 31 32 38  8c 63 32 3d 63 32 2b 31  |2+1)=128.c2=c2+1|
000001c0  0d 00 d2 25 e7 41 24 3d  22 3a 22 8c e7 6c 65 76  |...%.A$=":"..lev|
000001d0  25 28 63 2c 63 32 2d 31  29 3d 31 32 38 8c 63 32  |%(c,c2-1)=128.c2|
000001e0  3d 63 32 2d 31 0d 00 dc  4c e7 97 28 41 24 29 3c  |=c2-1...L..(A$)<|
000001f0  35 38 8c e7 97 28 41 24  29 3e 34 38 8c e7 6c 65  |58...(A$)>48..le|
00000200  76 28 63 2c 63 32 2b 31  29 3d 31 32 39 84 6c 65  |v(c,c2+1)=129.le|
00000210  76 28 63 2c 63 32 2b 31  29 3d 31 33 30 8c 6c 65  |v(c,c2+1)=130.le|
00000220  76 28 63 2c 63 2d 32 29  3d 78 2d 34 37 2b 31 32  |v(c,c-2)=x-47+12|
00000230  38 0d 00 e6 05 e1 0d 00  f0 0a dd f2 6e 6f 74 65  |8...........note|
00000240  0d 00 fa 15 f3 41 2c 42  3a e7 41 3d 30 8c f7 8d  |.....A,B:.A=0...|
00000250  54 6c 41 3a e1 0d 01 04  13 e7 41 3d 2d 31 8c 53  |TlA:......A=-1.S|
00000260  3d 30 8b 53 3d 2d 31 35  0d 01 0e 0f d4 20 31 2c  |=0.S=-15..... 1,|
00000270  53 2c 41 2c 42 2a 32 0d  01 18 05 e1 0d 01 22 2c  |S,A,B*2.......",|
00000280  dc 39 36 2c 36 2c 31 32  38 2c 36 2c 31 32 34 2c  |.96,6,128,6,124,|
00000290  36 2c 2d 31 2c 31 2c 31  32 34 2c 36 2c 31 31 36  |6,-1,1,124,6,116|
000002a0  2c 33 2c 31 31 32 2c 33  0d 01 2c 1f dc 31 31 36  |,3,112,3..,..116|
000002b0  2c 36 2c 39 36 2c 36 2c  2d 31 2c 31 2c 39 36 2c  |,6,96,6,-1,1,96,|
000002c0  36 2c 31 30 30 2c 36 0d  01 36 18 dc 39 36 2c 36  |6,100,6..6..96,6|
000002d0  2c 38 38 2c 36 2c 38 30  2c 36 2c 37 36 2c 36 0d  |,88,6,80,6,76,6.|
000002e0  01 40 22 dc 38 30 2c 36  2c 37 36 2c 33 2c 38 30  |.@".80,6,76,3,80|
000002f0  2c 33 2c 36 38 2c 36 2c  2d 31 2c 32 2c 39 36 2c  |,3,68,6,-1,2,96,|
00000300  36 0d 01 4a 27 dc 31 32  38 2c 36 2c 31 32 34 2c  |6..J'.128,6,124,|
00000310  36 2c 2d 31 2c 31 2c 31  32 34 2c 36 2c 31 31 36  |6,-1,1,124,6,116|
00000320  2c 33 2c 31 31 32 2c 33  0d 01 54 1f dc 31 31 36  |,3,112,3..T..116|
00000330  2c 36 2c 39 36 2c 36 2c  2d 31 2c 31 2c 39 36 2c  |,6,96,6,-1,1,96,|
00000340  36 2c 31 30 30 2c 36 0d  01 5e 18 dc 39 36 2c 36  |6,100,6..^..96,6|
00000350  2c 38 38 2c 36 2c 38 30  2c 36 2c 37 36 2c 36 0d  |,88,6,80,6,76,6.|
00000360  01 68 1d dc 36 38 2c 36  2c 34 38 2c 36 2c 32 30  |.h..68,6,48,6,20|
00000370  2c 36 2c 2d 31 2c 32 30  2c 30 2c 30 0d 01 72 31  |,6,-1,20,0,0..r1|
00000380  dc 31 31 36 2c 36 2c 2d  31 2c 31 2c 31 31 36 2c  |.116,6,-1,1,116,|
00000390  36 2c 31 30 38 2c 36 2c  2d 31 2c 31 2c 31 30 38  |6,108,6,-1,1,108|
000003a0  2c 36 2c 31 30 30 2c 36  2c 2d 31 2c 31 0d 01 7c  |,6,100,6,-1,1..||
000003b0  1f dc 31 30 30 2c 36 2c  39 36 2c 36 2c 2d 31 2c  |..100,6,96,6,-1,|
000003c0  31 2c 39 36 2c 36 2c 31  30 34 2c 36 0d 01 86 1c  |1,96,6,104,6....|
000003d0  dc 31 31 32 2c 36 2c 31  31 36 2c 36 2c 31 31 32  |.112,6,116,6,112|
000003e0  2c 36 2c 31 31 36 2c 36  0d 01 90 1f dc 31 32 34  |,6,116,6.....124|
000003f0  2c 36 2c 39 36 2c 36 2c  2d 31 2c 31 2c 39 36 2c  |,6,96,6,-1,1,96,|
00000400  36 2c 31 32 34 2c 36 0d  01 9a 28 dc 20 31 32 38  |6,124,6...(. 128|
00000410  2c 36 2c 31 32 34 2c 36  2c 2d 31 2c 31 2c 31 32  |,6,124,6,-1,1,12|
00000420  34 2c 36 2c 31 31 36 2c  33 2c 31 31 32 2c 33 0d  |4,6,116,3,112,3.|
00000430  01 a4 1e dc 31 31 36 2c  36 2c 39 36 2c 36 2c 2d  |....116,6,96,6,-|
00000440  31 2c 31 2c 39 36 2c 36  2c 38 38 2c 36 0d 01 ae  |1,1,96,6,88,6...|
00000450  18 dc 38 30 2c 36 2c 37  36 2c 36 2c 36 38 2c 36  |..80,6,76,6,68,6|
00000460  2c 36 34 2c 36 0d 01 b8  1d dc 36 38 2c 36 2c 34  |,64,6.....68,6,4|
00000470  38 2c 36 2c 32 30 2c 36  2c 2d 31 2c 32 30 2c 30  |8,6,20,6,-1,20,0|
00000480  2c 30 0d 01 c2 0b dd f2  74 68 69 6e 6b 0d 01 cc  |,0......think...|
00000490  16 e3 6c 6f 3d 31 b8 35  3a e3 6c 6f 32 3d 31 b8  |..lo=1.5:.lo2=1.|
000004a0  31 30 30 0d 01 d6 1d e7  6c 65 76 25 28 6c 6f 2c  |100.....lev%(lo,|
000004b0  6c 6f 32 29 3c 31 32 38  8c 8d 64 60 41 8b ed 2c  |lo2)<128..d`A..,|
000004c0  0d 01 e0 5c e7 6c 65 76  25 28 6c 6f 2c 6c 6f 32  |...\.lev%(lo,lo2|
000004d0  29 3d 31 32 39 8c e7 6c  65 76 25 28 6c 6f 2b 31  |)=129..lev%(lo+1|
000004e0  2c 6c 6f 32 29 3d 30 8c  6c 65 76 25 28 6c 6f 2b  |,lo2)=0.lev%(lo+|
000004f0  31 2c 6c 6f 32 29 3d 31  32 39 3a 6c 65 76 25 28  |1,lo2)=129:lev%(|
00000500  6c 6f 2c 6c 6f 32 29 3d  30 8b 6c 65 76 25 28 6c  |lo,lo2)=0.lev%(l|
00000510  6f 2b 31 2c 6c 6f 32 29  3d 31 33 30 0d 01 ea 5a  |o+1,lo2)=130...Z|
00000520  e7 6c 65 76 25 28 6c 6f  2c 6c 6f 32 29 3d 31 33  |.lev%(lo,lo2)=13|
00000530  30 8c e7 6c 65 76 25 28  6c 6f 2d 31 2c 6c 6f 32  |0..lev%(lo-1,lo2|
00000540  29 3d 30 8c 6c 65 76 25  28 6c 6f 2d 31 2c 6c 6f  |)=0.lev%(lo-1,lo|
00000550  32 29 3d 31 32 39 3a 6c  65 76 25 28 6c 6f 2c 6c  |2)=129:lev%(lo,l|
00000560  6f 32 29 3d 30 8b 6c 65  76 25 28 6c 6f 2c 6c 6f  |o2)=0.lev%(lo,lo|
00000570  32 29 3d 31 32 39 0d 01  f4 22 f2 6e 6f 74 65 3a  |2)=129...".note:|
00000580  f2 6b 65 79 3a f2 6e 6f  74 65 3a f2 73 63 72 65  |.key:.note:.scre|
00000590  65 6e 3a f2 6e 6f 74 65  0d 01 fe 49 e7 6c 65 76  |en:.note...I.lev|
000005a0  25 28 6c 6f 2c 6c 6f 32  29 3d 31 33 31 8c e7 6c  |%(lo,lo2)=131..l|
000005b0  65 76 25 28 6c 6f 2c 6c  6f 32 2b 31 29 3d 37 8c  |ev%(lo,lo2+1)=7.|
000005c0  6c 65 76 25 28 6c 6f 2c  6c 6f 32 29 3d 30 3a 6c  |lev%(lo,lo2)=0:l|
000005d0  65 76 25 28 6c 6f 2c 6c  6f 32 2b 31 29 3d 31 33  |ev%(lo,lo2+1)=13|
000005e0  31 0d 02 08 3b e7 6c 65  76 25 28 6c 6f 2c 6c 6f  |1...;.lev%(lo,lo|
000005f0  32 29 3d 31 33 31 8c e7  6c 65 76 25 28 6c 6f 2c  |2)=131..lev%(lo,|
00000600  6c 6f 32 2b 31 29 3c 3e  31 33 35 8c 6c 65 76 25  |lo2+1)<>135.lev%|
00000610  28 6c 6f 2c 6c 6f 32 29  3d 31 32 39 0d 02 12 65  |(lo,lo2)=129...e|
00000620  e7 6c 65 76 25 28 6c 6f  2c 6c 6f 32 29 3d 31 33  |.lev%(lo,lo2)=13|
00000630  32 8c e7 6c 65 76 25 28  6c 6f 2c 6c 6f 32 2b 31  |2..lev%(lo,lo2+1|
00000640  29 3d 31 33 35 8c e7 6c  65 76 25 28 6c 6f 2d 31  |)=135..lev%(lo-1|
00000650  2c 6c 6f 32 2b 31 29 3d  31 33 35 8c 6c 65 76 25  |,lo2+1)=135.lev%|
00000660  28 6c 6f 2c 6c 6f 32 2b  31 29 3d 30 3a 6c 65 76  |(lo,lo2+1)=0:lev|
00000670  25 28 6c 6f 2d 31 2c 6c  6f 32 2b 31 29 3d 31 33  |%(lo-1,lo2+1)=13|
00000680  32 0d 02 1c 3b e7 6c 65  76 25 28 6c 6f 2c 6c 6f  |2...;.lev%(lo,lo|
00000690  32 29 3d 31 33 32 8c e7  6c 65 76 25 28 6c 6f 2c  |2)=132..lev%(lo,|
000006a0  6c 6f 32 2b 31 29 3c 3e  31 33 35 8c 6c 65 76 25  |lo2+1)<>135.lev%|
000006b0  28 6c 6f 2c 6c 6f 32 29  3d 31 32 39 0d 02 26 3d  |(lo,lo2)=129..&=|
000006c0  e7 6c 65 76 25 28 6c 6f  2c 6c 6f 32 29 3d 31 33  |.lev%(lo,lo2)=13|
000006d0  32 8c e7 6c 65 76 25 28  6c 6f 2d 31 2c 6c 6f 32  |2..lev%(lo-1,lo2|
000006e0  2b 31 29 3c 3e 31 33 35  8c 6c 65 76 25 28 6c 6f  |+1)<>135.lev%(lo|
000006f0  2c 6c 6f 32 29 3d 31 32  39 0d 02 30 65 e7 6c 65  |,lo2)=129..0e.le|
00000700  76 25 28 6c 6f 2c 6c 6f  32 29 3d 31 33 33 8c e7  |v%(lo,lo2)=133..|
00000710  6c 65 76 25 28 6c 6f 2c  6c 6f 32 2b 31 29 3d 31  |lev%(lo,lo2+1)=1|
00000720  33 35 8c e7 6c 65 76 25  28 6c 6f 2b 31 2c 6c 6f  |35..lev%(lo+1,lo|
00000730  32 2b 31 29 3d 31 33 35  8c 6c 65 76 25 28 6c 6f  |2+1)=135.lev%(lo|
00000740  2c 6c 6f 32 2b 31 29 3d  30 3a 6c 65 76 25 28 6c  |,lo2+1)=0:lev%(l|
00000750  6f 2b 31 2c 6c 6f 32 2b  31 29 3d 31 33 33 0d 02  |o+1,lo2+1)=133..|
00000760  3a 3b e7 6c 65 76 25 28  6c 6f 2c 6c 6f 32 29 3d  |:;.lev%(lo,lo2)=|
00000770  31 33 33 8c e7 6c 65 76  25 28 6c 6f 2c 6c 6f 32  |133..lev%(lo,lo2|
00000780  2b 31 29 3c 3e 31 33 35  8c 6c 65 76 25 28 6c 6f  |+1)<>135.lev%(lo|
00000790  2c 6c 6f 32 29 3d 31 32  39 0d 02 44 3d e7 6c 65  |,lo2)=129..D=.le|
000007a0  76 25 28 6c 6f 2c 6c 6f  32 29 3d 31 33 33 8c e7  |v%(lo,lo2)=133..|
000007b0  6c 65 76 25 28 6c 6f 2b  31 2c 6c 6f 32 2b 31 29  |lev%(lo+1,lo2+1)|
000007c0  3c 3e 31 33 35 8c 6c 65  76 25 28 6c 6f 2c 6c 6f  |<>135.lev%(lo,lo|
000007d0  32 29 3d 31 32 39 0d 02  4e 22 f2 6e 6f 74 65 3a  |2)=129..N".note:|
000007e0  f2 6b 65 79 3a f2 6e 6f  74 65 3a f2 73 63 72 65  |.key:.note:.scre|
000007f0  65 6e 3a f2 6e 6f 74 65  0d 02 58 89 e7 6c 65 76  |en:.note..X..lev|
00000800  25 28 6c 6f 2c 6c 6f 32  29 3d 31 33 34 8c e7 6c  |%(lo,lo2)=134..l|
00000810  65 76 25 28 6c 6f 2c 6c  6f 32 2d 31 29 3d 31 32  |ev%(lo,lo2-1)=12|
00000820  38 8c e7 6c 65 76 25 28  6c 6f 2b 31 2c 6c 6f 32  |8..lev%(lo+1,lo2|
00000830  2b 31 29 3d 31 32 38 8c  6c 65 76 25 28 6c 6f 2b  |+1)=128.lev%(lo+|
00000840  31 2c 6c 6f 32 29 3d 31  32 38 8c 6c 65 76 25 28  |1,lo2)=128.lev%(|
00000850  6c 6f 2b 31 2c 6c 6f 32  29 3d 31 33 37 3a 6c 65  |lo+1,lo2)=137:le|
00000860  76 25 28 6c 6f 2c 6c 6f  32 2b 31 29 3d 31 33 34  |v%(lo,lo2+1)=134|
00000870  3a 6c 65 76 25 28 6c 6f  2c 6c 6f 32 29 3d 31 32  |:lev%(lo,lo2)=12|
00000880  38 0d 02 62 31 e7 6c 65  76 25 28 6c 6f 2c 6c 6f  |8..b1.lev%(lo,lo|
00000890  32 29 3d 31 33 38 8c e7  6c 65 76 25 28 6c 6f 2c  |2)=138..lev%(lo,|
000008a0  6c 6f 32 2d 31 29 3d 31  33 30 8c 69 6e 3d 69 6e  |lo2-1)=130.in=in|
000008b0  2b 31 0d 02 6c 1f ed 2c  3a e7 69 6e 3e 68 69 6e  |+1..l..,:.in>hin|
000008c0  54 48 45 4e 43 48 41 49  4e 22 4c 45 56 45 4c 32  |THENCHAIN"LEVEL2|
000008d0  22 0d 02 76 05 e1 0d 02  80 0a f4 64 61 74 65 72  |"..v.......dater|
000008e0  0d ff                                             |..|
000008e2