<� DIVE BOMBER
d� � � �dRJ
n�5
x�23,1,0;0;0;0;
�
�title
��4
��19,0,4,0,0,0
�	�init
��instructions
��newgame
��
��4
��19,0,4,0,0,0
��23,1,0;0;0;0;:�
��newrun 
�$�1,7)"PRESS SPACE BAR TO START"
��:�7:� �=32

�1,7)"TAKE OFF !";�(14):�7

�

� F%=0 � �D@A

"'� ?(22775+320*F%)<>0 �bombhit:�D@A

,1F%=F%+1:� ?(22775+320*F%)<>0 � �bombhit:�D@A

6 �30,F%-1);�1;�30,F%);�(227)

@^� X%=0 � L%=225 � X%=X%-1:�0,-15,2,5:� X%=0 � �1,7);�(24):�30,K%);�(225):� �d~A � � �d~A

J$� �(-73) � K%>6 � L%=224:N%=K%-1

T� �(-105) � L%=226:N%=K%+1

^.� ?(22775+320*N%)<>0 � �planehit(N%):�trB

h#�30,K%);�1;�30,N%);�(L%):K%=N%

r�1,-15,32+40*(L%-224),5

|/� �(-98) � F%=0 � L%=226 � F%=K%+1 � � �tZA

�+� ?(22775+320*F%)<>0 � �bombhit:�tZA  

��30,F%);�(227)

�� T%=0 � U%>0 � U%=U%+1

�*� U%>30 � V%<7 � �U%,V%);�1:T%=0:U%=0

�I� T%=1 � �U%,V%);�1:� V%>6 � U%<31 � U%=U%+1:V%=V%-1:�U%,V%);�(240)

�S� U%>0 � T%=0 � 27-U%+I%<=V%-K% � T%=1:�U%,V%);�(240):�&11,-1,0,0:�&10,-15,4,8

�1� G%=232 � U%=0 � B%>0 � U%=1:V%=H%-1:I%=�(5)

�� D%=0 � B%>0 � B%=B%+1 

�*� B%>30 � C%<7 � �B%,C%);�1:D%=0:B%=0

�I� D%=1 � �B%,C%);�1:� C%>6 � B%<31 � B%=B%+1:C%=C%-1:�B%,C%);�(240)

�Z� B%>0 � D%=0 � 28-B%+E%<=C%-K%+(1+C%-K%)*(225-L%) � D%=1:�B%,C%);�(240):�&10,-15,4,2

�+ � G%=232 � B%=0 � B%=1:C%=H%-1:E%=�(3)

�'A%=0:� Z%<1 � G%=237:Z%=Z%-1:�DbB 
� G%=235 � A%=A%-1
� H%>28 � G%=235:�DNB
"� H%<Y% � G%=234:A%=A%+1:�DNB
&R%=�(127):G%=229
0�:R%=R% �2:G%=G%+1:� R%=0
:� G%=235 � G%=G%-�(4) � 4
D� G%=234 � A%=A%+1
NH%=H%+A%
X+� G%<234 � Z%>0 � Z%=Z%-1:�31,5);Z%;�1
b� SCRLR
l�0,H%);�(G%)
v� X%<>0 � �thB
�.� ?(22775+320*K%)<>0 � �planehit(K%):�trB
�I� D%=1 � �B%,C%);�1:� C%>6 � B%<31 � B%=B%+1:C%=C%-1:�B%,C%);�(240)
�f� T%=1 � �U%,V%);�1:� V%>6 � U%<31 � �U%,V%);�1:� V%>6 � U%<31 � U%=U%+1:V%=V%-1:�U%,V%);�(240)
�%� J%>0 � J%=J%-1:� J%<1 � ch%=&10
�� M%=1�DL%:�
�� Z%<-40
�L� Z%>-50 � �landing � � L%=242 � �1,7)"SHOT DOWN !" � �1,7)"CRASHED !"
��=0:� � �>100
�*FX15,0
�� Z%=-50
�-�highscores:�3,M%)"ANOTHER GAME (Y/N) ?"
��7:I$=�:� I$="Y" � �:� �tt@
� � I$<>"N" � �dnB
*FX15,0
�6
�
 :
�
��bombhit
�,� ?(22774+320*F%)=32 � �30,F%);�1:�DBD
�4� ?(22774+320*F%)<100 � �&10,-15,4,10:J%=1:�TnD
Q%=10*?(22769+320*F%)
W%=W%+Q%:S%=S%+Q%
�7,3);S%;�25,3);W%
$ �&10,-15,4,20:J%=5
.�30,F%);�(228)
8ch%=&11
B� F%-1<>K% � �30,F%-1);�1
LF%=0
V�
`:
j
��landing
t#� F%>0 � �30,F%);�1:�&11,0,0,1
~�1,7)"LANDING !"
��
�A� K%<H%-1 � K%=K%+1:�30,K%-1);�1;�30,K%);�(226):�&10,-15,3,5
�� M%=1 � 2*DL%:�
�� K%=H%-1 � �30,K%);�(243)
�
� K%=H%-1
�U� W%>=R% � �1,7)"MISSION ACCOMPLISHED !" � �1,7)"FAILED REQUIRED SCORE.":Z%=-50
�S%=S%+100:�7,3);S%
�� M%=0�10000:�
��
�:
�
��init
�
� SET 400
� PASS=0�1


P%=SET
[
OPT PASS*2
(*.SET LDA #&38:STA &74:LDA#&72:STA &75 
2LDX #39:LDA#0
<.clear STA SET+300,X:DEX
FBPL clear:RTS
P.SCRLR STA SET+300
Z#LDA &74:STA &70:LDA &75:STA &71
dLDX#39 
n.sqr LDA#0:LDY#7
x#.blank STA(&70),Y:DEY:BPL blank
�LDA SET+300,X:STA SET+301,X
�BEQ level:BMI up
�LDA &70:CLC:ADC#&38:STA &70
�#LDA&71:ADC#1:STA&71:CLC:BCC ind
�".up LDA&70:SEC:SBC#&48:STA &70
�$LDA &71:SBC#1:STA&71:CLC:BCC ind
�#.level LDA &70:SEC:SBC#8:STA&70
�LDA&71:SBC#0:STA &71
�.ind DEX:BPL sethb:RTS
�#.sethb LDA&70:CLC:ADC#8:STA &72
�LDA &71:ADC#0:STA&73 
�CPX#38:BNE trans
�LDA&72:STA&74:LDA&73:STA&75
.trans LDY#7
,.byte LDA(&70),Y:STA(&72),Y:DEY:BPL byte
BMI sqr
"]
,�
6�
@�23,224,0,80,40,16,8,5,2,0
J �23,225,0,0,0,0,97,255,0,0
T�23,226,4,2,4,40,80,32,64,0
^�23,227,0,16,8,20,32,64,0,0
h%�23,228,0,146,84,56,254,56,84,146
r'�23,230,16,16,16,16,254,198,254,255
| �23,231,8,8,8,8,8,232,23,255
�&�23,232,2,4,104,48,120,248,112,255
�'�23,233,0,2,102,102,102,102,102,255
� �23,234,1,2,4,8,16,32,64,128
� �23,235,128,64,32,16,8,4,2,1
��23,236,0,0,0,0,0,0,0,255
�*�23,237,255,129,129,129,129,129,65,129
��23,240,0,0,0,0,0,0,32,64
��23,241,8,8,8,8,8,8,0,0
��23,242,24,8,8,8,8,24,24,8
��23,243,0,0,0,0,0,97,255,72
�%�1,130,5,3,5,50,60,70,0,0,0,0,0,0
�#�2,128,10,0,0,6,0,0,0,0,0,0,0,0
� HSC%(6),NAME$(6)
*� M%=0�6:HSC%(M%)=0:NAME$(M%)=�11,�32)
�:�
&:
0
��newgame
:DL%=392:S%=0:Y%=21
DRS%=700:RN%=0
N�
X:
b��newrun
l
� M%=0�38
v!�M%,5);�(236);�M%,20);�(237)
��
�	� SET
�� RS%<2500 � RS%=RS%+100
�� DL%<2 � DL%=DL%-30
�
RN%=RN%+1
�� Y%>10 � Y%=Y%-1
�#G%=236:H%=20:K%=19:L%=243:N%=K%
�F%=0:B%=0:D%=0:U%=0:T%=0
�"J%=0:ch%=&10:W%=0:Z%=100:X%=15
�q�7,1)"GAME";�17,1)"REQD.";�25,1)"RUN";�32,1)"HIGH";�0,3)"SCORE";�7,3);S%;�17,3);RS%;�25,3);W%;�32,3);HSC%(0)
�2�3,5)"  RUN ";RN%;�1;�21,5)"  TARGETS ";Z%;�1
��30,K%);�(L%)
�R%=�(-�)
�
:
 ��planehit(k%)
 
Z%=-50
*M� ?(22775+320*k%)<>64 � �30,k%+255-L%);�1;�30,k%);�(228):�&10,-15,6,20:�
4�&10,-15,6,20
>
L%=242
H�
R"�30,k%);�(242);�30,k%-1);�241
\k%=k%+1:pk%=?(22775+320*k%)
f� M%=1�1000:�
p� pk%<>0 � pk%<>64
z$�30,k%);�(228);�30,k%-1);�(241)
��&10,3,6,40
��
�:
���instructions
��
�I�'�2)"Use your aircraft to bomb enemy";�9;"installations, and score:"
�+�'�4)"SUPPLY DUMP";�(13);;�(233);"  20"
�%�'�4)"AA GUN";�(18);�(232);"  40"
�3�'�4)"COMMUNICATIONS CENTRE";�(3);�(231);"  80"
�-�'�4)"COMMAND CENTRE";�(10);�(230);" 160"
�W�'�2)"If you reach or surpass the required";�(4);"score, you will get another run."
��'�2)"Successive runs become harder as the";�(4)"game speeds up, and the ground may";�(6);"become higher, with an increase in";�(6)"the required score." 
�?�'�2)"If you crash or are shot down, the";�(6);"game ends."
	$�'�4)"AIRCRAFT CLIMB";�(3);"':'"
	#�'�4)"AIRCRAFT DIVE";�(4);"'/'"
	1�'�4)"RELEASE BOMB";�(5);"'Z' (when in dive)"
	$/�2,29)"Press the space bar to continue :";
	.� � �=32
	8�
	B:
	L��title
	V�1
	`� M%=6�10 �4
	j�5,M%);�11,�(61)):�
	t�2
	~�5,8);"DIVE-BOMBER"
	��1
	��10,16)"by"
	��3
	��5,18)"N.Mallinson"
	��=0:� � �>100
	��
	�:
	���phstable
	��
	��10,4)"HIGH SCORE TABLE"
	�*�6,8)"No.";�13,8)"NAME";�25,8)"SCORE"
	�	M%=-1
�

M%=M%+1
a� HSC%(M%)=0 � � � =� � �6,11+2*M%);M%+1;�12,11+2*M%);NAME$(M%);�25,11+2*M%);HSC%(M%):� M%=5
*� HSC%(0)=0 � �12,16)"NO SCORE YET !"
(*� Z%=0 � �3,27)"INSTRUCTIONS (Y/N) ?"
2�
<:
F��highscores
PM%=6
Z�
dM%=M%-1
nT� S%>HSC%(M%) � HSC%(M%+1)=HSC%(M%):NAME$(M%+1)=NAME$(M%):� M%=0 � M%=M%+1:� �=�
x� M%>5 � M%=9:�
��
�-�1,7)"YOU ARE ON THE HIGH SCORE TABLE !"
�;�3,12)"PLEASE INPUT YOUR NAME"''�5)"(max. 10 letters)"
�2�:�7:�10,17);�(15):� �10,17)"? "N$:� �(N$)<11
�HSC%(M%)=S%:NAME$(M%)=N$
��phstable:M%=27
��
�:
�
� � �:� 6
�� �<>0 �:�" at line ";� 
��
�

00000000  0d 00 3c 11 f4 20 44 49  56 45 20 42 4f 4d 42 45  |..<.. DIVE BOMBE|
00000010  52 0d 00 64 0e ee 20 85  20 e5 20 8d 64 52 4a 0d  |R..d.. . . .dRJ.|
00000020  00 6e 06 eb 35 0d 00 78  12 ef 32 33 2c 31 2c 30  |.n..5..x..23,1,0|
00000030  3b 30 3b 30 3b 30 3b 0d  00 82 0a f2 74 69 74 6c  |;0;0;0;.....titl|
00000040  65 0d 00 8c 06 eb 34 0d  00 96 11 ef 31 39 2c 30  |e.....4.....19,0|
00000050  2c 34 2c 30 2c 30 2c 30  0d 00 a0 09 f2 69 6e 69  |,4,0,0,0.....ini|
00000060  74 0d 00 aa 11 f2 69 6e  73 74 72 75 63 74 69 6f  |t.....instructio|
00000070  6e 73 0d 00 b4 0c f2 6e  65 77 67 61 6d 65 0d 00  |ns.....newgame..|
00000080  be 05 f5 0d 00 c8 06 eb  34 0d 00 d2 11 ef 31 39  |........4.....19|
00000090  2c 30 2c 34 2c 30 2c 30  2c 30 0d 00 dc 14 ef 32  |,0,4,0,0,0.....2|
000000a0  33 2c 31 2c 30 3b 30 3b  30 3b 30 3b 3a db 0d 00  |3,1,0;0;0;0;:...|
000000b0  e6 0c f2 6e 65 77 72 75  6e 20 0d 00 f0 24 f1 8a  |...newrun ...$..|
000000c0  31 2c 37 29 22 50 52 45  53 53 20 53 50 41 43 45  |1,7)"PRESS SPACE|
000000d0  20 42 41 52 20 54 4f 20  53 54 41 52 54 22 0d 00  | BAR TO START"..|
000000e0  fa 0f f5 3a ef 37 3a fd  20 a5 3d 33 32 0d 01 04  |...:.7:. .=32...|
000000f0  1f f1 8a 31 2c 37 29 22  54 41 4b 45 20 4f 46 46  |...1,7)"TAKE OFF|
00000100  20 21 22 3b 89 28 31 34  29 3a ef 37 0d 01 0e 05  | !";.(14):.7....|
00000110  f5 0d 01 18 11 e7 20 46  25 3d 30 20 e5 20 8d 44  |...... F%=0 . .D|
00000120  40 41 0d 01 22 27 e7 20  3f 28 32 32 37 37 35 2b  |@A.."'. ?(22775+|
00000130  33 32 30 2a 46 25 29 3c  3e 30 20 f2 62 6f 6d 62  |320*F%)<>0 .bomb|
00000140  68 69 74 3a e5 8d 44 40  41 0d 01 2c 31 46 25 3d  |hit:..D@A..,1F%=|
00000150  46 25 2b 31 3a e7 20 3f  28 32 32 37 37 35 2b 33  |F%+1:. ?(22775+3|
00000160  32 30 2a 46 25 29 3c 3e  30 20 8c 20 f2 62 6f 6d  |20*F%)<>0 . .bom|
00000170  62 68 69 74 3a e5 8d 44  40 41 0d 01 36 20 f1 8a  |bhit:..D@A..6 ..|
00000180  33 30 2c 46 25 2d 31 29  3b 89 31 3b 8a 33 30 2c  |30,F%-1);.1;.30,|
00000190  46 25 29 3b bd 28 32 32  37 29 0d 01 40 5e e7 20  |F%);.(227)..@^. |
000001a0  58 25 3d 30 20 8c 20 4c  25 3d 32 32 35 20 8b 20  |X%=0 . L%=225 . |
000001b0  58 25 3d 58 25 2d 31 3a  d4 30 2c 2d 31 35 2c 32  |X%=X%-1:.0,-15,2|
000001c0  2c 35 3a e7 20 58 25 3d  30 20 8c 20 f1 8a 31 2c  |,5:. X%=0 . ..1,|
000001d0  37 29 3b 89 28 32 34 29  3a f1 8a 33 30 2c 4b 25  |7);.(24):..30,K%|
000001e0  29 3b bd 28 32 32 35 29  3a e5 20 8d 64 7e 41 20  |);.(225):. .d~A |
000001f0  8b 20 e5 20 8d 64 7e 41  0d 01 4a 24 e7 20 a6 28  |. . .d~A..J$. .(|
00000200  2d 37 33 29 20 80 20 4b  25 3e 36 20 8c 20 4c 25  |-73) . K%>6 . L%|
00000210  3d 32 32 34 3a 4e 25 3d  4b 25 2d 31 0d 01 54 1e  |=224:N%=K%-1..T.|
00000220  e7 20 a6 28 2d 31 30 35  29 20 8c 20 4c 25 3d 32  |. .(-105) . L%=2|
00000230  32 36 3a 4e 25 3d 4b 25  2b 31 0d 01 5e 2e e7 20  |26:N%=K%+1..^.. |
00000240  3f 28 32 32 37 37 35 2b  33 32 30 2a 4e 25 29 3c  |?(22775+320*N%)<|
00000250  3e 30 20 8c 20 f2 70 6c  61 6e 65 68 69 74 28 4e  |>0 . .planehit(N|
00000260  25 29 3a e5 8d 74 72 42  0d 01 68 23 f1 8a 33 30  |%):..trB..h#..30|
00000270  2c 4b 25 29 3b 89 31 3b  8a 33 30 2c 4e 25 29 3b  |,K%);.1;.30,N%);|
00000280  bd 28 4c 25 29 3a 4b 25  3d 4e 25 0d 01 72 1b d4  |.(L%):K%=N%..r..|
00000290  31 2c 2d 31 35 2c 33 32  2b 34 30 2a 28 4c 25 2d  |1,-15,32+40*(L%-|
000002a0  32 32 34 29 2c 35 0d 01  7c 2f e7 20 a6 28 2d 39  |224),5..|/. .(-9|
000002b0  38 29 20 80 20 46 25 3d  30 20 80 20 4c 25 3d 32  |8) . F%=0 . L%=2|
000002c0  32 36 20 8c 20 46 25 3d  4b 25 2b 31 20 8b 20 e5  |26 . F%=K%+1 . .|
000002d0  20 8d 74 5a 41 0d 01 86  2b e7 20 3f 28 32 32 37  | .tZA...+. ?(227|
000002e0  37 35 2b 33 32 30 2a 46  25 29 3c 3e 30 20 8c 20  |75+320*F%)<>0 . |
000002f0  f2 62 6f 6d 62 68 69 74  3a e5 8d 74 5a 41 20 20  |.bombhit:..tZA  |
00000300  0d 01 90 13 f1 8a 33 30  2c 46 25 29 3b bd 28 32  |......30,F%);.(2|
00000310  32 37 29 0d 01 9a 1b e7  20 54 25 3d 30 20 80 20  |27)..... T%=0 . |
00000320  55 25 3e 30 20 8c 20 55  25 3d 55 25 2b 31 0d 01  |U%>0 . U%=U%+1..|
00000330  a4 2a e7 20 55 25 3e 33  30 20 84 20 56 25 3c 37  |.*. U%>30 . V%<7|
00000340  20 8c 20 f1 8a 55 25 2c  56 25 29 3b 89 31 3a 54  | . ..U%,V%);.1:T|
00000350  25 3d 30 3a 55 25 3d 30  0d 01 ae 49 e7 20 54 25  |%=0:U%=0...I. T%|
00000360  3d 31 20 8c 20 f1 8a 55  25 2c 56 25 29 3b 89 31  |=1 . ..U%,V%);.1|
00000370  3a e7 20 56 25 3e 36 20  80 20 55 25 3c 33 31 20  |:. V%>6 . U%<31 |
00000380  8c 20 55 25 3d 55 25 2b  31 3a 56 25 3d 56 25 2d  |. U%=U%+1:V%=V%-|
00000390  31 3a f1 8a 55 25 2c 56  25 29 3b bd 28 32 34 30  |1:..U%,V%);.(240|
000003a0  29 0d 01 b8 53 e7 20 55  25 3e 30 20 80 20 54 25  |)...S. U%>0 . T%|
000003b0  3d 30 20 80 20 32 37 2d  55 25 2b 49 25 3c 3d 56  |=0 . 27-U%+I%<=V|
000003c0  25 2d 4b 25 20 8c 20 54  25 3d 31 3a f1 8a 55 25  |%-K% . T%=1:..U%|
000003d0  2c 56 25 29 3b bd 28 32  34 30 29 3a d4 26 31 31  |,V%);.(240):.&11|
000003e0  2c 2d 31 2c 30 2c 30 3a  d4 26 31 30 2c 2d 31 35  |,-1,0,0:.&10,-15|
000003f0  2c 34 2c 38 0d 01 c2 31  e7 20 47 25 3d 32 33 32  |,4,8...1. G%=232|
00000400  20 80 20 55 25 3d 30 20  80 20 42 25 3e 30 20 8c  | . U%=0 . B%>0 .|
00000410  20 55 25 3d 31 3a 56 25  3d 48 25 2d 31 3a 49 25  | U%=1:V%=H%-1:I%|
00000420  3d b3 28 35 29 0d 01 cc  1c e7 20 44 25 3d 30 20  |=.(5)..... D%=0 |
00000430  80 20 42 25 3e 30 20 8c  20 42 25 3d 42 25 2b 31  |. B%>0 . B%=B%+1|
00000440  20 0d 01 d6 2a e7 20 42  25 3e 33 30 20 84 20 43  | ...*. B%>30 . C|
00000450  25 3c 37 20 8c 20 f1 8a  42 25 2c 43 25 29 3b 89  |%<7 . ..B%,C%);.|
00000460  31 3a 44 25 3d 30 3a 42  25 3d 30 0d 01 e0 49 e7  |1:D%=0:B%=0...I.|
00000470  20 44 25 3d 31 20 8c 20  f1 8a 42 25 2c 43 25 29  | D%=1 . ..B%,C%)|
00000480  3b 89 31 3a e7 20 43 25  3e 36 20 80 20 42 25 3c  |;.1:. C%>6 . B%<|
00000490  33 31 20 8c 20 42 25 3d  42 25 2b 31 3a 43 25 3d  |31 . B%=B%+1:C%=|
000004a0  43 25 2d 31 3a f1 8a 42  25 2c 43 25 29 3b bd 28  |C%-1:..B%,C%);.(|
000004b0  32 34 30 29 0d 01 ea 5a  e7 20 42 25 3e 30 20 80  |240)...Z. B%>0 .|
000004c0  20 44 25 3d 30 20 80 20  32 38 2d 42 25 2b 45 25  | D%=0 . 28-B%+E%|
000004d0  3c 3d 43 25 2d 4b 25 2b  28 31 2b 43 25 2d 4b 25  |<=C%-K%+(1+C%-K%|
000004e0  29 2a 28 32 32 35 2d 4c  25 29 20 8c 20 44 25 3d  |)*(225-L%) . D%=|
000004f0  31 3a f1 8a 42 25 2c 43  25 29 3b bd 28 32 34 30  |1:..B%,C%);.(240|
00000500  29 3a d4 26 31 30 2c 2d  31 35 2c 34 2c 32 0d 01  |):.&10,-15,4,2..|
00000510  f4 2b 20 e7 20 47 25 3d  32 33 32 20 80 20 42 25  |.+ . G%=232 . B%|
00000520  3d 30 20 8c 20 42 25 3d  31 3a 43 25 3d 48 25 2d  |=0 . B%=1:C%=H%-|
00000530  31 3a 45 25 3d b3 28 33  29 0d 01 fe 27 41 25 3d  |1:E%=.(3)...'A%=|
00000540  30 3a e7 20 5a 25 3c 31  20 8c 20 47 25 3d 32 33  |0:. Z%<1 . G%=23|
00000550  37 3a 5a 25 3d 5a 25 2d  31 3a e5 8d 44 62 42 20  |7:Z%=Z%-1:..DbB |
00000560  0d 02 08 16 e7 20 47 25  3d 32 33 35 20 8c 20 41  |..... G%=235 . A|
00000570  25 3d 41 25 2d 31 0d 02  12 1a e7 20 48 25 3e 32  |%=A%-1..... H%>2|
00000580  38 20 8c 20 47 25 3d 32  33 35 3a e5 8d 44 4e 42  |8 . G%=235:..DNB|
00000590  0d 02 1c 22 e7 20 48 25  3c 59 25 20 8c 20 47 25  |...". H%<Y% . G%|
000005a0  3d 32 33 34 3a 41 25 3d  41 25 2b 31 3a e5 8d 44  |=234:A%=A%+1:..D|
000005b0  4e 42 0d 02 26 14 52 25  3d b3 28 31 32 37 29 3a  |NB..&.R%=.(127):|
000005c0  47 25 3d 32 32 39 0d 02  30 1d f5 3a 52 25 3d 52  |G%=229..0..:R%=R|
000005d0  25 20 81 32 3a 47 25 3d  47 25 2b 31 3a fd 20 52  |% .2:G%=G%+1:. R|
000005e0  25 3d 30 0d 02 3a 1d e7  20 47 25 3d 32 33 35 20  |%=0..:.. G%=235 |
000005f0  8c 20 47 25 3d 47 25 2d  b3 28 34 29 20 81 20 34  |. G%=G%-.(4) . 4|
00000600  0d 02 44 16 e7 20 47 25  3d 32 33 34 20 8c 20 41  |..D.. G%=234 . A|
00000610  25 3d 41 25 2b 31 0d 02  4e 0c 48 25 3d 48 25 2b  |%=A%+1..N.H%=H%+|
00000620  41 25 0d 02 58 2b e7 20  47 25 3c 32 33 34 20 80  |A%..X+. G%<234 .|
00000630  20 5a 25 3e 30 20 8c 20  5a 25 3d 5a 25 2d 31 3a  | Z%>0 . Z%=Z%-1:|
00000640  f1 8a 33 31 2c 35 29 3b  5a 25 3b 89 31 0d 02 62  |..31,5);Z%;.1..b|
00000650  0b d6 20 53 43 52 4c 52  0d 02 6c 11 f1 8a 30 2c  |.. SCRLR..l...0,|
00000660  48 25 29 3b bd 28 47 25  29 0d 02 76 12 e7 20 58  |H%);.(G%)..v.. X|
00000670  25 3c 3e 30 20 e5 20 8d  74 68 42 0d 02 80 2e e7  |%<>0 . .thB.....|
00000680  20 3f 28 32 32 37 37 35  2b 33 32 30 2a 4b 25 29  | ?(22775+320*K%)|
00000690  3c 3e 30 20 8c 20 f2 70  6c 61 6e 65 68 69 74 28  |<>0 . .planehit(|
000006a0  4b 25 29 3a e5 8d 74 72  42 0d 02 8a 49 e7 20 44  |K%):..trB...I. D|
000006b0  25 3d 31 20 8c 20 f1 8a  42 25 2c 43 25 29 3b 89  |%=1 . ..B%,C%);.|
000006c0  31 3a e7 20 43 25 3e 36  20 80 20 42 25 3c 33 31  |1:. C%>6 . B%<31|
000006d0  20 8c 20 42 25 3d 42 25  2b 31 3a 43 25 3d 43 25  | . B%=B%+1:C%=C%|
000006e0  2d 31 3a f1 8a 42 25 2c  43 25 29 3b bd 28 32 34  |-1:..B%,C%);.(24|
000006f0  30 29 0d 02 94 66 e7 20  54 25 3d 31 20 8c 20 f1  |0)...f. T%=1 . .|
00000700  8a 55 25 2c 56 25 29 3b  89 31 3a e7 20 56 25 3e  |.U%,V%);.1:. V%>|
00000710  36 20 80 20 55 25 3c 33  31 20 8c 20 f1 8a 55 25  |6 . U%<31 . ..U%|
00000720  2c 56 25 29 3b 89 31 3a  e7 20 56 25 3e 36 20 80  |,V%);.1:. V%>6 .|
00000730  20 55 25 3c 33 31 20 8c  20 55 25 3d 55 25 2b 31  | U%<31 . U%=U%+1|
00000740  3a 56 25 3d 56 25 2d 31  3a f1 8a 55 25 2c 56 25  |:V%=V%-1:..U%,V%|
00000750  29 3b bd 28 32 34 30 29  0d 02 9e 25 e7 20 4a 25  |);.(240)...%. J%|
00000760  3e 30 20 8c 20 4a 25 3d  4a 25 2d 31 3a e7 20 4a  |>0 . J%=J%-1:. J|
00000770  25 3c 31 20 8c 20 63 68  25 3d 26 31 30 0d 02 a8  |%<1 . ch%=&10...|
00000780  10 e3 20 4d 25 3d 31 b8  44 4c 25 3a ed 0d 02 b2  |.. M%=1.DL%:....|
00000790  0c fd 20 5a 25 3c 2d 34  30 0d 02 bc 4c e7 20 5a  |.. Z%<-40...L. Z|
000007a0  25 3e 2d 35 30 20 8c 20  f2 6c 61 6e 64 69 6e 67  |%>-50 . .landing|
000007b0  20 8b 20 e7 20 4c 25 3d  32 34 32 20 8c 20 f1 8a  | . . L%=242 . ..|
000007c0  31 2c 37 29 22 53 48 4f  54 20 44 4f 57 4e 20 21  |1,7)"SHOT DOWN !|
000007d0  22 20 8b 20 f1 8a 31 2c  37 29 22 43 52 41 53 48  |" . ..1,7)"CRASH|
000007e0  45 44 20 21 22 0d 02 c6  11 d1 3d 30 3a f5 20 fd  |ED !".....=0:. .|
000007f0  20 91 3e 31 30 30 0d 02  d0 0b 2a 46 58 31 35 2c  | .>100....*FX15,|
00000800  30 0d 02 da 0c fd 20 5a  25 3d 2d 35 30 0d 02 e4  |0..... Z%=-50...|
00000810  2d f2 68 69 67 68 73 63  6f 72 65 73 3a f1 8a 33  |-.highscores:..3|
00000820  2c 4d 25 29 22 41 4e 4f  54 48 45 52 20 47 41 4d  |,M%)"ANOTHER GAM|
00000830  45 20 28 59 2f 4e 29 20  3f 22 0d 02 ee 1f ef 37  |E (Y/N) ?".....7|
00000840  3a 49 24 3d be 3a e7 20  49 24 3d 22 59 22 20 8c  |:I$=.:. I$="Y" .|
00000850  20 db 3a e5 20 8d 74 74  40 0d 02 f8 15 20 e7 20  | .:. .tt@.... . |
00000860  49 24 3c 3e 22 4e 22 20  e5 20 8d 64 6e 42 0d 03  |I$<>"N" . .dnB..|
00000870  02 0b 2a 46 58 31 35 2c  30 0d 03 0c 06 eb 36 0d  |..*FX15,0.....6.|
00000880  03 16 05 e0 0d 03 20 05  3a 0d 03 e8 0d dd f2 62  |...... .:......b|
00000890  6f 6d 62 68 69 74 0d 03  f2 2c e7 20 3f 28 32 32  |ombhit...,. ?(22|
000008a0  37 37 34 2b 33 32 30 2a  46 25 29 3d 33 32 20 8c  |774+320*F%)=32 .|
000008b0  20 f1 8a 33 30 2c 46 25  29 3b 89 31 3a e5 8d 44  | ..30,F%);.1:..D|
000008c0  42 44 0d 03 fc 34 e7 20  3f 28 32 32 37 37 34 2b  |BD...4. ?(22774+|
000008d0  33 32 30 2a 46 25 29 3c  31 30 30 20 8c 20 d4 26  |320*F%)<100 . .&|
000008e0  31 30 2c 2d 31 35 2c 34  2c 31 30 3a 4a 25 3d 31  |10,-15,4,10:J%=1|
000008f0  3a e5 8d 54 6e 44 0d 04  06 19 51 25 3d 31 30 2a  |:..TnD....Q%=10*|
00000900  3f 28 32 32 37 36 39 2b  33 32 30 2a 46 25 29 0d  |?(22769+320*F%).|
00000910  04 10 15 57 25 3d 57 25  2b 51 25 3a 53 25 3d 53  |...W%=W%+Q%:S%=S|
00000920  25 2b 51 25 0d 04 1a 17  f1 8a 37 2c 33 29 3b 53  |%+Q%......7,3);S|
00000930  25 3b 8a 32 35 2c 33 29  3b 57 25 0d 04 24 17 20  |%;.25,3);W%..$. |
00000940  d4 26 31 30 2c 2d 31 35  2c 34 2c 32 30 3a 4a 25  |.&10,-15,4,20:J%|
00000950  3d 35 0d 04 2e 13 f1 8a  33 30 2c 46 25 29 3b bd  |=5......30,F%);.|
00000960  28 32 32 38 29 0d 04 38  0b 63 68 25 3d 26 31 31  |(228)..8.ch%=&11|
00000970  0d 04 42 1e e7 20 46 25  2d 31 3c 3e 4b 25 20 8c  |..B.. F%-1<>K% .|
00000980  20 f1 8a 33 30 2c 46 25  2d 31 29 3b 89 31 0d 04  | ..30,F%-1);.1..|
00000990  4c 08 46 25 3d 30 0d 04  56 05 e1 0d 04 60 05 3a  |L.F%=0..V....`.:|
000009a0  0d 04 6a 0d dd f2 6c 61  6e 64 69 6e 67 0d 04 74  |..j...landing..t|
000009b0  23 e7 20 46 25 3e 30 20  8c 20 f1 8a 33 30 2c 46  |#. F%>0 . ..30,F|
000009c0  25 29 3b 89 31 3a d4 26  31 31 2c 30 2c 30 2c 31  |%);.1:.&11,0,0,1|
000009d0  0d 04 7e 15 f1 8a 31 2c  37 29 22 4c 41 4e 44 49  |..~...1,7)"LANDI|
000009e0  4e 47 20 21 22 0d 04 88  05 f5 0d 04 92 41 e7 20  |NG !"........A. |
000009f0  4b 25 3c 48 25 2d 31 20  8c 20 4b 25 3d 4b 25 2b  |K%<H%-1 . K%=K%+|
00000a00  31 3a f1 8a 33 30 2c 4b  25 2d 31 29 3b 89 31 3b  |1:..30,K%-1);.1;|
00000a10  8a 33 30 2c 4b 25 29 3b  bd 28 32 32 36 29 3a d4  |.30,K%);.(226):.|
00000a20  26 31 30 2c 2d 31 35 2c  33 2c 35 0d 04 9c 14 e3  |&10,-15,3,5.....|
00000a30  20 4d 25 3d 31 20 b8 20  32 2a 44 4c 25 3a ed 0d  | M%=1 . 2*DL%:..|
00000a40  04 a6 1f e7 20 4b 25 3d  48 25 2d 31 20 8c 20 f1  |.... K%=H%-1 . .|
00000a50  8a 33 30 2c 4b 25 29 3b  bd 28 32 34 33 29 0d 04  |.30,K%);.(243)..|
00000a60  b0 0d fd 20 4b 25 3d 48  25 2d 31 0d 04 ba 55 e7  |... K%=H%-1...U.|
00000a70  20 57 25 3e 3d 52 25 20  8c 20 f1 8a 31 2c 37 29  | W%>=R% . ..1,7)|
00000a80  22 4d 49 53 53 49 4f 4e  20 41 43 43 4f 4d 50 4c  |"MISSION ACCOMPL|
00000a90  49 53 48 45 44 20 21 22  20 8b 20 f1 8a 31 2c 37  |ISHED !" . ..1,7|
00000aa0  29 22 46 41 49 4c 45 44  20 52 45 51 55 49 52 45  |)"FAILED REQUIRE|
00000ab0  44 20 53 43 4f 52 45 2e  22 3a 5a 25 3d 2d 35 30  |D SCORE.":Z%=-50|
00000ac0  0d 04 c4 17 53 25 3d 53  25 2b 31 30 30 3a f1 8a  |....S%=S%+100:..|
00000ad0  37 2c 33 29 3b 53 25 0d  04 ce 12 e3 20 4d 25 3d  |7,3);S%..... M%=|
00000ae0  30 b8 31 30 30 30 30 3a  ed 0d 04 d8 05 e1 0d 04  |0.10000:........|
00000af0  e2 05 3a 0d 04 ec 0a dd  f2 69 6e 69 74 0d 04 f6  |..:......init...|
00000b00  0d de 20 53 45 54 20 34  30 30 0d 05 00 0e e3 20  |.. SET 400..... |
00000b10  50 41 53 53 3d 30 b8 31  0d 05 0a 0a 50 25 3d 53  |PASS=0.1....P%=S|
00000b20  45 54 0d 05 14 05 5b 0d  05 1e 0e 4f 50 54 20 50  |ET....[....OPT P|
00000b30  41 53 53 2a 32 0d 05 28  2a 2e 53 45 54 20 4c 44  |ASS*2..(*.SET LD|
00000b40  41 20 23 26 33 38 3a 53  54 41 20 26 37 34 3a 4c  |A #&38:STA &74:L|
00000b50  44 41 23 26 37 32 3a 53  54 41 20 26 37 35 20 0d  |DA#&72:STA &75 .|
00000b60  05 32 11 4c 44 58 20 23  33 39 3a 4c 44 41 23 30  |.2.LDX #39:LDA#0|
00000b70  0d 05 3c 1c 2e 63 6c 65  61 72 20 53 54 41 20 53  |..<..clear STA S|
00000b80  45 54 2b 33 30 30 2c 58  3a 44 45 58 0d 05 46 11  |ET+300,X:DEX..F.|
00000b90  42 50 4c 20 63 6c 65 61  72 3a 52 54 53 0d 05 50  |BPL clear:RTS..P|
00000ba0  16 2e 53 43 52 4c 52 20  53 54 41 20 53 45 54 2b  |..SCRLR STA SET+|
00000bb0  33 30 30 0d 05 5a 23 4c  44 41 20 26 37 34 3a 53  |300..Z#LDA &74:S|
00000bc0  54 41 20 26 37 30 3a 4c  44 41 20 26 37 35 3a 53  |TA &70:LDA &75:S|
00000bd0  54 41 20 26 37 31 0d 05  64 0b 4c 44 58 23 33 39  |TA &71..d.LDX#39|
00000be0  20 0d 05 6e 14 2e 73 71  72 20 4c 44 41 23 30 3a  | ..n..sqr LDA#0:|
00000bf0  4c 44 59 23 37 0d 05 78  23 2e 62 6c 61 6e 6b 20  |LDY#7..x#.blank |
00000c00  53 54 41 28 26 37 30 29  2c 59 3a 44 45 59 3a 42  |STA(&70),Y:DEY:B|
00000c10  50 4c 20 62 6c 61 6e 6b  0d 05 82 1f 4c 44 41 20  |PL blank....LDA |
00000c20  53 45 54 2b 33 30 30 2c  58 3a 53 54 41 20 53 45  |SET+300,X:STA SE|
00000c30  54 2b 33 30 31 2c 58 0d  05 8c 14 42 45 51 20 6c  |T+301,X....BEQ l|
00000c40  65 76 65 6c 3a 42 4d 49  20 75 70 0d 05 96 1f 4c  |evel:BMI up....L|
00000c50  44 41 20 26 37 30 3a 43  4c 43 3a 41 44 43 23 26  |DA &70:CLC:ADC#&|
00000c60  33 38 3a 53 54 41 20 26  37 30 0d 05 a0 23 4c 44  |38:STA &70...#LD|
00000c70  41 26 37 31 3a 41 44 43  23 31 3a 53 54 41 26 37  |A&71:ADC#1:STA&7|
00000c80  31 3a 43 4c 43 3a 42 43  43 20 69 6e 64 0d 05 aa  |1:CLC:BCC ind...|
00000c90  22 2e 75 70 20 4c 44 41  26 37 30 3a 53 45 43 3a  |".up LDA&70:SEC:|
00000ca0  53 42 43 23 26 34 38 3a  53 54 41 20 26 37 30 0d  |SBC#&48:STA &70.|
00000cb0  05 b4 24 4c 44 41 20 26  37 31 3a 53 42 43 23 31  |..$LDA &71:SBC#1|
00000cc0  3a 53 54 41 26 37 31 3a  43 4c 43 3a 42 43 43 20  |:STA&71:CLC:BCC |
00000cd0  69 6e 64 0d 05 be 23 2e  6c 65 76 65 6c 20 4c 44  |ind...#.level LD|
00000ce0  41 20 26 37 30 3a 53 45  43 3a 53 42 43 23 38 3a  |A &70:SEC:SBC#8:|
00000cf0  53 54 41 26 37 30 0d 05  c8 18 4c 44 41 26 37 31  |STA&70....LDA&71|
00000d00  3a 53 42 43 23 30 3a 53  54 41 20 26 37 31 0d 05  |:SBC#0:STA &71..|
00000d10  d2 1a 2e 69 6e 64 20 44  45 58 3a 42 50 4c 20 73  |...ind DEX:BPL s|
00000d20  65 74 68 62 3a 52 54 53  0d 05 dc 23 2e 73 65 74  |ethb:RTS...#.set|
00000d30  68 62 20 4c 44 41 26 37  30 3a 43 4c 43 3a 41 44  |hb LDA&70:CLC:AD|
00000d40  43 23 38 3a 53 54 41 20  26 37 32 0d 05 e6 19 4c  |C#8:STA &72....L|
00000d50  44 41 20 26 37 31 3a 41  44 43 23 30 3a 53 54 41  |DA &71:ADC#0:STA|
00000d60  26 37 33 20 0d 05 f0 14  43 50 58 23 33 38 3a 42  |&73 ....CPX#38:B|
00000d70  4e 45 20 74 72 61 6e 73  0d 05 fa 1f 4c 44 41 26  |NE trans....LDA&|
00000d80  37 32 3a 53 54 41 26 37  34 3a 4c 44 41 26 37 33  |72:STA&74:LDA&73|
00000d90  3a 53 54 41 26 37 35 0d  06 04 10 2e 74 72 61 6e  |:STA&75.....tran|
00000da0  73 20 4c 44 59 23 37 0d  06 0e 2c 2e 62 79 74 65  |s LDY#7...,.byte|
00000db0  20 4c 44 41 28 26 37 30  29 2c 59 3a 53 54 41 28  | LDA(&70),Y:STA(|
00000dc0  26 37 32 29 2c 59 3a 44  45 59 3a 42 50 4c 20 62  |&72),Y:DEY:BPL b|
00000dd0  79 74 65 0d 06 18 0b 42  4d 49 20 73 71 72 0d 06  |yte....BMI sqr..|
00000de0  22 05 5d 0d 06 2c 05 ed  0d 06 36 05 db 0d 06 40  |".]..,....6....@|
00000df0  1e ef 32 33 2c 32 32 34  2c 30 2c 38 30 2c 34 30  |..23,224,0,80,40|
00000e00  2c 31 36 2c 38 2c 35 2c  32 2c 30 0d 06 4a 1f 20  |,16,8,5,2,0..J. |
00000e10  ef 32 33 2c 32 32 35 2c  30 2c 30 2c 30 2c 30 2c  |.23,225,0,0,0,0,|
00000e20  39 37 2c 32 35 35 2c 30  2c 30 0d 06 54 1f ef 32  |97,255,0,0..T..2|
00000e30  33 2c 32 32 36 2c 34 2c  32 2c 34 2c 34 30 2c 38  |3,226,4,2,4,40,8|
00000e40  30 2c 33 32 2c 36 34 2c  30 0d 06 5e 1f ef 32 33  |0,32,64,0..^..23|
00000e50  2c 32 32 37 2c 30 2c 31  36 2c 38 2c 32 30 2c 33  |,227,0,16,8,20,3|
00000e60  32 2c 36 34 2c 30 2c 30  0d 06 68 25 ef 32 33 2c  |2,64,0,0..h%.23,|
00000e70  32 32 38 2c 30 2c 31 34  36 2c 38 34 2c 35 36 2c  |228,0,146,84,56,|
00000e80  32 35 34 2c 35 36 2c 38  34 2c 31 34 36 0d 06 72  |254,56,84,146..r|
00000e90  27 ef 32 33 2c 32 33 30  2c 31 36 2c 31 36 2c 31  |'.23,230,16,16,1|
00000ea0  36 2c 31 36 2c 32 35 34  2c 31 39 38 2c 32 35 34  |6,16,254,198,254|
00000eb0  2c 32 35 35 0d 06 7c 20  ef 32 33 2c 32 33 31 2c  |,255..| .23,231,|
00000ec0  38 2c 38 2c 38 2c 38 2c  38 2c 32 33 32 2c 32 33  |8,8,8,8,8,232,23|
00000ed0  2c 32 35 35 0d 06 86 26  ef 32 33 2c 32 33 32 2c  |,255...&.23,232,|
00000ee0  32 2c 34 2c 31 30 34 2c  34 38 2c 31 32 30 2c 32  |2,4,104,48,120,2|
00000ef0  34 38 2c 31 31 32 2c 32  35 35 0d 06 90 27 ef 32  |48,112,255...'.2|
00000f00  33 2c 32 33 33 2c 30 2c  32 2c 31 30 32 2c 31 30  |3,233,0,2,102,10|
00000f10  32 2c 31 30 32 2c 31 30  32 2c 31 30 32 2c 32 35  |2,102,102,102,25|
00000f20  35 0d 06 9a 20 ef 32 33  2c 32 33 34 2c 31 2c 32  |5... .23,234,1,2|
00000f30  2c 34 2c 38 2c 31 36 2c  33 32 2c 36 34 2c 31 32  |,4,8,16,32,64,12|
00000f40  38 0d 06 a4 20 ef 32 33  2c 32 33 35 2c 31 32 38  |8... .23,235,128|
00000f50  2c 36 34 2c 33 32 2c 31  36 2c 38 2c 34 2c 32 2c  |,64,32,16,8,4,2,|
00000f60  31 0d 06 ae 1d ef 32 33  2c 32 33 36 2c 30 2c 30  |1.....23,236,0,0|
00000f70  2c 30 2c 30 2c 30 2c 30  2c 30 2c 32 35 35 0d 06  |,0,0,0,0,0,255..|
00000f80  b8 2a ef 32 33 2c 32 33  37 2c 32 35 35 2c 31 32  |.*.23,237,255,12|
00000f90  39 2c 31 32 39 2c 31 32  39 2c 31 32 39 2c 31 32  |9,129,129,129,12|
00000fa0  39 2c 36 35 2c 31 32 39  0d 06 c2 1d ef 32 33 2c  |9,65,129.....23,|
00000fb0  32 34 30 2c 30 2c 30 2c  30 2c 30 2c 30 2c 30 2c  |240,0,0,0,0,0,0,|
00000fc0  33 32 2c 36 34 0d 06 cc  1b ef 32 33 2c 32 34 31  |32,64.....23,241|
00000fd0  2c 38 2c 38 2c 38 2c 38  2c 38 2c 38 2c 30 2c 30  |,8,8,8,8,8,8,0,0|
00000fe0  0d 06 d6 1e ef 32 33 2c  32 34 32 2c 32 34 2c 38  |.....23,242,24,8|
00000ff0  2c 38 2c 38 2c 38 2c 32  34 2c 32 34 2c 38 0d 06  |,8,8,8,24,24,8..|
00001000  e0 1f ef 32 33 2c 32 34  33 2c 30 2c 30 2c 30 2c  |...23,243,0,0,0,|
00001010  30 2c 30 2c 39 37 2c 32  35 35 2c 37 32 0d 06 f4  |0,0,97,255,72...|
00001020  25 e2 31 2c 31 33 30 2c  35 2c 33 2c 35 2c 35 30  |%.1,130,5,3,5,50|
00001030  2c 36 30 2c 37 30 2c 30  2c 30 2c 30 2c 30 2c 30  |,60,70,0,0,0,0,0|
00001040  2c 30 0d 06 fe 23 e2 32  2c 31 32 38 2c 31 30 2c  |,0...#.2,128,10,|
00001050  30 2c 30 2c 36 2c 30 2c  30 2c 30 2c 30 2c 30 2c  |0,0,6,0,0,0,0,0,|
00001060  30 2c 30 2c 30 0d 07 08  16 de 20 48 53 43 25 28  |0,0,0..... HSC%(|
00001070  36 29 2c 4e 41 4d 45 24  28 36 29 0d 07 12 2a e3  |6),NAME$(6)...*.|
00001080  20 4d 25 3d 30 b8 36 3a  48 53 43 25 28 4d 25 29  | M%=0.6:HSC%(M%)|
00001090  3d 30 3a 4e 41 4d 45 24  28 4d 25 29 3d c4 31 31  |=0:NAME$(M%)=.11|
000010a0  2c bd 33 32 29 0d 07 1c  07 ed 3a e1 0d 07 26 05  |,.32).....:...&.|
000010b0  3a 0d 07 30 0d dd f2 6e  65 77 67 61 6d 65 0d 07  |:..0...newgame..|
000010c0  3a 16 44 4c 25 3d 33 39  32 3a 53 25 3d 30 3a 59  |:.DL%=392:S%=0:Y|
000010d0  25 3d 32 31 0d 07 44 11  52 53 25 3d 37 30 30 3a  |%=21..D.RS%=700:|
000010e0  52 4e 25 3d 30 0d 07 4e  05 e1 0d 07 58 05 3a 0d  |RN%=0..N....X.:.|
000010f0  07 62 0c dd f2 6e 65 77  72 75 6e 0d 07 6c 0d e3  |.b...newrun..l..|
00001100  20 4d 25 3d 30 b8 33 38  0d 07 76 21 f1 8a 4d 25  | M%=0.38..v!..M%|
00001110  2c 35 29 3b bd 28 32 33  36 29 3b 8a 4d 25 2c 32  |,5);.(236);.M%,2|
00001120  30 29 3b bd 28 32 33 37  29 0d 07 80 05 ed 0d 07  |0);.(237).......|
00001130  8a 09 d6 20 53 45 54 0d  07 94 1c e7 20 52 53 25  |... SET..... RS%|
00001140  3c 32 35 30 30 20 8c 20  52 53 25 3d 52 53 25 2b  |<2500 . RS%=RS%+|
00001150  31 30 30 0d 07 9e 18 e7  20 44 4c 25 3c 32 20 8c  |100..... DL%<2 .|
00001160  20 44 4c 25 3d 44 4c 25  2d 33 30 0d 07 a8 0d 52  | DL%=DL%-30....R|
00001170  4e 25 3d 52 4e 25 2b 31  0d 07 b2 15 e7 20 59 25  |N%=RN%+1..... Y%|
00001180  3e 31 30 20 8c 20 59 25  3d 59 25 2d 31 0d 07 bc  |>10 . Y%=Y%-1...|
00001190  23 47 25 3d 32 33 36 3a  48 25 3d 32 30 3a 4b 25  |#G%=236:H%=20:K%|
000011a0  3d 31 39 3a 4c 25 3d 32  34 33 3a 4e 25 3d 4b 25  |=19:L%=243:N%=K%|
000011b0  0d 07 c6 1c 46 25 3d 30  3a 42 25 3d 30 3a 44 25  |....F%=0:B%=0:D%|
000011c0  3d 30 3a 55 25 3d 30 3a  54 25 3d 30 0d 07 d0 22  |=0:U%=0:T%=0..."|
000011d0  4a 25 3d 30 3a 63 68 25  3d 26 31 30 3a 57 25 3d  |J%=0:ch%=&10:W%=|
000011e0  30 3a 5a 25 3d 31 30 30  3a 58 25 3d 31 35 0d 07  |0:Z%=100:X%=15..|
000011f0  da 71 f1 8a 37 2c 31 29  22 47 41 4d 45 22 3b 8a  |.q..7,1)"GAME";.|
00001200  31 37 2c 31 29 22 52 45  51 44 2e 22 3b 8a 32 35  |17,1)"REQD.";.25|
00001210  2c 31 29 22 52 55 4e 22  3b 8a 33 32 2c 31 29 22  |,1)"RUN";.32,1)"|
00001220  48 49 47 48 22 3b 8a 30  2c 33 29 22 53 43 4f 52  |HIGH";.0,3)"SCOR|
00001230  45 22 3b 8a 37 2c 33 29  3b 53 25 3b 8a 31 37 2c  |E";.7,3);S%;.17,|
00001240  33 29 3b 52 53 25 3b 8a  32 35 2c 33 29 3b 57 25  |3);RS%;.25,3);W%|
00001250  3b 8a 33 32 2c 33 29 3b  48 53 43 25 28 30 29 0d  |;.32,3);HSC%(0).|
00001260  07 e4 32 f1 8a 33 2c 35  29 22 20 20 52 55 4e 20  |..2..3,5)"  RUN |
00001270  22 3b 52 4e 25 3b 89 31  3b 8a 32 31 2c 35 29 22  |";RN%;.1;.21,5)"|
00001280  20 20 54 41 52 47 45 54  53 20 22 3b 5a 25 3b 89  |  TARGETS ";Z%;.|
00001290  31 0d 07 ee 12 f1 8a 33  30 2c 4b 25 29 3b bd 28  |1......30,K%);.(|
000012a0  4c 25 29 0d 07 f8 0c 52  25 3d b3 28 2d 91 29 0d  |L%)....R%=.(-.).|
000012b0  08 02 05 e1 0d 08 0c 05  3a 0d 08 16 13 20 dd f2  |........:.... ..|
000012c0  70 6c 61 6e 65 68 69 74  28 6b 25 29 0d 08 20 0a  |planehit(k%).. .|
000012d0  5a 25 3d 2d 35 30 0d 08  2a 4d e7 20 3f 28 32 32  |Z%=-50..*M. ?(22|
000012e0  37 37 35 2b 33 32 30 2a  6b 25 29 3c 3e 36 34 20  |775+320*k%)<>64 |
000012f0  8c 20 f1 8a 33 30 2c 6b  25 2b 32 35 35 2d 4c 25  |. ..30,k%+255-L%|
00001300  29 3b 89 31 3b 8a 33 30  2c 6b 25 29 3b bd 28 32  |);.1;.30,k%);.(2|
00001310  32 38 29 3a d4 26 31 30  2c 2d 31 35 2c 36 2c 32  |28):.&10,-15,6,2|
00001320  30 3a e1 0d 08 34 11 d4  26 31 30 2c 2d 31 35 2c  |0:...4..&10,-15,|
00001330  36 2c 32 30 0d 08 3e 0a  4c 25 3d 32 34 32 0d 08  |6,20..>.L%=242..|
00001340  48 05 f5 0d 08 52 22 f1  8a 33 30 2c 6b 25 29 3b  |H....R"..30,k%);|
00001350  bd 28 32 34 32 29 3b 8a  33 30 2c 6b 25 2d 31 29  |.(242);.30,k%-1)|
00001360  3b bd 32 34 31 0d 08 5c  1f 6b 25 3d 6b 25 2b 31  |;.241..\.k%=k%+1|
00001370  3a 70 6b 25 3d 3f 28 32  32 37 37 35 2b 33 32 30  |:pk%=?(22775+320|
00001380  2a 6b 25 29 0d 08 66 11  e3 20 4d 25 3d 31 b8 31  |*k%)..f.. M%=1.1|
00001390  30 30 30 3a ed 0d 08 70  16 fd 20 70 6b 25 3c 3e  |000:...p.. pk%<>|
000013a0  30 20 80 20 70 6b 25 3c  3e 36 34 0d 08 7a 24 f1  |0 . pk%<>64..z$.|
000013b0  8a 33 30 2c 6b 25 29 3b  bd 28 32 32 38 29 3b 8a  |.30,k%);.(228);.|
000013c0  33 30 2c 6b 25 2d 31 29  3b bd 28 32 34 31 29 0d  |30,k%-1);.(241).|
000013d0  08 84 0f d4 26 31 30 2c  33 2c 36 2c 34 30 0d 08  |....&10,3,6,40..|
000013e0  8e 05 e1 0d 08 98 05 3a  0d 08 a2 12 dd f2 69 6e  |.......:......in|
000013f0  73 74 72 75 63 74 69 6f  6e 73 0d 08 ac 05 db 0d  |structions......|
00001400  08 b6 49 f1 27 8a 32 29  22 55 73 65 20 79 6f 75  |..I.'.2)"Use you|
00001410  72 20 61 69 72 63 72 61  66 74 20 74 6f 20 62 6f  |r aircraft to bo|
00001420  6d 62 20 65 6e 65 6d 79  22 3b 89 39 3b 22 69 6e  |mb enemy";.9;"in|
00001430  73 74 61 6c 6c 61 74 69  6f 6e 73 2c 20 61 6e 64  |stallations, and|
00001440  20 73 63 6f 72 65 3a 22  0d 08 c0 2b f1 27 8a 34  | score:"...+.'.4|
00001450  29 22 53 55 50 50 4c 59  20 44 55 4d 50 22 3b 89  |)"SUPPLY DUMP";.|
00001460  28 31 33 29 3b 3b bd 28  32 33 33 29 3b 22 20 20  |(13);;.(233);"  |
00001470  32 30 22 0d 08 ca 25 f1  27 8a 34 29 22 41 41 20  |20"...%.'.4)"AA |
00001480  47 55 4e 22 3b 89 28 31  38 29 3b bd 28 32 33 32  |GUN";.(18);.(232|
00001490  29 3b 22 20 20 34 30 22  0d 08 d4 33 f1 27 8a 34  |);"  40"...3.'.4|
000014a0  29 22 43 4f 4d 4d 55 4e  49 43 41 54 49 4f 4e 53  |)"COMMUNICATIONS|
000014b0  20 43 45 4e 54 52 45 22  3b 89 28 33 29 3b bd 28  | CENTRE";.(3);.(|
000014c0  32 33 31 29 3b 22 20 20  38 30 22 0d 08 de 2d f1  |231);"  80"...-.|
000014d0  27 8a 34 29 22 43 4f 4d  4d 41 4e 44 20 43 45 4e  |'.4)"COMMAND CEN|
000014e0  54 52 45 22 3b 89 28 31  30 29 3b bd 28 32 33 30  |TRE";.(10);.(230|
000014f0  29 3b 22 20 31 36 30 22  0d 08 e8 57 f1 27 8a 32  |);" 160"...W.'.2|
00001500  29 22 49 66 20 79 6f 75  20 72 65 61 63 68 20 6f  |)"If you reach o|
00001510  72 20 73 75 72 70 61 73  73 20 74 68 65 20 72 65  |r surpass the re|
00001520  71 75 69 72 65 64 22 3b  89 28 34 29 3b 22 73 63  |quired";.(4);"sc|
00001530  6f 72 65 2c 20 79 6f 75  20 77 69 6c 6c 20 67 65  |ore, you will ge|
00001540  74 20 61 6e 6f 74 68 65  72 20 72 75 6e 2e 22 0d  |t another run.".|
00001550  08 f2 9d f1 27 8a 32 29  22 53 75 63 63 65 73 73  |....'.2)"Success|
00001560  69 76 65 20 72 75 6e 73  20 62 65 63 6f 6d 65 20  |ive runs become |
00001570  68 61 72 64 65 72 20 61  73 20 74 68 65 22 3b 89  |harder as the";.|
00001580  28 34 29 22 67 61 6d 65  20 73 70 65 65 64 73 20  |(4)"game speeds |
00001590  75 70 2c 20 61 6e 64 20  74 68 65 20 67 72 6f 75  |up, and the grou|
000015a0  6e 64 20 6d 61 79 22 3b  89 28 36 29 3b 22 62 65  |nd may";.(6);"be|
000015b0  63 6f 6d 65 20 68 69 67  68 65 72 2c 20 77 69 74  |come higher, wit|
000015c0  68 20 61 6e 20 69 6e 63  72 65 61 73 65 20 69 6e  |h an increase in|
000015d0  22 3b 89 28 36 29 22 74  68 65 20 72 65 71 75 69  |";.(6)"the requi|
000015e0  72 65 64 20 73 63 6f 72  65 2e 22 20 0d 08 fc 3f  |red score." ...?|
000015f0  f1 27 8a 32 29 22 49 66  20 79 6f 75 20 63 72 61  |.'.2)"If you cra|
00001600  73 68 20 6f 72 20 61 72  65 20 73 68 6f 74 20 64  |sh or are shot d|
00001610  6f 77 6e 2c 20 74 68 65  22 3b 89 28 36 29 3b 22  |own, the";.(6);"|
00001620  67 61 6d 65 20 65 6e 64  73 2e 22 0d 09 06 24 f1  |game ends."...$.|
00001630  27 8a 34 29 22 41 49 52  43 52 41 46 54 20 43 4c  |'.4)"AIRCRAFT CL|
00001640  49 4d 42 22 3b 89 28 33  29 3b 22 27 3a 27 22 0d  |IMB";.(3);"':'".|
00001650  09 10 23 f1 27 8a 34 29  22 41 49 52 43 52 41 46  |..#.'.4)"AIRCRAF|
00001660  54 20 44 49 56 45 22 3b  89 28 34 29 3b 22 27 2f  |T DIVE";.(4);"'/|
00001670  27 22 0d 09 1a 31 f1 27  8a 34 29 22 52 45 4c 45  |'"...1.'.4)"RELE|
00001680  41 53 45 20 42 4f 4d 42  22 3b 89 28 35 29 3b 22  |ASE BOMB";.(5);"|
00001690  27 5a 27 20 28 77 68 65  6e 20 69 6e 20 64 69 76  |'Z' (when in div|
000016a0  65 29 22 0d 09 24 2f f1  8a 32 2c 32 39 29 22 50  |e)"..$/..2,29)"P|
000016b0  72 65 73 73 20 74 68 65  20 73 70 61 63 65 20 62  |ress the space b|
000016c0  61 72 20 74 6f 20 63 6f  6e 74 69 6e 75 65 20 3a  |ar to continue :|
000016d0  22 3b 0d 09 2e 0c f5 20  fd 20 a5 3d 33 32 0d 09  |";..... . .=32..|
000016e0  38 05 e1 0d 09 42 05 3a  0d 09 4c 0b dd f2 74 69  |8....B.:..L...ti|
000016f0  74 6c 65 0d 09 56 06 fb  31 0d 09 60 10 e3 20 4d  |tle..V..1..`.. M|
00001700  25 3d 36 b8 31 30 20 88  34 0d 09 6a 18 f1 8a 35  |%=6.10 .4..j...5|
00001710  2c 4d 25 29 3b c4 31 31  2c bd 28 36 31 29 29 3a  |,M%);.11,.(61)):|
00001720  ed 0d 09 74 06 fb 32 0d  09 7e 18 f1 8a 35 2c 38  |...t..2..~...5,8|
00001730  29 3b 22 44 49 56 45 2d  42 4f 4d 42 45 52 22 0d  |);"DIVE-BOMBER".|
00001740  09 88 06 fb 31 0d 09 92  10 f1 8a 31 30 2c 31 36  |....1......10,16|
00001750  29 22 62 79 22 0d 09 9c  06 fb 33 0d 09 a6 18 f1  |)"by".....3.....|
00001760  8a 35 2c 31 38 29 22 4e  2e 4d 61 6c 6c 69 6e 73  |.5,18)"N.Mallins|
00001770  6f 6e 22 0d 09 b0 11 d1  3d 30 3a f5 20 fd 20 91  |on".....=0:. . .|
00001780  3e 31 30 30 0d 09 ba 05  e1 0d 09 c4 05 3a 0d 09  |>100.........:..|
00001790  ce 0e dd f2 70 68 73 74  61 62 6c 65 0d 09 d8 05  |....phstable....|
000017a0  db 0d 09 e2 1d f1 8a 31  30 2c 34 29 22 48 49 47  |.......10,4)"HIG|
000017b0  48 20 53 43 4f 52 45 20  54 41 42 4c 45 22 0d 09  |H SCORE TABLE"..|
000017c0  ec 2a f1 8a 36 2c 38 29  22 4e 6f 2e 22 3b 8a 31  |.*..6,8)"No.";.1|
000017d0  33 2c 38 29 22 4e 41 4d  45 22 3b 8a 32 35 2c 38  |3,8)"NAME";.25,8|
000017e0  29 22 53 43 4f 52 45 22  0d 09 f6 09 4d 25 3d 2d  |)"SCORE"....M%=-|
000017f0  31 0d 0a 00 05 f5 0d 0a  0a 0b 4d 25 3d 4d 25 2b  |1.........M%=M%+|
00001800  31 0d 0a 14 61 e7 20 48  53 43 25 28 4d 25 29 3d  |1...a. HSC%(M%)=|
00001810  30 20 8c 20 fd 20 b9 20  3d b9 20 8b 20 f1 8a 36  |0 . . . =. . ..6|
00001820  2c 31 31 2b 32 2a 4d 25  29 3b 4d 25 2b 31 3b 8a  |,11+2*M%);M%+1;.|
00001830  31 32 2c 31 31 2b 32 2a  4d 25 29 3b 4e 41 4d 45  |12,11+2*M%);NAME|
00001840  24 28 4d 25 29 3b 8a 32  35 2c 31 31 2b 32 2a 4d  |$(M%);.25,11+2*M|
00001850  25 29 3b 48 53 43 25 28  4d 25 29 3a fd 20 4d 25  |%);HSC%(M%):. M%|
00001860  3d 35 0d 0a 1e 2a e7 20  48 53 43 25 28 30 29 3d  |=5...*. HSC%(0)=|
00001870  30 20 8c 20 f1 8a 31 32  2c 31 36 29 22 4e 4f 20  |0 . ..12,16)"NO |
00001880  53 43 4f 52 45 20 59 45  54 20 21 22 0d 0a 28 2a  |SCORE YET !"..(*|
00001890  e7 20 5a 25 3d 30 20 8c  20 f1 8a 33 2c 32 37 29  |. Z%=0 . ..3,27)|
000018a0  22 49 4e 53 54 52 55 43  54 49 4f 4e 53 20 28 59  |"INSTRUCTIONS (Y|
000018b0  2f 4e 29 20 3f 22 0d 0a  32 05 e1 0d 0a 3c 05 3a  |/N) ?"..2....<.:|
000018c0  0d 0a 46 10 dd f2 68 69  67 68 73 63 6f 72 65 73  |..F...highscores|
000018d0  0d 0a 50 08 4d 25 3d 36  0d 0a 5a 05 f5 0d 0a 64  |..P.M%=6..Z....d|
000018e0  0b 4d 25 3d 4d 25 2d 31  0d 0a 6e 54 e7 20 53 25  |.M%=M%-1..nT. S%|
000018f0  3e 48 53 43 25 28 4d 25  29 20 8c 20 48 53 43 25  |>HSC%(M%) . HSC%|
00001900  28 4d 25 2b 31 29 3d 48  53 43 25 28 4d 25 29 3a  |(M%+1)=HSC%(M%):|
00001910  4e 41 4d 45 24 28 4d 25  2b 31 29 3d 4e 41 4d 45  |NAME$(M%+1)=NAME|
00001920  24 28 4d 25 29 3a fd 20  4d 25 3d 30 20 8b 20 4d  |$(M%):. M%=0 . M|
00001930  25 3d 4d 25 2b 31 3a fd  20 b9 3d b9 0d 0a 78 13  |%=M%+1:. .=...x.|
00001940  e7 20 4d 25 3e 35 20 8c  20 4d 25 3d 39 3a e1 0d  |. M%>5 . M%=9:..|
00001950  0a 82 05 db 0d 0a 8c 2d  f1 8a 31 2c 37 29 22 59  |.......-..1,7)"Y|
00001960  4f 55 20 41 52 45 20 4f  4e 20 54 48 45 20 48 49  |OU ARE ON THE HI|
00001970  47 48 20 53 43 4f 52 45  20 54 41 42 4c 45 20 21  |GH SCORE TABLE !|
00001980  22 0d 0a 96 3b f1 8a 33  2c 31 32 29 22 50 4c 45  |"...;..3,12)"PLE|
00001990  41 53 45 20 49 4e 50 55  54 20 59 4f 55 52 20 4e  |ASE INPUT YOUR N|
000019a0  41 4d 45 22 27 27 8a 35  29 22 28 6d 61 78 2e 20  |AME"''.5)"(max. |
000019b0  31 30 20 6c 65 74 74 65  72 73 29 22 0d 0a a0 32  |10 letters)"...2|
000019c0  f5 3a ef 37 3a f1 8a 31  30 2c 31 37 29 3b 89 28  |.:.7:..10,17);.(|
000019d0  31 35 29 3a e8 20 8a 31  30 2c 31 37 29 22 3f 20  |15):. .10,17)"? |
000019e0  22 4e 24 3a fd 20 a9 28  4e 24 29 3c 31 31 0d 0a  |"N$:. .(N$)<11..|
000019f0  aa 1c 48 53 43 25 28 4d  25 29 3d 53 25 3a 4e 41  |..HSC%(M%)=S%:NA|
00001a00  4d 45 24 28 4d 25 29 3d  4e 24 0d 0a b4 13 f2 70  |ME$(M%)=N$.....p|
00001a10  68 73 74 61 62 6c 65 3a  4d 25 3d 32 37 0d 0a be  |hstable:M%=27...|
00001a20  05 e1 0d 0a c8 05 3a 0d  0a d2 0d ee 20 85 20 87  |......:..... . .|
00001a30  3a eb 20 36 0d 0a dc 1c  e7 20 9f 3c 3e 30 20 f6  |:. 6..... .<>0 .|
00001a40  3a f1 22 20 61 74 20 6c  69 6e 65 20 22 3b 9e 20  |:." at line ";. |
00001a50  0d 0a e6 05 e0 0d ff                              |.......|
00001a57