GAMES1/GALAXIANS

Home » Personal collection » Acorn ADFS disks » Electron » Digital_pictures_2.ADF » GAMES1/GALAXIANS

GAMES1/GALAXIANS

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 ADFS disks » Electron » Digital_pictures_2.ADF
Filename:	GAMES1/GALAXIANS
Read OK:	✔
File size:	1C4C bytes
Load address:	FFFF0E00
Exec address:	FFFF8023

File contents

  100ON ERROR GOTO 20170
  110PROCe
  120DIM A$(4),B$(4),X%(10),Y%(10),N$(5),S%(5)
  130FOR G%=1 TO 5:S%(G%)=6000-G%*1000:N$(G%)="ELBUG":NEXT
  140REM COLD START
  150MODE5:FOR A%=1 TO 4 :B$(A%)=CHR$(224+A%):NEXT
  160VDU19,0,6,0,0,0:VDU19,3,4,0,0,0
  170VDU19,2,5,0,0,0:PROCl
  180P%=0:R%=0
  190E$=CHR$230:C$=CHR$231:D$=CHR$238:F$=CHR$235+CHR$236
  200B$=CHR$32+CHR$232+CHR$233+CHR$234+CHR$32:J%=0:T%=2
  210n%=1:G$=C$:N%=30
  220U%=3:K%=8:H$=CHR$229
  230REM WARM START
  240W%=0:R%=0:Z%=0:M%=0
  250VDU23,1,0;0;0;0;
  260CLS:COLOUR3:PRINT"SCORE":F%=0
  270V%=28:REM FLAG FOR LAST MAN (NO. INV LEFT)
  280FOR A%=1TO4:A$(A%)=STRING$(6,CHR$(224+A%)+CHR$32)+CHR$(224+A%):NEXT
  290H%=0:D%=0:E%=0:I$="":VP=0:HP=0:I%=2
  300REPEAT PROCd:UNTIL A%
  310PRINTTAB(0,31);STRING$(T%,F$);TAB(19-LEN(G$));G$;
  320L%=0:PROCa:y%=0:x%=0
  330:
  340REPEAT
  350IF INKEY-104 AND Z%=0 PROCb
  360IF INKEY-98 L%=-1:PROCa ELSE IF INKEY-67 L%=1:PROCa
  370PROCc:PROCh:PROCc
  380COLOUR2:PRINTTAB(6,0);W%+P%
  390IF W%=7000 THEN PROCk:y%=-1:GOTO 470
  400IF F% PROCi
  410IF T%=-1 PROCj:x%=-1:GOTO 470
  420REM NOW INVADERS TURN
  430IF H%=0 AND RND(20)=1 THEN PROCd
  440IF H% PROCf:GOTO 460
  450IF RND(N%)=1 OR V%=1 THEN PROCg
  460PROCc
  470UNTIL y% OR x%
  480IF y% THEN 240 ELSE 150
  490END
  500:
  510DEF PROCa
  520IF J%+L%<0 OR J%+L%>15 THEN ENDPROC
  530J%=J%+L%
  540COLOUR2:PRINTTAB(J%,30);B$;
  550ENDPROC
  560:
  570DEF PROCb
  580COLOUR3:Z%=J%+2:M%=29
  590PRINTTAB(Z%,M%);H$ 
  600ENDPROC
  610:
  620DEFPROCc
  630IF Z%=0 ENDPROC
  640IF M%=4 THEN PRINTTAB(Z%,M%);SPC1:Z%=0:M%=0:ENDPROC
  650M%=M%-1:IF ?(Z%*16+M%*320+2+HIMEM) THEN 670
  660COLOUR2:PRINTTAB(Z%,M%+1);SPC1;CHR$11;CHR$8;H$:ENDPROC
  670PRINTTAB(Z%,M%+1);SPC1;CHR$11;CHR$8;"*";CHR$8;
  680IF NOT(D%=POS AND E%=VPOS) THEN 730 
  690H%=0:A$(VP)=LEFT$(A$(VP),HP*2-2)+CHR$32+MID$(A$(VP),HP*2) 
  700W%=W%+500-100*VP:VDU32:IF VP<>1 THEN P%=P%+500-100*VP:GOTO 760 
  710S%=RND(10)*100:P%=P%+S%:PRINTCHR$8;CHR$8;S%+400;
  720PROCr:VDU8,8,8,8,32,32,32,32:GOTO 770
  730W%=W%+500-FNY(VPOS)*100
  740A%=FNY(VPOS):B%=FNX(POS)*2-1:A$(A%)=LEFT$(A$(A%),B%-1)+CHR$32+MID$(A$(A%),B%+1)
  750VDU32:IF H%=1 THEN PROCf
  760PROCq
  770Z%=0:M%=0:V%=V%-1
  780IF V%=1 THEN N%=2:U%=0  
  790ENDPROC
  800:
  810DEFPROCd
  820COLOUR1
  830A%=RND(3)-2:IF A%=0 THEN ENDPROC
  840IF I%+A%<1 OR I%+A%>4 THEN I%=I%-A% ELSE I%=I%+A%
  850 PRINTTAB(I%,4);SPC1;A$(1);SPC1''TAB(I%);SPC1;A$(2);SPC1''TAB(I%);SPC1;A$(3);SPC1''TAB(I%);SPC1;A$(4);SPC1:ENDPROC
  860:
  870DEFPROCe
  880VDU23,225,66,231,255,102,36,36,36,24
  890VDU23,226,56,124,84,214,254,130,254,170
  900VDU23,227,102,153,36,90,90,90,66,129
  910VDU23,228,60,126,165,189,153,90,24,36
  920VDU23,229,0,24,24,24,24,24,24,0
  930VDU23,230,0,8,8,8,8,8,8,0
  940VDU23,231,48,56,60,56,48,32,32,32
  950VDU23,232,0,0,0,1,3,7,15,31
  960VDU23,233,24,60,60,255,255,255,255,255
  970VDU23,234,0,0,0,128,192,224,240,248
  980VDU23,235,0,0,0,1,3,15,31,63
  990VDU23,236,0,0,0,0,128,224,240,248
 1000VDU23,237,0,0,0,255,0,255,0,0,0
 1010VDU23,238,176,184,188,184,176,160,160,160
 1020ENDPROC
 1030:
 1040DEFPROCf
 1050IF V%=1 THEN SOUND 17,-15,30,1:SOUND17,-15,10,1:GOTO1070
 1060SOUND&0011,-15,r%,5:r%=r%-1  
 1070IF D%<0 OR D%>19 THEN 1090
 1080PRINTTAB(D%,E%);SPC1;:IF R%<U% AND RND(K%)=1 AND E%<28 THEN R%=R%+1:X%(R%)=D%:Y%(R%)=E%
 1090IF E%>29 THEN 1120
 1100READ A%,B%:D%=D%+A%:E%=E%+B%:IF D%>=0 AND D%<20 THEN PRINTTAB(D%,E%);I$;
 1110ENDPROC
 1120IF V%=1 THEN 1130 ELSE IF RND(5)=1 THEN PROCd ELSE PRINTTAB(FNX1(HP),FNY1(VP));I$
 1130R%=0:H%=0
 1140IF D%>J% AND D%<J%+4 THEN F%=1
 1150ENDPROC
 1160:
 1170DEFPROCg
 1180RESTORE (RND(3)-1)*20+11000
 1190VP=RND(4):IF INSTR(A$(VP),B$(VP))=0 THEN 1190
 1200IF RND(2)=1 THEN 1220 ELSE A%=15
 1210A%=A%-2:IF MID$(A$(VP),A%,1)=CHR$32THEN 1210 ELSE HP=(A%+1)/2:GOTO1240
 1220HP=(INSTR(A$(VP),B$(VP))+1)/2
 1230RESTORE (RND(3)-1)*20+10000
 1240I$=B$(VP)
 1250IF V%=1 THEN RESTORE (10060+(RND(2)-1)*1000):PRINTTAB(FNX1(HP),FNY1(VP));SPC1;:HP=3 
 1260D%=FNX1(HP):E%=FNY1(VP)
 1270r%=200:H%=1:ENDPROC
 1280:
 1290DEF FNX(X)=(X-I%+1)/2
 1300DEF FNY(Y)=(Y-2)/2
 1310 DEF FNX1(X)=X*2+I%-1 
 1320DEF FNY1(Y)=2+Y*2
 1330:
 1340DEFPROCh
 1350IFR%=0 THEN ENDPROC
 1360FOR A%=1 TO R%:IF X%(A%)=0 ANDY%(A%)=0 THEN NEXT:ENDPROC
 1370PRINTTAB(X%(A%),Y%(A%));SPC1;:Y%(A%)=Y%(A%)+1:IF Y%(A%)<30 THEN 1380 ELSE C%=X%(A%):X%(A%)=0:Y%(A%)=0:IF C%<J%+1 OR C%>J%+3 THEN 1390 ELSE F%=1:GOTO 1390
 1380 COLOUR1:PRINTTAB(X%(A%),Y%(A%));E$;  
 1390NEXT:PROCc:ENDPROC
 1400:
 1410DEFPROCi
 1420T%=T%-1
 1430COLOUR2:PRINTTAB(J%,30);B$;
 1440PROCp:IF T%=-1 ENDPROC
 1450CLS:COLOUR3:PRINT"SCORE"
 1460COLOUR2:PRINTTAB(0,31);STRING$(T%,F$);SPC2;TAB(19-LEN(G$));G$;TAB(0,30);B$
 1470F%=0:H%=0:D%=0:E%=0:R%=0:HP=0:VP=0:J%=0:M%=0:Z%=0
 1480REPEAT:PROCd:UNTIL A%:ENDPROC
 1490:
 1500 DEFPROCj
 1501COLOUR2:COLOUR129:PRINTTAB(5,12)"Game Over"
 1510FOR A = 1 TO 7000:NEXT
 1520W%=W%+P%:IF W%<=S%(5) THEN 1690 
 1530REM MADE IT INTO HIGH SCORE TABLE
 1540FOR A%=5 TO 1 STEP -1
 1550IF S%(A%)<W% THEN C%=A%
 1560NEXT:VDU22,6,19,0,1;0;19,1,3;0;
 1570COLOUR129:COLOUR0:PRINTTAB(11,1)"Galactic Invasion":COLOUR128:COLOUR1
 1580PRINT"Your score of ";W%;" is enough to rank"
 1590PRINTTAB(0,4);C%;MID$("stndrdthth",C%*2-1,2);" in the high score table."
 1600PRINTTAB(0,8);"Please enter your name in not more than ten letters."
 1610PRINTTAB(14,15);">";SPC(10);"<";SPC(13)
 1620PRINTTAB(15,15);:*FX15,1
 1630INPUT""A$
 1640IF LEN(A$)>10 THEN 1610
 1650IF C%=5 THEN 1680
 1660FOR A%=4 TO C% STEP -1
 1670S%(A%+1)=S%(A%):N$(A%+1)=N$(A%):NEXT
 1680S%(C%)=W%:N$(C%)=A$
 1690ENDPROC
 1700:
 1710DEFPROCk
 1720P%=P%+W%:n%=n%+1
 1730 G$=STRING$(n% MOD 10,C$)+STRING$(n% DIV 10,D$) 
 1740U%=3+INT(n%/2):IF U%>8 THEN U%=8
 1750N%=N%-5:IF N%<5 THEN N%=2
 1760K%=11-U%
 1770FOR A = 1 TO 2500:NEXT:ENDPROC
 1780:
 1790REM DISPLAY SHEETS
 1800DEF PROCl
 1810REPEAT:VDU 23,1,0;0;0;0;:*FX15,1
 1820Q%=0:PROCn:IF Q%=0 THEN ENDPROC
 1830CLS:C%=20:*FX15,1
 1840A$=" GALACTIC INVASION":PROCm(1)
 1850A$=" "+STRING$(17,CHR$237):PROCm(2)
 1860A$="400  "+B$(1)+"   ?":PROCm(8)
 1870 A$="300  "+B$(2)+"  600":PROCm(12)
 1880 A$="200  "+B$(3)+"  400":PROCm(16)
 1890 A$="100  "+B$(4)+"  200":PROCm(20)
 1900A$="Z KEY  LEFT":PROCm(26)
 1910A$="X KEY  RIGHT":PROCm(28)
 1920A$=". KEY  FIRE":PROCm(30)
 1930IF INKEY$(1000)<>"" THEN ENDPROC
 1940UNTIL FALSE
 1950:
 1960DEF PROCm(A%)
 1970IF A%=1 OR A%=2 GOTO 1990
 1980A$=STRING$(4,CHR$32)+A$
 1990FOR B%=15 TO 1 STEP -1:A=SIN(97.6):B$=MID$(A$,B%):PRINTTAB(0,A%);B$;:NEXT:ENDPROC
 2000:
 2010DEF PROCn
 2020CLS:A%=6
 2030A%=A%-1
 2040PRINTTAB(0,0);A%;". ";S%(A%);TAB(10,0);N$(A%);CHR$30; 
 2050B%=0
 2060B%=B%+1
 2070VDU11:IF INKEY10<>-1 THEN A%=0:B%=5:ENDPROC
 2080IF B%<4 THEN 2060
 2090IF A%>1 THEN 2030
 2100VDU11,11,11:PRINTTAB(3,2)STRING$(14,CHR$237);CHR$11;TAB(3,1)"HIGHEST SCORES"
 2110IF INKEY(1000)<>-1 THEN ENDPROC
 2120Q%=1:ENDPROC 
 2130:
 2140REM EXPLOSION
 2150DEFPROCp
 2160 FOR A%=1TO50
 2170GCOL RND(4)-1,RND(3)
 2180SOUND 1,0,RND(50)+105,1:SOUND0,-15,7,1 
 2190MOVE(J%+3)*64-32,32
 2200DRAW RND(144)-96+(J%+3)*64,RND(144)+32
 2210NEXT
 2220FOR A=1 TO 3000:NEXT:ENDPROC
 9999 REM DATA FOR DIVES
10000DATA-1,1,-1,1,-1,1,0,1,0,1,1,1,1,1,1,1,1,1,1,1,1,0,1,0,1,1,1,0,1,0,1,1,1,0,1,1,1,0,1,1,1,0,1,1,0,1,0,1,-1,1,-1,0,-1,1,-1,0,-1,1,-1,1,1,1,-1,1,-1,0,-1,1,-1,1,-1,1,-1,1,-1,1 
10020DATA-1,1,-1,1,-1,1,0,1,0,1,1,1,1,1,1,1,1,1,1,1,1,0,1,0,1,0,1,0,1,0,1,1,1,0,1,0,1,0,1,1,1,0,1,1,0,1,-1,1,-1,0,-1,0,-1,1,-1,0,-1,0,-1,1,-1,0,-1,0,-1,0,-1,0,-1,1,0,1,1,1,1,1,1,1,1,1,1,0,1,1,1,0,1,1,1,1,1,1,1,1
10040DATA -1,1,-1,1,-1,1,0,1,0,1,1,1,1,1,1,1,1,1,1,1,1,0,1,0,1,0,1,0,1,0,1,1,1,0,1,0,1,0,1,1,1,0,1,1,0,1,-1,1,-1,0,-1,0,-1,1,-1,0,-1,0,-1,1,-1,0,-1,0,-1,0,-1,0,-1,1,-1,1,0,1,1,1,-1,1,-1,1,-1,1,-1,1,-1,1,0,1,1,1,1,1
10060DATA0,1,0,1,0,1,0,1,0,1,0,1,0,1,0,1,0,1,0,1,-1,1,-1,1,-1,0,-1,1,1,1,1,0,1,1,1,0,1,0,1,0,1,0,1,1,1,1,-1,1,-1,1,-1,0,-1,0,-1,0,-1,-1,-1,-1,0,-1,0,0,1,-1,1,-1,1,0,0,0,1,0,0,0,1,0,1,1,1,1,0,1,0,0,-1,1,-1,1 
10070DATA-1,1,-1,1,-1,1,-1,1,-1,1,-1,1,-1,1,-1,1,-1,1
11000DATA1,1,1,1,1,1,0,1,0,1,-1,1,-1,1,-1,1,-1,1,-1,1,-1,0,-1,0,-1,1,-1,0,-1,0,-1,1,-1,0,-1,1,-1,0,-1,1,-1,0,-1,1,0,1,0,1,1,1,1,0,1,1,1,0,1,1,1,1,1,1,1,1,1,0,1,1,1,1,1,1,1,1,1,1
11020DATA1,1,1,1,1,1,0,1,0,1,-1,1,-1,1,-1,1,-1,1,-1,1,-1,0,-1,0,-1,0,-1,0,-1,0,-1,1,-1,0,-1,0,-1,0,-1,1,-1,0,-1,1,0,1,1,1,1,0,1,0,1,1,1,0,1,0,1,1,1,0,1,0,1,0,1,0,1,1,0,1,-1,1,-1,1,-1,1,-1,1,-1,0,-1,1,-1,0,-1,1,-1,1,-1,1,-1,1 
11040DATA1,1,1,1,1,1,0,1,0,1,-1,1,-1,1,-1,1,-1,1,-1,1,-1,0,-1,0,-1,0,-1,0,-1,0,-1,1,-1,0,-1,0,-1,0,-1,1,-1,0,-1,1,0,1,1,1,1,0,1,0,1,1,1,0,1,0,1,1,1,0,1,0,1,0,1,0,1,1,0,1,-1,1,1,1,1,1,1,1,1,1,1,1,0,1,-1,1,-1,1
11060DATA0,1,0,1,0,1,0,1,0,1,0,1,0,1,0,1,0,1,0,1,1,1,1,1,1,0,1,1,-1,1,-1,0,-1,1,-1,0,-1,0,-1,0,-1,0,-1,1,-1,1,1,1,1,1,1,0,1,0,1,0,1,-1,1,-1,0,-1,0,0,-1,-1,-1,-1,-1,0,0,0,-1,0,0,0,-1,0,-1,1,-1,1,0,1,0,0,1,1,1,1
11070DATA 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
20000DEF PROCq
20010A%=187:B%=179
20020 SOUND 1,-15,109,2
20030SOUND 1,-15,121,1 
20040SOUND 1,-15,B%,1
20050SOUND 1,-15,A%,1
20060SOUND 1,-15,255,1
20070SOUND 1,-15,B%,1
20080SOUND 1,-15,A%,1  
20090SOUND 1,-15,B%,1  
20100ENDPROC
20101:
20110DEFPROCr
20120FOR A%=100 TO 200 STEP 25
20130SOUND 1,-15,A%-4,1:SOUND 1,-15,A%,1:SOUND 1,-15,A%+4,1:SOUND 1,-15,A%+8,1
20140SOUND 1,0,1,1
20150NEXT
20160ENDPROC
20170ON ERROR OFF
20180MODE6:IF ERR<>17 REPORT:PRINT" at line ";ERL

d� � � �`JN
n�e
x+� A$(4),B$(4),X%(10),Y%(10),N$(5),S%(5)
�3� G%=1 � 5:S%(G%)=6000-G%*1000:N$(G%)="ELBUG":�
�� COLD START
�%�5:� A%=1 � 4 :B$(A%)=�(224+A%):�
��19,0,6,0,0,0:�19,3,4,0,0,0
��19,2,5,0,0,0:�l
�
P%=0:R%=0
�(E$=�230:C$=�231:D$=�238:F$=�235+�236
�'B$=�32+�232+�233+�234+�32:J%=0:T%=2
�n%=1:G$=C$:N%=30
�U%=3:K%=8:H$=�229
�� WARM START
�W%=0:R%=0:Z%=0:M%=0
��23,1,0;0;0;0;
�:�3:�"SCORE":F%=0
,V%=28:� FLAG FOR LAST MAN (NO. INV LEFT)
1� A%=1�4:A$(A%)=�6,�(224+A%)+�32)+�(224+A%):�
"'H%=0:D%=0:E%=0:I$="":VP=0:HP=0:I%=2
,
� �d:� A%
6"�0,31);�T%,F$);�19-�(G$));G$;
@L%=0:�a:y%=0:x%=0
J:
T�
^� �-104 � Z%=0 �b
h$� �-98 L%=-1:�a � � �-67 L%=1:�a
r�c:�h:�c
|�2:�6,0);W%+P%
�� W%=7000 � �k:y%=-1:� �dVA
�� F% �i
�� T%=-1 �j:x%=-1:� �dVA
�� NOW INVADERS TURN
�� H%=0 � �(20)=1 � �d
�� H% �f:� �dLA
�� �(N%)=1 � V%=1 � �g
��c
�
� y% � x%
�� y% � �dp@ � �tV@
��
�:
�� �a
� J%+L%<0 � J%+L%>15 � �
J%=J%+L%
�2:�J%,30);B$;
&�
0:
:� �b
D�3:Z%=J%+2:M%=29
N�Z%,M%);H$ 
X�
b:
l��c
v� Z%=0 �
�$� M%=4 � �Z%,M%);�1:Z%=0:M%=0:�
�(M%=M%-1:� ?(Z%*16+M%*320+2+�) � �t^B
� �2:�Z%,M%+1);�1;�11;�8;H$:�
� �Z%,M%+1);�1;�11;�8;"*";�8;
�� �(D%=� � E%=�) � �dZB 
�2H%=0:A$(VP)=�A$(VP),HP*2-2)+�32+�A$(VP),HP*2) 
�;W%=W%+500-100*VP:�32:� VP<>1 � P%=P%+500-100*VP:� �dxB 
�(S%=�(10)*100:P%=P%+S%:�8;�8;S%+400;
�"�r:�8,8,8,8,32,32,32,32:� �TBC
�W%=W%+500-�Y(�)*100
�@A%=�Y(�):B%=�X(�)*2-1:A$(A%)=�A$(A%),B%-1)+�32+�A$(A%),B%+1)
��32:� H%=1 � �f
��q
Z%=0:M%=0:V%=V%-1
� V%=1 � N%=2:U%=0  
�
 :
*��d
4�1
>A%=�(3)-2:� A%=0 � �
H-� I%+A%<1 � I%+A%>4 � I%=I%-A% � I%=I%+A%
RP �I%,4);�1;A$(1);�1''�I%);�1;A$(2);�1''�I%);�1;A$(3);�1''�I%);�1;A$(4);�1:�
\:
f��e
p&�23,225,66,231,255,102,36,36,36,24
z)�23,226,56,124,84,214,254,130,254,170
�&�23,227,102,153,36,90,90,90,66,129
�'�23,228,60,126,165,189,153,90,24,36
�!�23,229,0,24,24,24,24,24,24,0
��23,230,0,8,8,8,8,8,8,0
�#�23,231,48,56,60,56,48,32,32,32
��23,232,0,0,0,1,3,7,15,31
�(�23,233,24,60,60,255,255,255,255,255
�%�23,234,0,0,0,128,192,224,240,248
��23,235,0,0,0,1,3,15,31,63
�#�23,236,0,0,0,0,128,224,240,248
�!�23,237,0,0,0,255,0,255,0,0,0
�+�23,238,176,184,188,184,176,160,160,160
��
:
��f
-� V%=1 � � 17,-15,30,1:�17,-15,10,1:�TnD
$�&0011,-15,r%,5:r%=r%-1  
.� D%<0 � D%>19 � �DBD
8H�D%,E%);�1;:� R%<U% � �(K%)=1 � E%<28 � R%=R%+1:X%(R%)=D%:Y%(R%)=E%
B� E%>29 � �D`D
L<� A%,B%:D%=D%+A%:E%=E%+B%:� D%>=0 � D%<20 � �D%,E%);I$;
V�
`9� V%=1 � �DjD � � �(5)=1 � �d � �X1(HP),�Y1(VP));I$
j
R%=0:H%=0
t� D%>J% � D%<J%+4 � F%=1
~�
�:
���g
�� (�(3)-1)*20+11000
�&VP=�(4):� �A$(VP),B$(VP))=0 � �tfD
�� �(2)=1 � �dDD � A%=15
�9A%=A%-2:� �A$(VP),A%,1)=�32� �tzD � HP=(A%+1)/2:�dXD
�HP=(�A$(VP),B$(VP))+1)/2
�� (�(3)-1)*20+10000
�
I$=B$(VP)
�A� V%=1 � � (10060+(�(2)-1)*1000):�X1(HP),�Y1(VP));�1;:HP=3 
�D%=�X1(HP):E%=�Y1(VP)
�r%=200:H%=1:�
:

� �X(X)=(X-I%+1)/2
� �Y(Y)=(Y-2)/2
 � �X1(X)=X*2+I%-1 
(� �Y1(Y)=2+Y*2
2:
<��h
F
�R%=0 � �
P*� A%=1 � R%:� X%(A%)=0 �Y%(A%)=0 � �:�
Z��X%(A%),Y%(A%));�1;:Y%(A%)=Y%(A%)+1:� Y%(A%)<30 � �DdE � C%=X%(A%):X%(A%)=0:Y%(A%)=0:� C%<J%+1 � C%>J%+3 � �DnE � F%=1:� �DnE
d �1:�X%(A%),Y%(A%));E$;  
n
�:�c:�
x:
���i
�T%=T%-1
��2:�J%,30);B$;
��p:� T%=-1 �
��:�3:�"SCORE"
�1�2:�0,31);�T%,F$);�2;�19-�(G$));G$;�0,30);B$
�5F%=0:H%=0:D%=0:E%=0:R%=0:HP=0:VP=0:J%=0:M%=0:Z%=0
��:�d:� A%:�
�:
� ��j
��2:�129:�5,12)"Game Over"
�� A = 1 � 7000:�
� W%=W%+P%:� W%<=S%(5) � �tZF 
�#� MADE IT INTO HIGH SCORE TABLE
� A%=5 � 1 � -1
� S%(A%)<W% � C%=A%
�:�22,6,19,0,1;0;19,1,3;0;
".�129:�0:�11,1)"Galactic Invasion":�128:�1
,-�"Your score of ";W%;" is enough to rank"
6A�0,4);C%;�"stndrdthth",C%*2-1,2);" in the high score table."
@A�0,8);"Please enter your name in not more than ten letters."
J �14,15);">";�(10);"<";�(13)
T�15,15);:*FX15,1
^	�""A$
h� �(A$)>10 � �DJF
r� C%=5 � �tPF
|� A%=4 � C% � -1
�%S%(A%+1)=S%(A%):N$(A%+1)=N$(A%):�
�S%(C%)=W%:N$(C%)=A$
��
�:
���k
�P%=P%+W%:n%=n%+1
�" G$=�n% � 10,C$)+�n% � 10,D$) 
�U%=3+�(n%/2):� U%>8 � U%=8
�N%=N%-5:� N%<5 � N%=2
�K%=11-U%
�� A = 1 � 2500:�:�
�:
�� DISPLAY SHEETS
� �l
�:� 23,1,0;0;0;0;:*FX15,1
Q%=0:�n:� Q%=0 � �
&�:C%=20:*FX15,1
0!A$=" GALACTIC INVASION":�m(1)
:A$=" "+�17,�237):�m(2)
D!A$="400  "+B$(1)+"   ?":�m(8)
N$ A$="300  "+B$(2)+"  600":�m(12)
X$ A$="200  "+B$(3)+"  400":�m(16)
b$ A$="100  "+B$(4)+"  200":�m(20)
lA$="Z KEY  LEFT":�m(26)
vA$="X KEY  RIGHT":�m(28)
�A$=". KEY  FIRE":�m(30)
�� �(1000)<>"" � �
�� �
�:
�� �m(A%)
�� A%=1 � A%=2 � �dFG
�A$=�4,�32)+A$
�9� B%=15 � 1 � -1:A=�(97.6):B$=�A$,B%):�0,A%);B$;:�:�
�:
�� �n
�
�:A%=6
�A%=A%-1
�-�0,0);A%;". ";S%(A%);�10,0);N$(A%);�30; 
B%=0
B%=B%+1
�11:� �10<>-1 � A%=0:B%=5:�
 � B%<4 � �TLH
*� A%>1 � �dnG
47�11,11,11:�3,2)�14,�237);�11;�3,1)"HIGHEST SCORES"
>� �(1000)<>-1 � �
HQ%=1:� 
R:
\� EXPLOSION
f��p
p � A%=1�50
z� �(4)-1,�(3)
�!� 1,0,�(50)+105,1:�0,-15,7,1 
��(J%+3)*64-32,32
�#� �(144)-96+(J%+3)*64,�(144)+32
��
�� A=1 � 3000:�:�
' � DATA FOR DIVES
'��-1,1,-1,1,-1,1,0,1,0,1,1,1,1,1,1,1,1,1,1,1,1,0,1,0,1,1,1,0,1,0,1,1,1,0,1,1,1,0,1,1,1,0,1,1,0,1,0,1,-1,1,-1,0,-1,1,-1,0,-1,1,-1,1,1,1,-1,1,-1,0,-1,1,-1,1,-1,1,-1,1,-1,1 
'$��-1,1,-1,1,-1,1,0,1,0,1,1,1,1,1,1,1,1,1,1,1,1,0,1,0,1,0,1,0,1,0,1,1,1,0,1,0,1,0,1,1,1,0,1,1,0,1,-1,1,-1,0,-1,0,-1,1,-1,0,-1,0,-1,1,-1,0,-1,0,-1,0,-1,0,-1,1,0,1,1,1,1,1,1,1,1,1,1,0,1,1,1,0,1,1,1,1,1,1,1,1
'8�� -1,1,-1,1,-1,1,0,1,0,1,1,1,1,1,1,1,1,1,1,1,1,0,1,0,1,0,1,0,1,0,1,1,1,0,1,0,1,0,1,1,1,0,1,1,0,1,-1,1,-1,0,-1,0,-1,1,-1,0,-1,0,-1,1,-1,0,-1,0,-1,0,-1,0,-1,1,-1,1,0,1,1,1,-1,1,-1,1,-1,1,-1,1,-1,1,0,1,1,1,1,1
'L��0,1,0,1,0,1,0,1,0,1,0,1,0,1,0,1,0,1,0,1,-1,1,-1,1,-1,0,-1,1,1,1,1,0,1,1,1,0,1,0,1,0,1,0,1,1,1,1,-1,1,-1,1,-1,0,-1,0,-1,0,-1,-1,-1,-1,0,-1,0,0,1,-1,1,-1,1,0,0,0,1,0,0,0,1,0,1,1,1,1,0,1,0,0,-1,1,-1,1 
'V1�-1,1,-1,1,-1,1,-1,1,-1,1,-1,1,-1,1,-1,1,-1,1
*���1,1,1,1,1,1,0,1,0,1,-1,1,-1,1,-1,1,-1,1,-1,1,-1,0,-1,0,-1,1,-1,0,-1,0,-1,1,-1,0,-1,1,-1,0,-1,1,-1,0,-1,1,0,1,0,1,1,1,1,0,1,1,1,0,1,1,1,1,1,1,1,1,1,0,1,1,1,1,1,1,1,1,1,1
+��1,1,1,1,1,1,0,1,0,1,-1,1,-1,1,-1,1,-1,1,-1,1,-1,0,-1,0,-1,0,-1,0,-1,0,-1,1,-1,0,-1,0,-1,0,-1,1,-1,0,-1,1,0,1,1,1,1,0,1,0,1,1,1,0,1,0,1,1,1,0,1,0,1,0,1,0,1,1,0,1,-1,1,-1,1,-1,1,-1,1,-1,0,-1,1,-1,0,-1,1,-1,1,-1,1,-1,1 
+ ��1,1,1,1,1,1,0,1,0,1,-1,1,-1,1,-1,1,-1,1,-1,1,-1,0,-1,0,-1,0,-1,0,-1,0,-1,1,-1,0,-1,0,-1,0,-1,1,-1,0,-1,1,0,1,1,1,1,0,1,0,1,1,1,0,1,0,1,1,1,0,1,0,1,0,1,0,1,1,0,1,-1,1,1,1,1,1,1,1,1,1,1,1,0,1,-1,1,-1,1
+4��0,1,0,1,0,1,0,1,0,1,0,1,0,1,0,1,0,1,0,1,1,1,1,1,1,0,1,1,-1,1,-1,0,-1,1,-1,0,-1,0,-1,0,-1,0,-1,1,-1,1,1,1,1,1,1,0,1,0,1,0,1,-1,1,-1,0,-1,0,0,-1,-1,-1,-1,-1,0,0,0,-1,0,0,0,-1,0,-1,1,-1,1,0,1,0,0,1,1,1,1
+>)� 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
N � �q
N*A%=187:B%=179
N4 � 1,-15,109,2
N>� 1,-15,121,1 
NH� 1,-15,B%,1
NR� 1,-15,A%,1
N\� 1,-15,255,1
Nf� 1,-15,B%,1
Np� 1,-15,A%,1  
Nz� 1,-15,B%,1  
N��
N�:
N���r
N�� A%=100 � 200 � 25
N�=� 1,-15,A%-4,1:� 1,-15,A%,1:� 1,-15,A%+4,1:� 1,-15,A%+8,1
N�
� 1,0,1,1
N��
N��
N�	� � �
N��6:� �<>17 �:�" at line ";�
�

00000000  0d 00 64 0e ee 20 85 20  e5 20 8d 60 4a 4e 0d 00  |..d.. . . .`JN..|
00000010  6e 06 f2 65 0d 00 78 2b  de 20 41 24 28 34 29 2c  |n..e..x+. A$(4),|
00000020  42 24 28 34 29 2c 58 25  28 31 30 29 2c 59 25 28  |B$(4),X%(10),Y%(|
00000030  31 30 29 2c 4e 24 28 35  29 2c 53 25 28 35 29 0d  |10),N$(5),S%(5).|
00000040  00 82 33 e3 20 47 25 3d  31 20 b8 20 35 3a 53 25  |..3. G%=1 . 5:S%|
00000050  28 47 25 29 3d 36 30 30  30 2d 47 25 2a 31 30 30  |(G%)=6000-G%*100|
00000060  30 3a 4e 24 28 47 25 29  3d 22 45 4c 42 55 47 22  |0:N$(G%)="ELBUG"|
00000070  3a ed 0d 00 8c 10 f4 20  43 4f 4c 44 20 53 54 41  |:...... COLD STA|
00000080  52 54 0d 00 96 25 eb 35  3a e3 20 41 25 3d 31 20  |RT...%.5:. A%=1 |
00000090  b8 20 34 20 3a 42 24 28  41 25 29 3d bd 28 32 32  |. 4 :B$(A%)=.(22|
000000a0  34 2b 41 25 29 3a ed 0d  00 a0 1f ef 31 39 2c 30  |4+A%):......19,0|
000000b0  2c 36 2c 30 2c 30 2c 30  3a ef 31 39 2c 33 2c 34  |,6,0,0,0:.19,3,4|
000000c0  2c 30 2c 30 2c 30 0d 00  aa 14 ef 31 39 2c 32 2c  |,0,0,0.....19,2,|
000000d0  35 2c 30 2c 30 2c 30 3a  f2 6c 0d 00 b4 0d 50 25  |5,0,0,0:.l....P%|
000000e0  3d 30 3a 52 25 3d 30 0d  00 be 28 45 24 3d bd 32  |=0:R%=0...(E$=.2|
000000f0  33 30 3a 43 24 3d bd 32  33 31 3a 44 24 3d bd 32  |30:C$=.231:D$=.2|
00000100  33 38 3a 46 24 3d bd 32  33 35 2b bd 32 33 36 0d  |38:F$=.235+.236.|
00000110  00 c8 27 42 24 3d bd 33  32 2b bd 32 33 32 2b bd  |..'B$=.32+.232+.|
00000120  32 33 33 2b bd 32 33 34  2b bd 33 32 3a 4a 25 3d  |233+.234+.32:J%=|
00000130  30 3a 54 25 3d 32 0d 00  d2 14 6e 25 3d 31 3a 47  |0:T%=2....n%=1:G|
00000140  24 3d 43 24 3a 4e 25 3d  33 30 0d 00 dc 15 55 25  |$=C$:N%=30....U%|
00000150  3d 33 3a 4b 25 3d 38 3a  48 24 3d bd 32 32 39 0d  |=3:K%=8:H$=.229.|
00000160  00 e6 10 f4 20 57 41 52  4d 20 53 54 41 52 54 0d  |.... WARM START.|
00000170  00 f0 17 57 25 3d 30 3a  52 25 3d 30 3a 5a 25 3d  |...W%=0:R%=0:Z%=|
00000180  30 3a 4d 25 3d 30 0d 00  fa 12 ef 32 33 2c 31 2c  |0:M%=0.....23,1,|
00000190  30 3b 30 3b 30 3b 30 3b  0d 01 04 16 db 3a fb 33  |0;0;0;0;.....:.3|
000001a0  3a f1 22 53 43 4f 52 45  22 3a 46 25 3d 30 0d 01  |:."SCORE":F%=0..|
000001b0  0e 2c 56 25 3d 32 38 3a  f4 20 46 4c 41 47 20 46  |.,V%=28:. FLAG F|
000001c0  4f 52 20 4c 41 53 54 20  4d 41 4e 20 28 4e 4f 2e  |OR LAST MAN (NO.|
000001d0  20 49 4e 56 20 4c 45 46  54 29 0d 01 18 31 e3 20  | INV LEFT)...1. |
000001e0  41 25 3d 31 b8 34 3a 41  24 28 41 25 29 3d c4 36  |A%=1.4:A$(A%)=.6|
000001f0  2c bd 28 32 32 34 2b 41  25 29 2b bd 33 32 29 2b  |,.(224+A%)+.32)+|
00000200  bd 28 32 32 34 2b 41 25  29 3a ed 0d 01 22 27 48  |.(224+A%):..."'H|
00000210  25 3d 30 3a 44 25 3d 30  3a 45 25 3d 30 3a 49 24  |%=0:D%=0:E%=0:I$|
00000220  3d 22 22 3a 56 50 3d 30  3a 48 50 3d 30 3a 49 25  |="":VP=0:HP=0:I%|
00000230  3d 32 0d 01 2c 0d f5 20  f2 64 3a fd 20 41 25 0d  |=2..,.. .d:. A%.|
00000240  01 36 22 f1 8a 30 2c 33  31 29 3b c4 54 25 2c 46  |.6"..0,31);.T%,F|
00000250  24 29 3b 8a 31 39 2d a9  28 47 24 29 29 3b 47 24  |$);.19-.(G$));G$|
00000260  3b 0d 01 40 15 4c 25 3d  30 3a f2 61 3a 79 25 3d  |;..@.L%=0:.a:y%=|
00000270  30 3a 78 25 3d 30 0d 01  4a 05 3a 0d 01 54 05 f5  |0:x%=0..J.:..T..|
00000280  0d 01 5e 15 e7 20 a6 2d  31 30 34 20 80 20 5a 25  |..^.. .-104 . Z%|
00000290  3d 30 20 f2 62 0d 01 68  24 e7 20 a6 2d 39 38 20  |=0 .b..h$. .-98 |
000002a0  4c 25 3d 2d 31 3a f2 61  20 8b 20 e7 20 a6 2d 36  |L%=-1:.a . . .-6|
000002b0  37 20 4c 25 3d 31 3a f2  61 0d 01 72 0c f2 63 3a  |7 L%=1:.a..r..c:|
000002c0  f2 68 3a f2 63 0d 01 7c  13 fb 32 3a f1 8a 36 2c  |.h:.c..|..2:..6,|
000002d0  30 29 3b 57 25 2b 50 25  0d 01 86 1f e7 20 57 25  |0);W%+P%..... W%|
000002e0  3d 37 30 30 30 20 8c 20  f2 6b 3a 79 25 3d 2d 31  |=7000 . .k:y%=-1|
000002f0  3a e5 20 8d 64 56 41 0d  01 90 0b e7 20 46 25 20  |:. .dVA..... F% |
00000300  f2 69 0d 01 9a 1b e7 20  54 25 3d 2d 31 20 f2 6a  |.i..... T%=-1 .j|
00000310  3a 78 25 3d 2d 31 3a e5  20 8d 64 56 41 0d 01 a4  |:x%=-1:. .dVA...|
00000320  17 f4 20 4e 4f 57 20 49  4e 56 41 44 45 52 53 20  |.. NOW INVADERS |
00000330  54 55 52 4e 0d 01 ae 19  e7 20 48 25 3d 30 20 80  |TURN..... H%=0 .|
00000340  20 b3 28 32 30 29 3d 31  20 8c 20 f2 64 0d 01 b8  | .(20)=1 . .d...|
00000350  12 e7 20 48 25 20 f2 66  3a e5 20 8d 64 4c 41 0d  |.. H% .f:. .dLA.|
00000360  01 c2 19 e7 20 b3 28 4e  25 29 3d 31 20 84 20 56  |.... .(N%)=1 . V|
00000370  25 3d 31 20 8c 20 f2 67  0d 01 cc 06 f2 63 0d 01  |%=1 . .g.....c..|
00000380  d6 0d fd 20 79 25 20 84  20 78 25 0d 01 e0 16 e7  |... y% . x%.....|
00000390  20 79 25 20 8c 20 8d 64  70 40 20 8b 20 8d 74 56  | y% . .dp@ . .tV|
000003a0  40 0d 01 ea 05 e0 0d 01  f4 05 3a 0d 01 fe 08 dd  |@.........:.....|
000003b0  20 f2 61 0d 02 08 1c e7  20 4a 25 2b 4c 25 3c 30  | .a..... J%+L%<0|
000003c0  20 84 20 4a 25 2b 4c 25  3e 31 35 20 8c 20 e1 0d  | . J%+L%>15 . ..|
000003d0  02 12 0c 4a 25 3d 4a 25  2b 4c 25 0d 02 1c 13 fb  |...J%=J%+L%.....|
000003e0  32 3a f1 8a 4a 25 2c 33  30 29 3b 42 24 3b 0d 02  |2:..J%,30);B$;..|
000003f0  26 05 e1 0d 02 30 05 3a  0d 02 3a 08 dd 20 f2 62  |&....0.:..:.. .b|
00000400  0d 02 44 14 fb 33 3a 5a  25 3d 4a 25 2b 32 3a 4d  |..D..3:Z%=J%+2:M|
00000410  25 3d 32 39 0d 02 4e 10  f1 8a 5a 25 2c 4d 25 29  |%=29..N...Z%,M%)|
00000420  3b 48 24 20 0d 02 58 05  e1 0d 02 62 05 3a 0d 02  |;H$ ..X....b.:..|
00000430  6c 07 dd f2 63 0d 02 76  0c e7 20 5a 25 3d 30 20  |l...c..v.. Z%=0 |
00000440  e1 0d 02 80 24 e7 20 4d  25 3d 34 20 8c 20 f1 8a  |....$. M%=4 . ..|
00000450  5a 25 2c 4d 25 29 3b 89  31 3a 5a 25 3d 30 3a 4d  |Z%,M%);.1:Z%=0:M|
00000460  25 3d 30 3a e1 0d 02 8a  28 4d 25 3d 4d 25 2d 31  |%=0:....(M%=M%-1|
00000470  3a e7 20 3f 28 5a 25 2a  31 36 2b 4d 25 2a 33 32  |:. ?(Z%*16+M%*32|
00000480  30 2b 32 2b 93 29 20 8c  20 8d 74 5e 42 0d 02 94  |0+2+.) . .t^B...|
00000490  20 fb 32 3a f1 8a 5a 25  2c 4d 25 2b 31 29 3b 89  | .2:..Z%,M%+1);.|
000004a0  31 3b bd 31 31 3b bd 38  3b 48 24 3a e1 0d 02 9e  |1;.11;.8;H$:....|
000004b0  20 f1 8a 5a 25 2c 4d 25  2b 31 29 3b 89 31 3b bd  | ..Z%,M%+1);.1;.|
000004c0  31 31 3b bd 38 3b 22 2a  22 3b bd 38 3b 0d 02 a8  |11;.8;"*";.8;...|
000004d0  1c e7 20 ac 28 44 25 3d  b1 20 80 20 45 25 3d bc  |.. .(D%=. . E%=.|
000004e0  29 20 8c 20 8d 64 5a 42  20 0d 02 b2 32 48 25 3d  |) . .dZB ...2H%=|
000004f0  30 3a 41 24 28 56 50 29  3d c0 41 24 28 56 50 29  |0:A$(VP)=.A$(VP)|
00000500  2c 48 50 2a 32 2d 32 29  2b bd 33 32 2b c1 41 24  |,HP*2-2)+.32+.A$|
00000510  28 56 50 29 2c 48 50 2a  32 29 20 0d 02 bc 3b 57  |(VP),HP*2) ...;W|
00000520  25 3d 57 25 2b 35 30 30  2d 31 30 30 2a 56 50 3a  |%=W%+500-100*VP:|
00000530  ef 33 32 3a e7 20 56 50  3c 3e 31 20 8c 20 50 25  |.32:. VP<>1 . P%|
00000540  3d 50 25 2b 35 30 30 2d  31 30 30 2a 56 50 3a e5  |=P%+500-100*VP:.|
00000550  20 8d 64 78 42 20 0d 02  c6 28 53 25 3d b3 28 31  | .dxB ...(S%=.(1|
00000560  30 29 2a 31 30 30 3a 50  25 3d 50 25 2b 53 25 3a  |0)*100:P%=P%+S%:|
00000570  f1 bd 38 3b bd 38 3b 53  25 2b 34 30 30 3b 0d 02  |..8;.8;S%+400;..|
00000580  d0 22 f2 72 3a ef 38 2c  38 2c 38 2c 38 2c 33 32  |.".r:.8,8,8,8,32|
00000590  2c 33 32 2c 33 32 2c 33  32 3a e5 20 8d 54 42 43  |,32,32,32:. .TBC|
000005a0  0d 02 da 17 57 25 3d 57  25 2b 35 30 30 2d a4 59  |....W%=W%+500-.Y|
000005b0  28 bc 29 2a 31 30 30 0d  02 e4 40 41 25 3d a4 59  |(.)*100...@A%=.Y|
000005c0  28 bc 29 3a 42 25 3d a4  58 28 b1 29 2a 32 2d 31  |(.):B%=.X(.)*2-1|
000005d0  3a 41 24 28 41 25 29 3d  c0 41 24 28 41 25 29 2c  |:A$(A%)=.A$(A%),|
000005e0  42 25 2d 31 29 2b bd 33  32 2b c1 41 24 28 41 25  |B%-1)+.32+.A$(A%|
000005f0  29 2c 42 25 2b 31 29 0d  02 ee 13 ef 33 32 3a e7  |),B%+1).....32:.|
00000600  20 48 25 3d 31 20 8c 20  f2 66 0d 02 f8 06 f2 71  | H%=1 . .f.....q|
00000610  0d 03 02 15 5a 25 3d 30  3a 4d 25 3d 30 3a 56 25  |....Z%=0:M%=0:V%|
00000620  3d 56 25 2d 31 0d 03 0c  18 e7 20 56 25 3d 31 20  |=V%-1..... V%=1 |
00000630  8c 20 4e 25 3d 32 3a 55  25 3d 30 20 20 0d 03 16  |. N%=2:U%=0  ...|
00000640  05 e1 0d 03 20 05 3a 0d  03 2a 07 dd f2 64 0d 03  |.... .:..*...d..|
00000650  34 06 fb 31 0d 03 3e 18  41 25 3d b3 28 33 29 2d  |4..1..>.A%=.(3)-|
00000660  32 3a e7 20 41 25 3d 30  20 8c 20 e1 0d 03 48 2d  |2:. A%=0 . ...H-|
00000670  e7 20 49 25 2b 41 25 3c  31 20 84 20 49 25 2b 41  |. I%+A%<1 . I%+A|
00000680  25 3e 34 20 8c 20 49 25  3d 49 25 2d 41 25 20 8b  |%>4 . I%=I%-A% .|
00000690  20 49 25 3d 49 25 2b 41  25 0d 03 52 50 20 f1 8a  | I%=I%+A%..RP ..|
000006a0  49 25 2c 34 29 3b 89 31  3b 41 24 28 31 29 3b 89  |I%,4);.1;A$(1);.|
000006b0  31 27 27 8a 49 25 29 3b  89 31 3b 41 24 28 32 29  |1''.I%);.1;A$(2)|
000006c0  3b 89 31 27 27 8a 49 25  29 3b 89 31 3b 41 24 28  |;.1''.I%);.1;A$(|
000006d0  33 29 3b 89 31 27 27 8a  49 25 29 3b 89 31 3b 41  |3);.1''.I%);.1;A|
000006e0  24 28 34 29 3b 89 31 3a  e1 0d 03 5c 05 3a 0d 03  |$(4);.1:...\.:..|
000006f0  66 07 dd f2 65 0d 03 70  26 ef 32 33 2c 32 32 35  |f...e..p&.23,225|
00000700  2c 36 36 2c 32 33 31 2c  32 35 35 2c 31 30 32 2c  |,66,231,255,102,|
00000710  33 36 2c 33 36 2c 33 36  2c 32 34 0d 03 7a 29 ef  |36,36,36,24..z).|
00000720  32 33 2c 32 32 36 2c 35  36 2c 31 32 34 2c 38 34  |23,226,56,124,84|
00000730  2c 32 31 34 2c 32 35 34  2c 31 33 30 2c 32 35 34  |,214,254,130,254|
00000740  2c 31 37 30 0d 03 84 26  ef 32 33 2c 32 32 37 2c  |,170...&.23,227,|
00000750  31 30 32 2c 31 35 33 2c  33 36 2c 39 30 2c 39 30  |102,153,36,90,90|
00000760  2c 39 30 2c 36 36 2c 31  32 39 0d 03 8e 27 ef 32  |,90,66,129...'.2|
00000770  33 2c 32 32 38 2c 36 30  2c 31 32 36 2c 31 36 35  |3,228,60,126,165|
00000780  2c 31 38 39 2c 31 35 33  2c 39 30 2c 32 34 2c 33  |,189,153,90,24,3|
00000790  36 0d 03 98 21 ef 32 33  2c 32 32 39 2c 30 2c 32  |6...!.23,229,0,2|
000007a0  34 2c 32 34 2c 32 34 2c  32 34 2c 32 34 2c 32 34  |4,24,24,24,24,24|
000007b0  2c 30 0d 03 a2 1b ef 32  33 2c 32 33 30 2c 30 2c  |,0.....23,230,0,|
000007c0  38 2c 38 2c 38 2c 38 2c  38 2c 38 2c 30 0d 03 ac  |8,8,8,8,8,8,0...|
000007d0  23 ef 32 33 2c 32 33 31  2c 34 38 2c 35 36 2c 36  |#.23,231,48,56,6|
000007e0  30 2c 35 36 2c 34 38 2c  33 32 2c 33 32 2c 33 32  |0,56,48,32,32,32|
000007f0  0d 03 b6 1d ef 32 33 2c  32 33 32 2c 30 2c 30 2c  |.....23,232,0,0,|
00000800  30 2c 31 2c 33 2c 37 2c  31 35 2c 33 31 0d 03 c0  |0,1,3,7,15,31...|
00000810  28 ef 32 33 2c 32 33 33  2c 32 34 2c 36 30 2c 36  |(.23,233,24,60,6|
00000820  30 2c 32 35 35 2c 32 35  35 2c 32 35 35 2c 32 35  |0,255,255,255,25|
00000830  35 2c 32 35 35 0d 03 ca  25 ef 32 33 2c 32 33 34  |5,255...%.23,234|
00000840  2c 30 2c 30 2c 30 2c 31  32 38 2c 31 39 32 2c 32  |,0,0,0,128,192,2|
00000850  32 34 2c 32 34 30 2c 32  34 38 0d 03 d4 1e ef 32  |24,240,248.....2|
00000860  33 2c 32 33 35 2c 30 2c  30 2c 30 2c 31 2c 33 2c  |3,235,0,0,0,1,3,|
00000870  31 35 2c 33 31 2c 36 33  0d 03 de 23 ef 32 33 2c  |15,31,63...#.23,|
00000880  32 33 36 2c 30 2c 30 2c  30 2c 30 2c 31 32 38 2c  |236,0,0,0,0,128,|
00000890  32 32 34 2c 32 34 30 2c  32 34 38 0d 03 e8 21 ef  |224,240,248...!.|
000008a0  32 33 2c 32 33 37 2c 30  2c 30 2c 30 2c 32 35 35  |23,237,0,0,0,255|
000008b0  2c 30 2c 32 35 35 2c 30  2c 30 2c 30 0d 03 f2 2b  |,0,255,0,0,0...+|
000008c0  ef 32 33 2c 32 33 38 2c  31 37 36 2c 31 38 34 2c  |.23,238,176,184,|
000008d0  31 38 38 2c 31 38 34 2c  31 37 36 2c 31 36 30 2c  |188,184,176,160,|
000008e0  31 36 30 2c 31 36 30 0d  03 fc 05 e1 0d 04 06 05  |160,160.........|
000008f0  3a 0d 04 10 07 dd f2 66  0d 04 1a 2d e7 20 56 25  |:......f...-. V%|
00000900  3d 31 20 8c 20 d4 20 31  37 2c 2d 31 35 2c 33 30  |=1 . . 17,-15,30|
00000910  2c 31 3a d4 31 37 2c 2d  31 35 2c 31 30 2c 31 3a  |,1:.17,-15,10,1:|
00000920  e5 8d 54 6e 44 0d 04 24  1d d4 26 30 30 31 31 2c  |..TnD..$..&0011,|
00000930  2d 31 35 2c 72 25 2c 35  3a 72 25 3d 72 25 2d 31  |-15,r%,5:r%=r%-1|
00000940  20 20 0d 04 2e 19 e7 20  44 25 3c 30 20 84 20 44  |  ..... D%<0 . D|
00000950  25 3e 31 39 20 8c 20 8d  44 42 44 0d 04 38 48 f1  |%>19 . .DBD..8H.|
00000960  8a 44 25 2c 45 25 29 3b  89 31 3b 3a e7 20 52 25  |.D%,E%);.1;:. R%|
00000970  3c 55 25 20 80 20 b3 28  4b 25 29 3d 31 20 80 20  |<U% . .(K%)=1 . |
00000980  45 25 3c 32 38 20 8c 20  52 25 3d 52 25 2b 31 3a  |E%<28 . R%=R%+1:|
00000990  58 25 28 52 25 29 3d 44  25 3a 59 25 28 52 25 29  |X%(R%)=D%:Y%(R%)|
000009a0  3d 45 25 0d 04 42 12 e7  20 45 25 3e 32 39 20 8c  |=E%..B.. E%>29 .|
000009b0  20 8d 44 60 44 0d 04 4c  3c f3 20 41 25 2c 42 25  | .D`D..L<. A%,B%|
000009c0  3a 44 25 3d 44 25 2b 41  25 3a 45 25 3d 45 25 2b  |:D%=D%+A%:E%=E%+|
000009d0  42 25 3a e7 20 44 25 3e  3d 30 20 80 20 44 25 3c  |B%:. D%>=0 . D%<|
000009e0  32 30 20 8c 20 f1 8a 44  25 2c 45 25 29 3b 49 24  |20 . ..D%,E%);I$|
000009f0  3b 0d 04 56 05 e1 0d 04  60 39 e7 20 56 25 3d 31  |;..V....`9. V%=1|
00000a00  20 8c 20 8d 44 6a 44 20  8b 20 e7 20 b3 28 35 29  | . .DjD . . .(5)|
00000a10  3d 31 20 8c 20 f2 64 20  8b 20 f1 8a a4 58 31 28  |=1 . .d . ...X1(|
00000a20  48 50 29 2c a4 59 31 28  56 50 29 29 3b 49 24 0d  |HP),.Y1(VP));I$.|
00000a30  04 6a 0d 52 25 3d 30 3a  48 25 3d 30 0d 04 74 1c  |.j.R%=0:H%=0..t.|
00000a40  e7 20 44 25 3e 4a 25 20  80 20 44 25 3c 4a 25 2b  |. D%>J% . D%<J%+|
00000a50  34 20 8c 20 46 25 3d 31  0d 04 7e 05 e1 0d 04 88  |4 . F%=1..~.....|
00000a60  05 3a 0d 04 92 07 dd f2  67 0d 04 9c 17 f7 20 28  |.:......g..... (|
00000a70  b3 28 33 29 2d 31 29 2a  32 30 2b 31 31 30 30 30  |.(3)-1)*20+11000|
00000a80  0d 04 a6 26 56 50 3d b3  28 34 29 3a e7 20 a7 41  |...&VP=.(4):. .A|
00000a90  24 28 56 50 29 2c 42 24  28 56 50 29 29 3d 30 20  |$(VP),B$(VP))=0 |
00000aa0  8c 20 8d 74 66 44 0d 04  b0 1b e7 20 b3 28 32 29  |. .tfD..... .(2)|
00000ab0  3d 31 20 8c 20 8d 64 44  44 20 8b 20 41 25 3d 31  |=1 . .dDD . A%=1|
00000ac0  35 0d 04 ba 39 41 25 3d  41 25 2d 32 3a e7 20 c1  |5...9A%=A%-2:. .|
00000ad0  41 24 28 56 50 29 2c 41  25 2c 31 29 3d bd 33 32  |A$(VP),A%,1)=.32|
00000ae0  8c 20 8d 74 7a 44 20 8b  20 48 50 3d 28 41 25 2b  |. .tzD . HP=(A%+|
00000af0  31 29 2f 32 3a e5 8d 64  58 44 0d 04 c4 1c 48 50  |1)/2:..dXD....HP|
00000b00  3d 28 a7 41 24 28 56 50  29 2c 42 24 28 56 50 29  |=(.A$(VP),B$(VP)|
00000b10  29 2b 31 29 2f 32 0d 04  ce 17 f7 20 28 b3 28 33  |)+1)/2..... (.(3|
00000b20  29 2d 31 29 2a 32 30 2b  31 30 30 30 30 0d 04 d8  |)-1)*20+10000...|
00000b30  0d 49 24 3d 42 24 28 56  50 29 0d 04 e2 41 e7 20  |.I$=B$(VP)...A. |
00000b40  56 25 3d 31 20 8c 20 f7  20 28 31 30 30 36 30 2b  |V%=1 . . (10060+|
00000b50  28 b3 28 32 29 2d 31 29  2a 31 30 30 30 29 3a f1  |(.(2)-1)*1000):.|
00000b60  8a a4 58 31 28 48 50 29  2c a4 59 31 28 56 50 29  |..X1(HP),.Y1(VP)|
00000b70  29 3b 89 31 3b 3a 48 50  3d 33 20 0d 04 ec 19 44  |);.1;:HP=3 ....D|
00000b80  25 3d a4 58 31 28 48 50  29 3a 45 25 3d a4 59 31  |%=.X1(HP):E%=.Y1|
00000b90  28 56 50 29 0d 04 f6 11  72 25 3d 32 30 30 3a 48  |(VP)....r%=200:H|
00000ba0  25 3d 31 3a e1 0d 05 00  05 3a 0d 05 0a 16 dd 20  |%=1:.....:..... |
00000bb0  a4 58 28 58 29 3d 28 58  2d 49 25 2b 31 29 2f 32  |.X(X)=(X-I%+1)/2|
00000bc0  0d 05 14 13 dd 20 a4 59  28 59 29 3d 28 59 2d 32  |..... .Y(Y)=(Y-2|
00000bd0  29 2f 32 0d 05 1e 17 20  dd 20 a4 58 31 28 58 29  |)/2.... . .X1(X)|
00000be0  3d 58 2a 32 2b 49 25 2d  31 20 0d 05 28 12 dd 20  |=X*2+I%-1 ..(.. |
00000bf0  a4 59 31 28 59 29 3d 32  2b 59 2a 32 0d 05 32 05  |.Y1(Y)=2+Y*2..2.|
00000c00  3a 0d 05 3c 07 dd f2 68  0d 05 46 0d e7 52 25 3d  |:..<...h..F..R%=|
00000c10  30 20 8c 20 e1 0d 05 50  2a e3 20 41 25 3d 31 20  |0 . ...P*. A%=1 |
00000c20  b8 20 52 25 3a e7 20 58  25 28 41 25 29 3d 30 20  |. R%:. X%(A%)=0 |
00000c30  80 59 25 28 41 25 29 3d  30 20 8c 20 ed 3a e1 0d  |.Y%(A%)=0 . .:..|
00000c40  05 5a 82 f1 8a 58 25 28  41 25 29 2c 59 25 28 41  |.Z...X%(A%),Y%(A|
00000c50  25 29 29 3b 89 31 3b 3a  59 25 28 41 25 29 3d 59  |%));.1;:Y%(A%)=Y|
00000c60  25 28 41 25 29 2b 31 3a  e7 20 59 25 28 41 25 29  |%(A%)+1:. Y%(A%)|
00000c70  3c 33 30 20 8c 20 8d 44  64 45 20 8b 20 43 25 3d  |<30 . .DdE . C%=|
00000c80  58 25 28 41 25 29 3a 58  25 28 41 25 29 3d 30 3a  |X%(A%):X%(A%)=0:|
00000c90  59 25 28 41 25 29 3d 30  3a e7 20 43 25 3c 4a 25  |Y%(A%)=0:. C%<J%|
00000ca0  2b 31 20 84 20 43 25 3e  4a 25 2b 33 20 8c 20 8d  |+1 . C%>J%+3 . .|
00000cb0  44 6e 45 20 8b 20 46 25  3d 31 3a e5 20 8d 44 6e  |DnE . F%=1:. .Dn|
00000cc0  45 0d 05 64 1e 20 fb 31  3a f1 8a 58 25 28 41 25  |E..d. .1:..X%(A%|
00000cd0  29 2c 59 25 28 41 25 29  29 3b 45 24 3b 20 20 0d  |),Y%(A%));E$;  .|
00000ce0  05 6e 0a ed 3a f2 63 3a  e1 0d 05 78 05 3a 0d 05  |.n..:.c:...x.:..|
00000cf0  82 07 dd f2 69 0d 05 8c  0b 54 25 3d 54 25 2d 31  |....i....T%=T%-1|
00000d00  0d 05 96 13 fb 32 3a f1  8a 4a 25 2c 33 30 29 3b  |.....2:..J%,30);|
00000d10  42 24 3b 0d 05 a0 10 f2  70 3a e7 20 54 25 3d 2d  |B$;.....p:. T%=-|
00000d20  31 20 e1 0d 05 aa 11 db  3a fb 33 3a f1 22 53 43  |1 ......:.3:."SC|
00000d30  4f 52 45 22 0d 05 b4 31  fb 32 3a f1 8a 30 2c 33  |ORE"...1.2:..0,3|
00000d40  31 29 3b c4 54 25 2c 46  24 29 3b 89 32 3b 8a 31  |1);.T%,F$);.2;.1|
00000d50  39 2d a9 28 47 24 29 29  3b 47 24 3b 8a 30 2c 33  |9-.(G$));G$;.0,3|
00000d60  30 29 3b 42 24 0d 05 be  35 46 25 3d 30 3a 48 25  |0);B$...5F%=0:H%|
00000d70  3d 30 3a 44 25 3d 30 3a  45 25 3d 30 3a 52 25 3d  |=0:D%=0:E%=0:R%=|
00000d80  30 3a 48 50 3d 30 3a 56  50 3d 30 3a 4a 25 3d 30  |0:HP=0:VP=0:J%=0|
00000d90  3a 4d 25 3d 30 3a 5a 25  3d 30 0d 05 c8 0f f5 3a  |:M%=0:Z%=0.....:|
00000da0  f2 64 3a fd 20 41 25 3a  e1 0d 05 d2 05 3a 0d 05  |.d:. A%:.....:..|
00000db0  dc 08 20 dd f2 6a 0d 05  dd 1e fb 32 3a fb 31 32  |.. ..j.....2:.12|
00000dc0  39 3a f1 8a 35 2c 31 32  29 22 47 61 6d 65 20 4f  |9:..5,12)"Game O|
00000dd0  76 65 72 22 0d 05 e6 14  e3 20 41 20 3d 20 31 20  |ver"..... A = 1 |
00000de0  b8 20 37 30 30 30 3a ed  0d 05 f0 20 57 25 3d 57  |. 7000:.... W%=W|
00000df0  25 2b 50 25 3a e7 20 57  25 3c 3d 53 25 28 35 29  |%+P%:. W%<=S%(5)|
00000e00  20 8c 20 8d 74 5a 46 20  0d 05 fa 23 f4 20 4d 41  | . .tZF ...#. MA|
00000e10  44 45 20 49 54 20 49 4e  54 4f 20 48 49 47 48 20  |DE IT INTO HIGH |
00000e20  53 43 4f 52 45 20 54 41  42 4c 45 0d 06 04 13 e3  |SCORE TABLE.....|
00000e30  20 41 25 3d 35 20 b8 20  31 20 88 20 2d 31 0d 06  | A%=5 . 1 . -1..|
00000e40  0e 17 e7 20 53 25 28 41  25 29 3c 57 25 20 8c 20  |... S%(A%)<W% . |
00000e50  43 25 3d 41 25 0d 06 18  1e ed 3a ef 32 32 2c 36  |C%=A%.....:.22,6|
00000e60  2c 31 39 2c 30 2c 31 3b  30 3b 31 39 2c 31 2c 33  |,19,0,1;0;19,1,3|
00000e70  3b 30 3b 0d 06 22 2e fb  31 32 39 3a fb 30 3a f1  |;0;.."..129:.0:.|
00000e80  8a 31 31 2c 31 29 22 47  61 6c 61 63 74 69 63 20  |.11,1)"Galactic |
00000e90  49 6e 76 61 73 69 6f 6e  22 3a fb 31 32 38 3a fb  |Invasion":.128:.|
00000ea0  31 0d 06 2c 2d f1 22 59  6f 75 72 20 73 63 6f 72  |1..,-."Your scor|
00000eb0  65 20 6f 66 20 22 3b 57  25 3b 22 20 69 73 20 65  |e of ";W%;" is e|
00000ec0  6e 6f 75 67 68 20 74 6f  20 72 61 6e 6b 22 0d 06  |nough to rank"..|
00000ed0  36 41 f1 8a 30 2c 34 29  3b 43 25 3b c1 22 73 74  |6A..0,4);C%;."st|
00000ee0  6e 64 72 64 74 68 74 68  22 2c 43 25 2a 32 2d 31  |ndrdthth",C%*2-1|
00000ef0  2c 32 29 3b 22 20 69 6e  20 74 68 65 20 68 69 67  |,2);" in the hig|
00000f00  68 20 73 63 6f 72 65 20  74 61 62 6c 65 2e 22 0d  |h score table.".|
00000f10  06 40 41 f1 8a 30 2c 38  29 3b 22 50 6c 65 61 73  |.@A..0,8);"Pleas|
00000f20  65 20 65 6e 74 65 72 20  79 6f 75 72 20 6e 61 6d  |e enter your nam|
00000f30  65 20 69 6e 20 6e 6f 74  20 6d 6f 72 65 20 74 68  |e in not more th|
00000f40  61 6e 20 74 65 6e 20 6c  65 74 74 65 72 73 2e 22  |an ten letters."|
00000f50  0d 06 4a 20 f1 8a 31 34  2c 31 35 29 3b 22 3e 22  |..J ..14,15);">"|
00000f60  3b 89 28 31 30 29 3b 22  3c 22 3b 89 28 31 33 29  |;.(10);"<";.(13)|
00000f70  0d 06 54 15 f1 8a 31 35  2c 31 35 29 3b 3a 2a 46  |..T...15,15);:*F|
00000f80  58 31 35 2c 31 0d 06 5e  09 e8 22 22 41 24 0d 06  |X15,1..^..""A$..|
00000f90  68 15 e7 20 a9 28 41 24  29 3e 31 30 20 8c 20 8d  |h.. .(A$)>10 . .|
00000fa0  44 4a 46 0d 06 72 11 e7  20 43 25 3d 35 20 8c 20  |DJF..r.. C%=5 . |
00000fb0  8d 74 50 46 0d 06 7c 14  e3 20 41 25 3d 34 20 b8  |.tPF..|.. A%=4 .|
00000fc0  20 43 25 20 88 20 2d 31  0d 06 86 25 53 25 28 41  | C% . -1...%S%(A|
00000fd0  25 2b 31 29 3d 53 25 28  41 25 29 3a 4e 24 28 41  |%+1)=S%(A%):N$(A|
00000fe0  25 2b 31 29 3d 4e 24 28  41 25 29 3a ed 0d 06 90  |%+1)=N$(A%):....|
00000ff0  17 53 25 28 43 25 29 3d  57 25 3a 4e 24 28 43 25  |.S%(C%)=W%:N$(C%|
00001000  29 3d 41 24 0d 06 9a 05  e1 0d 06 a4 05 3a 0d 06  |)=A$.........:..|
00001010  ae 07 dd f2 6b 0d 06 b8  14 50 25 3d 50 25 2b 57  |....k....P%=P%+W|
00001020  25 3a 6e 25 3d 6e 25 2b  31 0d 06 c2 22 20 47 24  |%:n%=n%+1..." G$|
00001030  3d c4 6e 25 20 83 20 31  30 2c 43 24 29 2b c4 6e  |=.n% . 10,C$)+.n|
00001040  25 20 81 20 31 30 2c 44  24 29 20 0d 06 cc 1e 55  |% . 10,D$) ....U|
00001050  25 3d 33 2b a8 28 6e 25  2f 32 29 3a e7 20 55 25  |%=3+.(n%/2):. U%|
00001060  3e 38 20 8c 20 55 25 3d  38 0d 06 d6 19 4e 25 3d  |>8 . U%=8....N%=|
00001070  4e 25 2d 35 3a e7 20 4e  25 3c 35 20 8c 20 4e 25  |N%-5:. N%<5 . N%|
00001080  3d 32 0d 06 e0 0c 4b 25  3d 31 31 2d 55 25 0d 06  |=2....K%=11-U%..|
00001090  ea 16 e3 20 41 20 3d 20  31 20 b8 20 32 35 30 30  |... A = 1 . 2500|
000010a0  3a ed 3a e1 0d 06 f4 05  3a 0d 06 fe 14 f4 20 44  |:.:.....:..... D|
000010b0  49 53 50 4c 41 59 20 53  48 45 45 54 53 0d 07 08  |ISPLAY SHEETS...|
000010c0  08 dd 20 f2 6c 0d 07 12  1d f5 3a ef 20 32 33 2c  |.. .l.....:. 23,|
000010d0  31 2c 30 3b 30 3b 30 3b  30 3b 3a 2a 46 58 31 35  |1,0;0;0;0;:*FX15|
000010e0  2c 31 0d 07 1c 16 51 25  3d 30 3a f2 6e 3a e7 20  |,1....Q%=0:.n:. |
000010f0  51 25 3d 30 20 8c 20 e1  0d 07 26 13 db 3a 43 25  |Q%=0 . ...&..:C%|
00001100  3d 32 30 3a 2a 46 58 31  35 2c 31 0d 07 30 21 41  |=20:*FX15,1..0!A|
00001110  24 3d 22 20 47 41 4c 41  43 54 49 43 20 49 4e 56  |$=" GALACTIC INV|
00001120  41 53 49 4f 4e 22 3a f2  6d 28 31 29 0d 07 3a 1a  |ASION":.m(1)..:.|
00001130  41 24 3d 22 20 22 2b c4  31 37 2c bd 32 33 37 29  |A$=" "+.17,.237)|
00001140  3a f2 6d 28 32 29 0d 07  44 21 41 24 3d 22 34 30  |:.m(2)..D!A$="40|
00001150  30 20 20 22 2b 42 24 28  31 29 2b 22 20 20 20 3f  |0  "+B$(1)+"   ?|
00001160  22 3a f2 6d 28 38 29 0d  07 4e 24 20 41 24 3d 22  |":.m(8)..N$ A$="|
00001170  33 30 30 20 20 22 2b 42  24 28 32 29 2b 22 20 20  |300  "+B$(2)+"  |
00001180  36 30 30 22 3a f2 6d 28  31 32 29 0d 07 58 24 20  |600":.m(12)..X$ |
00001190  41 24 3d 22 32 30 30 20  20 22 2b 42 24 28 33 29  |A$="200  "+B$(3)|
000011a0  2b 22 20 20 34 30 30 22  3a f2 6d 28 31 36 29 0d  |+"  400":.m(16).|
000011b0  07 62 24 20 41 24 3d 22  31 30 30 20 20 22 2b 42  |.b$ A$="100  "+B|
000011c0  24 28 34 29 2b 22 20 20  32 30 30 22 3a f2 6d 28  |$(4)+"  200":.m(|
000011d0  32 30 29 0d 07 6c 1b 41  24 3d 22 5a 20 4b 45 59  |20)..l.A$="Z KEY|
000011e0  20 20 4c 45 46 54 22 3a  f2 6d 28 32 36 29 0d 07  |  LEFT":.m(26)..|
000011f0  76 1c 41 24 3d 22 58 20  4b 45 59 20 20 52 49 47  |v.A$="X KEY  RIG|
00001200  48 54 22 3a f2 6d 28 32  38 29 0d 07 80 1b 41 24  |HT":.m(28)....A$|
00001210  3d 22 2e 20 4b 45 59 20  20 46 49 52 45 22 3a f2  |=". KEY  FIRE":.|
00001220  6d 28 33 30 29 0d 07 8a  15 e7 20 bf 28 31 30 30  |m(30)..... .(100|
00001230  30 29 3c 3e 22 22 20 8c  20 e1 0d 07 94 07 fd 20  |0)<>"" . ...... |
00001240  a3 0d 07 9e 05 3a 0d 07  a8 0c dd 20 f2 6d 28 41  |.....:..... .m(A|
00001250  25 29 0d 07 b2 18 e7 20  41 25 3d 31 20 84 20 41  |%)..... A%=1 . A|
00001260  25 3d 32 20 e5 20 8d 64  46 47 0d 07 bc 11 41 24  |%=2 . .dFG....A$|
00001270  3d c4 34 2c bd 33 32 29  2b 41 24 0d 07 c6 39 e3  |=.4,.32)+A$...9.|
00001280  20 42 25 3d 31 35 20 b8  20 31 20 88 20 2d 31 3a  | B%=15 . 1 . -1:|
00001290  41 3d b5 28 39 37 2e 36  29 3a 42 24 3d c1 41 24  |A=.(97.6):B$=.A$|
000012a0  2c 42 25 29 3a f1 8a 30  2c 41 25 29 3b 42 24 3b  |,B%):..0,A%);B$;|
000012b0  3a ed 3a e1 0d 07 d0 05  3a 0d 07 da 08 dd 20 f2  |:.:.....:..... .|
000012c0  6e 0d 07 e4 0a db 3a 41  25 3d 36 0d 07 ee 0b 41  |n.....:A%=6....A|
000012d0  25 3d 41 25 2d 31 0d 07  f8 2d f1 8a 30 2c 30 29  |%=A%-1...-..0,0)|
000012e0  3b 41 25 3b 22 2e 20 22  3b 53 25 28 41 25 29 3b  |;A%;". ";S%(A%);|
000012f0  8a 31 30 2c 30 29 3b 4e  24 28 41 25 29 3b bd 33  |.10,0);N$(A%);.3|
00001300  30 3b 20 0d 08 02 08 42  25 3d 30 0d 08 0c 0b 42  |0; ....B%=0....B|
00001310  25 3d 42 25 2b 31 0d 08  16 1f ef 31 31 3a e7 20  |%=B%+1.....11:. |
00001320  a6 31 30 3c 3e 2d 31 20  8c 20 41 25 3d 30 3a 42  |.10<>-1 . A%=0:B|
00001330  25 3d 35 3a e1 0d 08 20  11 e7 20 42 25 3c 34 20  |%=5:... .. B%<4 |
00001340  8c 20 8d 54 4c 48 0d 08  2a 11 e7 20 41 25 3e 31  |. .TLH..*.. A%>1|
00001350  20 8c 20 8d 64 6e 47 0d  08 34 37 ef 31 31 2c 31  | . .dnG..47.11,1|
00001360  31 2c 31 31 3a f1 8a 33  2c 32 29 c4 31 34 2c bd  |1,11:..3,2).14,.|
00001370  32 33 37 29 3b bd 31 31  3b 8a 33 2c 31 29 22 48  |237);.11;.3,1)"H|
00001380  49 47 48 45 53 54 20 53  43 4f 52 45 53 22 0d 08  |IGHEST SCORES"..|
00001390  3e 15 e7 20 a6 28 31 30  30 30 29 3c 3e 2d 31 20  |>.. .(1000)<>-1 |
000013a0  8c 20 e1 0d 08 48 0b 51  25 3d 31 3a e1 20 0d 08  |. ...H.Q%=1:. ..|
000013b0  52 05 3a 0d 08 5c 0f f4  20 45 58 50 4c 4f 53 49  |R.:..\.. EXPLOSI|
000013c0  4f 4e 0d 08 66 07 dd f2  70 0d 08 70 0e 20 e3 20  |ON..f...p..p. . |
000013d0  41 25 3d 31 b8 35 30 0d  08 7a 11 e6 20 b3 28 34  |A%=1.50..z.. .(4|
000013e0  29 2d 31 2c b3 28 33 29  0d 08 84 21 d4 20 31 2c  |)-1,.(3)...!. 1,|
000013f0  30 2c b3 28 35 30 29 2b  31 30 35 2c 31 3a d4 30  |0,.(50)+105,1:.0|
00001400  2c 2d 31 35 2c 37 2c 31  20 0d 08 8e 14 ec 28 4a  |,-15,7,1 .....(J|
00001410  25 2b 33 29 2a 36 34 2d  33 32 2c 33 32 0d 08 98  |%+3)*64-32,32...|
00001420  23 df 20 b3 28 31 34 34  29 2d 39 36 2b 28 4a 25  |#. .(144)-96+(J%|
00001430  2b 33 29 2a 36 34 2c b3  28 31 34 34 29 2b 33 32  |+3)*64,.(144)+32|
00001440  0d 08 a2 05 ed 0d 08 ac  14 e3 20 41 3d 31 20 b8  |.......... A=1 .|
00001450  20 33 30 30 30 3a ed 3a  e1 0d 27 0f 15 20 f4 20  | 3000:.:..'.. . |
00001460  44 41 54 41 20 46 4f 52  20 44 49 56 45 53 0d 27  |DATA FOR DIVES.'|
00001470  10 ad dc 2d 31 2c 31 2c  2d 31 2c 31 2c 2d 31 2c  |...-1,1,-1,1,-1,|
00001480  31 2c 30 2c 31 2c 30 2c  31 2c 31 2c 31 2c 31 2c  |1,0,1,0,1,1,1,1,|
00001490  31 2c 31 2c 31 2c 31 2c  31 2c 31 2c 31 2c 31 2c  |1,1,1,1,1,1,1,1,|
000014a0  30 2c 31 2c 30 2c 31 2c  31 2c 31 2c 30 2c 31 2c  |0,1,0,1,1,1,0,1,|
000014b0  30 2c 31 2c 31 2c 31 2c  30 2c 31 2c 31 2c 31 2c  |0,1,1,1,0,1,1,1,|
000014c0  30 2c 31 2c 31 2c 31 2c  30 2c 31 2c 31 2c 30 2c  |0,1,1,1,0,1,1,0,|
000014d0  31 2c 30 2c 31 2c 2d 31  2c 31 2c 2d 31 2c 30 2c  |1,0,1,-1,1,-1,0,|
000014e0  2d 31 2c 31 2c 2d 31 2c  30 2c 2d 31 2c 31 2c 2d  |-1,1,-1,0,-1,1,-|
000014f0  31 2c 31 2c 31 2c 31 2c  2d 31 2c 31 2c 2d 31 2c  |1,1,1,1,-1,1,-1,|
00001500  30 2c 2d 31 2c 31 2c 2d  31 2c 31 2c 2d 31 2c 31  |0,-1,1,-1,1,-1,1|
00001510  2c 2d 31 2c 31 2c 2d 31  2c 31 20 0d 27 24 cf dc  |,-1,1,-1,1 .'$..|
00001520  2d 31 2c 31 2c 2d 31 2c  31 2c 2d 31 2c 31 2c 30  |-1,1,-1,1,-1,1,0|
00001530  2c 31 2c 30 2c 31 2c 31  2c 31 2c 31 2c 31 2c 31  |,1,0,1,1,1,1,1,1|
00001540  2c 31 2c 31 2c 31 2c 31  2c 31 2c 31 2c 30 2c 31  |,1,1,1,1,1,1,0,1|
00001550  2c 30 2c 31 2c 30 2c 31  2c 30 2c 31 2c 30 2c 31  |,0,1,0,1,0,1,0,1|
00001560  2c 31 2c 31 2c 30 2c 31  2c 30 2c 31 2c 30 2c 31  |,1,1,0,1,0,1,0,1|
00001570  2c 31 2c 31 2c 30 2c 31  2c 31 2c 30 2c 31 2c 2d  |,1,1,0,1,1,0,1,-|
00001580  31 2c 31 2c 2d 31 2c 30  2c 2d 31 2c 30 2c 2d 31  |1,1,-1,0,-1,0,-1|
00001590  2c 31 2c 2d 31 2c 30 2c  2d 31 2c 30 2c 2d 31 2c  |,1,-1,0,-1,0,-1,|
000015a0  31 2c 2d 31 2c 30 2c 2d  31 2c 30 2c 2d 31 2c 30  |1,-1,0,-1,0,-1,0|
000015b0  2c 2d 31 2c 30 2c 2d 31  2c 31 2c 30 2c 31 2c 31  |,-1,0,-1,1,0,1,1|
000015c0  2c 31 2c 31 2c 31 2c 31  2c 31 2c 31 2c 31 2c 31  |,1,1,1,1,1,1,1,1|
000015d0  2c 30 2c 31 2c 31 2c 31  2c 30 2c 31 2c 31 2c 31  |,0,1,1,1,0,1,1,1|
000015e0  2c 31 2c 31 2c 31 2c 31  2c 31 0d 27 38 d2 dc 20  |,1,1,1,1,1.'8.. |
000015f0  2d 31 2c 31 2c 2d 31 2c  31 2c 2d 31 2c 31 2c 30  |-1,1,-1,1,-1,1,0|
00001600  2c 31 2c 30 2c 31 2c 31  2c 31 2c 31 2c 31 2c 31  |,1,0,1,1,1,1,1,1|
00001610  2c 31 2c 31 2c 31 2c 31  2c 31 2c 31 2c 30 2c 31  |,1,1,1,1,1,1,0,1|
00001620  2c 30 2c 31 2c 30 2c 31  2c 30 2c 31 2c 30 2c 31  |,0,1,0,1,0,1,0,1|
00001630  2c 31 2c 31 2c 30 2c 31  2c 30 2c 31 2c 30 2c 31  |,1,1,0,1,0,1,0,1|
00001640  2c 31 2c 31 2c 30 2c 31  2c 31 2c 30 2c 31 2c 2d  |,1,1,0,1,1,0,1,-|
00001650  31 2c 31 2c 2d 31 2c 30  2c 2d 31 2c 30 2c 2d 31  |1,1,-1,0,-1,0,-1|
00001660  2c 31 2c 2d 31 2c 30 2c  2d 31 2c 30 2c 2d 31 2c  |,1,-1,0,-1,0,-1,|
00001670  31 2c 2d 31 2c 30 2c 2d  31 2c 30 2c 2d 31 2c 30  |1,-1,0,-1,0,-1,0|
00001680  2c 2d 31 2c 30 2c 2d 31  2c 31 2c 2d 31 2c 31 2c  |,-1,0,-1,1,-1,1,|
00001690  30 2c 31 2c 31 2c 31 2c  2d 31 2c 31 2c 2d 31 2c  |0,1,1,1,-1,1,-1,|
000016a0  31 2c 2d 31 2c 31 2c 2d  31 2c 31 2c 2d 31 2c 31  |1,-1,1,-1,1,-1,1|
000016b0  2c 30 2c 31 2c 31 2c 31  2c 31 2c 31 0d 27 4c cb  |,0,1,1,1,1,1.'L.|
000016c0  dc 30 2c 31 2c 30 2c 31  2c 30 2c 31 2c 30 2c 31  |.0,1,0,1,0,1,0,1|
000016d0  2c 30 2c 31 2c 30 2c 31  2c 30 2c 31 2c 30 2c 31  |,0,1,0,1,0,1,0,1|
000016e0  2c 30 2c 31 2c 30 2c 31  2c 2d 31 2c 31 2c 2d 31  |,0,1,0,1,-1,1,-1|
000016f0  2c 31 2c 2d 31 2c 30 2c  2d 31 2c 31 2c 31 2c 31  |,1,-1,0,-1,1,1,1|
00001700  2c 31 2c 30 2c 31 2c 31  2c 31 2c 30 2c 31 2c 30  |,1,0,1,1,1,0,1,0|
00001710  2c 31 2c 30 2c 31 2c 30  2c 31 2c 31 2c 31 2c 31  |,1,0,1,0,1,1,1,1|
00001720  2c 2d 31 2c 31 2c 2d 31  2c 31 2c 2d 31 2c 30 2c  |,-1,1,-1,1,-1,0,|
00001730  2d 31 2c 30 2c 2d 31 2c  30 2c 2d 31 2c 2d 31 2c  |-1,0,-1,0,-1,-1,|
00001740  2d 31 2c 2d 31 2c 30 2c  2d 31 2c 30 2c 30 2c 31  |-1,-1,0,-1,0,0,1|
00001750  2c 2d 31 2c 31 2c 2d 31  2c 31 2c 30 2c 30 2c 30  |,-1,1,-1,1,0,0,0|
00001760  2c 31 2c 30 2c 30 2c 30  2c 31 2c 30 2c 31 2c 31  |,1,0,0,0,1,0,1,1|
00001770  2c 31 2c 31 2c 30 2c 31  2c 30 2c 30 2c 2d 31 2c  |,1,1,0,1,0,0,-1,|
00001780  31 2c 2d 31 2c 31 20 0d  27 56 31 dc 2d 31 2c 31  |1,-1,1 .'V1.-1,1|
00001790  2c 2d 31 2c 31 2c 2d 31  2c 31 2c 2d 31 2c 31 2c  |,-1,1,-1,1,-1,1,|
000017a0  2d 31 2c 31 2c 2d 31 2c  31 2c 2d 31 2c 31 2c 2d  |-1,1,-1,1,-1,1,-|
000017b0  31 2c 31 2c 2d 31 2c 31  0d 2a f8 ad dc 31 2c 31  |1,1,-1,1.*...1,1|
000017c0  2c 31 2c 31 2c 31 2c 31  2c 30 2c 31 2c 30 2c 31  |,1,1,1,1,0,1,0,1|
000017d0  2c 2d 31 2c 31 2c 2d 31  2c 31 2c 2d 31 2c 31 2c  |,-1,1,-1,1,-1,1,|
000017e0  2d 31 2c 31 2c 2d 31 2c  31 2c 2d 31 2c 30 2c 2d  |-1,1,-1,1,-1,0,-|
000017f0  31 2c 30 2c 2d 31 2c 31  2c 2d 31 2c 30 2c 2d 31  |1,0,-1,1,-1,0,-1|
00001800  2c 30 2c 2d 31 2c 31 2c  2d 31 2c 30 2c 2d 31 2c  |,0,-1,1,-1,0,-1,|
00001810  31 2c 2d 31 2c 30 2c 2d  31 2c 31 2c 2d 31 2c 30  |1,-1,0,-1,1,-1,0|
00001820  2c 2d 31 2c 31 2c 30 2c  31 2c 30 2c 31 2c 31 2c  |,-1,1,0,1,0,1,1,|
00001830  31 2c 31 2c 30 2c 31 2c  31 2c 31 2c 30 2c 31 2c  |1,1,0,1,1,1,0,1,|
00001840  31 2c 31 2c 31 2c 31 2c  31 2c 31 2c 31 2c 31 2c  |1,1,1,1,1,1,1,1,|
00001850  30 2c 31 2c 31 2c 31 2c  31 2c 31 2c 31 2c 31 2c  |0,1,1,1,1,1,1,1,|
00001860  31 2c 31 2c 31 0d 2b 0c  dd dc 31 2c 31 2c 31 2c  |1,1,1.+...1,1,1,|
00001870  31 2c 31 2c 31 2c 30 2c  31 2c 30 2c 31 2c 2d 31  |1,1,1,0,1,0,1,-1|
00001880  2c 31 2c 2d 31 2c 31 2c  2d 31 2c 31 2c 2d 31 2c  |,1,-1,1,-1,1,-1,|
00001890  31 2c 2d 31 2c 31 2c 2d  31 2c 30 2c 2d 31 2c 30  |1,-1,1,-1,0,-1,0|
000018a0  2c 2d 31 2c 30 2c 2d 31  2c 30 2c 2d 31 2c 30 2c  |,-1,0,-1,0,-1,0,|
000018b0  2d 31 2c 31 2c 2d 31 2c  30 2c 2d 31 2c 30 2c 2d  |-1,1,-1,0,-1,0,-|
000018c0  31 2c 30 2c 2d 31 2c 31  2c 2d 31 2c 30 2c 2d 31  |1,0,-1,1,-1,0,-1|
000018d0  2c 31 2c 30 2c 31 2c 31  2c 31 2c 31 2c 30 2c 31  |,1,0,1,1,1,1,0,1|
000018e0  2c 30 2c 31 2c 31 2c 31  2c 30 2c 31 2c 30 2c 31  |,0,1,1,1,0,1,0,1|
000018f0  2c 31 2c 31 2c 30 2c 31  2c 30 2c 31 2c 30 2c 31  |,1,1,0,1,0,1,0,1|
00001900  2c 30 2c 31 2c 31 2c 30  2c 31 2c 2d 31 2c 31 2c  |,0,1,1,0,1,-1,1,|
00001910  2d 31 2c 31 2c 2d 31 2c  31 2c 2d 31 2c 31 2c 2d  |-1,1,-1,1,-1,1,-|
00001920  31 2c 30 2c 2d 31 2c 31  2c 2d 31 2c 30 2c 2d 31  |1,0,-1,1,-1,0,-1|
00001930  2c 31 2c 2d 31 2c 31 2c  2d 31 2c 31 2c 2d 31 2c  |,1,-1,1,-1,1,-1,|
00001940  31 20 0d 2b 20 cc dc 31  2c 31 2c 31 2c 31 2c 31  |1 .+ ..1,1,1,1,1|
00001950  2c 31 2c 30 2c 31 2c 30  2c 31 2c 2d 31 2c 31 2c  |,1,0,1,0,1,-1,1,|
00001960  2d 31 2c 31 2c 2d 31 2c  31 2c 2d 31 2c 31 2c 2d  |-1,1,-1,1,-1,1,-|
00001970  31 2c 31 2c 2d 31 2c 30  2c 2d 31 2c 30 2c 2d 31  |1,1,-1,0,-1,0,-1|
00001980  2c 30 2c 2d 31 2c 30 2c  2d 31 2c 30 2c 2d 31 2c  |,0,-1,0,-1,0,-1,|
00001990  31 2c 2d 31 2c 30 2c 2d  31 2c 30 2c 2d 31 2c 30  |1,-1,0,-1,0,-1,0|
000019a0  2c 2d 31 2c 31 2c 2d 31  2c 30 2c 2d 31 2c 31 2c  |,-1,1,-1,0,-1,1,|
000019b0  30 2c 31 2c 31 2c 31 2c  31 2c 30 2c 31 2c 30 2c  |0,1,1,1,1,0,1,0,|
000019c0  31 2c 31 2c 31 2c 30 2c  31 2c 30 2c 31 2c 31 2c  |1,1,1,0,1,0,1,1,|
000019d0  31 2c 30 2c 31 2c 30 2c  31 2c 30 2c 31 2c 30 2c  |1,0,1,0,1,0,1,0,|
000019e0  31 2c 31 2c 30 2c 31 2c  2d 31 2c 31 2c 31 2c 31  |1,1,0,1,-1,1,1,1|
000019f0  2c 31 2c 31 2c 31 2c 31  2c 31 2c 31 2c 31 2c 31  |,1,1,1,1,1,1,1,1|
00001a00  2c 30 2c 31 2c 2d 31 2c  31 2c 2d 31 2c 31 0d 2b  |,0,1,-1,1,-1,1.+|
00001a10  34 cd dc 30 2c 31 2c 30  2c 31 2c 30 2c 31 2c 30  |4..0,1,0,1,0,1,0|
00001a20  2c 31 2c 30 2c 31 2c 30  2c 31 2c 30 2c 31 2c 30  |,1,0,1,0,1,0,1,0|
00001a30  2c 31 2c 30 2c 31 2c 30  2c 31 2c 31 2c 31 2c 31  |,1,0,1,0,1,1,1,1|
00001a40  2c 31 2c 31 2c 30 2c 31  2c 31 2c 2d 31 2c 31 2c  |,1,1,0,1,1,-1,1,|
00001a50  2d 31 2c 30 2c 2d 31 2c  31 2c 2d 31 2c 30 2c 2d  |-1,0,-1,1,-1,0,-|
00001a60  31 2c 30 2c 2d 31 2c 30  2c 2d 31 2c 30 2c 2d 31  |1,0,-1,0,-1,0,-1|
00001a70  2c 31 2c 2d 31 2c 31 2c  31 2c 31 2c 31 2c 31 2c  |,1,-1,1,1,1,1,1,|
00001a80  31 2c 30 2c 31 2c 30 2c  31 2c 30 2c 31 2c 2d 31  |1,0,1,0,1,0,1,-1|
00001a90  2c 31 2c 2d 31 2c 30 2c  2d 31 2c 30 2c 30 2c 2d  |,1,-1,0,-1,0,0,-|
00001aa0  31 2c 2d 31 2c 2d 31 2c  2d 31 2c 2d 31 2c 30 2c  |1,-1,-1,-1,-1,0,|
00001ab0  30 2c 30 2c 2d 31 2c 30  2c 30 2c 30 2c 2d 31 2c  |0,0,-1,0,0,0,-1,|
00001ac0  30 2c 2d 31 2c 31 2c 2d  31 2c 31 2c 30 2c 31 2c  |0,-1,1,-1,1,0,1,|
00001ad0  30 2c 30 2c 31 2c 31 2c  31 2c 31 0d 2b 3e 29 dc  |0,0,1,1,1,1.+>).|
00001ae0  20 31 2c 31 2c 31 2c 31  2c 31 2c 31 2c 31 2c 31  | 1,1,1,1,1,1,1,1|
00001af0  2c 31 2c 31 2c 31 2c 31  2c 31 2c 31 2c 31 2c 31  |,1,1,1,1,1,1,1,1|
00001b00  2c 31 2c 31 0d 4e 20 08  dd 20 f2 71 0d 4e 2a 11  |,1,1.N .. .q.N*.|
00001b10  41 25 3d 31 38 37 3a 42  25 3d 31 37 39 0d 4e 34  |A%=187:B%=179.N4|
00001b20  12 20 d4 20 31 2c 2d 31  35 2c 31 30 39 2c 32 0d  |. . 1,-15,109,2.|
00001b30  4e 3e 12 d4 20 31 2c 2d  31 35 2c 31 32 31 2c 31  |N>.. 1,-15,121,1|
00001b40  20 0d 4e 48 10 d4 20 31  2c 2d 31 35 2c 42 25 2c  | .NH.. 1,-15,B%,|
00001b50  31 0d 4e 52 10 d4 20 31  2c 2d 31 35 2c 41 25 2c  |1.NR.. 1,-15,A%,|
00001b60  31 0d 4e 5c 11 d4 20 31  2c 2d 31 35 2c 32 35 35  |1.N\.. 1,-15,255|
00001b70  2c 31 0d 4e 66 10 d4 20  31 2c 2d 31 35 2c 42 25  |,1.Nf.. 1,-15,B%|
00001b80  2c 31 0d 4e 70 12 d4 20  31 2c 2d 31 35 2c 41 25  |,1.Np.. 1,-15,A%|
00001b90  2c 31 20 20 0d 4e 7a 12  d4 20 31 2c 2d 31 35 2c  |,1  .Nz.. 1,-15,|
00001ba0  42 25 2c 31 20 20 0d 4e  84 05 e1 0d 4e 85 05 3a  |B%,1  .N....N..:|
00001bb0  0d 4e 8e 07 dd f2 72 0d  4e 98 17 e3 20 41 25 3d  |.N....r.N... A%=|
00001bc0  31 30 30 20 b8 20 32 30  30 20 88 20 32 35 0d 4e  |100 . 200 . 25.N|
00001bd0  a2 3d d4 20 31 2c 2d 31  35 2c 41 25 2d 34 2c 31  |.=. 1,-15,A%-4,1|
00001be0  3a d4 20 31 2c 2d 31 35  2c 41 25 2c 31 3a d4 20  |:. 1,-15,A%,1:. |
00001bf0  31 2c 2d 31 35 2c 41 25  2b 34 2c 31 3a d4 20 31  |1,-15,A%+4,1:. 1|
00001c00  2c 2d 31 35 2c 41 25 2b  38 2c 31 0d 4e ac 0d d4  |,-15,A%+8,1.N...|
00001c10  20 31 2c 30 2c 31 2c 31  0d 4e b6 05 ed 0d 4e c0  | 1,0,1,1.N....N.|
00001c20  05 e1 0d 4e ca 09 ee 20  85 20 87 0d 4e d4 1f eb  |...N... . ..N...|
00001c30  36 3a e7 20 9f 3c 3e 31  37 20 f6 3a f1 22 20 61  |6:. .<>17 .:." a|
00001c40  74 20 6c 69 6e 65 20 22  3b 9e 0d ff              |t line ";...|
00001c4c

GAMES1/GALAXIANS.m0

GAMES1/GALAXIANS.m1

GAMES1/GALAXIANS.m2

GAMES1/GALAXIANS.m4

GAMES1/GALAXIANS.m5

Our privacy policy is here.
Last updated: 28 Jul 2024, 23:31 UTC
Website designed by .