� ASTEROID BELT
� PROCTICAL COMPUTING
� JUNE 1984
(� FOR THE BBC MICRO
Z"� USE Z AND / FOR LEFT & RIGHT
d� # FOR FIRE
x� � � �t@G
��2
��init:*FX9,5
�*FX10,2
�� I=100�200 �10:� 1,1,I,2:�
�F�15:�0,10)"G E T  R E A D Y ! !":START=�(200):� START=76 � �level
��1:�init
��
�FUEL%=FUEL%-1
�� FUEL%<0 � �fuelsound

�6:�T,0)�(224)

7� �>6000 � �fincourse:�6:�finprint:�1:�scoreboard:�

�astpos

"&� � <5500 � �(11-L%)<3 � �astprint

,�0,31)

6+� FUEL%+100<255 � FS=FUEL%+100 � FS=254

@4� FUEL%>0 � � 1,0,FS,0:� 0,-10,7,3:t=�:� � �>t+2

J	� 0,0

Tpoint=�T*32+4,988)

^*� point=1 � �endsound:�1:�scoreboard:�

h� point=3 � �refuelled

r$� FUEL%>0 � �(-98) � T>0 � �left

|'� FUEL%>0 � �(-105) � T<38 � �right

�&� FIRE � � 0,0:�XP,1023:� XP,YP+56

�
FIRE=�

�� FUEL%>0 � �(-99) � �fire

�� �(L%)=1 � �fuelstation

�� �(-1) � �(-2) � �cheat

�� �

���endsound

�TIM=�/100:*FX15

�9�vibrate:�:�19,0,15,0,0,0:� V=-15 � 0:� 0,V,6,6:� V:�

��vibrate
p�19,0,7,0,0,0:� delay=1 � 50:�:� vibrate=1 � 15:�19,0,0,0,0,0:�0,-15,5,2:� vib=4 � 1 �-1:�23;13,vib;0;0;0;:�
�0,0)�(127)  
&�0,0)�(127)
0�39,31)
:
�39,31) 
D� vib=1 � 4
N�23;13,vib;0;0;0;
X�
b�19,0,7,0,0,0
l�
v�19,0,0,0,0,0
�� delay=1�300:�
��
���scoreboard
��19,0,3,0,0,0
�� FUEL%<0 � FUEL%=0
��1
�0�''"  You had ";FUEL%;" units of fuel left."
�T�''"  You lasted for ";TIM;" seconds,"'"  and destroyed ";ASTERS%;" asteroids." 
�*score%=(FUEL%+TIM*20)*ASTERS%*(L%-2)/8
�,�''"  This makes your score ";score%;"."
�� score%>H% � H%=score%
��''"  High-score : "H%
�	*FX15
�''"    Another game",game$
"� �game$,1)="Y" � game$="" � �
�
 ��astprint
*DET=�(3)
4�1
>�R,31)�(225);
H� DET=1 � �R1,31)�(225);
R�
\��astpos:R=�(38):R1=�(38):�
f��fincourse
p
TIM=60
z�=0:� � �>200
��
�� N=1 � 10:� C=1 � 7
��19,0,C,0,0,0
��=0:� � �>10
��1,1,C*(N+20),1
�� C
�� N
�	*FX15
��
���finprint
� � print=10 � 10
�/�2,print)"C O N G R A T U L A T I O N S !"
��
)�5,15)"You guided your craft safely"
#�7,16)"through the asteroids."
wait=�(300)
$*FX12,0
.�
8��fuelstation
B�3
L�(38),31)"V";
V�
`��refuelled
j	*FX15
t� 2,1,120,10
~FUEL%=FUEL%+30
��
���fuelsound
�	*FX15
�FSOUND=FSOUND+5
��1,1,FSOUND,3
��
�
��init
��23;11,0;0;0;0
�"�23,224,255,126,60,24,24,0,0,0
�+�23,225,124,254,255,255,255,254,124,124
�W�1,1,3,2,-2,4,4,4,90,0,0,-4,100,0:�2,1,-12,-12,-12,240,240,240,20,0,0,-20,126,126  
�� L%<6 � L%>10 � L%=7
� Z%<>&FEEDFACE � H%=0

Z%=&FEEDFACE

FUEL%=100
FSOUND%=50:ASTERS%=0
(
FIRE=�
2
*FX9,1
<*FX10,1
FT=20
P�=0
Z�
d
��fire
n
FIRE=�
xI=0
�XP=T*32+16
�YP=1000
��
�YP=YP-32
�	I=I+1
�point=�XP,YP)
�� point>0 � I=10
�
� XP,1000
�	� 0,3
�� XP,YP+24
�� point>0 � �hit
��
�	��hit
!� point=1 � ASTERS%=ASTERS%+1
�19,0,7,0,0,0
	*FX15
"�2,1,80,10
,�0
6$ �XP � 32,(1024-YP)� 32);�(225)
@�19,0,0,0,0,0
J�
T��level
h� 3
r�
|4�1,10)"Which level, 1 to 5"''"    (5-Hardest)"'
�� L%
�� L%>0 � L%<6
�L%=L%+5
��
���cheat
�*KEY10 OLD|MPROCcheat|M 
�	�22,7
� � print=10 � 10
��8,print)"You cheat!  "
��
�0�''" Bad lick, I'm not fooled by that one!!"
�&�'"I've got to be going now, bye!"
��
� � � �TRG
� �
�
&��right
0	T=T+1
:�3,-12,100,2
D�
N
��left
X	T=T-1
b�3,-12,100,2
l�
�� � �:�6
��:�" at line ";�
��
�

00000000  0d 00 0a 13 f4 20 41 53  54 45 52 4f 49 44 20 42  |..... ASTEROID B|
00000010  45 4c 54 0d 00 14 19 f4  20 50 52 4f 43 54 49 43  |ELT..... PROCTIC|
00000020  41 4c 20 43 4f 4d 50 55  54 49 4e 47 0d 00 1e 0f  |AL COMPUTING....|
00000030  f4 20 4a 55 4e 45 20 31  39 38 34 0d 00 28 17 f4  |. JUNE 1984..(..|
00000040  20 46 4f 52 20 54 48 45  20 42 42 43 20 4d 49 43  | FOR THE BBC MIC|
00000050  52 4f 0d 00 5a 22 f4 20  55 53 45 20 5a 20 41 4e  |RO..Z". USE Z AN|
00000060  44 20 2f 20 46 4f 52 20  4c 45 46 54 20 26 20 52  |D / FOR LEFT & R|
00000070  49 47 48 54 0d 00 64 10  f4 20 23 20 46 4f 52 20  |IGHT..d.. # FOR |
00000080  46 49 52 45 0d 00 78 0e  ee 20 85 20 e5 20 8d 74  |FIRE..x.. . . .t|
00000090  40 47 0d 00 82 06 eb 32  0d 00 8c 10 f2 69 6e 69  |@G.....2.....ini|
000000a0  74 3a 2a 46 58 39 2c 35  0d 00 96 0b 2a 46 58 31  |t:*FX9,5....*FX1|
000000b0  30 2c 32 0d 00 a0 1f e3  20 49 3d 31 30 30 b8 32  |0,2..... I=100.2|
000000c0  30 30 20 88 31 30 3a d4  20 31 2c 31 2c 49 2c 32  |00 .10:. 1,1,I,2|
000000d0  3a ed 0d 00 aa 46 fb 31  35 3a f1 8a 30 2c 31 30  |:....F.15:..0,10|
000000e0  29 22 47 20 45 20 54 20  20 52 20 45 20 41 20 44  |)"G E T  R E A D|
000000f0  20 59 20 21 20 21 22 3a  53 54 41 52 54 3d a6 28  | Y ! !":START=.(|
00000100  32 30 30 29 3a e7 20 53  54 41 52 54 3d 37 36 20  |200):. START=76 |
00000110  8c 20 f2 6c 65 76 65 6c  0d 00 b4 0c eb 31 3a f2  |. .level.....1:.|
00000120  69 6e 69 74 0d 00 e6 05  f5 0d 00 f0 11 46 55 45  |init.........FUE|
00000130  4c 25 3d 46 55 45 4c 25  2d 31 0d 00 fa 1a e7 20  |L%=FUEL%-1..... |
00000140  46 55 45 4c 25 3c 30 20  8c 20 f2 66 75 65 6c 73  |FUEL%<0 . .fuels|
00000150  6f 75 6e 64 0d 01 04 13  fb 36 3a f1 8a 54 2c 30  |ound.....6:..T,0|
00000160  29 bd 28 32 32 34 29 0d  01 0e 37 e7 20 91 3e 36  |).(224)...7. .>6|
00000170  30 30 30 20 8c 20 f2 66  69 6e 63 6f 75 72 73 65  |000 . .fincourse|
00000180  3a eb 36 3a f2 66 69 6e  70 72 69 6e 74 3a eb 31  |:.6:.finprint:.1|
00000190  3a f2 73 63 6f 72 65 62  6f 61 72 64 3a e0 0d 01  |:.scoreboard:...|
000001a0  18 0b f2 61 73 74 70 6f  73 0d 01 22 26 e7 20 91  |...astpos.."&. .|
000001b0  20 3c 35 35 30 30 20 80  20 b3 28 31 31 2d 4c 25  | <5500 . .(11-L%|
000001c0  29 3c 33 20 8c 20 f2 61  73 74 70 72 69 6e 74 0d  |)<3 . .astprint.|
000001d0  01 2c 0b f1 8a 30 2c 33  31 29 0d 01 36 2b e7 20  |.,...0,31)..6+. |
000001e0  46 55 45 4c 25 2b 31 30  30 3c 32 35 35 20 8c 20  |FUEL%+100<255 . |
000001f0  46 53 3d 46 55 45 4c 25  2b 31 30 30 20 8b 20 46  |FS=FUEL%+100 . F|
00000200  53 3d 32 35 34 0d 01 40  34 e7 20 46 55 45 4c 25  |S=254..@4. FUEL%|
00000210  3e 30 20 8c 20 d4 20 31  2c 30 2c 46 53 2c 30 3a  |>0 . . 1,0,FS,0:|
00000220  d4 20 30 2c 2d 31 30 2c  37 2c 33 3a 74 3d 91 3a  |. 0,-10,7,3:t=.:|
00000230  f5 20 fd 20 91 3e 74 2b  32 0d 01 4a 09 ec 20 30  |. . .>t+2..J.. 0|
00000240  2c 30 0d 01 54 16 70 6f  69 6e 74 3d b0 54 2a 33  |,0..T.point=.T*3|
00000250  32 2b 34 2c 39 38 38 29  0d 01 5e 2a e7 20 70 6f  |2+4,988)..^*. po|
00000260  69 6e 74 3d 31 20 8c 20  f2 65 6e 64 73 6f 75 6e  |int=1 . .endsoun|
00000270  64 3a eb 31 3a f2 73 63  6f 72 65 62 6f 61 72 64  |d:.1:.scoreboard|
00000280  3a e0 0d 01 68 1a e7 20  70 6f 69 6e 74 3d 33 20  |:...h.. point=3 |
00000290  8c 20 f2 72 65 66 75 65  6c 6c 65 64 0d 01 72 24  |. .refuelled..r$|
000002a0  e7 20 46 55 45 4c 25 3e  30 20 80 20 a6 28 2d 39  |. FUEL%>0 . .(-9|
000002b0  38 29 20 80 20 54 3e 30  20 8c 20 f2 6c 65 66 74  |8) . T>0 . .left|
000002c0  0d 01 7c 27 e7 20 46 55  45 4c 25 3e 30 20 80 20  |..|'. FUEL%>0 . |
000002d0  a6 28 2d 31 30 35 29 20  80 20 54 3c 33 38 20 8c  |.(-105) . T<38 .|
000002e0  20 f2 72 69 67 68 74 0d  01 86 26 e7 20 46 49 52  | .right...&. FIR|
000002f0  45 20 8c 20 e6 20 30 2c  30 3a ec 58 50 2c 31 30  |E . . 0,0:.XP,10|
00000300  32 33 3a df 20 58 50 2c  59 50 2b 35 36 0d 01 90  |23:. XP,YP+56...|
00000310  0a 46 49 52 45 3d a3 0d  01 9a 1e e7 20 46 55 45  |.FIRE=...... FUE|
00000320  4c 25 3e 30 20 80 20 a6  28 2d 39 39 29 20 8c 20  |L%>0 . .(-99) . |
00000330  f2 66 69 72 65 0d 01 a4  1c e7 20 b3 28 4c 25 29  |.fire..... .(L%)|
00000340  3d 31 20 8c 20 f2 66 75  65 6c 73 74 61 74 69 6f  |=1 . .fuelstatio|
00000350  6e 0d 01 ae 1c e7 20 a6  28 2d 31 29 20 80 20 a6  |n..... .(-1) . .|
00000360  28 2d 32 29 20 8c 20 f2  63 68 65 61 74 0d 01 b8  |(-2) . .cheat...|
00000370  07 fd 20 a3 0d 01 ea 0e  dd f2 65 6e 64 73 6f 75  |.. .......endsou|
00000380  6e 64 0d 01 f4 13 54 49  4d 3d 91 2f 31 30 30 3a  |nd....TIM=./100:|
00000390  2a 46 58 31 35 0d 01 fe  39 f2 76 69 62 72 61 74  |*FX15...9.vibrat|
000003a0  65 3a db 3a ef 31 39 2c  30 2c 31 35 2c 30 2c 30  |e:.:.19,0,15,0,0|
000003b0  2c 30 3a e3 20 56 3d 2d  31 35 20 b8 20 30 3a d4  |,0:. V=-15 . 0:.|
000003c0  20 30 2c 56 2c 36 2c 36  3a ed 20 56 3a e1 0d 02  | 0,V,6,6:. V:...|
000003d0  08 0d dd f2 76 69 62 72  61 74 65 0d 02 12 70 ef  |....vibrate...p.|
000003e0  31 39 2c 30 2c 37 2c 30  2c 30 2c 30 3a e3 20 64  |19,0,7,0,0,0:. d|
000003f0  65 6c 61 79 3d 31 20 b8  20 35 30 3a ed 3a e3 20  |elay=1 . 50:.:. |
00000400  76 69 62 72 61 74 65 3d  31 20 b8 20 31 35 3a ef  |vibrate=1 . 15:.|
00000410  31 39 2c 30 2c 30 2c 30  2c 30 2c 30 3a d4 30 2c  |19,0,0,0,0,0:.0,|
00000420  2d 31 35 2c 35 2c 32 3a  e3 20 76 69 62 3d 34 20  |-15,5,2:. vib=4 |
00000430  b8 20 31 20 88 2d 31 3a  ef 32 33 3b 31 33 2c 76  |. 1 .-1:.23;13,v|
00000440  69 62 3b 30 3b 30 3b 30  3b 3a ed 0d 02 1c 12 f1  |ib;0;0;0;:......|
00000450  8a 30 2c 30 29 bd 28 31  32 37 29 20 20 0d 02 26  |.0,0).(127)  ..&|
00000460  10 f1 8a 30 2c 30 29 bd  28 31 32 37 29 0d 02 30  |...0,0).(127)..0|
00000470  0c f1 8a 33 39 2c 33 31  29 0d 02 3a 0d f1 8a 33  |...39,31)..:...3|
00000480  39 2c 33 31 29 20 0d 02  44 0f e3 20 76 69 62 3d  |9,31) ..D.. vib=|
00000490  31 20 b8 20 34 0d 02 4e  15 ef 32 33 3b 31 33 2c  |1 . 4..N..23;13,|
000004a0  76 69 62 3b 30 3b 30 3b  30 3b 0d 02 58 05 ed 0d  |vib;0;0;0;..X...|
000004b0  02 62 11 ef 31 39 2c 30  2c 37 2c 30 2c 30 2c 30  |.b..19,0,7,0,0,0|
000004c0  0d 02 6c 05 ed 0d 02 76  11 ef 31 39 2c 30 2c 30  |..l....v..19,0,0|
000004d0  2c 30 2c 30 2c 30 0d 02  80 13 e3 20 64 65 6c 61  |,0,0,0..... dela|
000004e0  79 3d 31 b8 33 30 30 3a  ed 0d 02 8a 05 e1 0d 02  |y=1.300:........|
000004f0  94 10 dd f2 73 63 6f 72  65 62 6f 61 72 64 0d 02  |....scoreboard..|
00000500  9e 11 ef 31 39 2c 30 2c  33 2c 30 2c 30 2c 30 0d  |...19,0,3,0,0,0.|
00000510  02 a8 17 e7 20 46 55 45  4c 25 3c 30 20 8c 20 46  |.... FUEL%<0 . F|
00000520  55 45 4c 25 3d 30 0d 02  b2 06 fb 31 0d 02 bc 30  |UEL%=0.....1...0|
00000530  f1 27 27 22 20 20 59 6f  75 20 68 61 64 20 22 3b  |.''"  You had ";|
00000540  46 55 45 4c 25 3b 22 20  75 6e 69 74 73 20 6f 66  |FUEL%;" units of|
00000550  20 66 75 65 6c 20 6c 65  66 74 2e 22 0d 02 c6 54  | fuel left."...T|
00000560  f1 27 27 22 20 20 59 6f  75 20 6c 61 73 74 65 64  |.''"  You lasted|
00000570  20 66 6f 72 20 22 3b 54  49 4d 3b 22 20 73 65 63  | for ";TIM;" sec|
00000580  6f 6e 64 73 2c 22 27 22  20 20 61 6e 64 20 64 65  |onds,"'"  and de|
00000590  73 74 72 6f 79 65 64 20  22 3b 41 53 54 45 52 53  |stroyed ";ASTERS|
000005a0  25 3b 22 20 61 73 74 65  72 6f 69 64 73 2e 22 20  |%;" asteroids." |
000005b0  0d 02 d0 2a 73 63 6f 72  65 25 3d 28 46 55 45 4c  |...*score%=(FUEL|
000005c0  25 2b 54 49 4d 2a 32 30  29 2a 41 53 54 45 52 53  |%+TIM*20)*ASTERS|
000005d0  25 2a 28 4c 25 2d 32 29  2f 38 0d 02 da 2c f1 27  |%*(L%-2)/8...,.'|
000005e0  27 22 20 20 54 68 69 73  20 6d 61 6b 65 73 20 79  |'"  This makes y|
000005f0  6f 75 72 20 73 63 6f 72  65 20 22 3b 73 63 6f 72  |our score ";scor|
00000600  65 25 3b 22 2e 22 0d 02  e4 1b e7 20 73 63 6f 72  |e%;"."..... scor|
00000610  65 25 3e 48 25 20 8c 20  48 25 3d 73 63 6f 72 65  |e%>H% . H%=score|
00000620  25 0d 02 ee 1a f1 27 27  22 20 20 48 69 67 68 2d  |%.....''"  High-|
00000630  73 63 6f 72 65 20 3a 20  22 48 25 0d 02 f8 09 2a  |score : "H%....*|
00000640  46 58 31 35 0d 03 02 1f  e8 27 27 22 20 20 20 20  |FX15.....''"    |
00000650  41 6e 6f 74 68 65 72 20  67 61 6d 65 22 2c 67 61  |Another game",ga|
00000660  6d 65 24 0d 03 0c 22 e7  20 c0 67 61 6d 65 24 2c  |me$...". .game$,|
00000670  31 29 3d 22 59 22 20 84  20 67 61 6d 65 24 3d 22  |1)="Y" . game$="|
00000680  22 20 8c 20 f9 0d 03 16  05 e1 0d 03 20 0e dd f2  |" . ........ ...|
00000690  61 73 74 70 72 69 6e 74  0d 03 2a 0c 44 45 54 3d  |astprint..*.DET=|
000006a0  b3 28 33 29 0d 03 34 06  fb 31 0d 03 3e 12 f1 8a  |.(3)..4..1..>...|
000006b0  52 2c 33 31 29 bd 28 32  32 35 29 3b 0d 03 48 1d  |R,31).(225);..H.|
000006c0  e7 20 44 45 54 3d 31 20  8c 20 f1 8a 52 31 2c 33  |. DET=1 . ..R1,3|
000006d0  31 29 bd 28 32 32 35 29  3b 0d 03 52 05 e1 0d 03  |1).(225);..R....|
000006e0  5c 1f dd f2 61 73 74 70  6f 73 3a 52 3d b3 28 33  |\...astpos:R=.(3|
000006f0  38 29 3a 52 31 3d b3 28  33 38 29 3a e1 0d 03 66  |8):R1=.(38):...f|
00000700  0f dd f2 66 69 6e 63 6f  75 72 73 65 0d 03 70 0a  |...fincourse..p.|
00000710  54 49 4d 3d 36 30 0d 03  7a 11 d1 3d 30 3a f5 20  |TIM=60..z..=0:. |
00000720  fd 20 91 3e 32 30 30 0d  03 84 05 db 0d 03 8e 18  |. .>200.........|
00000730  e3 20 4e 3d 31 20 b8 20  31 30 3a e3 20 43 3d 31  |. N=1 . 10:. C=1|
00000740  20 b8 20 37 0d 03 98 11  ef 31 39 2c 30 2c 43 2c  | . 7.....19,0,C,|
00000750  30 2c 30 2c 30 0d 03 a2  10 d1 3d 30 3a f5 20 fd  |0,0,0.....=0:. .|
00000760  20 91 3e 31 30 0d 03 ac  13 d4 31 2c 31 2c 43 2a  | .>10.....1,1,C*|
00000770  28 4e 2b 32 30 29 2c 31  0d 03 b6 07 ed 20 43 0d  |(N+20),1..... C.|
00000780  03 c0 07 ed 20 4e 0d 03  ca 09 2a 46 58 31 35 0d  |.... N....*FX15.|
00000790  03 d4 05 e1 0d 03 de 0e  dd f2 66 69 6e 70 72 69  |..........finpri|
000007a0  6e 74 0d 03 e8 14 20 e3  20 70 72 69 6e 74 3d 31  |nt.... . print=1|
000007b0  30 20 b8 20 31 30 0d 03  f2 2f f1 8a 32 2c 70 72  |0 . 10.../..2,pr|
000007c0  69 6e 74 29 22 43 20 4f  20 4e 20 47 20 52 20 41  |int)"C O N G R A|
000007d0  20 54 20 55 20 4c 20 41  20 54 20 49 20 4f 20 4e  | T U L A T I O N|
000007e0  20 53 20 21 22 0d 03 fc  05 ed 0d 04 06 29 f1 8a  | S !"........)..|
000007f0  35 2c 31 35 29 22 59 6f  75 20 67 75 69 64 65 64  |5,15)"You guided|
00000800  20 79 6f 75 72 20 63 72  61 66 74 20 73 61 66 65  | your craft safe|
00000810  6c 79 22 0d 04 10 23 f1  8a 37 2c 31 36 29 22 74  |ly"...#..7,16)"t|
00000820  68 72 6f 75 67 68 20 74  68 65 20 61 73 74 65 72  |hrough the aster|
00000830  6f 69 64 73 2e 22 0d 04  1a 0f 77 61 69 74 3d a6  |oids."....wait=.|
00000840  28 33 30 30 29 0d 04 24  0b 2a 46 58 31 32 2c 30  |(300)..$.*FX12,0|
00000850  0d 04 2e 05 e1 0d 04 38  11 dd f2 66 75 65 6c 73  |.......8...fuels|
00000860  74 61 74 69 6f 6e 0d 04  42 06 fb 33 0d 04 4c 13  |tation..B..3..L.|
00000870  f1 8a b3 28 33 38 29 2c  33 31 29 22 56 22 3b 0d  |...(38),31)"V";.|
00000880  04 56 05 e1 0d 04 60 0f  dd f2 72 65 66 75 65 6c  |.V....`...refuel|
00000890  6c 65 64 0d 04 6a 09 2a  46 58 31 35 0d 04 74 10  |led..j.*FX15..t.|
000008a0  d4 20 32 2c 31 2c 31 32  30 2c 31 30 0d 04 7e 12  |. 2,1,120,10..~.|
000008b0  46 55 45 4c 25 3d 46 55  45 4c 25 2b 33 30 0d 04  |FUEL%=FUEL%+30..|
000008c0  88 05 e1 0d 04 92 0f dd  f2 66 75 65 6c 73 6f 75  |.........fuelsou|
000008d0  6e 64 0d 04 9c 09 2a 46  58 31 35 0d 04 a6 13 46  |nd....*FX15....F|
000008e0  53 4f 55 4e 44 3d 46 53  4f 55 4e 44 2b 35 0d 04  |SOUND=FSOUND+5..|
000008f0  b0 11 d4 31 2c 31 2c 46  53 4f 55 4e 44 2c 33 0d  |...1,1,FSOUND,3.|
00000900  04 ba 05 e1 0d 04 c4 0a  dd f2 69 6e 69 74 0d 04  |..........init..|
00000910  ce 12 ef 32 33 3b 31 31  2c 30 3b 30 3b 30 3b 30  |...23;11,0;0;0;0|
00000920  0d 04 d8 22 ef 32 33 2c  32 32 34 2c 32 35 35 2c  |...".23,224,255,|
00000930  31 32 36 2c 36 30 2c 32  34 2c 32 34 2c 30 2c 30  |126,60,24,24,0,0|
00000940  2c 30 0d 04 e2 2b ef 32  33 2c 32 32 35 2c 31 32  |,0...+.23,225,12|
00000950  34 2c 32 35 34 2c 32 35  35 2c 32 35 35 2c 32 35  |4,254,255,255,25|
00000960  35 2c 32 35 34 2c 31 32  34 2c 31 32 34 0d 04 ec  |5,254,124,124...|
00000970  57 e2 31 2c 31 2c 33 2c  32 2c 2d 32 2c 34 2c 34  |W.1,1,3,2,-2,4,4|
00000980  2c 34 2c 39 30 2c 30 2c  30 2c 2d 34 2c 31 30 30  |,4,90,0,0,-4,100|
00000990  2c 30 3a e2 32 2c 31 2c  2d 31 32 2c 2d 31 32 2c  |,0:.2,1,-12,-12,|
000009a0  2d 31 32 2c 32 34 30 2c  32 34 30 2c 32 34 30 2c  |-12,240,240,240,|
000009b0  32 30 2c 30 2c 30 2c 2d  32 30 2c 31 32 36 2c 31  |20,0,0,-20,126,1|
000009c0  32 36 20 20 0d 04 f6 19  e7 20 4c 25 3c 36 20 84  |26  ..... L%<6 .|
000009d0  20 4c 25 3e 31 30 20 8c  20 4c 25 3d 37 0d 05 00  | L%>10 . L%=7...|
000009e0  1a e7 20 5a 25 3c 3e 26  46 45 45 44 46 41 43 45  |.. Z%<>&FEEDFACE|
000009f0  20 8c 20 48 25 3d 30 0d  05 0a 10 5a 25 3d 26 46  | . H%=0....Z%=&F|
00000a00  45 45 44 46 41 43 45 0d  05 14 0d 46 55 45 4c 25  |EEDFACE....FUEL%|
00000a10  3d 31 30 30 0d 05 1e 18  46 53 4f 55 4e 44 25 3d  |=100....FSOUND%=|
00000a20  35 30 3a 41 53 54 45 52  53 25 3d 30 0d 05 28 0a  |50:ASTERS%=0..(.|
00000a30  46 49 52 45 3d a3 0d 05  32 0a 2a 46 58 39 2c 31  |FIRE=...2.*FX9,1|
00000a40  0d 05 3c 0b 2a 46 58 31  30 2c 31 0d 05 46 08 54  |..<.*FX10,1..F.T|
00000a50  3d 32 30 0d 05 50 07 d1  3d 30 0d 05 5a 05 e1 0d  |=20..P..=0..Z...|
00000a60  05 64 0a dd f2 66 69 72  65 0d 05 6e 0a 46 49 52  |.d...fire..n.FIR|
00000a70  45 3d b9 0d 05 78 07 49  3d 30 0d 05 82 0e 58 50  |E=...x.I=0....XP|
00000a80  3d 54 2a 33 32 2b 31 36  0d 05 8c 0b 59 50 3d 31  |=T*32+16....YP=1|
00000a90  30 30 30 0d 05 96 05 f5  0d 05 a0 0c 59 50 3d 59  |000.........YP=Y|
00000aa0  50 2d 33 32 0d 05 aa 09  49 3d 49 2b 31 0d 05 b4  |P-32....I=I+1...|
00000ab0  11 70 6f 69 6e 74 3d b0  58 50 2c 59 50 29 0d 05  |.point=.XP,YP)..|
00000ac0  be 14 fd 20 70 6f 69 6e  74 3e 30 20 84 20 49 3d  |... point>0 . I=|
00000ad0  31 30 0d 05 c8 0d ec 20  58 50 2c 31 30 30 30 0d  |10..... XP,1000.|
00000ae0  05 d2 09 e6 20 30 2c 33  0d 05 dc 0e df 20 58 50  |.... 0,3..... XP|
00000af0  2c 59 50 2b 32 34 0d 05  e6 14 e7 20 70 6f 69 6e  |,YP+24..... poin|
00000b00  74 3e 30 20 8c 20 f2 68  69 74 0d 05 f0 05 e1 0d  |t>0 . .hit......|
00000b10  05 fa 09 dd f2 68 69 74  0d 06 04 21 e7 20 70 6f  |.....hit...!. po|
00000b20  69 6e 74 3d 31 20 8c 20  41 53 54 45 52 53 25 3d  |int=1 . ASTERS%=|
00000b30  41 53 54 45 52 53 25 2b  31 0d 06 0e 11 ef 31 39  |ASTERS%+1.....19|
00000b40  2c 30 2c 37 2c 30 2c 30  2c 30 0d 06 18 09 2a 46  |,0,7,0,0,0....*F|
00000b50  58 31 35 0d 06 22 0e d4  32 2c 31 2c 38 30 2c 31  |X15.."..2,1,80,1|
00000b60  30 0d 06 2c 06 fb 30 0d  06 36 24 20 f1 8a 58 50  |0..,..0..6$ ..XP|
00000b70  20 81 20 33 32 2c 28 31  30 32 34 2d 59 50 29 81  | . 32,(1024-YP).|
00000b80  20 33 32 29 3b bd 28 32  32 35 29 0d 06 40 11 ef  | 32);.(225)..@..|
00000b90  31 39 2c 30 2c 30 2c 30  2c 30 2c 30 0d 06 4a 05  |19,0,0,0,0,0..J.|
00000ba0  e1 0d 06 54 0b dd f2 6c  65 76 65 6c 0d 06 68 07  |...T...level..h.|
00000bb0  fb 20 33 0d 06 72 05 f5  0d 06 7c 34 f1 8a 31 2c  |. 3..r....|4..1,|
00000bc0  31 30 29 22 57 68 69 63  68 20 6c 65 76 65 6c 2c  |10)"Which level,|
00000bd0  20 31 20 74 6f 20 35 22  27 27 22 20 20 20 20 28  | 1 to 5"''"    (|
00000be0  35 2d 48 61 72 64 65 73  74 29 22 27 0d 06 86 08  |5-Hardest)"'....|
00000bf0  e8 20 4c 25 0d 06 90 11  fd 20 4c 25 3e 30 20 80  |. L%..... L%>0 .|
00000c00  20 4c 25 3c 36 0d 06 9a  0b 4c 25 3d 4c 25 2b 35  | L%<6....L%=L%+5|
00000c10  0d 06 a4 05 f9 0d 06 ae  0b dd f2 63 68 65 61 74  |...........cheat|
00000c20  0d 06 b8 1c 2a 4b 45 59  31 30 20 4f 4c 44 7c 4d  |....*KEY10 OLD|M|
00000c30  50 52 4f 43 63 68 65 61  74 7c 4d 20 0d 06 c2 09  |PROCcheat|M ....|
00000c40  ef 32 32 2c 37 0d 06 cc  14 20 e3 20 70 72 69 6e  |.22,7.... . prin|
00000c50  74 3d 31 30 20 b8 20 31  30 0d 06 d6 1c f1 8a 38  |t=10 . 10......8|
00000c60  2c 70 72 69 6e 74 29 22  59 6f 75 20 63 68 65 61  |,print)"You chea|
00000c70  74 21 20 20 22 0d 06 e0  05 ed 0d 06 ea 30 f1 27  |t!  "........0.'|
00000c80  27 22 20 42 61 64 20 6c  69 63 6b 2c 20 49 27 6d  |'" Bad lick, I'm|
00000c90  20 6e 6f 74 20 66 6f 6f  6c 65 64 20 62 79 20 74  | not fooled by t|
00000ca0  68 61 74 20 6f 6e 65 21  21 22 0d 06 f4 26 f1 27  |hat one!!"...&.'|
00000cb0  22 49 27 76 65 20 67 6f  74 20 74 6f 20 62 65 20  |"I've got to be |
00000cc0  67 6f 69 6e 67 20 6e 6f  77 2c 20 62 79 65 21 22  |going now, bye!"|
00000cd0  0d 06 fe 05 f5 0d 07 08  0e ee 20 85 20 e5 20 8d  |.......... . . .|
00000ce0  54 52 47 0d 07 12 07 fd  20 a3 0d 07 1c 05 e1 0d  |TRG..... .......|
00000cf0  07 26 0b dd f2 72 69 67  68 74 0d 07 30 09 54 3d  |.&...right..0.T=|
00000d00  54 2b 31 0d 07 3a 10 d4  33 2c 2d 31 32 2c 31 30  |T+1..:..3,-12,10|
00000d10  30 2c 32 0d 07 44 05 e1  0d 07 4e 0a dd f2 6c 65  |0,2..D....N...le|
00000d20  66 74 0d 07 58 09 54 3d  54 2d 31 0d 07 62 10 d4  |ft..X.T=T-1..b..|
00000d30  33 2c 2d 31 32 2c 31 30  30 2c 32 0d 07 6c 05 e1  |3,-12,100,2..l..|
00000d40  0d 07 80 0c ee 20 85 20  87 3a eb 36 0d 07 8a 14  |..... . .:.6....|
00000d50  f6 3a f1 22 20 61 74 20  6c 69 6e 65 20 22 3b 9e  |.:." at line ";.|
00000d60  0d 07 94 05 e0 0d ff                              |.......|
00000d67