Home » Personal collection » Acorn DFS disks » dfs_box03_disk04b_games_2_backup.scp » Q.DATA

Q.DATA

This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.

Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.

Tape/disk: Home » Personal collection » Acorn DFS disks » dfs_box03_disk04b_games_2_backup.scp
Filename: Q.DATA
Read OK:
File size: 2500 bytes
Load address: 1900
Exec address: 1900
Duplicates

There is 1 duplicate copy of this file in the archive:

File contents
TRANSFERPAINT2 �CUBEM  �CUBE  
���T���E 
��QpQ��RT2$Q-ASS8 $INDY500�Q-AdbCORE$!ME	������j�i�� =�� =�� =�� � ��� � ���� ��2� �  y Y��  ��  �������L�`������`����������� HL���& ��
0� �`�����
��\��
 {` Z�8�P���� ���8�8�����i
�L��i@��i��i�L� {��`��
����
 {��Z"�����������` Z�h�)�i�i�!��h��e��d��g��f Z������8�����` �� � ���
�p
 �� �` ��p�� ��- ���`� � � � � � �` ��i� ��i@��i���!��&��+Lt�~ �Lt��������n��8�K �` ��8�� ��8�@������!��&��+Lt ��i
� ��8�8������!��&��+Lt ��8�
� ��i8��i���!��&��+Lt�iP��i�`�8�P����` ���` k�h��
�h��e��d��g��g�j�i � Z BL>��
� ��8��h�3�>�G�H�L>�h�7�A�L�M�����
���<�������s� �Lt ���`��p
���8��p
� ���
�� �  �`���
 ��� ���`���
 �� � ��p
 ��< ���`� � � � � � �`�x�� ��� �`�� P��� P��� P��� P�`���`���`���`���`���� �` k�h�`�h�0Z ��}�L��h8���p
�@�h �d8�@�d�e��eL>�h8�
��p
��h �di8�d�ei�eL> Z` ��}�)L��hi��p
��h ,�di@�d�ei�eL>�hi
��p
�h ,�d8�8�d�e��eL>�fiP�f�gi�g`�f8�P�f�g��g`���� �h�
��^��
 Z` ���� ���` �� � �h�p
 �� ��
`� � �d �e �f �g �` Z��`��k� ���� �`�{�:�{�A�0�{�|�:�|�2�0�|�}�:�}�#�0�}�~�:�~��0�~��:���0�� � � � ���{ ���0 � �`�|i�|�:0ǭ|8�
�|�}�:�}д�0�}�~�:�~Х�0�~L΀�/̀�)�9��΁�/́��9��΂�/͂��0������� � �
 � �� �� �� �0 � �`���������`��]��Z]U�Z��8.Z.[.\.]��ܭ]`�
�� � �_i�0� �_� � � ����0�`NO%=Diff%(2,LVL%)
� �4:�17,1);LVL%:�5
�e �0,13:�I%=1�3:� 225,425:�(242+I%):� 955,425:�(242+I%):�0,(I%+13):�:?COL%=3:COL%?1=2:COL%?2=1  
�g �I%=0�8:�J%=0�8-I%:A%=90-I%*10+J%+1:�
�=&2900:?18=0:?19=&29
#�"�Q*BERT (C)1983�PETER JOHNSON

�Col%(6,15),Diff%(2,15)
=� HI%(5),HI$(5):�I%=1�5:HI$(I%)="Superior":HI%(I%)=1000:�
"�KEY10 PAGE=&1700|MOLD|MG.10|M
��DZ@
ZSCORE%=0:LC%=0:�t\S
d� MACH=&E00:PXH%=MACH:PXL%=MACH+1:PYH%=MACH+2:PYL%=MACH+3:MP%=MACH+4:BMAX%=MACH+24:CHANGE%=MACH+25:SPEED%=MACH+26:PP%=MACH+27:STATUS%=MACH+28:BNO%=MACH+29
�� NOSE%=MACH+30:CONSTANT=MACH+85:SHIFTREG=MACH+90:COL%=MACH+95:PCHAR1%=NOSE%+3:PCHAR2%=NOSE%+8:PCHAR3%=NOSE%+13:SXL%=MACH+100:SXH%=MACH+101:SYL%=MACH+102:SYH%=MACH+103:SP%=MACH+104:SCNTNO%=MACH+106
�� SC1%=MACH+123:SC2%=MACH+124:SC3%=MACH+125:SC4%=MACH+126:SC5%=MACH+127:BON1%=MACH+128:BON2%=MACH+129:BON3%=MACH+130:CODE%=MACH+150
� CHARM%=&D00:COLM%=&D70
�%�J%=1�15:�I%=0�6:�Col%(I%,J%):�:�
�� �2,3,7,0,0,4,6, 2,6,3,0,0,1,7, 2,4,6,0,0,1,3, 2,0,7,0,0,2,7, 2,7,4,0,0,5,6, 2,7,0,0,0,2,3, 2,4,3,7,0,4,7, 3,7,6,4,0,1,6, 3,3,0,7,0,2,5, 3,0,6,3,0,7,5, 4,3,6,7,0,0,0, 4,4,3,6,7,7,7, 4,7,0,3,6,8,15, 4,15,8,11,12,0,0, 4,15,8,15,8,0,0
�'�J%=1�15:�I%=0�2:�Diff%(I%,J%):�:� 
�w�110,2,20,100,2,12,100,2,6,100,2,4,90,3,12,90,3,6,85,3,3,85,2,6,70,3,12,65,4,28,65,4,18,65,4,9,65,4,6,65,4,6,65,4,6
T3 �2:�23;8202;0;0;0;:MEN%=2:�I%=0�4:I%?SC1%=48:�
^} �19,8,2,0,0,0, 19,9,5,0,0,0, 19,10,1,0,0,0, 19,11,4,0,0,0, 19,12,1,0,0,0, 19,13,1,0,0,0, 19,14,2,0,0,0, 19,15,3,0,0,0, 5
_* � I%=1�6:�19,I%,Col%(I%,LVL%),0,0,0:�
r� �0,13:�120,800:�249,250,251,252:�156,765:�253:�0,1:�255:�0,13:�254:� 1030,800:� 1094,800:� 1094,720:� 830,720:� 830,800:� 880,800:�880,800:�246,247,248
|3�4:�0,1);"SCORE:000000":�13,1);"LVL:";LVL%:�5
�^�I%=1�8:�J%=0�8-I%:A%=90-I%*10+J%+1:X%=664-(7-I%)*56+120*(J%-1):Y%=120+I%*80:�0,1:�BOX:�:�
�: C1=Col%(0,LVL%):� I%=1�6:�19,I%,Col%(I%,LVL%),0,0,0:�
�' ?BON1%=49:?BON2%=48:?BON3%=49+C1-2
�Z �I%=0�99:COLM%?I%=0:�:�I%=1�8:�J%=1�I%:A%=I%*10+J%:A%?COLM%=C1:�:�:?CHANGE%=36*(C1-1)
�3 �I%=0�99:CHARM%?I%=0:�:CHARM%?50=3:CHARM%?56=3
̕ ?PP%=53:?PXH%=2:?PXL%=76:?PYH%=1:?PYL%=176:?SP%=0:?SXH%=4:?SXL%=0:?SYH%=4:?SYL%=0:?CONSTANT=&53:?(CONSTANT+1)=&71:?(CONSTANT+2)=&76:!SHIFTREG=� 
�F ?SPEED%=Diff%(0,LVL%):?BMAX%=Diff%(1,LVL%):?SCNTNO%=Diff%(2,LVL%)
� �4:�17,1);LVL%:�5
�e �0,13:�I%=1�3:� 225,425:�(242+I%):� 955,425:�(242+I%):�0,(I%+13):�:?COL%=3:COL%?1=2:COL%?2=1  
�g �I%=0�8:�J%=0�8-I%:A%=90-I%*10+J%+1:�0,A%?COLM%:X%=664-(7-I%)*56+120*(J%-1):Y%=120+I%*80:�TOP:�:� 
�L � 100,900:� MEN%>0 � �I%=1�MEN%:�0,10:�230:�0,7:�8:�231:�0,0:�8:�232:� 
�0�0,0:�255:�CODE%:� ?STATUS% � �tjO,�toO,�ttO
�3�0,-15,6,10:MEN%=MEN%-1:�MEN%=-1 �tHS � �dGK 
�g MEN%=MEN%-1:�25,4,?PXL%,?PXH%,?PYL%,?PYH%:�0,0:� ?PCHAR1%:FX%=?PXL%+?PXH%*255:FY%=?PYL%+?PYH%*255 
�\ �I%=FY%�FY%-50 � -16:�0,10:� FX%,I%:� ?PCHAR1%:�8:�0,7:� ?PCHAR2%:�8:�0,0:� ?PCHAR3%:�8
�= � ?PCHAR1%:�1,1,55-(FY%-I%),1:�:� MEN%=-1 � �tHS � �dGK 
�� �I%=0�200 �4:�19,�(6),�(7),0,0,0:�1,1,I%,1:�2,1,I%+16,1:�3,1,I%+28,1:�:�I%=1�LVL%:?SC1%=?SC1%+(?BON1%)-48:� ?SC1%>57 � ?SC1%=?SC1%-10:?SC2%=?SC2%+1+(?BON2%)-48 � ?SC2%=?SC2%+(?BON2%)-48
�S � ?SC2%>57 ?SC2%=?SC2%-10:?SC3%=?SC3%+1+(?BON3%)-48 � ?SC3%=?SC3%+(?BON3%)-48 
�m� ?SC3%>57 ?SC3%=?SC3%-10:?SC4%=?SC4%+1:� ?SC4%>57 ?SC4%=?SC4%-10:?SC5%=?SC5%+1:� ?SC5%>57 ?SC5%=?SC5%-10
�# �:LVL%=LVL%+1:�LVL%>15 LVL%=10
�+ MEN%=MEN%+1:�1,0,0,30:�1,1,200,7:�txK
�� � 330,600:�0,7:�"GAME OVER":� 326,604:�0,10:�"GAME OVER":SCORE%=0:SCORE%=SCORE%+?SC1%*10+?SC2%*100+?SC3%*1000+?SC4%*10000+?SC5%*100000-5333280:�I%=1�10000:� 
�Y �7:�23;8202;0;0;0;:�10);"Superior Software's":�HD:�8,22);"�Author:  Peter Johnson"
� PS%=0:�I%=1�5:�SCORE%>HI%(I%) �J%=4�I%�-1:HI%(J%+1)=HI%(J%):HI$(J%+1)=HI$(J%):�:PS%=I%:HI%(I%)=SCORE%:HI$(I%)=" ":I%=6:��
�O �12,7);"THE NOSER ELITE:":�I%=1�5:�10,I%*2+7);"�";HI%(I%);�11);HI$(I%):�
�*FX15,0
�B��dTS:�I=1�12:�A%,D%:�1,1,A%,D%:�2,1,A%,D%:�1,0,0,0:�2,0,0,0:�
�B � 50,2,66,2,78,2,98,4,78,2,66,2,50,2,70,2,66,2,58,2,66,2,50,6
�}�PS%>0:�8,20);"�� �ENTER YOUR NAME.   �";�20,PS%*2+7);:�HI$(PS%):HI$(PS%)=�HI$(PS%),8):�1,PS%*2+7);"�";�20,PS%*2+7);" "
pB�LC%<1�LC%>9 �8,20);"���SELECT LEVEL (1-9)  �":LC%=�-48:�DpW
�A LVL%=LC%:�8,20);"����PRESS SPACE BAR.  ��":���(-99):�:�Dd@
'���HD:�"   � x|t �4h4h�h4  �_||0     � _0"'"   �j7 k5��n=!�j5  �~qr}�h4p �pzup"'"   �j5 j5�/o?/�jup �o����j?�%��k7�"'"   �j5lz5�8k7d�j7+}��m|'�j5  � j5"'"   ��o|?}�!�!��jux?�    �j5  � *}z"'"              ��``             ��!"
' �
*�e ��BOX:�TOP:�0,5:�85,X%+56,Y%-80:�85,X%,Y%-108:�0,6:� X%,Y%-56:�85,X%-56,Y%-80:�85,X%-56,Y%-28:� 
.�>��TOP:�X%,Y%:�X%-56,Y%-28:�85,X%+56,Y%-28:�85,X%,Y%-56:�  
���  
�
 �"�Q*BERT loader program
 �"�(C)1983 PETER JOHNSON
 *TV255
, � 1,1,0,0,0,0,0,0,126,-10,0,-10,126,100
. � 2,2,-2,2,0,4,8,1,126,-5,0,-20,126,100  
, � 3,2,-1,1,0,2,5,0,126,-5,0,-10,126,100
+ � 4,4,1,0,0,48,0,0,126,0,0,-10,126,126

\ �23,224,24,60,126,126,126,126,60,24, 23,225,0,16,32,0,0,0,0,0, 23,226,0,0,0,0,0,4,8,0  
_ �23,227,28,62,62,60,28,126,126,60, 23,228,0,0,10,36,16,8,66,60, 23,229,16,0,32,8,0,68,16,0
� �23,230,28,62,62,62,126,254,254,220, 23,231,0,60,20,0,0,0,12,0, 23,232,0,0,40,0,0,8,16,0, 23,233,56,124,124,124,126,127,127,59, 23,234,0,60,40,0,0,0,48,0, 23,235,0,0,20,0,0,16,8,0 
(� �23,236,56,124,124,124,126,127,127,56, 23,237,0,8,12,0,0,0,8,0, 23,238,0,4,0,0,0,0,2,0, 23,239,28,62,62,62,254,254,254,28, 23,240,0,16,48,0,0,0,16,0, 23,241,0,32,0,0,0,0,64,0 
2� �23,242,30,63,50,56,28,230,126,60, 23,243,12,8,48,228,134,134,6,4, 23,244,48,16,14,19,113,97,96,32, 23,245,0,102,193,8,8,24,24,24  
<i �23,246,238,170,234,170,238,0,0,0, 23,247,170,234,234,170,174,0,0,0, 23,248,224,128,224,32,224,0,0,0
F� �23,249,234,138,142,138,234,0,0,0, 23,250,234,174,238,170,170,0,0,0, 23,251,238,136,172,168,238,0,0,0, 23,252,119,37,37,37,39,0,0,0, 23,253,8,12,254,255,255,254,12,8, 23,254,16,48,127,255,255,127,48,16  
P- �23,255,255,255,255,255,255,255,255,255 
Q �7:�23;8202;0;0;0;
RU�10,9);"Superior Software's":�HEAD:�8,16)"�Author: Peter Johnson":�I%=1�10000:�
Z� �0,16)"�       You are placed on a pyramid of"'"� cubes, you gain points by turning the"'"� top of each cube to a new colour." 
[� �"�       You must be careful not to fall"'"� off the edge of the pyramid, or be"'" �crushed or eaten by the pyramid's"'"� occupants."; 
\� �" The spinning disks will"'"� teleport you to the top of the cube,"'"� and may be used to lure the snake to "'" �its death."
_T �'�2);"�KEYS:'A'-NorthWest  '*'-NorthEast";�7);"�'Z'-SouthWest  '?'-SouthEast" 
` �I=0�3:�:�
a �I%=0�31:� A%:I%?&70=A%:�
bK � 0,0,1,0,4,0,1,0, 3,0,2,0,50,0,3,0, 2,0,2,0,52,0,3,0, 1,0,3,0,2,0,3,0
d �28,0,24,39,21:*FX15,0
n+ �"     ���PRESS SPACE BAR TO START  �"
x�23;8202;0;0;0;
��A%=�:�A%=32:�=&1700:�
'���HEAD:�"   � x|t �4h4h�h4  �_||0     � _0"'"   �j7 k5��n=!�j5  �~qr}�h4p �pzup"'"   �j5 j5�/o?/�jup �o����j?�%��k7�"'"   �j5lz5�8k7d�j7+}��m|'�j5  � j5"'"   ��o|?}�!�!��jux?�    �j5  � *}z"'"              ��``           �";
' �32;�32;�162;�33:� 
�
00000000  54 52 41 4e 53 46 45 52  50 41 49 4e 54 32 20 a4  |TRANSFERPAINT2 .|
00000010  43 55 42 45 4d 20 20 a4  43 55 42 45 20 20 12 00  |CUBEM  .CUBE  ..|
00000020  0a e6 08 12 00 07 e7 08  12 00 00 e8 54 12 00 08  |............T...|
00000030  e0 08 12 00 07 e1 08 12  00 00 e2 45 19 00 20 00  |...........E.. .|
00000040  0a 00 19 00 c7 ff e3 ff  19 51 70 00 00 00 19 51  |.........Qp....Q|
00000050  c7 ff e3 ff 52 54 32 24  51 2d 41 53 53 38 20 24  |....RT2$Q-ASS8 $|
00000060  49 4e 44 59 35 30 30 a4  51 2d 41 00 00 04 00 64  |INDY500.Q-A....d|
00000070  00 03 00 03 00 03 00 62  00 05 00 43 4f 52 45 24  |.......b...CORE$|
00000080  21 4d 45 12 00 09 e3 08  12 00 0b e4 08 12 00 0c  |!ME.............|
00000090  e5 00 00 00 00 00 a9 00  8d 1c 0e ad 6a 0e 8d 69  |............j..i|
000000a0  0e a9 01 8d 1d 0e 20 3d  10 a9 02 8d 1d 0e 20 3d  |...... =...... =|
000000b0  10 a9 03 8d 1d 0e 20 3d  10 a9 00 8d 1d 0e 20 a0  |...... =...... .|
000000c0  12 20 16 15 a9 00 8d 91  0e 20 14 16 ae 1a 0e 20  |. ....... ..... |
000000d0  dd 15 ea ea ea 20 14 16  ad 1a 0e e9 32 aa 20 dd  |..... ......2. .|
000000e0  15 20 1b 13 20 79 15 20  59 13 ad 1c 0e d0 20 20  |. .. y. Y.....  |
000000f0  10 0f ad 1c 0e d0 18 20  1b 13 20 f2 10 ad 19 0e  |....... .. .....|
00000100  d0 05 a9 03 8d 1c 0e ad  1c 0e d0 03 4c c4 0e 60  |............L..`|
00000110  ee 1d 0e ad 1d 0e cd 18  0e d0 06 a9 00 8d 1d 0e  |................|
00000120  60 ac 1d 0e b9 04 0e 8d  04 0e b9 08 0e 8d 08 0e  |`...............|
00000130  b9 0c 0e 8d 0c 0e b9 14  0e 8d 14 0e b9 10 0e 8d  |................|
00000140  10 0e 20 48 0f 4c 10 0f  ad 04 0e c9 00 d0 26 20  |.. H.L........& |
00000150  ea 15 c9 0a 30 06 a2 0f  20 dd 15 60 a9 0b ac 1d  |....0... ..`....|
00000160  0e 99 04 0e a8 b9 00 0d  c9 01 f0 5c a9 02 99 00  |...........\....|
00000170  0d 20 7b 10 60 20 5a 10  ad 14 0e 38 e9 50 8d 14  |. {.` Z....8.P..|
00000180  0e ad 10 0e e9 00 8d 10  0e 20 ea 15 90 1d ad 0c  |......... ......|
00000190  0e 38 e9 38 8d 0c 0e ad  08 0e e9 00 8d 08 0e ad  |.8.8............|
000001a0  04 0e 18 69 0a 8d 04 0e  4c d1 0f ad 0c 0e 18 69  |...i....L......i|
000001b0  40 8d 0c 0e ad 08 0e 69  00 8d 08 0e ad 04 0e 18  |@......i........|
000001c0  69 0b 8d 04 0e 4c d1 0f  20 7b 10 a9 01 8d 1c 0e  |i....L.. {......|
000001d0  60 ac 04 0e b9 00 0d c9  01 f0 ed a9 02 99 00 0d  |`...............|
000001e0  20 7b 10 ad 04 0e c9 5a  10 22 ac 1d 0e ad 04 0e  | {.....Z."......|
000001f0  99 04 0e ad 08 0e 99 08  0e ad 0c 0e 99 0c 0e ad  |................|
00000200  10 0e 99 10 0e ad 14 0e  99 14 0e 60 20 5a 10 ad  |...........` Z..|
00000210  68 0e d0 29 ce 69 0e ad  69 0e d0 21 ad 04 0e 8d  |h..).i..i..!....|
00000220  68 0e ad 08 0e 8d 65 0e  ad 0c 0e 8d 64 0e ad 10  |h.....e.....d...|
00000230  0e 8d 67 0e ad 14 0e 8d  66 0e 20 5a 14 ac 1d 0e  |..g.....f. Z....|
00000240  a9 00 99 04 0e a9 02 99  08 0e a9 38 99 0c 0e a9  |...........8....|
00000250  02 99 10 0e a9 f0 99 14  0e 60 20 95 10 a9 12 20  |.........` .... |
00000260  ee ff a9 00 20 ee ff ac  04 0e a9 00 99 00 0d b9  |.... ...........|
00000270  70 0d 20 ee ff a9 e0 20  ee ff 60 20 95 10 a2 70  |p. .... ..` ...p|
00000280  a0 00 a9 07 20 f1 ff a0  00 b9 2d 0e 20 ee ff c8  |.... .....-. ...|
00000290  c0 0e d0 f5 60 a9 19 20  ee ff a9 04 20 ee ff ad  |....`.. .... ...|
000002a0  0c 0e 20 ee ff ad 08 0e  20 ee ff ad 14 0e 20 ee  |.. ..... ..... .|
000002b0  ff ad 10 0e 20 ee ff 60  20 b9 12 ad 1b 0e 18 69  |.... ..` ......i|
000002c0  0b 8d 1b 0e 20 b3 11 ad  01 0e 18 69 40 8d 01 0e  |.... ......i@...|
000002d0  ad 00 0e 69 00 8d 00 0e  a9 e9 8d 21 0e a9 ea 8d  |...i.......!....|
000002e0  26 0e a9 eb 8d 2b 0e 4c  74 12 a9 7e 20 f4 ff 4c  |&....+.Lt..~ ..L|
000002f0  74 12 ad 91 0e c9 01 f0  12 c9 02 f0 bb c9 03 f0  |t...............|
00000300  6e c9 04 f0 38 a2 4b 20  dd 15 60 20 b9 12 ad 1b  |n...8.K ..` ....|
00000310  0e 38 e9 0b 8d 1b 0e 20  a1 11 ad 01 0e 38 e9 40  |.8..... .....8.@|
00000320  8d 01 0e ad 00 0e e9 00  8d 00 0e a9 ef 8d 21 0e  |..............!.|
00000330  a9 f0 8d 26 0e a9 f1 8d  2b 0e 4c 74 12 20 b9 12  |...&....+.Lt. ..|
00000340  ad 1b 0e 18 69 0a 8d 1b  0e 20 b3 11 ad 01 0e 38  |....i.... .....8|
00000350  e9 38 8d 01 0e ad 00 0e  e9 00 8d 00 0e a9 e6 8d  |.8..............|
00000360  21 0e a9 e7 8d 26 0e a9  e8 8d 2b 0e 4c 74 12 20  |!....&....+.Lt. |
00000370  b9 12 ad 1b 0e 38 e9 0a  8d 1b 0e 20 a1 11 ad 01  |.....8..... ....|
00000380  0e 18 69 38 8d 01 0e ad  00 0e 69 00 8d 00 0e a9  |..i8......i.....|
00000390  ec 8d 21 0e a9 ed 8d 26  0e a9 ee 8d 2b 0e 4c 74  |..!....&....+.Lt|
000003a0  12 ad 03 0e 18 69 50 8d  03 0e ad 02 0e 69 00 8d  |.....iP......i..|
000003b0  02 0e 60 ad 03 0e 38 e9  50 8d 03 0e ad 02 0e e9  |..`...8.P.......|
000003c0  00 8d 02 0e 60 20 a0 12  a9 02 8d 1c 0e 60 20 6b  |....` .......` k|
000003d0  14 ac 68 0e a9 00 99 00  0d 8d 68 0e ad 00 0e 8d  |..h.......h.....|
000003e0  65 0e ad 01 0e 8d 64 0e  ad 02 0e 8d 67 0e ad 03  |e.....d.....g...|
000003f0  0e 8d 67 0e ad 6a 0e 8d  69 0e 20 b8 14 20 5a 14  |..g..j..i. .. Z.|
00000400  20 42 15 4c 3e 12 ae 1b  0e bd 00 0d f0 b7 20 b9  | B.L>......... .|
00000410  12 e0 38 f0 16 ac 68 0e  c0 33 f0 b2 c0 3e f0 ae  |..8...h..3...>..|
00000420  c0 47 f0 aa c0 48 f0 a6  4c 3e 12 ac 68 0e c0 37  |.G...H..L>..h..7|
00000430  f0 9c c0 41 f0 98 c0 4c  f0 94 c0 4d f0 90 a9 0b  |...A...L...M....|
00000440  8d 1b 0e ac 1b 0e a9 01  99 00 0d a9 02 8d 00 0e  |................|
00000450  a9 3c 8d 01 0e a9 02 8d  02 0e a9 f0 8d 03 0e a0  |.<..............|
00000460  0e a2 73 a9 07 20 f1 ff  4c 74 12 20 a0 12 a9 01  |..s.. ..Lt. ....|
00000470  8d 1c 0e 60 ac 1b 0e b9  70 0d f0 8a c9 01 f0 0c  |...`....p.......|
00000480  38 e9 01 99 70 0d ce 19  0e 20 cb 14 ac 1b 0e b9  |8...p.... ......|
00000490  00 0d c9 02 10 d5 20 b9  12 20 08 13 20 a0 12 60  |...... .. .. ..`|
000004a0  ac 1b 0e a9 01 99 00 0d  20 e5 12 a0 00 b9 1e 0e  |........ .......|
000004b0  20 ee ff c8 c0 0e d0 f5  60 ac 1b 0e a9 00 99 00  | .......`.......|
000004c0  0d 20 e5 12 a9 12 20 ee  ff a9 00 20 ee ff ac 1b  |. .... .... ....|
000004d0  0e b9 70 0d 20 ee ff a0  00 b9 3c 0e 20 ee ff c8  |..p. .....<. ...|
000004e0  c0 18 d0 f5 60 a9 19 20  ee ff a9 04 20 ee ff ad  |....`.. .... ...|
000004f0  01 0e 20 ee ff ad 00 0e  20 ee ff ad 03 0e 20 ee  |.. ..... ..... .|
00000500  ff ad 02 0e 20 ee ff 60  a2 78 a0 00 a9 07 20 f1  |.... ..`.x.... .|
00000510  ff a2 80 a0 00 a9 07 20  f1 ff 60 a2 be 20 50 13  |....... ..`.. P.|
00000520  d0 16 a2 9e 20 50 13 d0  15 a2 b7 20 50 13 d0 14  |.... P..... P...|
00000530  a2 97 20 50 13 d0 13 60  a9 01 8d 91 0e 60 a9 02  |.. P...`.....`..|
00000540  8d 91 0e 60 a9 03 8d 91  0e 60 a9 04 8d 91 0e 60  |...`.....`.....`|
00000550  a0 ff a9 81 20 f4 ff 8a  60 20 6b 14 ad 68 0e d0  |.... ...` k..h..|
00000560  01 60 ad 68 0e cd 1b 0e  30 5a 20 ea 15 c9 7d 90  |.`.h....0Z ...}.|
00000570  03 4c 9a 13 ad 68 0e 38  e9 0b a8 b9 70 0d f0 40  |.L...h.8....p..@|
00000580  8c 68 0e 20 1a 14 ad 64  0e 38 e9 40 8d 64 0e ad  |.h. ...d.8.@.d..|
00000590  65 0e e9 00 8d 65 0e 4c  3e 14 ad 68 0e 38 e9 0a  |e....e.L>..h.8..|
000005a0  a8 b9 70 0d f0 1a 8c 68  0e 20 1a 14 ad 64 0e 18  |..p....h. ...d..|
000005b0  69 38 8d 64 0e ad 65 0e  69 00 8d 65 0e 4c 3e 14  |i8.d..e.i..e.L>.|
000005c0  20 5a 14 60 20 ea 15 c9  7d 90 29 4c ce 13 ad 68  | Z.` ...}.)L...h|
000005d0  0e 18 69 0b a8 b9 70 0d  f0 e6 8c 68 0e 20 2c 14  |..i...p....h. ,.|
000005e0  ad 64 0e 18 69 40 8d 64  0e ad 65 0e 69 00 8d 65  |.d..i@.d..e.i..e|
000005f0  0e 4c 3e 14 ad 68 0e 18  69 0a a8 b9 70 0d f0 c0  |.L>..h..i...p...|
00000600  8c 68 0e 20 2c 14 ad 64  0e 38 e9 38 8d 64 0e ad  |.h. ,..d.8.8.d..|
00000610  65 0e e9 00 8d 65 0e 4c  3e 14 ad 66 0e 18 69 50  |e....e.L>..f..iP|
00000620  8d 66 0e ad 67 0e 69 00  8d 67 0e 60 ad 66 0e 38  |.f..g.i..g.`.f.8|
00000630  e9 50 8d 66 0e ad 67 0e  e9 00 8d 67 0e 60 a0 00  |.P.f..g....g.`..|
00000640  a2 88 a9 07 20 f1 ff ac  68 0e b9 00 0d c9 01 f0  |.... ...h.......|
00000650  5e a9 02 99 00 0d 20 5a  14 60 20 8c 14 a0 00 b9  |^..... Z.` .....|
00000660  83 0e 20 ee ff c8 c0 0e  d0 f5 60 20 8c 14 a9 12  |.. .......` ....|
00000670  20 ee ff a9 00 20 ee ff  ac 68 0e b9 70 0d 20 ee  | .... ...h..p. .|
00000680  ff a9 e3 20 ee ff a9 00  99 00 0d 60 a9 19 20 ee  |... .......`.. .|
00000690  ff a9 04 20 ee ff ad 64  0e 20 ee ff ad 65 0e 20  |... ...d. ...e. |
000006a0  ee ff ad 66 0e 20 ee ff  ad 67 0e 20 ee ff 60 20  |...f. ...g. ..` |
000006b0  5a 14 a9 01 8d 1c 0e 60  a0 0e a2 6b a9 07 20 f1  |Z......`...k.. .|
000006c0  ff a0 00 a2 88 a9 07 20  f1 ff 60 ee 7b 0e a9 3a  |....... ..`.{..:|
000006d0  cd 7b 0e d0 41 a9 30 8d  7b 0e ee 7c 0e a9 3a cd  |.{..A.0.{..|..:.|
000006e0  7c 0e d0 32 a9 30 8d 7c  0e ee 7d 0e a9 3a cd 7d  ||..2.0.|..}..:.}|
000006f0  0e d0 23 a9 30 8d 7d 0e  ee 7e 0e a9 3a cd 7e 0e  |..#.0.}..~..:.~.|
00000700  d0 14 a9 30 8d 7e 0e ee  7f 0e a9 3a cd 7f 0e d0  |...0.~.....:....|
00000710  05 a9 30 8d 7f 0e a9 04  20 ee ff a9 1f 20 ee ff  |..0..... .... ..|
00000720  a9 06 20 ee ff a9 01 20  ee ff a0 05 88 b9 7b 0e  |.. .... ......{.|
00000730  20 ee ff c0 00 d0 f5 a9  30 20 ee ff a9 05 20 ee  | .......0 .... .|
00000740  ff 60 ad 7c 0e 18 69 05  8d 7c 0e c9 3a 30 c7 ad  |.`.|..i..|..:0..|
00000750  7c 0e 38 e9 0a 8d 7c 0e  ee 7d 0e a9 3a cd 7d 0e  ||.8...|..}..:.}.|
00000760  d0 b4 a9 30 8d 7d 0e ee  7e 0e a9 3a cd 7e 0e d0  |...0.}..~..:.~..|
00000770  a5 a9 30 8d 7e 0e 4c 16  15 ce 80 0e a9 2f cd 80  |..0.~.L....../..|
00000780  0e d0 29 a9 39 8d 80 0e  ce 81 0e a9 2f cd 81 0e  |..).9......./...|
00000790  d0 1a a9 39 8d 81 0e ce  82 0e a9 2f cd 82 0e d0  |...9......./....|
000007a0  0b a9 30 8d 80 0e 8d 81  0e 8d 82 0e a9 04 20 ee  |..0........... .|
000007b0  ff a9 1f 20 ee ff a9 0d  20 ee ff a9 08 20 ee ff  |... .... .... ..|
000007c0  ad 82 0e 20 ee ff ad 81  0e 20 ee ff ad 80 0e 20  |... ..... ..... |
000007d0  ee ff a9 30 20 ee ff a9  05 20 ee ff 60 a0 ff 88  |...0 .... ..`...|
000007e0  c0 00 d0 fb ca e0 00 d0  f4 60 a0 08 18 ad 5d 0e  |.........`....].|
000007f0  10 0f a2 02 bd 5a 0e 5d  55 0e 9d 5a 0e ca 10 f4  |.....Z.]U..Z....|
00000800  38 2e 5a 0e 2e 5b 0e 2e  5c 0e 2e 5d 0e 88 d0 dc  |8.Z..[..\..]....|
00000810  ad 5d 0e 60 a0 0d a2 00  a9 13 20 ee ff 98 20 ee  |.].`...... ... .|
00000820  ff bd 5f 0e 18 69 01 c9  04 30 02 a9 01 20 ee ff  |.._..i...0... ..|
00000830  9d 5f 0e a9 00 20 ee ff  20 ee ff 20 ee ff c8 e8  |._... .. .. ....|
00000840  e0 03 30 d4 60 00 00 00  00 4e 4f 25 3d 44 69 66  |..0.`....NO%=Dif|
00000850  66 25 28 32 2c 4c 56 4c  25 29 0d 0b dc 17 20 ef  |f%(2,LVL%).... .|
00000860  34 3a f1 8a 31 37 2c 31  29 3b 4c 56 4c 25 3a ef  |4:..17,1);LVL%:.|
00000870  35 0d 0b e0 65 20 e6 30  2c 31 33 3a e3 49 25 3d  |5...e .0,13:.I%=|
00000880  31 b8 33 3a ec 20 32 32  35 2c 34 32 35 3a f1 bd  |1.3:. 225,425:..|
00000890  28 32 34 32 2b 49 25 29  3a ec 20 39 35 35 2c 34  |(242+I%):. 955,4|
000008a0  32 35 3a f1 bd 28 32 34  32 2b 49 25 29 3a e6 30  |25:..(242+I%):.0|
000008b0  2c 28 49 25 2b 31 33 29  3a ed 3a 3f 43 4f 4c 25  |,(I%+13):.:?COL%|
000008c0  3d 33 3a 43 4f 4c 25 3f  31 3d 32 3a 43 4f 4c 25  |=3:COL%?1=2:COL%|
000008d0  3f 32 3d 31 20 20 0d 0b  ea 67 20 e3 49 25 3d 30  |?2=1  ...g .I%=0|
000008e0  b8 38 3a e3 4a 25 3d 30  b8 38 2d 49 25 3a 41 25  |.8:.J%=0.8-I%:A%|
000008f0  3d 39 30 2d 49 25 2a 31  30 2b 4a 25 2b 31 3a e6  |=90-I%*10+J%+1:.|
00000900  0d 00 01 19 d2 3d 26 32  39 30 30 3a 3f 31 38 3d  |.....=&2900:?18=|
00000910  30 3a 3f 31 39 3d 26 32  39 0d 00 02 23 f4 22 81  |0:?19=&29...#.".|
00000920  51 2a 42 45 52 54 20 28  43 29 31 39 38 33 88 50  |Q*BERT (C)1983.P|
00000930  45 54 45 52 20 4a 4f 48  4e 53 4f 4e 0d 00 0a 1b  |ETER JOHNSON....|
00000940  de 43 6f 6c 25 28 36 2c  31 35 29 2c 44 69 66 66  |.Col%(6,15),Diff|
00000950  25 28 32 2c 31 35 29 0d  00 0b 3d de 20 48 49 25  |%(2,15)...=. HI%|
00000960  28 35 29 2c 48 49 24 28  35 29 3a e3 49 25 3d 31  |(5),HI$(5):.I%=1|
00000970  b8 35 3a 48 49 24 28 49  25 29 3d 22 53 75 70 65  |.5:HI$(I%)="Supe|
00000980  72 69 6f 72 22 3a 48 49  25 28 49 25 29 3d 31 30  |rior":HI%(I%)=10|
00000990  30 30 3a ed 0d 00 14 22  f4 4b 45 59 31 30 20 50  |00:....".KEY10 P|
000009a0  41 47 45 3d 26 31 37 30  30 7c 4d 4f 4c 44 7c 4d  |AGE=&1700|MOLD|M|
000009b0  47 2e 31 30 7c 4d 0d 00  15 0b ee 85 e5 8d 44 5a  |G.10|M........DZ|
000009c0  40 0d 00 5a 18 53 43 4f  52 45 25 3d 30 3a 4c 43  |@..Z.SCORE%=0:LC|
000009d0  25 3d 30 3a e5 8d 74 5c  53 0d 00 64 9d 20 4d 41  |%=0:..t\S..d. MA|
000009e0  43 48 3d 26 45 30 30 3a  50 58 48 25 3d 4d 41 43  |CH=&E00:PXH%=MAC|
000009f0  48 3a 50 58 4c 25 3d 4d  41 43 48 2b 31 3a 50 59  |H:PXL%=MACH+1:PY|
00000a00  48 25 3d 4d 41 43 48 2b  32 3a 50 59 4c 25 3d 4d  |H%=MACH+2:PYL%=M|
00000a10  41 43 48 2b 33 3a 4d 50  25 3d 4d 41 43 48 2b 34  |ACH+3:MP%=MACH+4|
00000a20  3a 42 4d 41 58 25 3d 4d  41 43 48 2b 32 34 3a 43  |:BMAX%=MACH+24:C|
00000a30  48 41 4e 47 45 25 3d 4d  41 43 48 2b 32 35 3a 53  |HANGE%=MACH+25:S|
00000a40  50 45 45 44 25 3d 4d 41  43 48 2b 32 36 3a 50 50  |PEED%=MACH+26:PP|
00000a50  25 3d 4d 41 43 48 2b 32  37 3a 53 54 41 54 55 53  |%=MACH+27:STATUS|
00000a60  25 3d 4d 41 43 48 2b 32  38 3a 42 4e 4f 25 3d 4d  |%=MACH+28:BNO%=M|
00000a70  41 43 48 2b 32 39 0d 00  82 c8 20 4e 4f 53 45 25  |ACH+29.... NOSE%|
00000a80  3d 4d 41 43 48 2b 33 30  3a 43 4f 4e 53 54 41 4e  |=MACH+30:CONSTAN|
00000a90  54 3d 4d 41 43 48 2b 38  35 3a 53 48 49 46 54 52  |T=MACH+85:SHIFTR|
00000aa0  45 47 3d 4d 41 43 48 2b  39 30 3a 43 4f 4c 25 3d  |EG=MACH+90:COL%=|
00000ab0  4d 41 43 48 2b 39 35 3a  50 43 48 41 52 31 25 3d  |MACH+95:PCHAR1%=|
00000ac0  4e 4f 53 45 25 2b 33 3a  50 43 48 41 52 32 25 3d  |NOSE%+3:PCHAR2%=|
00000ad0  4e 4f 53 45 25 2b 38 3a  50 43 48 41 52 33 25 3d  |NOSE%+8:PCHAR3%=|
00000ae0  4e 4f 53 45 25 2b 31 33  3a 53 58 4c 25 3d 4d 41  |NOSE%+13:SXL%=MA|
00000af0  43 48 2b 31 30 30 3a 53  58 48 25 3d 4d 41 43 48  |CH+100:SXH%=MACH|
00000b00  2b 31 30 31 3a 53 59 4c  25 3d 4d 41 43 48 2b 31  |+101:SYL%=MACH+1|
00000b10  30 32 3a 53 59 48 25 3d  4d 41 43 48 2b 31 30 33  |02:SYH%=MACH+103|
00000b20  3a 53 50 25 3d 4d 41 43  48 2b 31 30 34 3a 53 43  |:SP%=MACH+104:SC|
00000b30  4e 54 4e 4f 25 3d 4d 41  43 48 2b 31 30 36 0d 00  |NTNO%=MACH+106..|
00000b40  88 86 20 53 43 31 25 3d  4d 41 43 48 2b 31 32 33  |.. SC1%=MACH+123|
00000b50  3a 53 43 32 25 3d 4d 41  43 48 2b 31 32 34 3a 53  |:SC2%=MACH+124:S|
00000b60  43 33 25 3d 4d 41 43 48  2b 31 32 35 3a 53 43 34  |C3%=MACH+125:SC4|
00000b70  25 3d 4d 41 43 48 2b 31  32 36 3a 53 43 35 25 3d  |%=MACH+126:SC5%=|
00000b80  4d 41 43 48 2b 31 32 37  3a 42 4f 4e 31 25 3d 4d  |MACH+127:BON1%=M|
00000b90  41 43 48 2b 31 32 38 3a  42 4f 4e 32 25 3d 4d 41  |ACH+128:BON2%=MA|
00000ba0  43 48 2b 31 32 39 3a 42  4f 4e 33 25 3d 4d 41 43  |CH+129:BON3%=MAC|
00000bb0  48 2b 31 33 30 3a 43 4f  44 45 25 3d 4d 41 43 48  |H+130:CODE%=MACH|
00000bc0  2b 31 35 30 0d 00 89 1b  20 43 48 41 52 4d 25 3d  |+150.... CHARM%=|
00000bd0  26 44 30 30 3a 43 4f 4c  4d 25 3d 26 44 37 30 0d  |&D00:COLM%=&D70.|
00000be0  00 c8 25 e3 4a 25 3d 31  b8 31 35 3a e3 49 25 3d  |..%.J%=1.15:.I%=|
00000bf0  30 b8 36 3a f3 43 6f 6c  25 28 49 25 2c 4a 25 29  |0.6:.Col%(I%,J%)|
00000c00  3a ed 3a ed 0d 00 c9 eb  20 dc 32 2c 33 2c 37 2c  |:.:..... .2,3,7,|
00000c10  30 2c 30 2c 34 2c 36 2c  20 32 2c 36 2c 33 2c 30  |0,0,4,6, 2,6,3,0|
00000c20  2c 30 2c 31 2c 37 2c 20  32 2c 34 2c 36 2c 30 2c  |,0,1,7, 2,4,6,0,|
00000c30  30 2c 31 2c 33 2c 20 32  2c 30 2c 37 2c 30 2c 30  |0,1,3, 2,0,7,0,0|
00000c40  2c 32 2c 37 2c 20 32 2c  37 2c 34 2c 30 2c 30 2c  |,2,7, 2,7,4,0,0,|
00000c50  35 2c 36 2c 20 32 2c 37  2c 30 2c 30 2c 30 2c 32  |5,6, 2,7,0,0,0,2|
00000c60  2c 33 2c 20 32 2c 34 2c  33 2c 37 2c 30 2c 34 2c  |,3, 2,4,3,7,0,4,|
00000c70  37 2c 20 33 2c 37 2c 36  2c 34 2c 30 2c 31 2c 36  |7, 3,7,6,4,0,1,6|
00000c80  2c 20 33 2c 33 2c 30 2c  37 2c 30 2c 32 2c 35 2c  |, 3,3,0,7,0,2,5,|
00000c90  20 33 2c 30 2c 36 2c 33  2c 30 2c 37 2c 35 2c 20  | 3,0,6,3,0,7,5, |
00000ca0  34 2c 33 2c 36 2c 37 2c  30 2c 30 2c 30 2c 20 34  |4,3,6,7,0,0,0, 4|
00000cb0  2c 34 2c 33 2c 36 2c 37  2c 37 2c 37 2c 20 34 2c  |,4,3,6,7,7,7, 4,|
00000cc0  37 2c 30 2c 33 2c 36 2c  38 2c 31 35 2c 20 34 2c  |7,0,3,6,8,15, 4,|
00000cd0  31 35 2c 38 2c 31 31 2c  31 32 2c 30 2c 30 2c 20  |15,8,11,12,0,0, |
00000ce0  34 2c 31 35 2c 38 2c 31  35 2c 38 2c 30 2c 30 0d  |4,15,8,15,8,0,0.|
00000cf0  00 d2 27 e3 4a 25 3d 31  b8 31 35 3a e3 49 25 3d  |..'.J%=1.15:.I%=|
00000d00  30 b8 32 3a f3 44 69 66  66 25 28 49 25 2c 4a 25  |0.2:.Diff%(I%,J%|
00000d10  29 3a ed 3a ed 20 0d 00  d3 77 dc 31 31 30 2c 32  |):.:. ...w.110,2|
00000d20  2c 32 30 2c 31 30 30 2c  32 2c 31 32 2c 31 30 30  |,20,100,2,12,100|
00000d30  2c 32 2c 36 2c 31 30 30  2c 32 2c 34 2c 39 30 2c  |,2,6,100,2,4,90,|
00000d40  33 2c 31 32 2c 39 30 2c  33 2c 36 2c 38 35 2c 33  |3,12,90,3,6,85,3|
00000d50  2c 33 2c 38 35 2c 32 2c  36 2c 37 30 2c 33 2c 31  |,3,85,2,6,70,3,1|
00000d60  32 2c 36 35 2c 34 2c 32  38 2c 36 35 2c 34 2c 31  |2,65,4,28,65,4,1|
00000d70  38 2c 36 35 2c 34 2c 39  2c 36 35 2c 34 2c 36 2c  |8,65,4,9,65,4,6,|
00000d80  36 35 2c 34 2c 36 2c 36  35 2c 34 2c 36 0d 0b 54  |65,4,6,65,4,6..T|
00000d90  33 20 eb 32 3a ef 32 33  3b 38 32 30 32 3b 30 3b  |3 .2:.23;8202;0;|
00000da0  30 3b 30 3b 3a 4d 45 4e  25 3d 32 3a e3 49 25 3d  |0;0;:MEN%=2:.I%=|
00000db0  30 b8 34 3a 49 25 3f 53  43 31 25 3d 34 38 3a ed  |0.4:I%?SC1%=48:.|
00000dc0  0d 0b 5e 7d 20 ef 31 39  2c 38 2c 32 2c 30 2c 30  |..^} .19,8,2,0,0|
00000dd0  2c 30 2c 20 31 39 2c 39  2c 35 2c 30 2c 30 2c 30  |,0, 19,9,5,0,0,0|
00000de0  2c 20 31 39 2c 31 30 2c  31 2c 30 2c 30 2c 30 2c  |, 19,10,1,0,0,0,|
00000df0  20 31 39 2c 31 31 2c 34  2c 30 2c 30 2c 30 2c 20  | 19,11,4,0,0,0, |
00000e00  31 39 2c 31 32 2c 31 2c  30 2c 30 2c 30 2c 20 31  |19,12,1,0,0,0, 1|
00000e10  39 2c 31 33 2c 31 2c 30  2c 30 2c 30 2c 20 31 39  |9,13,1,0,0,0, 19|
00000e20  2c 31 34 2c 32 2c 30 2c  30 2c 30 2c 20 31 39 2c  |,14,2,0,0,0, 19,|
00000e30  31 35 2c 33 2c 30 2c 30  2c 30 2c 20 35 0d 0b 5f  |15,3,0,0,0, 5.._|
00000e40  2a 20 e3 20 49 25 3d 31  b8 36 3a ef 31 39 2c 49  |* . I%=1.6:.19,I|
00000e50  25 2c 43 6f 6c 25 28 49  25 2c 4c 56 4c 25 29 2c  |%,Col%(I%,LVL%),|
00000e60  30 2c 30 2c 30 3a ed 0d  0b 72 9c 20 e6 30 2c 31  |0,0,0:...r. .0,1|
00000e70  33 3a ec 31 32 30 2c 38  30 30 3a ef 32 34 39 2c  |3:.120,800:.249,|
00000e80  32 35 30 2c 32 35 31 2c  32 35 32 3a ec 31 35 36  |250,251,252:.156|
00000e90  2c 37 36 35 3a ef 32 35  33 3a e6 30 2c 31 3a ef  |,765:.253:.0,1:.|
00000ea0  32 35 35 3a e6 30 2c 31  33 3a ef 32 35 34 3a ec  |255:.0,13:.254:.|
00000eb0  20 31 30 33 30 2c 38 30  30 3a df 20 31 30 39 34  | 1030,800:. 1094|
00000ec0  2c 38 30 30 3a df 20 31  30 39 34 2c 37 32 30 3a  |,800:. 1094,720:|
00000ed0  df 20 38 33 30 2c 37 32  30 3a df 20 38 33 30 2c  |. 830,720:. 830,|
00000ee0  38 30 30 3a df 20 38 38  30 2c 38 30 30 3a ec 38  |800:. 880,800:.8|
00000ef0  38 30 2c 38 30 30 3a ef  32 34 36 2c 32 34 37 2c  |80,800:.246,247,|
00000f00  32 34 38 0d 0b 7c 33 ef  34 3a f1 8a 30 2c 31 29  |248..|3.4:..0,1)|
00000f10  3b 22 53 43 4f 52 45 3a  30 30 30 30 30 30 22 3a  |;"SCORE:000000":|
00000f20  f1 8a 31 33 2c 31 29 3b  22 4c 56 4c 3a 22 3b 4c  |..13,1);"LVL:";L|
00000f30  56 4c 25 3a ef 35 0d 0b  86 5e e3 49 25 3d 31 b8  |VL%:.5...^.I%=1.|
00000f40  38 3a e3 4a 25 3d 30 b8  38 2d 49 25 3a 41 25 3d  |8:.J%=0.8-I%:A%=|
00000f50  39 30 2d 49 25 2a 31 30  2b 4a 25 2b 31 3a 58 25  |90-I%*10+J%+1:X%|
00000f60  3d 36 36 34 2d 28 37 2d  49 25 29 2a 35 36 2b 31  |=664-(7-I%)*56+1|
00000f70  32 30 2a 28 4a 25 2d 31  29 3a 59 25 3d 31 32 30  |20*(J%-1):Y%=120|
00000f80  2b 49 25 2a 38 30 3a e6  30 2c 31 3a f2 42 4f 58  |+I%*80:.0,1:.BOX|
00000f90  3a ed 3a ed 0d 0b b8 3a  20 43 31 3d 43 6f 6c 25  |:.:....: C1=Col%|
00000fa0  28 30 2c 4c 56 4c 25 29  3a e3 20 49 25 3d 31 b8  |(0,LVL%):. I%=1.|
00000fb0  36 3a ef 31 39 2c 49 25  2c 43 6f 6c 25 28 49 25  |6:.19,I%,Col%(I%|
00000fc0  2c 4c 56 4c 25 29 2c 30  2c 30 2c 30 3a ed 0d 0b  |,LVL%),0,0,0:...|
00000fd0  bd 27 20 3f 42 4f 4e 31  25 3d 34 39 3a 3f 42 4f  |.' ?BON1%=49:?BO|
00000fe0  4e 32 25 3d 34 38 3a 3f  42 4f 4e 33 25 3d 34 39  |N2%=48:?BON3%=49|
00000ff0  2b 43 31 2d 32 0d 0b c2  5a 20 e3 49 25 3d 30 b8  |+C1-2...Z .I%=0.|
00001000  39 39 3a 43 4f 4c 4d 25  3f 49 25 3d 30 3a ed 3a  |99:COLM%?I%=0:.:|
00001010  e3 49 25 3d 31 b8 38 3a  e3 4a 25 3d 31 b8 49 25  |.I%=1.8:.J%=1.I%|
00001020  3a 41 25 3d 49 25 2a 31  30 2b 4a 25 3a 41 25 3f  |:A%=I%*10+J%:A%?|
00001030  43 4f 4c 4d 25 3d 43 31  3a ed 3a ed 3a 3f 43 48  |COLM%=C1:.:.:?CH|
00001040  41 4e 47 45 25 3d 33 36  2a 28 43 31 2d 31 29 0d  |ANGE%=36*(C1-1).|
00001050  0b c7 33 20 e3 49 25 3d  30 b8 39 39 3a 43 48 41  |..3 .I%=0.99:CHA|
00001060  52 4d 25 3f 49 25 3d 30  3a ed 3a 43 48 41 52 4d  |RM%?I%=0:.:CHARM|
00001070  25 3f 35 30 3d 33 3a 43  48 41 52 4d 25 3f 35 36  |%?50=3:CHARM%?56|
00001080  3d 33 0d 0b cc 95 20 3f  50 50 25 3d 35 33 3a 3f  |=3.... ?PP%=53:?|
00001090  50 58 48 25 3d 32 3a 3f  50 58 4c 25 3d 37 36 3a  |PXH%=2:?PXL%=76:|
000010a0  3f 50 59 48 25 3d 31 3a  3f 50 59 4c 25 3d 31 37  |?PYH%=1:?PYL%=17|
000010b0  36 3a 3f 53 50 25 3d 30  3a 3f 53 58 48 25 3d 34  |6:?SP%=0:?SXH%=4|
000010c0  3a 3f 53 58 4c 25 3d 30  3a 3f 53 59 48 25 3d 34  |:?SXL%=0:?SYH%=4|
000010d0  3a 3f 53 59 4c 25 3d 30  3a 3f 43 4f 4e 53 54 41  |:?SYL%=0:?CONSTA|
000010e0  4e 54 3d 26 35 33 3a 3f  28 43 4f 4e 53 54 41 4e  |NT=&53:?(CONSTAN|
000010f0  54 2b 31 29 3d 26 37 31  3a 3f 28 43 4f 4e 53 54  |T+1)=&71:?(CONST|
00001100  41 4e 54 2b 32 29 3d 26  37 36 3a 21 53 48 49 46  |ANT+2)=&76:!SHIF|
00001110  54 52 45 47 3d b3 20 0d  0b d6 46 20 3f 53 50 45  |TREG=. ...F ?SPE|
00001120  45 44 25 3d 44 69 66 66  25 28 30 2c 4c 56 4c 25  |ED%=Diff%(0,LVL%|
00001130  29 3a 3f 42 4d 41 58 25  3d 44 69 66 66 25 28 31  |):?BMAX%=Diff%(1|
00001140  2c 4c 56 4c 25 29 3a 3f  53 43 4e 54 4e 4f 25 3d  |,LVL%):?SCNTNO%=|
00001150  44 69 66 66 25 28 32 2c  4c 56 4c 25 29 0d 0b dc  |Diff%(2,LVL%)...|
00001160  17 20 ef 34 3a f1 8a 31  37 2c 31 29 3b 4c 56 4c  |. .4:..17,1);LVL|
00001170  25 3a ef 35 0d 0b e0 65  20 e6 30 2c 31 33 3a e3  |%:.5...e .0,13:.|
00001180  49 25 3d 31 b8 33 3a ec  20 32 32 35 2c 34 32 35  |I%=1.3:. 225,425|
00001190  3a f1 bd 28 32 34 32 2b  49 25 29 3a ec 20 39 35  |:..(242+I%):. 95|
000011a0  35 2c 34 32 35 3a f1 bd  28 32 34 32 2b 49 25 29  |5,425:..(242+I%)|
000011b0  3a e6 30 2c 28 49 25 2b  31 33 29 3a ed 3a 3f 43  |:.0,(I%+13):.:?C|
000011c0  4f 4c 25 3d 33 3a 43 4f  4c 25 3f 31 3d 32 3a 43  |OL%=3:COL%?1=2:C|
000011d0  4f 4c 25 3f 32 3d 31 20  20 0d 0b ea 67 20 e3 49  |OL%?2=1  ...g .I|
000011e0  25 3d 30 b8 38 3a e3 4a  25 3d 30 b8 38 2d 49 25  |%=0.8:.J%=0.8-I%|
000011f0  3a 41 25 3d 39 30 2d 49  25 2a 31 30 2b 4a 25 2b  |:A%=90-I%*10+J%+|
00001200  31 3a e6 30 2c 41 25 3f  43 4f 4c 4d 25 3a 58 25  |1:.0,A%?COLM%:X%|
00001210  3d 36 36 34 2d 28 37 2d  49 25 29 2a 35 36 2b 31  |=664-(7-I%)*56+1|
00001220  32 30 2a 28 4a 25 2d 31  29 3a 59 25 3d 31 32 30  |20*(J%-1):Y%=120|
00001230  2b 49 25 2a 38 30 3a f2  54 4f 50 3a ed 3a ed 20  |+I%*80:.TOP:.:. |
00001240  0d 0b f4 4c 20 ec 20 31  30 30 2c 39 30 30 3a e7  |...L . 100,900:.|
00001250  20 4d 45 4e 25 3e 30 20  8c 20 e3 49 25 3d 31 b8  | MEN%>0 . .I%=1.|
00001260  4d 45 4e 25 3a e6 30 2c  31 30 3a ef 32 33 30 3a  |MEN%:.0,10:.230:|
00001270  e6 30 2c 37 3a ef 38 3a  ef 32 33 31 3a e6 30 2c  |.0,7:.8:.231:.0,|
00001280  30 3a ef 38 3a ef 32 33  32 3a ed 20 0d 0f a0 30  |0:.8:.232:. ...0|
00001290  e6 30 2c 30 3a ef 32 35  35 3a d6 43 4f 44 45 25  |.0,0:.255:.CODE%|
000012a0  3a ee 20 3f 53 54 41 54  55 53 25 20 e5 20 8d 74  |:. ?STATUS% . .t|
000012b0  6a 4f 2c 8d 74 6f 4f 2c  8d 74 74 4f 0d 0f aa 33  |jO,.toO,.ttO...3|
000012c0  d4 30 2c 2d 31 35 2c 36  2c 31 30 3a 4d 45 4e 25  |.0,-15,6,10:MEN%|
000012d0  3d 4d 45 4e 25 2d 31 3a  e7 4d 45 4e 25 3d 2d 31  |=MEN%-1:.MEN%=-1|
000012e0  20 e5 8d 74 48 53 20 8b  20 e5 8d 64 47 4b 20 0d  | ..tHS . ..dGK .|
000012f0  0f af 67 20 4d 45 4e 25  3d 4d 45 4e 25 2d 31 3a  |..g MEN%=MEN%-1:|
00001300  ef 32 35 2c 34 2c 3f 50  58 4c 25 2c 3f 50 58 48  |.25,4,?PXL%,?PXH|
00001310  25 2c 3f 50 59 4c 25 2c  3f 50 59 48 25 3a e6 30  |%,?PYL%,?PYH%:.0|
00001320  2c 30 3a ef 20 3f 50 43  48 41 52 31 25 3a 46 58  |,0:. ?PCHAR1%:FX|
00001330  25 3d 3f 50 58 4c 25 2b  3f 50 58 48 25 2a 32 35  |%=?PXL%+?PXH%*25|
00001340  35 3a 46 59 25 3d 3f 50  59 4c 25 2b 3f 50 59 48  |5:FY%=?PYL%+?PYH|
00001350  25 2a 32 35 35 20 0d 0f  b0 5c 20 e3 49 25 3d 46  |%*255 ...\ .I%=F|
00001360  59 25 b8 46 59 25 2d 35  30 20 88 20 2d 31 36 3a  |Y%.FY%-50 . -16:|
00001370  e6 30 2c 31 30 3a ec 20  46 58 25 2c 49 25 3a ef  |.0,10:. FX%,I%:.|
00001380  20 3f 50 43 48 41 52 31  25 3a ef 38 3a e6 30 2c  | ?PCHAR1%:.8:.0,|
00001390  37 3a ef 20 3f 50 43 48  41 52 32 25 3a ef 38 3a  |7:. ?PCHAR2%:.8:|
000013a0  e6 30 2c 30 3a ef 20 3f  50 43 48 41 52 33 25 3a  |.0,0:. ?PCHAR3%:|
000013b0  ef 38 0d 0f b1 3d 20 ef  20 3f 50 43 48 41 52 31  |.8...= . ?PCHAR1|
000013c0  25 3a d4 31 2c 31 2c 35  35 2d 28 46 59 25 2d 49  |%:.1,1,55-(FY%-I|
000013d0  25 29 2c 31 3a ed 3a e7  20 4d 45 4e 25 3d 2d 31  |%),1:.:. MEN%=-1|
000013e0  20 8c 20 8d 74 48 53 20  8b 20 8d 64 47 4b 20 0d  | . .tHS . .dGK .|
000013f0  0f b4 be 20 e3 49 25 3d  30 b8 32 30 30 20 88 34  |... .I%=0.200 .4|
00001400  3a ef 31 39 2c b3 28 36  29 2c b3 28 37 29 2c 30  |:.19,.(6),.(7),0|
00001410  2c 30 2c 30 3a d4 31 2c  31 2c 49 25 2c 31 3a d4  |,0,0:.1,1,I%,1:.|
00001420  32 2c 31 2c 49 25 2b 31  36 2c 31 3a d4 33 2c 31  |2,1,I%+16,1:.3,1|
00001430  2c 49 25 2b 32 38 2c 31  3a ed 3a e3 49 25 3d 31  |,I%+28,1:.:.I%=1|
00001440  b8 4c 56 4c 25 3a 3f 53  43 31 25 3d 3f 53 43 31  |.LVL%:?SC1%=?SC1|
00001450  25 2b 28 3f 42 4f 4e 31  25 29 2d 34 38 3a e7 20  |%+(?BON1%)-48:. |
00001460  3f 53 43 31 25 3e 35 37  20 8c 20 3f 53 43 31 25  |?SC1%>57 . ?SC1%|
00001470  3d 3f 53 43 31 25 2d 31  30 3a 3f 53 43 32 25 3d  |=?SC1%-10:?SC2%=|
00001480  3f 53 43 32 25 2b 31 2b  28 3f 42 4f 4e 32 25 29  |?SC2%+1+(?BON2%)|
00001490  2d 34 38 20 8b 20 3f 53  43 32 25 3d 3f 53 43 32  |-48 . ?SC2%=?SC2|
000014a0  25 2b 28 3f 42 4f 4e 32  25 29 2d 34 38 0d 0f b5  |%+(?BON2%)-48...|
000014b0  53 20 e7 20 3f 53 43 32  25 3e 35 37 20 3f 53 43  |S . ?SC2%>57 ?SC|
000014c0  32 25 3d 3f 53 43 32 25  2d 31 30 3a 3f 53 43 33  |2%=?SC2%-10:?SC3|
000014d0  25 3d 3f 53 43 33 25 2b  31 2b 28 3f 42 4f 4e 33  |%=?SC3%+1+(?BON3|
000014e0  25 29 2d 34 38 20 8b 20  3f 53 43 33 25 3d 3f 53  |%)-48 . ?SC3%=?S|
000014f0  43 33 25 2b 28 3f 42 4f  4e 33 25 29 2d 34 38 20  |C3%+(?BON3%)-48 |
00001500  0d 0f b6 6d e7 20 3f 53  43 33 25 3e 35 37 20 3f  |...m. ?SC3%>57 ?|
00001510  53 43 33 25 3d 3f 53 43  33 25 2d 31 30 3a 3f 53  |SC3%=?SC3%-10:?S|
00001520  43 34 25 3d 3f 53 43 34  25 2b 31 3a e7 20 3f 53  |C4%=?SC4%+1:. ?S|
00001530  43 34 25 3e 35 37 20 3f  53 43 34 25 3d 3f 53 43  |C4%>57 ?SC4%=?SC|
00001540  34 25 2d 31 30 3a 3f 53  43 35 25 3d 3f 53 43 35  |4%-10:?SC5%=?SC5|
00001550  25 2b 31 3a e7 20 3f 53  43 35 25 3e 35 37 20 3f  |%+1:. ?SC5%>57 ?|
00001560  53 43 35 25 3d 3f 53 43  35 25 2d 31 30 0d 0f b7  |SC5%=?SC5%-10...|
00001570  23 20 ed 3a 4c 56 4c 25  3d 4c 56 4c 25 2b 31 3a  |# .:LVL%=LVL%+1:|
00001580  e7 4c 56 4c 25 3e 31 35  20 4c 56 4c 25 3d 31 30  |.LVL%>15 LVL%=10|
00001590  0d 0f b8 2b 20 4d 45 4e  25 3d 4d 45 4e 25 2b 31  |...+ MEN%=MEN%+1|
000015a0  3a d4 31 2c 30 2c 30 2c  33 30 3a d4 31 2c 31 2c  |:.1,0,0,30:.1,1,|
000015b0  32 30 30 2c 37 3a e5 8d  74 78 4b 0d 13 88 a2 20  |200,7:..txK.... |
000015c0  ec 20 33 33 30 2c 36 30  30 3a e6 30 2c 37 3a f1  |. 330,600:.0,7:.|
000015d0  22 47 41 4d 45 20 4f 56  45 52 22 3a ec 20 33 32  |"GAME OVER":. 32|
000015e0  36 2c 36 30 34 3a e6 30  2c 31 30 3a f1 22 47 41  |6,604:.0,10:."GA|
000015f0  4d 45 20 4f 56 45 52 22  3a 53 43 4f 52 45 25 3d  |ME OVER":SCORE%=|
00001600  30 3a 53 43 4f 52 45 25  3d 53 43 4f 52 45 25 2b  |0:SCORE%=SCORE%+|
00001610  3f 53 43 31 25 2a 31 30  2b 3f 53 43 32 25 2a 31  |?SC1%*10+?SC2%*1|
00001620  30 30 2b 3f 53 43 33 25  2a 31 30 30 30 2b 3f 53  |00+?SC3%*1000+?S|
00001630  43 34 25 2a 31 30 30 30  30 2b 3f 53 43 35 25 2a  |C4%*10000+?SC5%*|
00001640  31 30 30 30 30 30 2d 35  33 33 33 32 38 30 3a e3  |100000-5333280:.|
00001650  49 25 3d 31 b8 31 30 30  30 30 3a ed 20 0d 13 9c  |I%=1.10000:. ...|
00001660  59 20 eb 37 3a ef 32 33  3b 38 32 30 32 3b 30 3b  |Y .7:.23;8202;0;|
00001670  30 3b 30 3b 3a f1 8a 31  30 29 3b 22 53 75 70 65  |0;0;:..10);"Supe|
00001680  72 69 6f 72 20 53 6f 66  74 77 61 72 65 27 73 22  |rior Software's"|
00001690  3a f2 48 44 3a f1 8a 38  2c 32 32 29 3b 22 81 41  |:.HD:..8,22);".A|
000016a0  75 74 68 6f 72 3a 20 20  50 65 74 65 72 20 4a 6f  |uthor:  Peter Jo|
000016b0  68 6e 73 6f 6e 22 0d 13  ba 7f 20 50 53 25 3d 30  |hnson".... PS%=0|
000016c0  3a e3 49 25 3d 31 b8 35  3a e7 53 43 4f 52 45 25  |:.I%=1.5:.SCORE%|
000016d0  3e 48 49 25 28 49 25 29  20 e3 4a 25 3d 34 b8 49  |>HI%(I%) .J%=4.I|
000016e0  25 88 2d 31 3a 48 49 25  28 4a 25 2b 31 29 3d 48  |%.-1:HI%(J%+1)=H|
000016f0  49 25 28 4a 25 29 3a 48  49 24 28 4a 25 2b 31 29  |I%(J%):HI$(J%+1)|
00001700  3d 48 49 24 28 4a 25 29  3a ed 3a 50 53 25 3d 49  |=HI$(J%):.:PS%=I|
00001710  25 3a 48 49 25 28 49 25  29 3d 53 43 4f 52 45 25  |%:HI%(I%)=SCORE%|
00001720  3a 48 49 24 28 49 25 29  3d 22 20 22 3a 49 25 3d  |:HI$(I%)=" ":I%=|
00001730  36 3a ed 8b ed 0d 13 c4  4f 20 f1 8a 31 32 2c 37  |6:......O ..12,7|
00001740  29 3b 22 54 48 45 20 4e  4f 53 45 52 20 45 4c 49  |);"THE NOSER ELI|
00001750  54 45 3a 22 3a e3 49 25  3d 31 b8 35 3a f1 8a 31  |TE:":.I%=1.5:..1|
00001760  30 2c 49 25 2a 32 2b 37  29 3b 22 86 22 3b 48 49  |0,I%*2+7);".";HI|
00001770  25 28 49 25 29 3b 8a 31  31 29 3b 48 49 24 28 49  |%(I%);.11);HI$(I|
00001780  25 29 3a ed 0d 13 ce 0b  2a 46 58 31 35 2c 30 0d  |%):.....*FX15,0.|
00001790  13 d3 42 f7 8d 64 54 53  3a e3 49 3d 31 b8 31 32  |..B..dTS:.I=1.12|
000017a0  3a f3 41 25 2c 44 25 3a  d4 31 2c 31 2c 41 25 2c  |:.A%,D%:.1,1,A%,|
000017b0  44 25 3a d4 32 2c 31 2c  41 25 2c 44 25 3a d4 31  |D%:.2,1,A%,D%:.1|
000017c0  2c 30 2c 30 2c 30 3a d4  32 2c 30 2c 30 2c 30 3a  |,0,0,0:.2,0,0,0:|
000017d0  ed 0d 13 d4 42 20 dc 20  35 30 2c 32 2c 36 36 2c  |....B . 50,2,66,|
000017e0  32 2c 37 38 2c 32 2c 39  38 2c 34 2c 37 38 2c 32  |2,78,2,98,4,78,2|
000017f0  2c 36 36 2c 32 2c 35 30  2c 32 2c 37 30 2c 32 2c  |,66,2,50,2,70,2,|
00001800  36 36 2c 32 2c 35 38 2c  32 2c 36 36 2c 32 2c 35  |66,2,58,2,66,2,5|
00001810  30 2c 36 0d 13 d8 7d e7  50 53 25 3e 30 3a f1 8a  |0,6...}.PS%>0:..|
00001820  38 2c 32 30 29 3b 22 84  9d 20 83 45 4e 54 45 52  |8,20);".. .ENTER|
00001830  20 59 4f 55 52 20 4e 41  4d 45 2e 20 20 20 9c 22  | YOUR NAME.   ."|
00001840  3b 8a 32 30 2c 50 53 25  2a 32 2b 37 29 3b 3a e8  |;.20,PS%*2+7);:.|
00001850  48 49 24 28 50 53 25 29  3a 48 49 24 28 50 53 25  |HI$(PS%):HI$(PS%|
00001860  29 3d c0 48 49 24 28 50  53 25 29 2c 38 29 3a f1  |)=.HI$(PS%),8):.|
00001870  8a 31 2c 50 53 25 2a 32  2b 37 29 3b 22 88 22 3b  |.1,PS%*2+7);".";|
00001880  8a 32 30 2c 50 53 25 2a  32 2b 37 29 3b 22 20 22  |.20,PS%*2+7);" "|
00001890  0d 17 70 42 e7 4c 43 25  3c 31 84 4c 43 25 3e 39  |..pB.LC%<1.LC%>9|
000018a0  20 f1 8a 38 2c 32 30 29  3b 22 84 9d 87 53 45 4c  | ..8,20);"...SEL|
000018b0  45 43 54 20 4c 45 56 45  4c 20 28 31 2d 39 29 20  |ECT LEVEL (1-9) |
000018c0  20 9c 22 3a 4c 43 25 3d  a5 2d 34 38 3a e5 8d 44  | .":LC%=.-48:..D|
000018d0  70 57 0d 17 a2 41 20 4c  56 4c 25 3d 4c 43 25 3a  |pW...A LVL%=LC%:|
000018e0  f1 8a 38 2c 32 30 29 3b  22 84 9d 87 88 50 52 45  |..8,20);"....PRE|
000018f0  53 53 20 53 50 41 43 45  20 42 41 52 2e 20 20 89  |SS SPACE BAR.  .|
00001900  9c 22 3a f5 fd a6 28 2d  39 39 29 3a f7 3a e5 8d  |.":...(-99):.:..|
00001910  44 64 40 0d 27 10 e5 dd  f2 48 44 3a f1 22 20 20  |Dd@.'....HD:."  |
00001920  20 91 20 78 7c 74 20 93  34 68 34 68 94 68 34 20  | . x|t .4h4h.h4 |
00001930  20 96 5f 7c 7c 30 20 20  20 20 20 95 20 5f 30 22  | ._||0     . _0"|
00001940  27 22 20 20 20 91 6a 37  20 6b 35 93 a2 6e 3d 21  |'"   .j7 k5..n=!|
00001950  94 6a 35 20 20 96 7e 71  72 7d 92 68 34 70 20 95  |.j5  .~qr}.h4p .|
00001960  70 7a 75 70 22 27 22 20  20 20 91 6a 35 20 6a 35  |pzup"'"   .j5 j5|
00001970  93 2f 6f 3f 2f 94 6a 75  70 20 96 6f a3 a3 a3 92  |./o?/.jup .o....|
00001980  6a 3f a3 25 95 a3 6b 37  a3 22 27 22 20 20 20 91  |j?.%..k7."'"   .|
00001990  6a 35 6c 7a 35 93 38 6b  37 64 94 6a 37 2b 7d 96  |j5lz5.8k7d.j7+}.|
000019a0  a2 6d 7c 27 92 6a 35 20  20 95 20 6a 35 22 27 22  |.m|'.j5  . j5"'"|
000019b0  20 20 20 91 a2 6f 7c 3f  7d 93 21 a2 21 a2 94 6a  |   ..o|?}.!.!..j|
000019c0  75 78 3f 96 20 20 20 20  92 6a 35 20 20 95 20 2a  |ux?.    .j5  . *|
000019d0  7d 7a 22 27 22 20 20 20  20 20 20 20 20 20 20 20  |}z"'"           |
000019e0  20 20 20 94 a2 60 60 20  20 20 20 20 20 20 20 20  |   ..``         |
000019f0  20 20 20 20 95 a2 21 22  0d 27 11 06 20 e1 0d 2a  |    ..!".'.. ..*|
00001a00  f8 65 20 dd f2 42 4f 58  3a f2 54 4f 50 3a e6 30  |.e ..BOX:.TOP:.0|
00001a10  2c 35 3a f0 38 35 2c 58  25 2b 35 36 2c 59 25 2d  |,5:.85,X%+56,Y%-|
00001a20  38 30 3a f0 38 35 2c 58  25 2c 59 25 2d 31 30 38  |80:.85,X%,Y%-108|
00001a30  3a e6 30 2c 36 3a ec 20  58 25 2c 59 25 2d 35 36  |:.0,6:. X%,Y%-56|
00001a40  3a f0 38 35 2c 58 25 2d  35 36 2c 59 25 2d 38 30  |:.85,X%-56,Y%-80|
00001a50  3a f0 38 35 2c 58 25 2d  35 36 2c 59 25 2d 32 38  |:.85,X%-56,Y%-28|
00001a60  3a e1 20 0d 2e e0 3e dd  f2 54 4f 50 3a ec 58 25  |:. ...>..TOP:.X%|
00001a70  2c 59 25 3a ec 58 25 2d  35 36 2c 59 25 2d 32 38  |,Y%:.X%-56,Y%-28|
00001a80  3a f0 38 35 2c 58 25 2b  35 36 2c 59 25 2d 32 38  |:.85,X%+56,Y%-28|
00001a90  3a f0 38 35 2c 58 25 2c  59 25 2d 35 36 3a e1 20  |:.85,X%,Y%-56:. |
00001aa0  20 0d ff f0 e1 20 20 0d  ff 00 00 00 00 00 00 00  | ....  .........|
00001ab0  00 00 00 00 00 00 00 00  00 00 00 00 00 00 00 00  |................|
*
00001b00  0d 00 01 1d 20 f4 22 81  51 2a 42 45 52 54 20 6c  |.... .".Q*BERT l|
00001b10  6f 61 64 65 72 20 70 72  6f 67 72 61 6d 0d 00 02  |oader program...|
00001b20  1d 20 f4 22 83 28 43 29  31 39 38 33 20 50 45 54  |. .".(C)1983 PET|
00001b30  45 52 20 4a 4f 48 4e 53  4f 4e 0d 00 04 0b 20 2a  |ER JOHNSON.... *|
00001b40  54 56 32 35 35 0d 00 05  2c 20 e2 20 31 2c 31 2c  |TV255..., . 1,1,|
00001b50  30 2c 30 2c 30 2c 30 2c  30 2c 30 2c 31 32 36 2c  |0,0,0,0,0,0,126,|
00001b60  2d 31 30 2c 30 2c 2d 31  30 2c 31 32 36 2c 31 30  |-10,0,-10,126,10|
00001b70  30 0d 00 06 2e 20 e2 20  32 2c 32 2c 2d 32 2c 32  |0.... . 2,2,-2,2|
00001b80  2c 30 2c 34 2c 38 2c 31  2c 31 32 36 2c 2d 35 2c  |,0,4,8,1,126,-5,|
00001b90  30 2c 2d 32 30 2c 31 32  36 2c 31 30 30 20 20 0d  |0,-20,126,100  .|
00001ba0  00 07 2c 20 e2 20 33 2c  32 2c 2d 31 2c 31 2c 30  |.., . 3,2,-1,1,0|
00001bb0  2c 32 2c 35 2c 30 2c 31  32 36 2c 2d 35 2c 30 2c  |,2,5,0,126,-5,0,|
00001bc0  2d 31 30 2c 31 32 36 2c  31 30 30 0d 00 08 2b 20  |-10,126,100...+ |
00001bd0  e2 20 34 2c 34 2c 31 2c  30 2c 30 2c 34 38 2c 30  |. 4,4,1,0,0,48,0|
00001be0  2c 30 2c 31 32 36 2c 30  2c 30 2c 2d 31 30 2c 31  |,0,126,0,0,-10,1|
00001bf0  32 36 2c 31 32 36 0d 00  0a 5c 20 ef 32 33 2c 32  |26,126...\ .23,2|
00001c00  32 34 2c 32 34 2c 36 30  2c 31 32 36 2c 31 32 36  |24,24,60,126,126|
00001c10  2c 31 32 36 2c 31 32 36  2c 36 30 2c 32 34 2c 20  |,126,126,60,24, |
00001c20  32 33 2c 32 32 35 2c 30  2c 31 36 2c 33 32 2c 30  |23,225,0,16,32,0|
00001c30  2c 30 2c 30 2c 30 2c 30  2c 20 32 33 2c 32 32 36  |,0,0,0,0, 23,226|
00001c40  2c 30 2c 30 2c 30 2c 30  2c 30 2c 34 2c 38 2c 30  |,0,0,0,0,0,4,8,0|
00001c50  20 20 0d 00 14 5f 20 ef  32 33 2c 32 32 37 2c 32  |  ..._ .23,227,2|
00001c60  38 2c 36 32 2c 36 32 2c  36 30 2c 32 38 2c 31 32  |8,62,62,60,28,12|
00001c70  36 2c 31 32 36 2c 36 30  2c 20 32 33 2c 32 32 38  |6,126,60, 23,228|
00001c80  2c 30 2c 30 2c 31 30 2c  33 36 2c 31 36 2c 38 2c  |,0,0,10,36,16,8,|
00001c90  36 36 2c 36 30 2c 20 32  33 2c 32 32 39 2c 31 36  |66,60, 23,229,16|
00001ca0  2c 30 2c 33 32 2c 38 2c  30 2c 36 38 2c 31 36 2c  |,0,32,8,0,68,16,|
00001cb0  30 0d 00 1e b9 20 ef 32  33 2c 32 33 30 2c 32 38  |0.... .23,230,28|
00001cc0  2c 36 32 2c 36 32 2c 36  32 2c 31 32 36 2c 32 35  |,62,62,62,126,25|
00001cd0  34 2c 32 35 34 2c 32 32  30 2c 20 32 33 2c 32 33  |4,254,220, 23,23|
00001ce0  31 2c 30 2c 36 30 2c 32  30 2c 30 2c 30 2c 30 2c  |1,0,60,20,0,0,0,|
00001cf0  31 32 2c 30 2c 20 32 33  2c 32 33 32 2c 30 2c 30  |12,0, 23,232,0,0|
00001d00  2c 34 30 2c 30 2c 30 2c  38 2c 31 36 2c 30 2c 20  |,40,0,0,8,16,0, |
00001d10  32 33 2c 32 33 33 2c 35  36 2c 31 32 34 2c 31 32  |23,233,56,124,12|
00001d20  34 2c 31 32 34 2c 31 32  36 2c 31 32 37 2c 31 32  |4,124,126,127,12|
00001d30  37 2c 35 39 2c 20 32 33  2c 32 33 34 2c 30 2c 36  |7,59, 23,234,0,6|
00001d40  30 2c 34 30 2c 30 2c 30  2c 30 2c 34 38 2c 30 2c  |0,40,0,0,0,48,0,|
00001d50  20 32 33 2c 32 33 35 2c  30 2c 30 2c 32 30 2c 30  | 23,235,0,0,20,0|
00001d60  2c 30 2c 31 36 2c 38 2c  30 20 0d 00 28 b4 20 ef  |,0,16,8,0 ..(. .|
00001d70  32 33 2c 32 33 36 2c 35  36 2c 31 32 34 2c 31 32  |23,236,56,124,12|
00001d80  34 2c 31 32 34 2c 31 32  36 2c 31 32 37 2c 31 32  |4,124,126,127,12|
00001d90  37 2c 35 36 2c 20 32 33  2c 32 33 37 2c 30 2c 38  |7,56, 23,237,0,8|
00001da0  2c 31 32 2c 30 2c 30 2c  30 2c 38 2c 30 2c 20 32  |,12,0,0,0,8,0, 2|
00001db0  33 2c 32 33 38 2c 30 2c  34 2c 30 2c 30 2c 30 2c  |3,238,0,4,0,0,0,|
00001dc0  30 2c 32 2c 30 2c 20 32  33 2c 32 33 39 2c 32 38  |0,2,0, 23,239,28|
00001dd0  2c 36 32 2c 36 32 2c 36  32 2c 32 35 34 2c 32 35  |,62,62,62,254,25|
00001de0  34 2c 32 35 34 2c 32 38  2c 20 32 33 2c 32 34 30  |4,254,28, 23,240|
00001df0  2c 30 2c 31 36 2c 34 38  2c 30 2c 30 2c 30 2c 31  |,0,16,48,0,0,0,1|
00001e00  36 2c 30 2c 20 32 33 2c  32 34 31 2c 30 2c 33 32  |6,0, 23,241,0,32|
00001e10  2c 30 2c 30 2c 30 2c 30  2c 36 34 2c 30 20 0d 00  |,0,0,0,0,64,0 ..|
00001e20  32 88 20 ef 32 33 2c 32  34 32 2c 33 30 2c 36 33  |2. .23,242,30,63|
00001e30  2c 35 30 2c 35 36 2c 32  38 2c 32 33 30 2c 31 32  |,50,56,28,230,12|
00001e40  36 2c 36 30 2c 20 32 33  2c 32 34 33 2c 31 32 2c  |6,60, 23,243,12,|
00001e50  38 2c 34 38 2c 32 32 38  2c 31 33 34 2c 31 33 34  |8,48,228,134,134|
00001e60  2c 36 2c 34 2c 20 32 33  2c 32 34 34 2c 34 38 2c  |,6,4, 23,244,48,|
00001e70  31 36 2c 31 34 2c 31 39  2c 31 31 33 2c 39 37 2c  |16,14,19,113,97,|
00001e80  39 36 2c 33 32 2c 20 32  33 2c 32 34 35 2c 30 2c  |96,32, 23,245,0,|
00001e90  31 30 32 2c 31 39 33 2c  38 2c 38 2c 32 34 2c 32  |102,193,8,8,24,2|
00001ea0  34 2c 32 34 20 20 0d 00  3c 69 20 ef 32 33 2c 32  |4,24  ..<i .23,2|
00001eb0  34 36 2c 32 33 38 2c 31  37 30 2c 32 33 34 2c 31  |46,238,170,234,1|
00001ec0  37 30 2c 32 33 38 2c 30  2c 30 2c 30 2c 20 32 33  |70,238,0,0,0, 23|
00001ed0  2c 32 34 37 2c 31 37 30  2c 32 33 34 2c 32 33 34  |,247,170,234,234|
00001ee0  2c 31 37 30 2c 31 37 34  2c 30 2c 30 2c 30 2c 20  |,170,174,0,0,0, |
00001ef0  32 33 2c 32 34 38 2c 32  32 34 2c 31 32 38 2c 32  |23,248,224,128,2|
00001f00  32 34 2c 33 32 2c 32 32  34 2c 30 2c 30 2c 30 0d  |24,32,224,0,0,0.|
00001f10  00 46 d0 20 ef 32 33 2c  32 34 39 2c 32 33 34 2c  |.F. .23,249,234,|
00001f20  31 33 38 2c 31 34 32 2c  31 33 38 2c 32 33 34 2c  |138,142,138,234,|
00001f30  30 2c 30 2c 30 2c 20 32  33 2c 32 35 30 2c 32 33  |0,0,0, 23,250,23|
00001f40  34 2c 31 37 34 2c 32 33  38 2c 31 37 30 2c 31 37  |4,174,238,170,17|
00001f50  30 2c 30 2c 30 2c 30 2c  20 32 33 2c 32 35 31 2c  |0,0,0,0, 23,251,|
00001f60  32 33 38 2c 31 33 36 2c  31 37 32 2c 31 36 38 2c  |238,136,172,168,|
00001f70  32 33 38 2c 30 2c 30 2c  30 2c 20 32 33 2c 32 35  |238,0,0,0, 23,25|
00001f80  32 2c 31 31 39 2c 33 37  2c 33 37 2c 33 37 2c 33  |2,119,37,37,37,3|
00001f90  39 2c 30 2c 30 2c 30 2c  20 32 33 2c 32 35 33 2c  |9,0,0,0, 23,253,|
00001fa0  38 2c 31 32 2c 32 35 34  2c 32 35 35 2c 32 35 35  |8,12,254,255,255|
00001fb0  2c 32 35 34 2c 31 32 2c  38 2c 20 32 33 2c 32 35  |,254,12,8, 23,25|
00001fc0  34 2c 31 36 2c 34 38 2c  31 32 37 2c 32 35 35 2c  |4,16,48,127,255,|
00001fd0  32 35 35 2c 31 32 37 2c  34 38 2c 31 36 20 20 0d  |255,127,48,16  .|
00001fe0  00 50 2d 20 ef 32 33 2c  32 35 35 2c 32 35 35 2c  |.P- .23,255,255,|
00001ff0  32 35 35 2c 32 35 35 2c  32 35 35 2c 32 35 35 2c  |255,255,255,255,|
00002000  32 35 35 2c 32 35 35 2c  32 35 35 20 0d 00 51 17  |255,255,255 ..Q.|
00002010  20 eb 37 3a ef 32 33 3b  38 32 30 32 3b 30 3b 30  | .7:.23;8202;0;0|
00002020  3b 30 3b 0d 00 52 55 f1  8a 31 30 2c 39 29 3b 22  |;0;..RU..10,9);"|
00002030  53 75 70 65 72 69 6f 72  20 53 6f 66 74 77 61 72  |Superior Softwar|
00002040  65 27 73 22 3a f2 48 45  41 44 3a f1 8a 38 2c 31  |e's":.HEAD:..8,1|
00002050  36 29 22 81 41 75 74 68  6f 72 3a 20 50 65 74 65  |6)".Author: Pete|
00002060  72 20 4a 6f 68 6e 73 6f  6e 22 3a e3 49 25 3d 31  |r Johnson":.I%=1|
00002070  b8 31 30 30 30 30 3a ed  0d 00 5a 85 20 f1 8a 30  |.10000:...Z. ..0|
00002080  2c 31 36 29 22 86 20 20  20 20 20 20 20 59 6f 75  |,16)".       You|
00002090  20 61 72 65 20 70 6c 61  63 65 64 20 6f 6e 20 61  | are placed on a|
000020a0  20 70 79 72 61 6d 69 64  20 6f 66 22 27 22 86 20  | pyramid of"'". |
000020b0  63 75 62 65 73 2c 20 79  6f 75 20 67 61 69 6e 20  |cubes, you gain |
000020c0  70 6f 69 6e 74 73 20 62  79 20 74 75 72 6e 69 6e  |points by turnin|
000020d0  67 20 74 68 65 22 27 22  86 20 74 6f 70 20 6f 66  |g the"'". top of|
000020e0  20 65 61 63 68 20 63 75  62 65 20 74 6f 20 61 20  | each cube to a |
000020f0  6e 65 77 20 63 6f 6c 6f  75 72 2e 22 20 0d 00 5b  |new colour." ..[|
00002100  8d 20 f1 22 86 20 20 20  20 20 20 20 59 6f 75 20  |. .".       You |
00002110  6d 75 73 74 20 62 65 20  63 61 72 65 66 75 6c 20  |must be careful |
00002120  6e 6f 74 20 74 6f 20 66  61 6c 6c 22 27 22 86 20  |not to fall"'". |
00002130  6f 66 66 20 74 68 65 20  65 64 67 65 20 6f 66 20  |off the edge of |
00002140  74 68 65 20 70 79 72 61  6d 69 64 2c 20 6f 72 20  |the pyramid, or |
00002150  62 65 22 27 22 20 86 63  72 75 73 68 65 64 20 6f  |be"'" .crushed o|
00002160  72 20 65 61 74 65 6e 20  62 79 20 74 68 65 20 70  |r eaten by the p|
00002170  79 72 61 6d 69 64 27 73  22 27 22 86 20 6f 63 63  |yramid's"'". occ|
00002180  75 70 61 6e 74 73 2e 22  3b 20 0d 00 5c 82 20 f1  |upants."; ..\. .|
00002190  22 20 54 68 65 20 73 70  69 6e 6e 69 6e 67 20 64  |" The spinning d|
000021a0  69 73 6b 73 20 77 69 6c  6c 22 27 22 86 20 74 65  |isks will"'". te|
000021b0  6c 65 70 6f 72 74 20 79  6f 75 20 74 6f 20 74 68  |leport you to th|
000021c0  65 20 74 6f 70 20 6f 66  20 74 68 65 20 63 75 62  |e top of the cub|
000021d0  65 2c 22 27 22 86 20 61  6e 64 20 6d 61 79 20 62  |e,"'". and may b|
000021e0  65 20 75 73 65 64 20 74  6f 20 6c 75 72 65 20 74  |e used to lure t|
000021f0  68 65 20 73 6e 61 6b 65  20 74 6f 20 22 27 22 20  |he snake to "'" |
00002200  86 69 74 73 20 64 65 61  74 68 2e 22 0d 00 5f 54  |.its death.".._T|
00002210  20 f1 27 8a 32 29 3b 22  83 4b 45 59 53 3a 27 41  | .'.2);".KEYS:'A|
00002220  27 2d 4e 6f 72 74 68 57  65 73 74 20 20 27 2a 27  |'-NorthWest  '*'|
00002230  2d 4e 6f 72 74 68 45 61  73 74 22 3b 8a 37 29 3b  |-NorthEast";.7);|
00002240  22 83 27 5a 27 2d 53 6f  75 74 68 57 65 73 74 20  |".'Z'-SouthWest |
00002250  20 27 3f 27 2d 53 6f 75  74 68 45 61 73 74 22 20  | '?'-SouthEast" |
00002260  0d 00 60 0f 20 e3 49 3d  30 b8 33 3a f1 3a ed 0d  |..`. .I=0.3:.:..|
00002270  00 61 1e 20 e3 49 25 3d  30 b8 33 31 3a f3 20 41  |.a. .I%=0.31:. A|
00002280  25 3a 49 25 3f 26 37 30  3d 41 25 3a ed 0d 00 62  |%:I%?&70=A%:...b|
00002290  4b 20 dc 20 30 2c 30 2c  31 2c 30 2c 34 2c 30 2c  |K . 0,0,1,0,4,0,|
000022a0  31 2c 30 2c 20 33 2c 30  2c 32 2c 30 2c 35 30 2c  |1,0, 3,0,2,0,50,|
000022b0  30 2c 33 2c 30 2c 20 32  2c 30 2c 32 2c 30 2c 35  |0,3,0, 2,0,2,0,5|
000022c0  32 2c 30 2c 33 2c 30 2c  20 31 2c 30 2c 33 2c 30  |2,0,3,0, 1,0,3,0|
000022d0  2c 32 2c 30 2c 33 2c 30  0d 00 64 1b 20 ef 32 38  |,2,0,3,0..d. .28|
000022e0  2c 30 2c 32 34 2c 33 39  2c 32 31 3a 2a 46 58 31  |,0,24,39,21:*FX1|
000022f0  35 2c 30 0d 00 6e 2b 20  f1 22 20 20 20 20 20 84  |5,0..n+ ."     .|
00002300  9d 87 50 52 45 53 53 20  53 50 41 43 45 20 42 41  |..PRESS SPACE BA|
00002310  52 20 54 4f 20 53 54 41  52 54 20 20 9c 22 0d 00  |R TO START  ."..|
00002320  78 13 ef 32 33 3b 38 32  30 32 3b 30 3b 30 3b 30  |x..23;8202;0;0;0|
00002330  3b 0d 00 82 1a f5 41 25  3d a5 3a fd 41 25 3d 33  |;.....A%=.:.A%=3|
00002340  32 3a d0 3d 26 31 37 30  30 3a f9 0d 27 10 e4 dd  |2:.=&1700:..'...|
00002350  f2 48 45 41 44 3a f1 22  20 20 20 91 20 78 7c 74  |.HEAD:."   . x|t|
00002360  20 93 34 68 34 68 94 68  34 20 20 96 5f 7c 7c 30  | .4h4h.h4  ._||0|
00002370  20 20 20 20 20 95 20 5f  30 22 27 22 20 20 20 91  |     . _0"'"   .|
00002380  6a 37 20 6b 35 93 a2 6e  3d 21 94 6a 35 20 20 96  |j7 k5..n=!.j5  .|
00002390  7e 71 72 7d 92 68 34 70  20 95 70 7a 75 70 22 27  |~qr}.h4p .pzup"'|
000023a0  22 20 20 20 91 6a 35 20  6a 35 93 2f 6f 3f 2f 94  |"   .j5 j5./o?/.|
000023b0  6a 75 70 20 96 6f a3 a3  a3 92 6a 3f a3 25 95 a3  |jup .o....j?.%..|
000023c0  6b 37 a3 22 27 22 20 20  20 91 6a 35 6c 7a 35 93  |k7."'"   .j5lz5.|
000023d0  38 6b 37 64 94 6a 37 2b  7d 96 a2 6d 7c 27 92 6a  |8k7d.j7+}..m|'.j|
000023e0  35 20 20 95 20 6a 35 22  27 22 20 20 20 91 a2 6f  |5  . j5"'"   ..o|
000023f0  7c 3f 7d 93 21 a2 21 a2  94 6a 75 78 3f 96 20 20  ||?}.!.!..jux?.  |
00002400  20 20 92 6a 35 20 20 95  20 2a 7d 7a 22 27 22 20  |  .j5  . *}z"'" |
00002410  20 20 20 20 20 20 20 20  20 20 20 20 20 94 a2 60  |             ..`|
00002420  60 20 20 20 20 20 20 20  20 20 20 20 95 22 3b 0d  |`           .";.|
00002430  27 11 19 20 f1 bd 33 32  3b bd 33 32 3b bd 31 36  |'.. ..32;.32;.16|
00002440  32 3b bd 33 33 3a e1 20  0d ff 00 00 00 00 00 00  |2;.33:. ........|
00002450  00 00 00 00 00 00 00 00  00 00 00 00 00 00 00 00  |................|
*
00002500
Q.DATA.m0
Q.DATA.m1
Q.DATA.m2
Q.DATA.m4
Q.DATA.m5