�   DANGER UXB
�   ELECTRON VERS.
�   BY PETER AVERILL
*L.

��T^@
Y�HI%(6,2),N$(6,2):�A=0�6:�B=0�2:N$(A,B)=�$(&E00+12*B+36*A),11):HI%(A,B)=5000*(6-A):�,
Z�1:�19,3,4;0;:A%=7:�X%=0�15:Y%=0:�&B70:Y%=15:�&B70:�:�Y%=1�14:X%=0:�&B70:X%=15:�&B70:�
#�A%=3:Y%=2:�&11,1,100,25:�X%=3�12:�&B70:�:�0,2:�5:�332,872:�"D A N G E R   U X B":�4:�2:�8,10)"DO YOU WANT SOUND (Y/N)?";;:�:A=�:�A=89�A=78:�A=89K%=1�K%=0
-��A:?&F17=K%:�8,17)"WHICH SKILL LEVEL (1-3)?";:�:Ll%=�-48:� Ll%>0�Ll%<4:?&F22=Ll%:�;Ll%:�9,25)"PRESS ANY KEY TO START";:A=�:�1:�I:�4,28,4,31,36,0,23;8202;0;0;0;19,3,4;0;
2�B:�Y(500)
<�:�&121A:D%=?&F1D:�D%��t~@
Z*�?&F00>4 �Ll%<3 �Y(20-?&F00):�D%:�dH@
d�Ll%<3 �Y(20):�D%:�dH@
i�Y(7-7*(?&F00<5))
n�&1300:D%=?&F1D
�6�D%:L%=?&F19:M%=?&F1A:XM%=?&F15:YM%=?&F16:N%=?&F1C
�[�D%=4 ?&F00=?&F00-(?&F00<15):LF%=LF%-(?&F00=5):�A=24�54:�1,(A �4+1)*K%,4*A,2:�:�X:�Tr@
��D%=1�BA(XM%,YM%)
�$�D%=3�TOOLATE(L%/2,M%/2,XM%,YM%)
��D%=2�BC(N%?&F00,N%?&F04)
��D%=5�BC(XM%,YM%)
�Y�Y(500):�&11,-14*K%,37,20:�A=&B5C�&B6D �2:�1,-14*K%,?A,?(A+1):�:LF%=LF%-1:�LF%>0��Tr@

��2:�11,14)�(12)�11,16)�(12)�11,15)" GAME  OVER "�26,1);0:�Y(3000):SC%=0:�A%=0�2:SC%=SC%+(A%?&F1E �16+10*(A%?&F1E �16))*100^A%:�:�SC%>HI%(5,Ll%-1) �NEWHI

)�HSS:LF%=3:S%=1:?&F00=1:!&F1E=0:�Tr@
NG��I:LF%=3:S%=1:!&F1E=0:SK$=�224+�225+�10+�8+�8+�226+�227:?&F00=S%:�
X���B:?&F1B=0:�:?&F1C=1:�2:�2,0)"<SHEET>   <SCORE>    <LIVES>"�5,1);?&F00�26,1);LF%�12,1)"0":A%=0:�&12A9:?&F23=0:D%=0:?&F1D=D%
bv�&DE0:A%=7:B%=1:�X1%=0�10�5:�Y1%=0�7�7:X%=�(4)+X1%:Y%=�(7)+Y1%:?�A(X%,Y%)=7:B%?&F08=X%:B%?&F0E=Y%:B%=B%+1:�&B70:�,
lG�?�A(8,7)=3 ?&F15=8:?&F16=7:?�A(8,7)=5 � ?&F15=7:?&F16=7:?�A(7,7)=5
v A%=5:X%=?&F15:Y%=?&F16:�&B70
��Ll%<3��t^B
�5?�A(5,1)=11:X%=5:Y%=1:A%=11:�&B70:?&F01=5:?&F05=1
���?&F00>1 ?�A(5,14)=11:X%=5:Y%=14:�&B70:?&F02=5:?&F06=14:�?&F00>2 ?�A(10,1)=11:X%=10:Y%=1:�&B70:?&F03=10:?&F07=1:�?&F00>3 ?�A(10,14)=11:X%=10:Y%=14:�&B70:?&F04=10:?&F08=14
��?&F21=16*((41-20*(Ll%=1))�10)+(41-20*(Ll%=1))�10:?&F18=�(6):?&F19=(?(&F08+?&F18))*2:?&F1A=(?(&F0E+?&F18))*2:X%=(?&F19)�2:Y%=(?&F1A)�2:A%=9:�&B70:?�A(X%,Y%)=9
�^A%=13:�X1%=1�(?&F00+2-2*(?&F00>5)):�:X%=�(14):Y%=�(14):�?�A(X%,Y%)=3:�&B70:?�A(X%,Y%)=13:�
��?&F00<5 �
�TA%=7:�X1%=1�(?&F00-4)*2:�:X%=�(14):Y%=�(14):�?�A(X%,Y%)=3:?�A(X%,Y%)=7:�&B70:�:�
�Y��BA(X%,Y%):A%=7:�&B70:�N=1�10:�19,0,7,0;0:�M=15�0�-1:�&11,-15*K%,M,1:�:�19,0;0;0:�:�
�B��BC(X%,Y%):�&11,3*K%,0,25:�A=1�100:A%=5:�&B70:A%=11:�&B70:�:�
�l��HSS:�:�3:�3,2)"DANGER UXB LEVEL ";Ll%" TOP SIX"�3,3)�26,"_"):�1:�5,6)"SCORE     NAME      RATING":�2
�A=Ll%-1:�A%=0�5:B%=9+3*A%:N=HI%(A%,A)/1000:�N>100R$="KING"��N>50R$="MASTER"��N>35R$="V.GOOD"��N>20R$="GOOD"��N>10R$="FAIR"�R$="POOR"
�q�1,B%);A%+1"."�5,B%);HI%(A%,A)�12,B%)N$(A%,A)�25,B%)R$:�:�3:�2,30)"Type SPACEBAR to play again.":���(-99):�
���NEWHI:�:�19,1,14,0;0:�1:�11,10)"WELL DONE!"�5,11)"YOU ARE IN THE TOP SIX":�&11,-15*K%,121,6:�X1%=&B3C�&B5B �2:X%=?X1%:Y%=?(X1%+1)*2
�M�1,0,0,1:�1,-15*K%,X%,Y%:�:�5,13)"PLEASE ENTER YOUR NAME"�10,20)�11,"-")
G�:��(0)="":N$="":�10,20);:�:A%=�:�A%>31�A%<123 �(A%);:N$=N$+�(A%)
3�A%=127��(N$)>0 �127;"-";�8;:N$=�N$,(�(N$)-1))
��(N$)=11�A%=13
 iA=Ll%-1:�A%=5�0�-1:�SC%>HI%(A%,A) HI%(A%+1,A)=HI%(A%,A):N$(A%+1,A)=N$(A%,A):HI%(A%,A)=SC%:N$(A%,A)=N$
*�:�:�19,1,1,0;0:�
4+��TOOLATE(X%,Y%,I%,J%):�&11,3*K%,108,50
>@X=�(I%-X%):�I%=X% Y=�(J%-Y%) � Y=�((J%-Y%)/(I%-X%))*�(J%-Y%)
H�I=X%:J=Y%:A=7:�:A%=A:�&B70:I=I+X:J=J+Y:X%=I+.5:Y%=J+.5:A=?�A(X%,Y%):A%=7:�&B70:�Y(30):�X%=I%�Y%=J%:�&11,0,0,1:�BA(XM%,YM%):�
R? ��X:�:�&DE0:X1=�(14):Y%=14:�X%=1�14:A%=7-6*(X%=X1):�&B70:�
\��3,31)"PRESS Z KEY WHEN MAN MOVES";:�Y(1200):�&11,K%,70,255:X2=0:A%=5:x=0:y=0:�Y%=1�13:�X%=1�14:�&B70:�x*2,y*2)"  "�x*2,y*2+1)"  ":x=X%:y=Y%:�(-98) X2=X%:Y2=Y%:X%=14:Y%=13
f��,:�&11,0,0,1:�X2=0 �BA(14,13):� � �&11,3*K%,100,100:X%=X2:�Y%=Y2 �14:A%=5:�&B70:A%=1:Y%=Y%-1:�&B70:Y%=Y%+1:�Y(25):�:�&11,0,0,1:�X1<>X% �BA(X%,14):�
prB=4*(15-Y2):�11,1)"BONUS=";B*100:�21:�B%=1�B:A%=160:�&12A9:�:�6:�B%=1�10001�45:�&11,-15*K%,B%,1:�A%=1�10:�,:�
z��Y(X):�N=1�X:�:�
�ݤA(X,Y)=&E00+X+16*Y
�

00000000  0d 00 01 12 f4 20 20 20  44 41 4e 47 45 52 20 55  |.....   DANGER U|
00000010  58 42 0d 00 02 16 f4 20  20 20 45 4c 45 43 54 52  |XB.....   ELECTR|
00000020  4f 4e 20 56 45 52 53 2e  0d 00 03 18 f4 20 20 20  |ON VERS......   |
00000030  42 59 20 50 45 54 45 52  20 41 56 45 52 49 4c 4c  |BY PETER AVERILL|
00000040  0d 00 05 07 2a 4c 2e 0d  00 0a 0b ee 85 e5 8d 54  |....*L.........T|
00000050  5e 40 0d 00 14 59 de 48  49 25 28 36 2c 32 29 2c  |^@...Y.HI%(6,2),|
00000060  4e 24 28 36 2c 32 29 3a  e3 41 3d 30 b8 36 3a e3  |N$(6,2):.A=0.6:.|
00000070  42 3d 30 b8 32 3a 4e 24  28 41 2c 42 29 3d c0 24  |B=0.2:N$(A,B)=.$|
00000080  28 26 45 30 30 2b 31 32  2a 42 2b 33 36 2a 41 29  |(&E00+12*B+36*A)|
00000090  2c 31 31 29 3a 48 49 25  28 41 2c 42 29 3d 35 30  |,11):HI%(A,B)=50|
000000a0  30 30 2a 28 36 2d 41 29  3a ed 2c 0d 00 1e 5a eb  |00*(6-A):.,...Z.|
000000b0  31 3a ef 31 39 2c 33 2c  34 3b 30 3b 3a 41 25 3d  |1:.19,3,4;0;:A%=|
000000c0  37 3a e3 58 25 3d 30 b8  31 35 3a 59 25 3d 30 3a  |7:.X%=0.15:Y%=0:|
000000d0  d6 26 42 37 30 3a 59 25  3d 31 35 3a d6 26 42 37  |.&B70:Y%=15:.&B7|
000000e0  30 3a ed 3a e3 59 25 3d  31 b8 31 34 3a 58 25 3d  |0:.:.Y%=1.14:X%=|
000000f0  30 3a d6 26 42 37 30 3a  58 25 3d 31 35 3a d6 26  |0:.&B70:X%=15:.&|
00000100  42 37 30 3a ed 0d 00 23  9e 41 25 3d 33 3a 59 25  |B70:...#.A%=3:Y%|
00000110  3d 32 3a d4 26 31 31 2c  31 2c 31 30 30 2c 32 35  |=2:.&11,1,100,25|
00000120  3a e3 58 25 3d 33 b8 31  32 3a d6 26 42 37 30 3a  |:.X%=3.12:.&B70:|
00000130  ed 3a e6 30 2c 32 3a ef  35 3a ec 33 33 32 2c 38  |.:.0,2:.5:.332,8|
00000140  37 32 3a f1 22 44 20 41  20 4e 20 47 20 45 20 52  |72:."D A N G E R|
00000150  20 20 20 55 20 58 20 42  22 3a ef 34 3a fb 32 3a  |   U X B":.4:.2:|
00000160  f1 8a 38 2c 31 30 29 22  44 4f 20 59 4f 55 20 57  |..8,10)"DO YOU W|
00000170  41 4e 54 20 53 4f 55 4e  44 20 28 59 2f 4e 29 3f  |ANT SOUND (Y/N)?|
00000180  22 3b 3b 3a f5 3a 41 3d  a5 3a fd 41 3d 38 39 84  |";;:.:A=.:.A=89.|
00000190  41 3d 37 38 3a e7 41 3d  38 39 4b 25 3d 31 8b 4b  |A=78:.A=89K%=1.K|
000001a0  25 3d 30 0d 00 2d ae ef  41 3a 3f 26 46 31 37 3d  |%=0..-..A:?&F17=|
000001b0  4b 25 3a f1 8a 38 2c 31  37 29 22 57 48 49 43 48  |K%:..8,17)"WHICH|
000001c0  20 53 4b 49 4c 4c 20 4c  45 56 45 4c 20 28 31 2d  | SKILL LEVEL (1-|
000001d0  33 29 3f 22 3b 3a f5 3a  4c 6c 25 3d a5 2d 34 38  |3)?";:.:Ll%=.-48|
000001e0  3a fd 20 4c 6c 25 3e 30  80 4c 6c 25 3c 34 3a 3f  |:. Ll%>0.Ll%<4:?|
000001f0  26 46 32 32 3d 4c 6c 25  3a f1 3b 4c 6c 25 3a f1  |&F22=Ll%:.;Ll%:.|
00000200  8a 39 2c 32 35 29 22 50  52 45 53 53 20 41 4e 59  |.9,25)"PRESS ANY|
00000210  20 4b 45 59 20 54 4f 20  53 54 41 52 54 22 3b 3a  | KEY TO START";:|
00000220  41 3d a5 3a eb 31 3a f2  49 3a ef 34 2c 32 38 2c  |A=.:.1:.I:.4,28,|
00000230  34 2c 33 31 2c 33 36 2c  30 2c 32 33 3b 38 32 30  |4,31,36,0,23;820|
00000240  32 3b 30 3b 30 3b 30 3b  31 39 2c 33 2c 34 3b 30  |2;0;0;0;19,3,4;0|
00000250  3b 0d 00 32 0e f2 42 3a  f2 59 28 35 30 30 29 0d  |;..2..B:.Y(500).|
00000260  00 3c 1e f5 3a d6 26 31  32 31 41 3a 44 25 3d 3f  |.<..:.&121A:D%=?|
00000270  26 46 31 44 3a e7 44 25  8c 8d 74 7e 40 0d 00 5a  |&F1D:.D%..t~@..Z|
00000280  2a e7 3f 26 46 30 30 3e  34 20 80 4c 6c 25 3c 33  |*.?&F00>4 .Ll%<3|
00000290  20 f2 59 28 32 30 2d 3f  26 46 30 30 29 3a fd 44  | .Y(20-?&F00):.D|
000002a0  25 3a e5 8d 64 48 40 0d  00 64 1b e7 4c 6c 25 3c  |%:..dH@..d..Ll%<|
000002b0  33 20 f2 59 28 32 30 29  3a fd 44 25 3a e5 8d 64  |3 .Y(20):.D%:..d|
000002c0  48 40 0d 00 69 15 f2 59  28 37 2d 37 2a 28 3f 26  |H@..i..Y(7-7*(?&|
000002d0  46 30 30 3c 35 29 29 0d  00 6e 13 d6 26 31 33 30  |F00<5))..n..&130|
000002e0  30 3a 44 25 3d 3f 26 46  31 44 0d 00 be 36 fd 44  |0:D%=?&F1D...6.D|
000002f0  25 3a 4c 25 3d 3f 26 46  31 39 3a 4d 25 3d 3f 26  |%:L%=?&F19:M%=?&|
00000300  46 31 41 3a 58 4d 25 3d  3f 26 46 31 35 3a 59 4d  |F1A:XM%=?&F15:YM|
00000310  25 3d 3f 26 46 31 36 3a  4e 25 3d 3f 26 46 31 43  |%=?&F16:N%=?&F1C|
00000320  0d 00 c8 5b e7 44 25 3d  34 20 3f 26 46 30 30 3d  |...[.D%=4 ?&F00=|
00000330  3f 26 46 30 30 2d 28 3f  26 46 30 30 3c 31 35 29  |?&F00-(?&F00<15)|
00000340  3a 4c 46 25 3d 4c 46 25  2d 28 3f 26 46 30 30 3d  |:LF%=LF%-(?&F00=|
00000350  35 29 3a e3 41 3d 32 34  b8 35 34 3a d4 31 2c 28  |5):.A=24.54:.1,(|
00000360  41 20 83 34 2b 31 29 2a  4b 25 2c 34 2a 41 2c 32  |A .4+1)*K%,4*A,2|
00000370  3a ed 3a f2 58 3a e5 8d  54 72 40 0d 00 d2 15 e7  |:.:.X:..Tr@.....|
00000380  44 25 3d 31 f2 42 41 28  58 4d 25 2c 59 4d 25 29  |D%=1.BA(XM%,YM%)|
00000390  0d 00 dc 24 e7 44 25 3d  33 f2 54 4f 4f 4c 41 54  |...$.D%=3.TOOLAT|
000003a0  45 28 4c 25 2f 32 2c 4d  25 2f 32 2c 58 4d 25 2c  |E(L%/2,M%/2,XM%,|
000003b0  59 4d 25 29 0d 00 e6 1d  e7 44 25 3d 32 f2 42 43  |YM%).....D%=2.BC|
000003c0  28 4e 25 3f 26 46 30 30  2c 4e 25 3f 26 46 30 34  |(N%?&F00,N%?&F04|
000003d0  29 0d 00 f0 15 e7 44 25  3d 35 f2 42 43 28 58 4d  |).....D%=5.BC(XM|
000003e0  25 2c 59 4d 25 29 0d 00  fa 59 f2 59 28 35 30 30  |%,YM%)...Y.Y(500|
000003f0  29 3a d4 26 31 31 2c 2d  31 34 2a 4b 25 2c 33 37  |):.&11,-14*K%,37|
00000400  2c 32 30 3a e3 41 3d 26  42 35 43 b8 26 42 36 44  |,20:.A=&B5C.&B6D|
00000410  20 88 32 3a d4 31 2c 2d  31 34 2a 4b 25 2c 3f 41  | .2:.1,-14*K%,?A|
00000420  2c 3f 28 41 2b 31 29 3a  ed 3a 4c 46 25 3d 4c 46  |,?(A+1):.:LF%=LF|
00000430  25 2d 31 3a e7 4c 46 25  3e 30 8c 8d 54 72 40 0d  |%-1:.LF%>0..Tr@.|
00000440  01 04 9d fb 32 3a f1 8a  31 31 2c 31 34 29 89 28  |....2:..11,14).(|
00000450  31 32 29 8a 31 31 2c 31  36 29 89 28 31 32 29 8a  |12).11,16).(12).|
00000460  31 31 2c 31 35 29 22 20  47 41 4d 45 20 20 4f 56  |11,15)" GAME  OV|
00000470  45 52 20 22 8a 32 36 2c  31 29 3b 30 3a f2 59 28  |ER ".26,1);0:.Y(|
00000480  33 30 30 30 29 3a 53 43  25 3d 30 3a e3 41 25 3d  |3000):SC%=0:.A%=|
00000490  30 b8 32 3a 53 43 25 3d  53 43 25 2b 28 41 25 3f  |0.2:SC%=SC%+(A%?|
000004a0  26 46 31 45 20 83 31 36  2b 31 30 2a 28 41 25 3f  |&F1E .16+10*(A%?|
000004b0  26 46 31 45 20 81 31 36  29 29 2a 31 30 30 5e 41  |&F1E .16))*100^A|
000004c0  25 3a ed 3a e7 53 43 25  3e 48 49 25 28 35 2c 4c  |%:.:.SC%>HI%(5,L|
000004d0  6c 25 2d 31 29 20 f2 4e  45 57 48 49 0d 01 0e 29  |l%-1) .NEWHI...)|
000004e0  f2 48 53 53 3a 4c 46 25  3d 33 3a 53 25 3d 31 3a  |.HSS:LF%=3:S%=1:|
000004f0  3f 26 46 30 30 3d 31 3a  21 26 46 31 45 3d 30 3a  |?&F00=1:!&F1E=0:|
00000500  e5 8d 54 72 40 0d 02 4e  47 dd f2 49 3a 4c 46 25  |..Tr@..NG..I:LF%|
00000510  3d 33 3a 53 25 3d 31 3a  21 26 46 31 45 3d 30 3a  |=3:S%=1:!&F1E=0:|
00000520  53 4b 24 3d bd 32 32 34  2b bd 32 32 35 2b bd 31  |SK$=.224+.225+.1|
00000530  30 2b bd 38 2b bd 38 2b  bd 32 32 36 2b bd 32 32  |0+.8+.8+.226+.22|
00000540  37 3a 3f 26 46 30 30 3d  53 25 3a e1 0d 02 58 81  |7:?&F00=S%:...X.|
00000550  dd f2 42 3a 3f 26 46 31  42 3d 30 3a db 3a 3f 26  |..B:?&F1B=0:.:?&|
00000560  46 31 43 3d 31 3a fb 32  3a f1 8a 32 2c 30 29 22  |F1C=1:.2:..2,0)"|
00000570  3c 53 48 45 45 54 3e 20  20 20 3c 53 43 4f 52 45  |<SHEET>   <SCORE|
00000580  3e 20 20 20 20 3c 4c 49  56 45 53 3e 22 8a 35 2c  |>    <LIVES>".5,|
00000590  31 29 3b 3f 26 46 30 30  8a 32 36 2c 31 29 3b 4c  |1);?&F00.26,1);L|
000005a0  46 25 8a 31 32 2c 31 29  22 30 22 3a 41 25 3d 30  |F%.12,1)"0":A%=0|
000005b0  3a d6 26 31 32 41 39 3a  3f 26 46 32 33 3d 30 3a  |:.&12A9:?&F23=0:|
000005c0  44 25 3d 30 3a 3f 26 46  31 44 3d 44 25 0d 02 62  |D%=0:?&F1D=D%..b|
000005d0  76 d6 26 44 45 30 3a 41  25 3d 37 3a 42 25 3d 31  |v.&DE0:A%=7:B%=1|
000005e0  3a e3 58 31 25 3d 30 b8  31 30 88 35 3a e3 59 31  |:.X1%=0.10.5:.Y1|
000005f0  25 3d 30 b8 37 88 37 3a  58 25 3d b3 28 34 29 2b  |%=0.7.7:X%=.(4)+|
00000600  58 31 25 3a 59 25 3d b3  28 37 29 2b 59 31 25 3a  |X1%:Y%=.(7)+Y1%:|
00000610  3f a4 41 28 58 25 2c 59  25 29 3d 37 3a 42 25 3f  |?.A(X%,Y%)=7:B%?|
00000620  26 46 30 38 3d 58 25 3a  42 25 3f 26 46 30 45 3d  |&F08=X%:B%?&F0E=|
00000630  59 25 3a 42 25 3d 42 25  2b 31 3a d6 26 42 37 30  |Y%:B%=B%+1:.&B70|
00000640  3a ed 2c 0d 02 6c 47 e7  3f a4 41 28 38 2c 37 29  |:.,..lG.?.A(8,7)|
00000650  3d 33 20 3f 26 46 31 35  3d 38 3a 3f 26 46 31 36  |=3 ?&F15=8:?&F16|
00000660  3d 37 3a 3f a4 41 28 38  2c 37 29 3d 35 20 8b 20  |=7:?.A(8,7)=5 . |
00000670  3f 26 46 31 35 3d 37 3a  3f 26 46 31 36 3d 37 3a  |?&F15=7:?&F16=7:|
00000680  3f a4 41 28 37 2c 37 29  3d 35 0d 02 76 20 41 25  |?.A(7,7)=5..v A%|
00000690  3d 35 3a 58 25 3d 3f 26  46 31 35 3a 59 25 3d 3f  |=5:X%=?&F15:Y%=?|
000006a0  26 46 31 36 3a d6 26 42  37 30 0d 02 80 0f e7 4c  |&F16:.&B70.....L|
000006b0  6c 25 3c 33 8c 8d 74 5e  42 0d 02 8a 35 3f a4 41  |l%<3..t^B...5?.A|
000006c0  28 35 2c 31 29 3d 31 31  3a 58 25 3d 35 3a 59 25  |(5,1)=11:X%=5:Y%|
000006d0  3d 31 3a 41 25 3d 31 31  3a d6 26 42 37 30 3a 3f  |=1:A%=11:.&B70:?|
000006e0  26 46 30 31 3d 35 3a 3f  26 46 30 35 3d 31 0d 02  |&F01=5:?&F05=1..|
000006f0  94 ae e7 3f 26 46 30 30  3e 31 20 3f a4 41 28 35  |...?&F00>1 ?.A(5|
00000700  2c 31 34 29 3d 31 31 3a  58 25 3d 35 3a 59 25 3d  |,14)=11:X%=5:Y%=|
00000710  31 34 3a d6 26 42 37 30  3a 3f 26 46 30 32 3d 35  |14:.&B70:?&F02=5|
00000720  3a 3f 26 46 30 36 3d 31  34 3a e7 3f 26 46 30 30  |:?&F06=14:.?&F00|
00000730  3e 32 20 3f a4 41 28 31  30 2c 31 29 3d 31 31 3a  |>2 ?.A(10,1)=11:|
00000740  58 25 3d 31 30 3a 59 25  3d 31 3a d6 26 42 37 30  |X%=10:Y%=1:.&B70|
00000750  3a 3f 26 46 30 33 3d 31  30 3a 3f 26 46 30 37 3d  |:?&F03=10:?&F07=|
00000760  31 3a e7 3f 26 46 30 30  3e 33 20 3f a4 41 28 31  |1:.?&F00>3 ?.A(1|
00000770  30 2c 31 34 29 3d 31 31  3a 58 25 3d 31 30 3a 59  |0,14)=11:X%=10:Y|
00000780  25 3d 31 34 3a d6 26 42  37 30 3a 3f 26 46 30 34  |%=14:.&B70:?&F04|
00000790  3d 31 30 3a 3f 26 46 30  38 3d 31 34 0d 02 9e a1  |=10:?&F08=14....|
000007a0  3f 26 46 32 31 3d 31 36  2a 28 28 34 31 2d 32 30  |?&F21=16*((41-20|
000007b0  2a 28 4c 6c 25 3d 31 29  29 81 31 30 29 2b 28 34  |*(Ll%=1)).10)+(4|
000007c0  31 2d 32 30 2a 28 4c 6c  25 3d 31 29 29 83 31 30  |1-20*(Ll%=1)).10|
000007d0  3a 3f 26 46 31 38 3d b3  28 36 29 3a 3f 26 46 31  |:?&F18=.(6):?&F1|
000007e0  39 3d 28 3f 28 26 46 30  38 2b 3f 26 46 31 38 29  |9=(?(&F08+?&F18)|
000007f0  29 2a 32 3a 3f 26 46 31  41 3d 28 3f 28 26 46 30  |)*2:?&F1A=(?(&F0|
00000800  45 2b 3f 26 46 31 38 29  29 2a 32 3a 58 25 3d 28  |E+?&F18))*2:X%=(|
00000810  3f 26 46 31 39 29 81 32  3a 59 25 3d 28 3f 26 46  |?&F19).2:Y%=(?&F|
00000820  31 41 29 81 32 3a 41 25  3d 39 3a d6 26 42 37 30  |1A).2:A%=9:.&B70|
00000830  3a 3f a4 41 28 58 25 2c  59 25 29 3d 39 0d 02 a8  |:?.A(X%,Y%)=9...|
00000840  5e 41 25 3d 31 33 3a e3  58 31 25 3d 31 b8 28 3f  |^A%=13:.X1%=1.(?|
00000850  26 46 30 30 2b 32 2d 32  2a 28 3f 26 46 30 30 3e  |&F00+2-2*(?&F00>|
00000860  35 29 29 3a f5 3a 58 25  3d b3 28 31 34 29 3a 59  |5)):.:X%=.(14):Y|
00000870  25 3d b3 28 31 34 29 3a  fd 3f a4 41 28 58 25 2c  |%=.(14):.?.A(X%,|
00000880  59 25 29 3d 33 3a d6 26  42 37 30 3a 3f a4 41 28  |Y%)=3:.&B70:?.A(|
00000890  58 25 2c 59 25 29 3d 31  33 3a ed 0d 02 b2 0e e7  |X%,Y%)=13:......|
000008a0  3f 26 46 30 30 3c 35 20  e1 0d 02 bc 54 41 25 3d  |?&F00<5 ....TA%=|
000008b0  37 3a e3 58 31 25 3d 31  b8 28 3f 26 46 30 30 2d  |7:.X1%=1.(?&F00-|
000008c0  34 29 2a 32 3a f5 3a 58  25 3d b3 28 31 34 29 3a  |4)*2:.:X%=.(14):|
000008d0  59 25 3d b3 28 31 34 29  3a fd 3f a4 41 28 58 25  |Y%=.(14):.?.A(X%|
000008e0  2c 59 25 29 3d 33 3a 3f  a4 41 28 58 25 2c 59 25  |,Y%)=3:?.A(X%,Y%|
000008f0  29 3d 37 3a d6 26 42 37  30 3a ed 3a e1 0d 02 c6  |)=7:.&B70:.:....|
00000900  59 dd f2 42 41 28 58 25  2c 59 25 29 3a 41 25 3d  |Y..BA(X%,Y%):A%=|
00000910  37 3a d6 26 42 37 30 3a  e3 4e 3d 31 b8 31 30 3a  |7:.&B70:.N=1.10:|
00000920  ef 31 39 2c 30 2c 37 2c  30 3b 30 3a e3 4d 3d 31  |.19,0,7,0;0:.M=1|
00000930  35 b8 30 88 2d 31 3a d4  26 31 31 2c 2d 31 35 2a  |5.0.-1:.&11,-15*|
00000940  4b 25 2c 4d 2c 31 3a ed  3a ef 31 39 2c 30 3b 30  |K%,M,1:.:.19,0;0|
00000950  3b 30 3a ed 3a e1 0d 02  d0 42 dd f2 42 43 28 58  |;0:.:....B..BC(X|
00000960  25 2c 59 25 29 3a d4 26  31 31 2c 33 2a 4b 25 2c  |%,Y%):.&11,3*K%,|
00000970  30 2c 32 35 3a e3 41 3d  31 b8 31 30 30 3a 41 25  |0,25:.A=1.100:A%|
00000980  3d 35 3a d6 26 42 37 30  3a 41 25 3d 31 31 3a d6  |=5:.&B70:A%=11:.|
00000990  26 42 37 30 3a ed 3a e1  0d 02 da 6c dd f2 48 53  |&B70:.:....l..HS|
000009a0  53 3a db 3a fb 33 3a f1  8a 33 2c 32 29 22 44 41  |S:.:.3:..3,2)"DA|
000009b0  4e 47 45 52 20 55 58 42  20 4c 45 56 45 4c 20 22  |NGER UXB LEVEL "|
000009c0  3b 4c 6c 25 22 20 54 4f  50 20 53 49 58 22 8a 33  |;Ll%" TOP SIX".3|
000009d0  2c 33 29 c4 32 36 2c 22  5f 22 29 3a fb 31 3a f1  |,3).26,"_"):.1:.|
000009e0  8a 35 2c 36 29 22 53 43  4f 52 45 20 20 20 20 20  |.5,6)"SCORE     |
000009f0  4e 41 4d 45 20 20 20 20  20 20 52 41 54 49 4e 47  |NAME      RATING|
00000a00  22 3a fb 32 0d 02 e4 88  41 3d 4c 6c 25 2d 31 3a  |":.2....A=Ll%-1:|
00000a10  e3 41 25 3d 30 b8 35 3a  42 25 3d 39 2b 33 2a 41  |.A%=0.5:B%=9+3*A|
00000a20  25 3a 4e 3d 48 49 25 28  41 25 2c 41 29 2f 31 30  |%:N=HI%(A%,A)/10|
00000a30  30 30 3a e7 4e 3e 31 30  30 52 24 3d 22 4b 49 4e  |00:.N>100R$="KIN|
00000a40  47 22 8b e7 4e 3e 35 30  52 24 3d 22 4d 41 53 54  |G"..N>50R$="MAST|
00000a50  45 52 22 8b e7 4e 3e 33  35 52 24 3d 22 56 2e 47  |ER"..N>35R$="V.G|
00000a60  4f 4f 44 22 8b e7 4e 3e  32 30 52 24 3d 22 47 4f  |OOD"..N>20R$="GO|
00000a70  4f 44 22 8b e7 4e 3e 31  30 52 24 3d 22 46 41 49  |OD"..N>10R$="FAI|
00000a80  52 22 8b 52 24 3d 22 50  4f 4f 52 22 0d 02 e5 71  |R".R$="POOR"...q|
00000a90  f1 8a 31 2c 42 25 29 3b  41 25 2b 31 22 2e 22 8a  |..1,B%);A%+1".".|
00000aa0  35 2c 42 25 29 3b 48 49  25 28 41 25 2c 41 29 8a  |5,B%);HI%(A%,A).|
00000ab0  31 32 2c 42 25 29 4e 24  28 41 25 2c 41 29 8a 32  |12,B%)N$(A%,A).2|
00000ac0  35 2c 42 25 29 52 24 3a  ed 3a fb 33 3a f1 8a 32  |5,B%)R$:.:.3:..2|
00000ad0  2c 33 30 29 22 54 79 70  65 20 53 50 41 43 45 42  |,30)"Type SPACEB|
00000ae0  41 52 20 74 6f 20 70 6c  61 79 20 61 67 61 69 6e  |AR to play again|
00000af0  2e 22 3a f5 fd a6 28 2d  39 39 29 3a e1 0d 02 ee  |.":...(-99):....|
00000b00  8a dd f2 4e 45 57 48 49  3a db 3a ef 31 39 2c 31  |...NEWHI:.:.19,1|
00000b10  2c 31 34 2c 30 3b 30 3a  fb 31 3a f1 8a 31 31 2c  |,14,0;0:.1:..11,|
00000b20  31 30 29 22 57 45 4c 4c  20 44 4f 4e 45 21 22 8a  |10)"WELL DONE!".|
00000b30  35 2c 31 31 29 22 59 4f  55 20 41 52 45 20 49 4e  |5,11)"YOU ARE IN|
00000b40  20 54 48 45 20 54 4f 50  20 53 49 58 22 3a d4 26  | THE TOP SIX":.&|
00000b50  31 31 2c 2d 31 35 2a 4b  25 2c 31 32 31 2c 36 3a  |11,-15*K%,121,6:|
00000b60  e3 58 31 25 3d 26 42 33  43 b8 26 42 35 42 20 88  |.X1%=&B3C.&B5B .|
00000b70  32 3a 58 25 3d 3f 58 31  25 3a 59 25 3d 3f 28 58  |2:X%=?X1%:Y%=?(X|
00000b80  31 25 2b 31 29 2a 32 0d  02 f8 4d d4 31 2c 30 2c  |1%+1)*2...M.1,0,|
00000b90  30 2c 31 3a d4 31 2c 2d  31 35 2a 4b 25 2c 58 25  |0,1:.1,-15*K%,X%|
00000ba0  2c 59 25 3a ed 3a f1 8a  35 2c 31 33 29 22 50 4c  |,Y%:.:..5,13)"PL|
00000bb0  45 41 53 45 20 45 4e 54  45 52 20 59 4f 55 52 20  |EASE ENTER YOUR |
00000bc0  4e 41 4d 45 22 8a 31 30  2c 32 30 29 c4 31 31 2c  |NAME".10,20).11,|
00000bd0  22 2d 22 29 0d 03 02 47  f5 3a fd bf 28 30 29 3d  |"-")...G.:..(0)=|
00000be0  22 22 3a 4e 24 3d 22 22  3a f1 8a 31 30 2c 32 30  |"":N$="":..10,20|
00000bf0  29 3b 3a f5 3a 41 25 3d  a5 3a e7 41 25 3e 33 31  |);:.:A%=.:.A%>31|
00000c00  80 41 25 3c 31 32 33 20  f1 bd 28 41 25 29 3b 3a  |.A%<123 ..(A%);:|
00000c10  4e 24 3d 4e 24 2b bd 28  41 25 29 0d 03 0c 33 e7  |N$=N$+.(A%)...3.|
00000c20  41 25 3d 31 32 37 80 a9  28 4e 24 29 3e 30 20 f1  |A%=127..(N$)>0 .|
00000c30  bd 31 32 37 3b 22 2d 22  3b bd 38 3b 3a 4e 24 3d  |.127;"-";.8;:N$=|
00000c40  c0 4e 24 2c 28 a9 28 4e  24 29 2d 31 29 29 0d 03  |.N$,(.(N$)-1))..|
00000c50  16 13 fd a9 28 4e 24 29  3d 31 31 84 41 25 3d 31  |....(N$)=11.A%=1|
00000c60  33 0d 03 20 69 41 3d 4c  6c 25 2d 31 3a e3 41 25  |3.. iA=Ll%-1:.A%|
00000c70  3d 35 b8 30 88 2d 31 3a  e7 53 43 25 3e 48 49 25  |=5.0.-1:.SC%>HI%|
00000c80  28 41 25 2c 41 29 20 48  49 25 28 41 25 2b 31 2c  |(A%,A) HI%(A%+1,|
00000c90  41 29 3d 48 49 25 28 41  25 2c 41 29 3a 4e 24 28  |A)=HI%(A%,A):N$(|
00000ca0  41 25 2b 31 2c 41 29 3d  4e 24 28 41 25 2c 41 29  |A%+1,A)=N$(A%,A)|
00000cb0  3a 48 49 25 28 41 25 2c  41 29 3d 53 43 25 3a 4e  |:HI%(A%,A)=SC%:N|
00000cc0  24 28 41 25 2c 41 29 3d  4e 24 0d 03 2a 15 ed 3a  |$(A%,A)=N$..*..:|
00000cd0  db 3a ef 31 39 2c 31 2c  31 2c 30 3b 30 3a e1 0d  |.:.19,1,1,0;0:..|
00000ce0  03 34 2b dd f2 54 4f 4f  4c 41 54 45 28 58 25 2c  |.4+..TOOLATE(X%,|
00000cf0  59 25 2c 49 25 2c 4a 25  29 3a d4 26 31 31 2c 33  |Y%,I%,J%):.&11,3|
00000d00  2a 4b 25 2c 31 30 38 2c  35 30 0d 03 3e 40 58 3d  |*K%,108,50..>@X=|
00000d10  b4 28 49 25 2d 58 25 29  3a e7 49 25 3d 58 25 20  |.(I%-X%):.I%=X% |
00000d20  59 3d b4 28 4a 25 2d 59  25 29 20 8b 20 59 3d 94  |Y=.(J%-Y%) . Y=.|
00000d30  28 28 4a 25 2d 59 25 29  2f 28 49 25 2d 58 25 29  |((J%-Y%)/(I%-X%)|
00000d40  29 2a b4 28 4a 25 2d 59  25 29 0d 03 48 80 49 3d  |)*.(J%-Y%)..H.I=|
00000d50  58 25 3a 4a 3d 59 25 3a  41 3d 37 3a f5 3a 41 25  |X%:J=Y%:A=7:.:A%|
00000d60  3d 41 3a d6 26 42 37 30  3a 49 3d 49 2b 58 3a 4a  |=A:.&B70:I=I+X:J|
00000d70  3d 4a 2b 59 3a 58 25 3d  49 2b 2e 35 3a 59 25 3d  |=J+Y:X%=I+.5:Y%=|
00000d80  4a 2b 2e 35 3a 41 3d 3f  a4 41 28 58 25 2c 59 25  |J+.5:A=?.A(X%,Y%|
00000d90  29 3a 41 25 3d 37 3a d6  26 42 37 30 3a f2 59 28  |):A%=7:.&B70:.Y(|
00000da0  33 30 29 3a fd 58 25 3d  49 25 80 59 25 3d 4a 25  |30):.X%=I%.Y%=J%|
00000db0  3a d4 26 31 31 2c 30 2c  30 2c 31 3a f2 42 41 28  |:.&11,0,0,1:.BA(|
00000dc0  58 4d 25 2c 59 4d 25 29  3a e1 0d 03 52 3f 20 dd  |XM%,YM%):...R? .|
00000dd0  f2 58 3a db 3a d6 26 44  45 30 3a 58 31 3d b3 28  |.X:.:.&DE0:X1=.(|
00000de0  31 34 29 3a 59 25 3d 31  34 3a e3 58 25 3d 31 b8  |14):Y%=14:.X%=1.|
00000df0  31 34 3a 41 25 3d 37 2d  36 2a 28 58 25 3d 58 31  |14:A%=7-6*(X%=X1|
00000e00  29 3a d6 26 42 37 30 3a  ed 0d 03 5c b2 f1 8a 33  |):.&B70:...\...3|
00000e10  2c 33 31 29 22 50 52 45  53 53 20 5a 20 4b 45 59  |,31)"PRESS Z KEY|
00000e20  20 57 48 45 4e 20 4d 41  4e 20 4d 4f 56 45 53 22  | WHEN MAN MOVES"|
00000e30  3b 3a f2 59 28 31 32 30  30 29 3a d4 26 31 31 2c  |;:.Y(1200):.&11,|
00000e40  4b 25 2c 37 30 2c 32 35  35 3a 58 32 3d 30 3a 41  |K%,70,255:X2=0:A|
00000e50  25 3d 35 3a 78 3d 30 3a  79 3d 30 3a e3 59 25 3d  |%=5:x=0:y=0:.Y%=|
00000e60  31 b8 31 33 3a e3 58 25  3d 31 b8 31 34 3a d6 26  |1.13:.X%=1.14:.&|
00000e70  42 37 30 3a f1 8a 78 2a  32 2c 79 2a 32 29 22 20  |B70:..x*2,y*2)" |
00000e80  20 22 8a 78 2a 32 2c 79  2a 32 2b 31 29 22 20 20  | ".x*2,y*2+1)"  |
00000e90  22 3a 78 3d 58 25 3a 79  3d 59 25 3a e7 a6 28 2d  |":x=X%:y=Y%:..(-|
00000ea0  39 38 29 20 58 32 3d 58  25 3a 59 32 3d 59 25 3a  |98) X2=X%:Y2=Y%:|
00000eb0  58 25 3d 31 34 3a 59 25  3d 31 33 0d 03 66 98 ed  |X%=14:Y%=13..f..|
00000ec0  2c 3a d4 26 31 31 2c 30  2c 30 2c 31 3a e7 58 32  |,:.&11,0,0,1:.X2|
00000ed0  3d 30 20 f2 42 41 28 31  34 2c 31 33 29 3a e1 20  |=0 .BA(14,13):. |
00000ee0  8b 20 d4 26 31 31 2c 33  2a 4b 25 2c 31 30 30 2c  |. .&11,3*K%,100,|
00000ef0  31 30 30 3a 58 25 3d 58  32 3a e3 59 25 3d 59 32  |100:X%=X2:.Y%=Y2|
00000f00  20 b8 31 34 3a 41 25 3d  35 3a d6 26 42 37 30 3a  | .14:A%=5:.&B70:|
00000f10  41 25 3d 31 3a 59 25 3d  59 25 2d 31 3a d6 26 42  |A%=1:Y%=Y%-1:.&B|
00000f20  37 30 3a 59 25 3d 59 25  2b 31 3a f2 59 28 32 35  |70:Y%=Y%+1:.Y(25|
00000f30  29 3a ed 3a d4 26 31 31  2c 30 2c 30 2c 31 3a e7  |):.:.&11,0,0,1:.|
00000f40  58 31 3c 3e 58 25 20 f2  42 41 28 58 25 2c 31 34  |X1<>X% .BA(X%,14|
00000f50  29 3a e1 0d 03 70 72 42  3d 34 2a 28 31 35 2d 59  |):...prB=4*(15-Y|
00000f60  32 29 3a f1 8a 31 31 2c  31 29 22 42 4f 4e 55 53  |2):..11,1)"BONUS|
00000f70  3d 22 3b 42 2a 31 30 30  3a ef 32 31 3a e3 42 25  |=";B*100:.21:.B%|
00000f80  3d 31 b8 42 3a 41 25 3d  31 36 30 3a d6 26 31 32  |=1.B:A%=160:.&12|
00000f90  41 39 3a ed 3a ef 36 3a  e3 42 25 3d 31 b8 31 30  |A9:.:.6:.B%=1.10|
00000fa0  30 30 31 88 34 35 3a d4  26 31 31 2c 2d 31 35 2a  |001.45:.&11,-15*|
00000fb0  4b 25 2c 42 25 2c 31 3a  e3 41 25 3d 31 b8 31 30  |K%,B%,1:.A%=1.10|
00000fc0  3a ed 2c 3a e1 0d 03 7a  15 dd f2 59 28 58 29 3a  |:.,:...z...Y(X):|
00000fd0  e3 4e 3d 31 b8 58 3a ed  3a e1 0d 03 e8 18 dd a4  |.N=1.X:.:.......|
00000fe0  41 28 58 2c 59 29 3d 26  45 30 30 2b 58 2b 31 36  |A(X,Y)=&E00+X+16|
00000ff0  2a 59 0d ff                                       |*Y..|
00000ff4