$� >:0.!10/10Alge.SixGames.Common
��highscore
ș"ABC_Blank",15
(ș"ABC_Colour",15
2ȗ�
<$ș"ABC_Sprite",b%,"mouse",512,74
Ft$="HIGH SCORES"
Ptax%=13
Z
tay%=2
dsyy%=13
n�5
x	�0,13
�#�tax%*g%+112,tay%*g%+syy%*f%+48
��0,�(t$)*g%,0
�%�85,tax%*g%+52,tay%*g%+syy%*f%-g%
��81,128+�(t$)*g%,0
��0,0
�"�tax%*g%+48,tay%*g%+syy%*f%-g%
��1,f%,f%
��1,�(t$)*g%+4,0
�
�1,f%,-f%
�#�tax%*g%+112,tay%*g%+syy%*f%+24
��t$
��J%=1�10
�K%=876-(tay%*g%+J%*f%)

L%=K%+44

�attend$=""�

�0,8

"�

,'�high$(J%),attend$,27)>0�0,11��0,8

6�

@�nuw%=J%:�0,14

JȓȐ256,K%,768,f%

T	�0,11

^ȓȐ892,K%,128,f%

h�0,0

rȓ256,K%,768,f%

|ȓ892,K%,130,f%

��tax%*32-144,L%

�
��(J%)

��tax%*32-96,L%

�a$=high$(J%)

�!�ver%:�a$,�a$,"Grade"))=typ$

��a$

��tax%*32+514,L%

��scores%(J%)>0:�scores%(J%)

��

��4

��

�ș"ABC_Palette"

��
��leave
�7
�
&��sortscores
0a$=high$(11)
:�a$>""�
D�
N
srt%=�
X�J%=1�10
b�scores%(J%)<scores%(J%+1)�
l
tab%=�
v
srt%=�
�Ȕscores%(J%),scores%(J%+1)
�Ȕhigh$(J%),high$(J%+1)
��
��
�	�srt%
��
�
nuw%=0
��J%=1�10
��high$(J%)=a$:nuw%=J%
��
��
���pause
�符-56:�
�same("ready")
�

���-56
 �
*��error
4�3,7
>
*CLOSE
Hș"ABC_Colour",15
Rș"ABC_Palette"
\Ȗ
fU�mess("ERROR - INSERT DISC (NOT WRITE PROTECTED) INTO DRIVE AND PRESS RETURN",11)
p�
z��leave
�&�"SAVE "+f$+"Misc.Signal 20000 +4"
��savenewresults
��
��
���delay(del%)
��
�Ȗ
��-113:esc%=�
�del%-=1
��del%<0
��
�ݤinitialsprites(s$)
�l%=0
l%+=�spritefilelength(s$)
	�b%l%

!b%=l%
$ș"OS_SpriteOp",265,b%
.�loadsprites(s$)
8=b%
Bݤspritefilelength(s$)
L
flo%=0
Vs$+="|"
`ȕs$>""
jz$=�stringextract(s$)
th%=�(f$+z$)
~flo%+=�#h%
��#h%
��
�=flo%+64
�ݤstringextract(�s$)
�w$=�s$,(�s$,"|"))-1)
�s$=�s$,(�s$,"|"))+1)
�=w$
���loadsprites(s$)
�s$+="|"
�typ%=266
�ȕs$>""
�z$=�stringextract(s$)
!ș"OS_SpriteOp",typ%,b%,f$+z$

typ%-=(typ%=266)
�
�
(��title(a$,Y%,C%)
2)y$="10 out of 10 Educational Systems"
<xsc%=320-�(y$)*8
F&ș"ABC_PryntString",y$,xsc%,Y%,1,7
P+ș"ABC_PryntString",y$,xsc%-2,Y%+1,1,C%
Z
Y%-=24
dy$="Presents"
nxsc%=320-�(y$)*8
x&ș"ABC_PryntString",y$,xsc%,Y%,1,7
�+ș"ABC_PryntString",y$,xsc%-2,Y%+1,1,C%
�
Y%-=24
�xsc%=320-�(a$)*8
�&ș"ABC_PryntString",a$,xsc%,Y%,1,7
�+ș"ABC_PryntString",a$,xsc%-2,Y%+1,1,C%
��
���escape
��-113:esc%=�
��
���loaddetails
�
box%=0
�
e%=160
�	f%=64
	g%=16

fnc%=�

ply%=1
"
rpy%=�
,
snd%=�
6
sun%=0
@h%=�(f$+"Configure")
J?�#h%,rat%,nig%,sds%,ver%,grd%,cla%,typ$,hed%,fut%,pap%,pix%
T�#h%
^
sub%=0
hh%=�(f$+"Name")
r�#h%,attend$
|�#h%
�h%=�("ram:Fact"+�(gme%))
��J%=1�6
��#h%,fact$
�info$(J%)=fact$
��
��#h%
�'h%=�(f$+"HighScores.Table"+�(gme%))
��J%=1�10
��#h%,a$,s%
�high$(J%)=a$
�scores%(J%)=s%
��
��#h%
�attend$=""�
att%()=0
�
&2h%=�(f$+"Achieve.Achieve"+�(cla%)+"."+attend$)
0�J%=1�10
:�K%=1�6
D�#h%,att%(K%,J%)
N�
X�
b�#h%
l�
v�
���mess(t$,col%)
��0,col%
��5
�Ȗ
�ȓȐ0,0,1278,64
��0,0
�ȓ0,0,1278,64
��640-�(t$)*8,44
��t$
��4
��
��
���point(a$,mos%)
�wre%,par%,dat%
�wre%1088,par%20,dat%256
h%=�(f$+"Misc."+a$)
 �J%=0�32
*�K%=0�32
4wre%?(K%*32+J%)=�#h%
>�
H�
R�#h%
\!par%=&20080200
fpar%?1=mos%
ppar%!4=0
zpar%!6=dat%
�
mma%=dat%
��J%=32�1��
��K%=0�7
�
�L%=3�0��
�val%=wre%?(J%*32+K%*4+L%)
�0�val%=&FF:par%?4=K%*4+L%:par%?5=31-J%:val%=0
�?mma%=?mma%<<2
�?mma%+=val%
��
�mma%+=1
��
��
�ș"OS_Word",21,par%
	�
	��wings(l$,x%,y%)
	#ș"ABC_Sprite",b%,"wings",x%,y%
	$�5
	.	�0,11
	8�(x%*2+298)-�(l$)*8,y%*4-40
	B�l$
	L�4
	V�
	`�
	j#��noise(s$,chn%,vol%,pit%,dur%)
	t�
	~	��:�
	�
ȡchn%,s$
	��chn%,vol%,pit%,dur%
	��
	���input(tot%,tax%,tay%)
	��esc%:�
	�*FX21 0
	�
cnt%=0
	�	i$=""
	��
	��
	��
	�k%=�(1)
�-113:esc%=�:k%=13

�k%=13�k%>31� k%<128�esc%
�k%=127� cnt%>0�
cnt%-=1
(i$=�i$,cnt%)
2�tax%,tay%)i$;�(1)
<�
F�k%<>127�esc%
P�k%<>13� cnt%<>tot%�
Z�cnt%=0�
d.�(k%)>="a"��(k%)<="z"i$=�(k%-32)�i$=�(k%)
n�
x0�(k%)>="A"��(k%)<="Z"i$+=�(k%+32)�i$+=�(k%)
��
��tax%,tay%)i$;�(1)
�cnt%+=1
��
��k%<>13� cnt%=tot%:�7
��k%=13�esc%
��esc%:*FX126
��
�&��infocard(t$,tax%,tay%,sdx%,syy%)
��5
��0,8
�,ȓȐtax%*g%,tay%*g%,sdx%*160+160,syy%*f%
��0,3
0ȓȐtax%*g%+320,tay%*g%,sdx%*160-162,syy%*f%
�0,0
3�sdx%*160+160>=1280 srx%=1278�srx%=sdx%*160+160
""ȓtax%*g%,tay%*g%,srx%,syy%*f%
,	�0,13
6"�tax%*g%+f%,tay%*g%+syy%*f%+f%
@�0,�(t$)*g%,0
J�85,tax%*g%,tay%*g%+syy%*f%
T�81,128+�(t$)*g%,0
^�0,0
h�tax%*g%,tay%*g%+syy%*f%
r�1,f%,f%
|�1,�(t$)*g%,0
�
�1,f%,-f%
�"�tax%*g%+f%,tay%*g%+syy%*f%+44
��t$
��J%=1�sdx%
��tax%*g%+J%*160+160,tay%*g%
��1,0,syy%*f%
��
��J%=1�syy%
��tax%*g%,tay%*g%+J%*f%
��1,sdx%*160+160,0
��
��4
��
�
��cent(t$,tay%)
�40-�(t$)�2,tay%)t$;
&�
0��savenewresults
:�attend$="":�
D2h%=�(f$+"Achieve.Achieve"+�(cla%)+"."+attend$)
N�J%=1�10
X�K%=1�6
b�#h%,att%(K%,J%)
l�
v�
��#h%
�'h%=�(f$+"HighScores.Table"+�(gme%))
��J%=1�10
��#h%,high$(J%)
��#h%,scores%(J%)
��
��#h%
��
���mouse1
�ȗ�1,255,255,0
�ȗ�2,255,0,0
�ȗ�3,192,192,192
�ȗ�1

�

��sqr(wch%,col%)

�0,col%

 ȓȐ706,wch%*f%+164,156,58

*�

4��insert(tay%,v$)

>�736,tay%*32-20

H�v$

R�

\��information

fȗȓ798,356,160,384

pș"ABC_Blank",15

zș"ABC_Colour",15

�%ș"ABC_Sprite",b%,"mouse",512,118

�&�infocard("INFORMATION",20,22,3,7)

��fillinformation(13,15)

�
p$="X"

��factmation("")

�
oyy%=0

�ș"ABC_Palette"

��zeromouse

��

�ȗmox%,moy%,but%

�,�moy%>740 cly%=0�cly%=(�(moy%-740)�f%)+1

��cly%>6:cly%=6

�2�cly%<>oyy%:oyy%=cly%:�factmation(info$(cly%))
��leave
�7
�
$��factmation(t$)
.�p$=t$:�
8	p$=t$
B.�nig%t$="AT3 Level "+p$�t$=�t$,�t$,")")+2)
L	�0,11
V�5
`Ȗ
jȓȐ0,0,1278,64
t�0,0
~ȓ0,0,1278,64
��640-�(t$)*8,44
��t$
��4
��
��
���sound
�符-2:fnc%=�:�
��fnc%:�
�
�-31�
�
fnc%=�
�snd%=�snd%
�%�snd%�"VOLUME "+�(M%)��"VOLUME 1"
�

�
��flush
*FX21 9
(�
2��numbername
<
esc%=�
Fȗ�
P�rpy%:�7:�enternames
Z
�esc%�
d
rpy%=�
n�
x
rpy%=�
��
��
�ݤarea(x1%,y1%,x2%,y2%)
��mox%<x1%�mox%>x2%:=�
��moy%<y1%�moy%>y2%:=�
�=�
�"��card(t$,tax%,tay%,szx%,szy%)
��5
��0,8
�*ȓȐtax%*g%,tay%*g%,szx%*e%+e%,szy%*f%
�	�0,11
�/ȓȐtax%*g%+320,tay%*g%,szx%*e%-162,szy%*f%
��0,0
/�szx%*e%+e%>=1280 srx%=1278�srx%=szx%*e%+e%
"ȓtax%*g%,tay%*g%,srx%,szy%*f%
	�0,13
""�tax%*g%+f%,tay%*g%+szy%*f%+f%
,�0,�(t$)*g%,0
6�85,tax%*g%,tay%*g%+szy%*f%
@�81,128+�(t$)*g%,0
J�0,0
T�tax%*g%,tay%*g%+szy%*f%
^�1,f%,f%
h�1,�(t$)*g%,0
r
�1,f%,-f%
|"�tax%*g%+f%,tay%*g%+szy%*f%+44
��t$
��J%=1�szx%
��tax%*g%+J%*e%+e%,tay%*g%
��1,0,szy%*f%
��
��J%=1�szy%
��tax%*g%,tay%*g%+J%*f%
��1,szx%*e%+e%,0
��
��4
��
��
���instructions
符-38:�
�7
ȗ�
&ș"ABC_Blank",15
0ș"ABC_Colour",15
:�136
D�
N�0,5
XȓȐ240,0,1040,1020
b�0,0
lȓ0,0,1278,1020
v�0
�K%=0
�Y%=1
��J%=1�6
��0
��136
��1,Y%)typ$" "J%"     -"
��133
�)�16,Y%)�info$(J%),�info$(J%),")")+2)
�	Y%+=1
��X%=1�6
��(prc%(J%)�2^(X%-1))>0�
��14
��136
�1,Y%)"practice f"X%" -"
�9
�133
 �16,Y%)dat$(K%)
*	K%+=1
4	Y%+=1
>�
H�
R�
\�0,0
f�240,0,240,1020
pș"ABC_Palette"
z�
���leave
��7
��sun%>0 sun%-=1�sun%=1
�	�menu
��
���amoun
��J%=1�4
��name$(J%)>""�
�3ș"ABC_PryntString",name$(J%),132,228-J%*18,1,7
�6ș"ABC_PryntString",name$(J%),134,229-J%*18,1,J%+7
�-ș"ABC_PryntString",":",312,228-J%*18,1,7
�0ș"ABC_PryntString",":",314,229-J%*18,1,J%+7
�5ș"ABC_PryntString",�(scr%(J%)),360,228-J%*18,1,7
8ș"ABC_PryntString",�(scr%(J%)),362,229-J%*18,1,J%+7
3ș"ABC_PryntString",�(Q%)+"%",470,228-J%*18,1,7
6ș"ABC_PryntString",�(Q%)+"%",472,229-J%*18,1,J%+7
$�
.1ș"ABC_PryntString",�8,"-"),132,228-J%*18,1,7
84ș"ABC_PryntString",�8,"-"),134,229-J%*18,1,J%+7
B-ș"ABC_PryntString","-",312,228-J%*18,1,7
L0ș"ABC_PryntString","-",314,229-J%*18,1,J%+7
V-ș"ABC_PryntString","-",360,228-J%*18,1,7
`0ș"ABC_PryntString","-",362,229-J%*18,1,J%+7
j-ș"ABC_PryntString","-",470,228-J%*18,1,7
t0ș"ABC_PryntString","-",472,229-J%*18,1,J%+7
~�
��
��
���enternames
�name$()=""
��ply%=1:name$(1)=attend$:�
�ș"ABC_Blank",3
�ș"ABC_Colour",3
�	�0,12
�ȓȐ200,180,896,632
��0,7
�ȓ200,180,896,632
�!�wings("ENTER NAMES",172,188)
�140

ș"ABC_Palette"
�J%=1�ply%
�11
('�esc%:�30,12+J%*2)"PLAYER "J%" >"
2�13
<�input(8,42,12+J%*2)
F�7
P�i$=""��esc%�
Zi$="Player "+�(J%)
d�42,12+J%*2)i$
n�
xname$(J%)=i$
��
��esc%:�delay(50)
��
�ݤinitialcompressed(s$)
�h%=�(f$+s$)
�
len%=�#h%
��#h%
��z%len%
��"LOAD "+f$+s$+" "+�~(z%)
�=z%
���colbox
��ply%>1�sub%>0�attend$="":�
��Q%>99:now%=3
�Q%>49�Q%<100:now%=2
�Q%<50:now%=1
Ȏnow%�
"�1,2
,"�rem%<now%:a$="colour changed"
6�now%=rem%:a$="no change"
@�rem%>now%:a$="try again"
J�3
T�rem%<3:a$="colour changed"
^%�rem%>2�rem%<11:a$="try for blue"
h�rem%>10:a$="blue"
r�
|=ș"ABC_PryntString",typ$+" "+�(grd%)+"   "+a$,132,132,1,7
�>ș"ABC_PryntString",typ$+" "+�(grd%)+"   "+a$,134,133,1,14
��
�
��upgrade
�rem%=att%(gme%,inx%)
�/�Q%>99�att%(gme%,inx%)>2:att%(gme%,inx%)+=1
�.�Q%>99�att%(gme%,inx%)<3:att%(gme%,inx%)=3
�.�Q%>49�att%(gme%,inx%)<2:att%(gme%,inx%)=2
�(�att%(gme%,inx%)=0:att%(gme%,inx%)=1
��
�ݤvalidatenumber(a$)
�
�a$="":=�
�K%=�
��J%=1��(a$)
%�a$,J%,1)<"0"��a$,J%,1)>"9":K%=�
�
=K%
&��loadwords
0�cod%,str%
:h%=�(e$)
D
end%=�#h%
N�#h%
X-�wrd$(256),knd%(256),cod%512,str%end%+&10
blink=14
l	pc=15
v
�A%=0�2�2
�P%=cod%
�
[OPTA%
�.LDR R0,wordaddr:ADR R1,wordbuff:MOV R2,#&0
�
.wordread
�/LDRB R3,[R0],#&1:CMP R3,#&20:BLT wordfinish
�=CMP R2,#&FF:STRLTB R3,[R1],#&1:ADD R2,R2,#&1:BAL wordread
�.wordfinish
�7MOV R3,#&D:STRB R3,[R1]:STR R0,wordaddr:MOV pc,link
�
.wordaddr
�
EQUD str%
�
.wordbuff
�]
��
�"LOAD "+e$+" "+�~(str%)
end%+=str%

que%=1
 ȕque%<256�!wordaddr<end%
*	�cod%
4a$=$wordbuff
>ȕ�a$,1)=" "
H
a$=�a$,2)
R�
\ȕ�a$)=" "
fa$=�a$)
p�
z
�words
��
��
���words
��a$,"$")>0�a$="":�
��a$,2,1)=","�
�knd%(que%)=�(a$)-48
�wrd$(que%)=�a$,�a$,",")+1)
��
�wrd$(que%)=a$
��
�que%+=1
��
�ݤchoose
�sub%=0�
�

X%=�(256)
$�wrd$(X%)>""� X%<>pre%
.�
8�
B
X%=�(256)
L)�wrd$(X%)>""� knd%(X%)=sub%� X%<>pre%
V�
`
=wrd$(X%)
jݤcount(a$,t$)
t
cnt%=0
~�W%=1��(a$)
��a$,W%,1)=t$:cnt%+=1
��
�	=cnt%
�ݤextract(�a$)
�z$=�a$,�a$,",")-1)
�a$=�a$,�a$,",")+1)
�=z$
���fireworks
��Q%<80:�
�ș"ABC_Blank",7
�ș"ABC_Colour",7
�#�noise("End",4,&17F,&1000,&100)
�wings("GAME OVER",172,230)

ș"ABC_Palette"
�pattern
�
(��graphics(z$,bcl%)
2符-2:�
<�-23:�display(23,1)
F�-119:�display(119,2)
P�-120:�display(120,3)
Z�
d��display(kee%,gra%)
n
pix%=gra%
xȗ�
��7
�ș"ABC_Blank",bcl%
�ș"ABC_Colour",bcl%
�
�128+bcl%
��0
�-�cent("This graphic used for the "+z$,10)
�,ș"OS_SpriteOp",296,b%,"z"+�(pix%)�,,,A%
�.ș"ABC_Sprite",b%,"z"+�(pix%),320-A%�2,148
�ș"ABC_Palette"
��
����-kee%
��sun%=0 sun%=1�sun%-=1
�	�menu
�
��reveal(bcl%,for%,mos%)
符-52:�
"ȗ�
,�7
6!ș"ABC_Transfer",0,136,640,18
@t$=info$(grd%)
J�nig%:t$=�t$,�t$,")")+2)
T�5
^�0,bcl%
hȖ
rȓȐ0,476,1278,68
|�0,for%
�ȓ0,476,1278,68
��0,0
��640-�(t$)*8,524
��t$
��4
��
��
���leave
�ș"ABC_Restore"
�Ȏmos%�
��1:�mouse1
��2:�mouse2
��
�
(��rec(bcl%,mcl%,ssx%,ssy%,xwd%,yht%)
�0,mcl%
&ȓȐssx%,ssy%,xwd%,yht%
0�J%=0�3
:�0,bcl%
D#ȓssx%+J%*4,ssy%+J%*4,xwd%,yht%
N'ȓssx%+J%*4+2,ssy%+J%*4,xwd%-4,yht%
Xxwd%-=8
byht%-=8
l�
v�
���numbers(x$,xsc%,ysc%)
��J%=1��(x$)
�)ș"ABC_Sprite",b%,�x$,J%,1),xsc%,ysc%
�xsc%+=32
��
��
���random
�ȗ�
�ș"ABC_Blank",3
�ș"ABC_Colour",3
�	�0,12
�ȓȐ200,180,896,632
��0,7
ȓ200,180,896,632
"�wings("ENTER NUMBER",172,188)
$ș"ABC_Sprite",b%,"small",440,96
 $ș"ABC_Sprite",b%,"small",120,96
*�140
4�
>�7
H/�cent("Enter number between 1 and 9999",14)
R�cent(">      <",16)
\�10
f
esc%=�
pș"ABC_Palette"
z�input(4,38,16)
�J%=�validatenumber(i$)
�	�J%�
��7
��11
�(�cent("Not a number - try again",18)
��delay(100)
��cent(�25," "),18)
�
*FX126
��
��J%
�sed%=�(i$)
�R%=�(-sed%)
��

��spaceor
a$="press space"
xsc%=320-�(a$)*8
$&ș"ABC_PryntString",a$,xsc%,67,1,7
.(ș"ABC_PryntString",a$,xsc%+2,68,1,5
8a$="or"
Bxsc%=320-�(a$)*8
L&ș"ABC_PryntString",a$,xsc%,49,1,7
V(ș"ABC_PryntString",a$,xsc%+2,50,1,5
`a$="click mouse"
jxsc%=320-�(a$)*8
t&ș"ABC_PryntString",a$,xsc%,31,1,7
~(ș"ABC_PryntString",a$,xsc%+2,32,1,5
��
���entry
��tab%:�
�=ș"ABC_PryntString","high score table changed",132,84,1,7
�>ș"ABC_PryntString","high score table changed",134,85,1,11
��
���fillmenu(tax%,tay%)
��5
��0
��J%=0�7
��s$
�(�tax%*32-g%,1024-(tay%*g%+J%*f%+148)
�J%=6�typ$��s$

�
	�0,14
�J%=8�9
(�s$
2(�tax%*32-g%,1024-(tay%*g%+J%*f%+148)
<�s$
F�
P�4
Z�
d�J%=0�9
n�int(J%)
x�
��
���report
�ȗ�
��zeromouse
�
�flush
��anyprogress
�
�limit
��fireworks
�ș"ABC_Blank",3
�ș"ABC_Colour",3
�	�0,12
�ȓȐ200,0,896,1020
��0,7
ȓ200,0,896,1020
$ș"ABC_Sprite",b%,"small",440,54
$ș"ABC_Sprite",b%,"small",118,54
"�wings("GAME OVER",170,248)
,�spaceor
6
�extra
@
�amoun
J�colbox
T�rating
^
�entry
hș"ABC_Palette"
r�
|��leave
��
���zeromouse
��
�ȗmox%,moy%,but%
��but%=0
��
�ݤleave
�ȗmox%,moy%,but%
��-113��-99��-74�but%>0�=�
��
�ȗmox%,moy%,but%
����-113���-99���-74�but%=0
�*FX21 9
 =�
 
��quit
 ȗ�
 &ș"Hourglass_On"
 0ȗȓ0,0,1280,1024
 :ș"ABC_Colour",15
 D�savenewresults
 N�"ram:Menu"
 X��volume
 bM%=(M%+g%)�&7F
 l�"VOLUME "+�(M%)
 v
upd%=�
 ��
 ���grade
 �
sub%=0
 �grd%+=1
 ��grd%>bnd%:grd%=1
 �
upd%=�
 ��
 �
��players
 �ply%+=1
 ��ply%>4:ply%=1
 �
rpy%=�
 �
upd%=�
 ��
!��menuclean
!�upd%:�menu
!�zeromouse
! Ȗ
!*�sqr(sun%,11)
!4�sqr(box%,15)
!>�int(sun%)
!H�int(box%)
!R
sun%=box%
!\�
!f��msk(s$,D%,E%,F%)
!p$ș"ABC_ShapeMask",b%,s$,D%,E%,F%
!z�
!�%��largeinput(tot%,tax%,tay%,col%)
!�*FX21 0
!�
cnt%=0
!�	i$=""
!��0,col%
!��
!��
!��
!�k%=�(1)
!��k%=13�k%>31� k%<128
!��k%=127� cnt%>0�
!�cnt%-=1
!�i$=�i$,cnt%)
"Ȗ
"(ș"ABC_PryntString",i$,tax%,tay%,1,7
",ș"ABC_PryntString",i$,tax%-2,tay%+1,1,9
"$'ȓȐtax%*2+�(i$)*32,tay%*4-64,32,64
".�
"8�k%<>127
"B�k%<>13� cnt%<>tot%�
"L
i$+=�(k%)
"VȖ
"`(ș"ABC_PryntString",i$,tax%,tay%,1,7
"j,ș"ABC_PryntString",i$,tax%-2,tay%+1,1,9
"tcnt%+=1
"~�
"��k%<>13� cnt%=tot%:�7
"�
�k%=13
"��
"���start
"��
"�
���-99
"�
tim%=�
"�
san%=0
"��
"��7
"�ș"ABC_Blank",3
"�ș"ABC_Colour",3
#a$="START NUMBER"
#
xsc%=320-�(a$)*8
#'ș"ABC_PryntString",a$,xsc%,160,1,7
#*ș"ABC_PryntString",a$,xsc%-2,161,1,11
#(ș"ABC_Palette"
#2�largeinput(3,296,120,3)
#<fol%=�(i$)
#F�fol%<1�fol%>256:�7
#P)�fol%>0� fol%<257��validatenumber(i$)
#Zș"ABC_Colour",3
#d
ser%=�
#n�
�

00000000  0d 00 0a 24 f4 20 3e 3a  30 2e 21 31 30 2f 31 30  |...$. >:0.!10/10|
00000010  41 6c 67 65 2e 53 69 78  47 61 6d 65 73 2e 43 6f  |Alge.SixGames.Co|
00000020  6d 6d 6f 6e 0d 00 14 0f  dd f2 68 69 67 68 73 63  |mmon......highsc|
00000030  6f 72 65 0d 00 1e 14 c8  99 22 41 42 43 5f 42 6c  |ore......"ABC_Bl|
00000040  61 6e 6b 22 2c 31 35 0d  00 28 15 c8 99 22 41 42  |ank",15..(..."AB|
00000050  43 5f 43 6f 6c 6f 75 72  22 2c 31 35 0d 00 32 07  |C_Colour",15..2.|
00000060  c8 97 87 0d 00 3c 24 c8  99 22 41 42 43 5f 53 70  |.....<$.."ABC_Sp|
00000070  72 69 74 65 22 2c 62 25  2c 22 6d 6f 75 73 65 22  |rite",b%,"mouse"|
00000080  2c 35 31 32 2c 37 34 0d  00 46 14 74 24 3d 22 48  |,512,74..F.t$="H|
00000090  49 47 48 20 53 43 4f 52  45 53 22 0d 00 50 0b 74  |IGH SCORES"..P.t|
000000a0  61 78 25 3d 31 33 0d 00  5a 0a 74 61 79 25 3d 32  |ax%=13..Z.tay%=2|
000000b0  0d 00 64 0b 73 79 79 25  3d 31 33 0d 00 6e 06 ef  |..d.syy%=13..n..|
000000c0  35 0d 00 78 09 e6 30 2c  31 33 0d 00 82 23 ec 74  |5..x..0,13...#.t|
000000d0  61 78 25 2a 67 25 2b 31  31 32 2c 74 61 79 25 2a  |ax%*g%+112,tay%*|
000000e0  67 25 2b 73 79 79 25 2a  66 25 2b 34 38 0d 00 8c  |g%+syy%*f%+48...|
000000f0  11 f0 30 2c a9 28 74 24  29 2a 67 25 2c 30 0d 00  |..0,.(t$)*g%,0..|
00000100  96 25 f0 38 35 2c 74 61  78 25 2a 67 25 2b 35 32  |.%.85,tax%*g%+52|
00000110  2c 74 61 79 25 2a 67 25  2b 73 79 79 25 2a 66 25  |,tay%*g%+syy%*f%|
00000120  2d 67 25 0d 00 a0 16 f0  38 31 2c 31 32 38 2b a9  |-g%.....81,128+.|
00000130  28 74 24 29 2a 67 25 2c  30 0d 00 aa 08 e6 30 2c  |(t$)*g%,0.....0,|
00000140  30 0d 00 b4 22 ec 74 61  78 25 2a 67 25 2b 34 38  |0...".tax%*g%+48|
00000150  2c 74 61 79 25 2a 67 25  2b 73 79 79 25 2a 66 25  |,tay%*g%+syy%*f%|
00000160  2d 67 25 0d 00 be 0c f0  31 2c 66 25 2c 66 25 0d  |-g%.....1,f%,f%.|
00000170  00 c8 13 f0 31 2c a9 28  74 24 29 2a 67 25 2b 34  |....1,.(t$)*g%+4|
00000180  2c 30 0d 00 d2 0d f0 31  2c 66 25 2c 2d 66 25 0d  |,0.....1,f%,-f%.|
00000190  00 dc 23 ec 74 61 78 25  2a 67 25 2b 31 31 32 2c  |..#.tax%*g%+112,|
000001a0  74 61 79 25 2a 67 25 2b  73 79 79 25 2a 66 25 2b  |tay%*g%+syy%*f%+|
000001b0  32 34 0d 00 e6 07 f1 74  24 0d 00 f0 0c e3 4a 25  |24.....t$.....J%|
000001c0  3d 31 b8 31 30 0d 00 fa  1a 4b 25 3d 38 37 36 2d  |=1.10....K%=876-|
000001d0  28 74 61 79 25 2a 67 25  2b 4a 25 2a 66 25 29 0d  |(tay%*g%+J%*f%).|
000001e0  01 04 0c 4c 25 3d 4b 25  2b 34 34 0d 01 0e 10 e7  |...L%=K%+44.....|
000001f0  61 74 74 65 6e 64 24 3d  22 22 8c 0d 01 18 08 e6  |attend$=""......|
00000200  30 2c 38 0d 01 22 05 cc  0d 01 2c 27 e7 a7 68 69  |0,8.."....,'..hi|
00000210  67 68 24 28 4a 25 29 2c  61 74 74 65 6e 64 24 2c  |gh$(J%),attend$,|
00000220  32 37 29 3e 30 e6 30 2c  31 31 8b e6 30 2c 38 0d  |27)>0.0,11..0,8.|
00000230  01 36 05 cd 0d 01 40 12  e7 6e 75 77 25 3d 4a 25  |.6....@..nuw%=J%|
00000240  3a e6 30 2c 31 34 0d 01  4a 15 c8 93 c8 90 32 35  |:.0,14..J.....25|
00000250  36 2c 4b 25 2c 37 36 38  2c 66 25 0d 01 54 09 e6  |6,K%,768,f%..T..|
00000260  30 2c 31 31 0d 01 5e 15  c8 93 c8 90 38 39 32 2c  |0,11..^.....892,|
00000270  4b 25 2c 31 32 38 2c 66  25 0d 01 68 08 e6 30 2c  |K%,128,f%..h..0,|
00000280  30 0d 01 72 13 c8 93 32  35 36 2c 4b 25 2c 37 36  |0..r...256,K%,76|
00000290  38 2c 66 25 0d 01 7c 13  c8 93 38 39 32 2c 4b 25  |8,f%..|...892,K%|
000002a0  2c 31 33 30 2c 66 25 0d  01 86 13 ec 74 61 78 25  |,130,f%.....tax%|
000002b0  2a 33 32 2d 31 34 34 2c  4c 25 0d 01 90 0a f1 c3  |*32-144,L%......|
000002c0  28 4a 25 29 0d 01 9a 12  ec 74 61 78 25 2a 33 32  |(J%).....tax%*32|
000002d0  2d 39 36 2c 4c 25 0d 01  a4 10 61 24 3d 68 69 67  |-96,L%....a$=hig|
000002e0  68 24 28 4a 25 29 0d 01  ae 21 e7 ac 76 65 72 25  |h$(J%)...!..ver%|
000002f0  3a c1 61 24 2c a7 61 24  2c 22 47 72 61 64 65 22  |:.a$,.a$,"Grade"|
00000300  29 29 3d 74 79 70 24 0d  01 b8 07 f1 61 24 0d 01  |))=typ$.....a$..|
00000310  c2 13 ec 74 61 78 25 2a  33 32 2b 35 31 34 2c 4c  |...tax%*32+514,L|
00000320  25 0d 01 cc 1f e7 73 63  6f 72 65 73 25 28 4a 25  |%.....scores%(J%|
00000330  29 3e 30 3a f1 73 63 6f  72 65 73 25 28 4a 25 29  |)>0:.scores%(J%)|
00000340  0d 01 d6 05 ed 0d 01 e0  06 ef 34 0d 01 ea 05 87  |..........4.....|
00000350  0d 01 f4 13 c8 99 22 41  42 43 5f 50 61 6c 65 74  |......"ABC_Palet|
00000360  74 65 22 0d 01 fe 05 f5  0d 02 08 0b fd a4 6c 65  |te"...........le|
00000370  61 76 65 0d 02 12 06 ef  37 0d 02 1c 05 e1 0d 02  |ave.....7.......|
00000380  26 10 dd f2 73 6f 72 74  73 63 6f 72 65 73 0d 02  |&...sortscores..|
00000390  30 10 61 24 3d 68 69 67  68 24 28 31 31 29 0d 02  |0.a$=high$(11)..|
000003a0  3a 0b e7 61 24 3e 22 22  8c 0d 02 44 05 f5 0d 02  |:..a$>""...D....|
000003b0  4e 0a 73 72 74 25 3d b9  0d 02 58 0c e3 4a 25 3d  |N.srt%=...X..J%=|
000003c0  31 b8 31 30 0d 02 62 1f  e7 73 63 6f 72 65 73 25  |1.10..b..scores%|
000003d0  28 4a 25 29 3c 73 63 6f  72 65 73 25 28 4a 25 2b  |(J%)<scores%(J%+|
000003e0  31 29 8c 0d 02 6c 0a 74  61 62 25 3d b9 0d 02 76  |1)...l.tab%=...v|
000003f0  0a 73 72 74 25 3d a3 0d  02 80 1f c8 94 73 63 6f  |.srt%=.......sco|
00000400  72 65 73 25 28 4a 25 29  2c 73 63 6f 72 65 73 25  |res%(J%),scores%|
00000410  28 4a 25 2b 31 29 0d 02  8a 1b c8 94 68 69 67 68  |(J%+1)......high|
00000420  24 28 4a 25 29 2c 68 69  67 68 24 28 4a 25 2b 31  |$(J%),high$(J%+1|
00000430  29 0d 02 94 05 cd 0d 02  9e 05 ed 0d 02 a8 09 fd  |)...............|
00000440  73 72 74 25 0d 02 b2 05  cd 0d 02 bc 0a 6e 75 77  |srt%.........nuw|
00000450  25 3d 30 0d 02 c6 0c e3  4a 25 3d 31 b8 31 30 0d  |%=0.....J%=1.10.|
00000460  02 d0 19 e7 68 69 67 68  24 28 4a 25 29 3d 61 24  |....high$(J%)=a$|
00000470  3a 6e 75 77 25 3d 4a 25  0d 02 da 05 ed 0d 02 e4  |:nuw%=J%........|
00000480  05 e1 0d 02 ee 0b dd f2  70 61 75 73 65 0d 02 f8  |........pause...|
00000490  0c e7 ac a6 2d 35 36 3a  e1 0d 03 02 12 f2 73 61  |....-56:......sa|
000004a0  6d 65 28 22 72 65 61 64  79 22 29 0d 03 0c 05 f5  |me("ready").....|
000004b0  0d 03 16 0a fd ac a6 2d  35 36 0d 03 20 05 e1 0d  |.......-56.. ...|
000004c0  03 2a 0b dd f2 65 72 72  6f 72 0d 03 34 08 ef 33  |.*...error..4..3|
000004d0  2c 37 0d 03 3e 0a 2a 43  4c 4f 53 45 0d 03 48 15  |,7..>.*CLOSE..H.|
000004e0  c8 99 22 41 42 43 5f 43  6f 6c 6f 75 72 22 2c 31  |.."ABC_Colour",1|
000004f0  35 0d 03 52 13 c8 99 22  41 42 43 5f 50 61 6c 65  |5..R..."ABC_Pale|
00000500  74 74 65 22 0d 03 5c 06  c8 96 0d 03 66 55 f2 6d  |tte"..\.....fU.m|
00000510  65 73 73 28 22 45 52 52  4f 52 20 2d 20 49 4e 53  |ess("ERROR - INS|
00000520  45 52 54 20 44 49 53 43  20 28 4e 4f 54 20 57 52  |ERT DISC (NOT WR|
00000530  49 54 45 20 50 52 4f 54  45 43 54 45 44 29 20 49  |ITE PROTECTED) I|
00000540  4e 54 4f 20 44 52 49 56  45 20 41 4e 44 20 50 52  |NTO DRIVE AND PR|
00000550  45 53 53 20 52 45 54 55  52 4e 22 2c 31 31 29 0d  |ESS RETURN",11).|
00000560  03 70 05 f5 0d 03 7a 0b  fd a4 6c 65 61 76 65 0d  |.p....z...leave.|
00000570  03 84 26 ff 22 53 41 56  45 20 22 2b 66 24 2b 22  |..&."SAVE "+f$+"|
00000580  4d 69 73 63 2e 53 69 67  6e 61 6c 20 32 30 30 30  |Misc.Signal 2000|
00000590  30 20 2b 34 22 0d 03 8e  13 f2 73 61 76 65 6e 65  |0 +4".....savene|
000005a0  77 72 65 73 75 6c 74 73  0d 03 98 05 f9 0d 03 a2  |wresults........|
000005b0  05 e1 0d 03 ac 11 dd f2  64 65 6c 61 79 28 64 65  |........delay(de|
000005c0  6c 25 29 0d 03 b6 05 f5  0d 03 c0 06 c8 96 0d 03  |l%).............|
000005d0  ca 11 e7 a6 2d 31 31 33  3a 65 73 63 25 3d b9 0d  |....-113:esc%=..|
000005e0  03 d4 0b 64 65 6c 25 2d  3d 31 0d 03 de 0b fd 64  |...del%-=1.....d|
000005f0  65 6c 25 3c 30 0d 03 e8  05 e1 0d 03 f2 18 dd a4  |el%<0...........|
00000600  69 6e 69 74 69 61 6c 73  70 72 69 74 65 73 28 73  |initialsprites(s|
00000610  24 29 0d 03 fc 08 6c 25  3d 30 0d 04 06 1d 6c 25  |$)....l%=0....l%|
00000620  2b 3d a4 73 70 72 69 74  65 66 69 6c 65 6c 65 6e  |+=.spritefilelen|
00000630  67 74 68 28 73 24 29 0d  04 10 09 de 62 25 6c 25  |gth(s$).....b%l%|
00000640  0d 04 1a 0a 21 62 25 3d  6c 25 0d 04 24 1a c8 99  |....!b%=l%..$...|
00000650  22 4f 53 5f 53 70 72 69  74 65 4f 70 22 2c 32 36  |"OS_SpriteOp",26|
00000660  35 2c 62 25 0d 04 2e 14  f2 6c 6f 61 64 73 70 72  |5,b%.....loadspr|
00000670  69 74 65 73 28 73 24 29  0d 04 38 07 3d 62 25 0d  |ites(s$)..8.=b%.|
00000680  04 42 1a dd a4 73 70 72  69 74 65 66 69 6c 65 6c  |.B...spritefilel|
00000690  65 6e 67 74 68 28 73 24  29 0d 04 4c 0a 66 6c 6f  |ength(s$)..L.flo|
000006a0  25 3d 30 0d 04 56 0b 73  24 2b 3d 22 7c 22 0d 04  |%=0..V.s$+="|"..|
000006b0  60 0b c8 95 73 24 3e 22  22 0d 04 6a 19 7a 24 3d  |`...s$>""..j.z$=|
000006c0  a4 73 74 72 69 6e 67 65  78 74 72 61 63 74 28 73  |.stringextract(s|
000006d0  24 29 0d 04 74 0f 68 25  3d 8e 28 66 24 2b 7a 24  |$)..t.h%=.(f$+z$|
000006e0  29 0d 04 7e 0e 66 6c 6f  25 2b 3d a2 23 68 25 0d  |)..~.flo%+=.#h%.|
000006f0  04 88 08 d9 23 68 25 0d  04 92 05 ce 0d 04 9c 0c  |....#h%.........|
00000700  3d 66 6c 6f 25 2b 36 34  0d 04 a6 18 dd a4 73 74  |=flo%+64......st|
00000710  72 69 6e 67 65 78 74 72  61 63 74 28 f8 73 24 29  |ringextract(.s$)|
00000720  0d 04 b0 18 77 24 3d c0  73 24 2c 28 a7 73 24 2c  |....w$=.s$,(.s$,|
00000730  22 7c 22 29 29 2d 31 29  0d 04 ba 18 73 24 3d c1  |"|"))-1)....s$=.|
00000740  73 24 2c 28 a7 73 24 2c  22 7c 22 29 29 2b 31 29  |s$,(.s$,"|"))+1)|
00000750  0d 04 c4 07 3d 77 24 0d  04 ce 15 dd f2 6c 6f 61  |....=w$......loa|
00000760  64 73 70 72 69 74 65 73  28 73 24 29 0d 04 d8 0b  |dsprites(s$)....|
00000770  73 24 2b 3d 22 7c 22 0d  04 e2 0c 74 79 70 25 3d  |s$+="|"....typ%=|
00000780  32 36 36 0d 04 ec 0b c8  95 73 24 3e 22 22 0d 04  |266......s$>""..|
00000790  f6 19 7a 24 3d a4 73 74  72 69 6e 67 65 78 74 72  |..z$=.stringextr|
000007a0  61 63 74 28 73 24 29 0d  05 00 21 c8 99 22 4f 53  |act(s$)...!.."OS|
000007b0  5f 53 70 72 69 74 65 4f  70 22 2c 74 79 70 25 2c  |_SpriteOp",typ%,|
000007c0  62 25 2c 66 24 2b 7a 24  0d 05 0a 14 74 79 70 25  |b%,f$+z$....typ%|
000007d0  2d 3d 28 74 79 70 25 3d  32 36 36 29 0d 05 14 05  |-=(typ%=266)....|
000007e0  ce 0d 05 1e 05 e1 0d 05  28 15 dd f2 74 69 74 6c  |........(...titl|
000007f0  65 28 61 24 2c 59 25 2c  43 25 29 0d 05 32 29 79  |e(a$,Y%,C%)..2)y|
00000800  24 3d 22 31 30 20 6f 75  74 20 6f 66 20 31 30 20  |$="10 out of 10 |
00000810  45 64 75 63 61 74 69 6f  6e 61 6c 20 53 79 73 74  |Educational Syst|
00000820  65 6d 73 22 0d 05 3c 14  78 73 63 25 3d 33 32 30  |ems"..<.xsc%=320|
00000830  2d a9 28 79 24 29 2a 38  0d 05 46 26 c8 99 22 41  |-.(y$)*8..F&.."A|
00000840  42 43 5f 50 72 79 6e 74  53 74 72 69 6e 67 22 2c  |BC_PryntString",|
00000850  79 24 2c 78 73 63 25 2c  59 25 2c 31 2c 37 0d 05  |y$,xsc%,Y%,1,7..|
00000860  50 2b c8 99 22 41 42 43  5f 50 72 79 6e 74 53 74  |P+.."ABC_PryntSt|
00000870  72 69 6e 67 22 2c 79 24  2c 78 73 63 25 2d 32 2c  |ring",y$,xsc%-2,|
00000880  59 25 2b 31 2c 31 2c 43  25 0d 05 5a 0a 59 25 2d  |Y%+1,1,C%..Z.Y%-|
00000890  3d 32 34 0d 05 64 11 79  24 3d 22 50 72 65 73 65  |=24..d.y$="Prese|
000008a0  6e 74 73 22 0d 05 6e 14  78 73 63 25 3d 33 32 30  |nts"..n.xsc%=320|
000008b0  2d a9 28 79 24 29 2a 38  0d 05 78 26 c8 99 22 41  |-.(y$)*8..x&.."A|
000008c0  42 43 5f 50 72 79 6e 74  53 74 72 69 6e 67 22 2c  |BC_PryntString",|
000008d0  79 24 2c 78 73 63 25 2c  59 25 2c 31 2c 37 0d 05  |y$,xsc%,Y%,1,7..|
000008e0  82 2b c8 99 22 41 42 43  5f 50 72 79 6e 74 53 74  |.+.."ABC_PryntSt|
000008f0  72 69 6e 67 22 2c 79 24  2c 78 73 63 25 2d 32 2c  |ring",y$,xsc%-2,|
00000900  59 25 2b 31 2c 31 2c 43  25 0d 05 8c 0a 59 25 2d  |Y%+1,1,C%....Y%-|
00000910  3d 32 34 0d 05 96 14 78  73 63 25 3d 33 32 30 2d  |=24....xsc%=320-|
00000920  a9 28 61 24 29 2a 38 0d  05 a0 26 c8 99 22 41 42  |.(a$)*8...&.."AB|
00000930  43 5f 50 72 79 6e 74 53  74 72 69 6e 67 22 2c 61  |C_PryntString",a|
00000940  24 2c 78 73 63 25 2c 59  25 2c 31 2c 37 0d 05 aa  |$,xsc%,Y%,1,7...|
00000950  2b c8 99 22 41 42 43 5f  50 72 79 6e 74 53 74 72  |+.."ABC_PryntStr|
00000960  69 6e 67 22 2c 61 24 2c  78 73 63 25 2d 32 2c 59  |ing",a$,xsc%-2,Y|
00000970  25 2b 31 2c 31 2c 43 25  0d 05 b4 05 e1 0d 05 be  |%+1,1,C%........|
00000980  0c dd f2 65 73 63 61 70  65 0d 05 c8 11 e7 a6 2d  |...escape......-|
00000990  31 31 33 3a 65 73 63 25  3d b9 0d 05 d2 05 e1 0d  |113:esc%=.......|
000009a0  05 dc 11 dd f2 6c 6f 61  64 64 65 74 61 69 6c 73  |.....loaddetails|
000009b0  0d 05 e6 0a 62 6f 78 25  3d 30 0d 05 f0 0a 65 25  |....box%=0....e%|
000009c0  3d 31 36 30 0d 05 fa 09  66 25 3d 36 34 0d 06 04  |=160....f%=64...|
000009d0  09 67 25 3d 31 36 0d 06  0e 0a 66 6e 63 25 3d b9  |.g%=16....fnc%=.|
000009e0  0d 06 18 0a 70 6c 79 25  3d 31 0d 06 22 0a 72 70  |....ply%=1..".rp|
000009f0  79 25 3d a3 0d 06 2c 0a  73 6e 64 25 3d b9 0d 06  |y%=...,.snd%=...|
00000a00  36 0a 73 75 6e 25 3d 30  0d 06 40 18 68 25 3d 8e  |6.sun%=0..@.h%=.|
00000a10  28 66 24 2b 22 43 6f 6e  66 69 67 75 72 65 22 29  |(f$+"Configure")|
00000a20  0d 06 4a 3f e8 23 68 25  2c 72 61 74 25 2c 6e 69  |..J?.#h%,rat%,ni|
00000a30  67 25 2c 73 64 73 25 2c  76 65 72 25 2c 67 72 64  |g%,sds%,ver%,grd|
00000a40  25 2c 63 6c 61 25 2c 74  79 70 24 2c 68 65 64 25  |%,cla%,typ$,hed%|
00000a50  2c 66 75 74 25 2c 70 61  70 25 2c 70 69 78 25 0d  |,fut%,pap%,pix%.|
00000a60  06 54 08 d9 23 68 25 0d  06 5e 0a 73 75 62 25 3d  |.T..#h%..^.sub%=|
00000a70  30 0d 06 68 13 68 25 3d  8e 28 66 24 2b 22 4e 61  |0..h.h%=.(f$+"Na|
00000a80  6d 65 22 29 0d 06 72 10  e8 23 68 25 2c 61 74 74  |me")..r..#h%,att|
00000a90  65 6e 64 24 0d 06 7c 08  d9 23 68 25 0d 06 86 1c  |end$..|..#h%....|
00000aa0  68 25 3d 8e 28 22 72 61  6d 3a 46 61 63 74 22 2b  |h%=.("ram:Fact"+|
00000ab0  c3 28 67 6d 65 25 29 29  0d 06 90 0b e3 4a 25 3d  |.(gme%)).....J%=|
00000ac0  31 b8 36 0d 06 9a 0e e8  23 68 25 2c 66 61 63 74  |1.6.....#h%,fact|
00000ad0  24 0d 06 a4 13 69 6e 66  6f 24 28 4a 25 29 3d 66  |$....info$(J%)=f|
00000ae0  61 63 74 24 0d 06 ae 05  ed 0d 06 b8 08 d9 23 68  |act$..........#h|
00000af0  25 0d 06 c2 27 68 25 3d  8e 28 66 24 2b 22 48 69  |%...'h%=.(f$+"Hi|
00000b00  67 68 53 63 6f 72 65 73  2e 54 61 62 6c 65 22 2b  |ghScores.Table"+|
00000b10  c3 28 67 6d 65 25 29 29  0d 06 cc 0c e3 4a 25 3d  |.(gme%)).....J%=|
00000b20  31 b8 31 30 0d 06 d6 0e  e8 23 68 25 2c 61 24 2c  |1.10.....#h%,a$,|
00000b30  73 25 0d 06 e0 10 68 69  67 68 24 28 4a 25 29 3d  |s%....high$(J%)=|
00000b40  61 24 0d 06 ea 12 73 63  6f 72 65 73 25 28 4a 25  |a$....scores%(J%|
00000b50  29 3d 73 25 0d 06 f4 05  ed 0d 06 fe 08 d9 23 68  |)=s%..........#h|
00000b60  25 0d 07 08 10 e7 61 74  74 65 6e 64 24 3d 22 22  |%.....attend$=""|
00000b70  8c 0d 07 12 0c 61 74 74  25 28 29 3d 30 0d 07 1c  |.....att%()=0...|
00000b80  05 cc 0d 07 26 32 68 25  3d 8e 28 66 24 2b 22 41  |....&2h%=.(f$+"A|
00000b90  63 68 69 65 76 65 2e 41  63 68 69 65 76 65 22 2b  |chieve.Achieve"+|
00000ba0  c3 28 63 6c 61 25 29 2b  22 2e 22 2b 61 74 74 65  |.(cla%)+"."+atte|
00000bb0  6e 64 24 29 0d 07 30 0c  e3 4a 25 3d 31 b8 31 30  |nd$)..0..J%=1.10|
00000bc0  0d 07 3a 0b e3 4b 25 3d  31 b8 36 0d 07 44 14 e8  |..:..K%=1.6..D..|
00000bd0  23 68 25 2c 61 74 74 25  28 4b 25 2c 4a 25 29 0d  |#h%,att%(K%,J%).|
00000be0  07 4e 05 ed 0d 07 58 05  ed 0d 07 62 08 d9 23 68  |.N....X....b..#h|
00000bf0  25 0d 07 6c 05 cd 0d 07  76 05 e1 0d 07 80 13 dd  |%..l....v.......|
00000c00  f2 6d 65 73 73 28 74 24  2c 63 6f 6c 25 29 0d 07  |.mess(t$,col%)..|
00000c10  8a 0b e6 30 2c 63 6f 6c  25 0d 07 94 06 ef 35 0d  |...0,col%.....5.|
00000c20  07 9e 06 c8 96 0d 07 a8  13 c8 93 c8 90 30 2c 30  |.............0,0|
00000c30  2c 31 32 37 38 2c 36 34  0d 07 b2 08 e6 30 2c 30  |,1278,64.....0,0|
00000c40  0d 07 bc 11 c8 93 30 2c  30 2c 31 32 37 38 2c 36  |......0,0,1278,6|
00000c50  34 0d 07 c6 13 ec 36 34  30 2d a9 28 74 24 29 2a  |4.....640-.(t$)*|
00000c60  38 2c 34 34 0d 07 d0 07  f1 74 24 0d 07 da 06 ef  |8,44.....t$.....|
00000c70  34 0d 07 e4 05 87 0d 07  ee 05 e1 0d 07 f8 14 dd  |4...............|
00000c80  f2 70 6f 69 6e 74 28 61  24 2c 6d 6f 73 25 29 0d  |.point(a$,mos%).|
00000c90  08 02 13 ea 77 72 65 25  2c 70 61 72 25 2c 64 61  |....wre%,par%,da|
00000ca0  74 25 0d 08 0c 1c de 77  72 65 25 31 30 38 38 2c  |t%.....wre%1088,|
00000cb0  70 61 72 25 32 30 2c 64  61 74 25 32 35 36 0d 08  |par%20,dat%256..|
00000cc0  16 17 68 25 3d 8e 28 66  24 2b 22 4d 69 73 63 2e  |..h%=.(f$+"Misc.|
00000cd0  22 2b 61 24 29 0d 08 20  0c e3 4a 25 3d 30 b8 33  |"+a$).. ..J%=0.3|
00000ce0  32 0d 08 2a 0c e3 4b 25  3d 30 b8 33 32 0d 08 34  |2..*..K%=0.32..4|
00000cf0  18 77 72 65 25 3f 28 4b  25 2a 33 32 2b 4a 25 29  |.wre%?(K%*32+J%)|
00000d00  3d 9a 23 68 25 0d 08 3e  05 ed 0d 08 48 05 ed 0d  |=.#h%..>....H...|
00000d10  08 52 08 d9 23 68 25 0d  08 5c 13 21 70 61 72 25  |.R..#h%..\.!par%|
00000d20  3d 26 32 30 30 38 30 32  30 30 0d 08 66 0f 70 61  |=&20080200..f.pa|
00000d30  72 25 3f 31 3d 6d 6f 73  25 0d 08 70 0c 70 61 72  |r%?1=mos%..p.par|
00000d40  25 21 34 3d 30 0d 08 7a  0f 70 61 72 25 21 36 3d  |%!4=0..z.par%!6=|
00000d50  64 61 74 25 0d 08 84 0d  6d 6d 61 25 3d 64 61 74  |dat%....mma%=dat|
00000d60  25 0d 08 8e 0e e3 4a 25  3d 33 32 b8 31 88 b9 0d  |%.....J%=32.1...|
00000d70  08 98 0b e3 4b 25 3d 30  b8 37 0d 08 a2 0d e3 4c  |....K%=0.7.....L|
00000d80  25 3d 33 b8 30 88 b9 0d  08 ac 1d 76 61 6c 25 3d  |%=3.0......val%=|
00000d90  77 72 65 25 3f 28 4a 25  2a 33 32 2b 4b 25 2a 34  |wre%?(J%*32+K%*4|
00000da0  2b 4c 25 29 0d 08 b6 30  e7 76 61 6c 25 3d 26 46  |+L%)...0.val%=&F|
00000db0  46 3a 70 61 72 25 3f 34  3d 4b 25 2a 34 2b 4c 25  |F:par%?4=K%*4+L%|
00000dc0  3a 70 61 72 25 3f 35 3d  33 31 2d 4a 25 3a 76 61  |:par%?5=31-J%:va|
00000dd0  6c 25 3d 30 0d 08 c0 12  3f 6d 6d 61 25 3d 3f 6d  |l%=0....?mma%=?m|
00000de0  6d 61 25 3c 3c 32 0d 08  ca 0f 3f 6d 6d 61 25 2b  |ma%<<2....?mma%+|
00000df0  3d 76 61 6c 25 0d 08 d4  05 ed 0d 08 de 0b 6d 6d  |=val%.........mm|
00000e00  61 25 2b 3d 31 0d 08 e8  05 ed 0d 08 f2 05 ed 0d  |a%+=1...........|
00000e10  08 fc 17 c8 99 22 4f 53  5f 57 6f 72 64 22 2c 32  |....."OS_Word",2|
00000e20  31 2c 70 61 72 25 0d 09  06 05 e1 0d 09 10 15 dd  |1,par%..........|
00000e30  f2 77 69 6e 67 73 28 6c  24 2c 78 25 2c 79 25 29  |.wings(l$,x%,y%)|
00000e40  0d 09 1a 23 c8 99 22 41  42 43 5f 53 70 72 69 74  |...#.."ABC_Sprit|
00000e50  65 22 2c 62 25 2c 22 77  69 6e 67 73 22 2c 78 25  |e",b%,"wings",x%|
00000e60  2c 79 25 0d 09 24 06 ef  35 0d 09 2e 09 e6 30 2c  |,y%..$..5.....0,|
00000e70  31 31 0d 09 38 1f ec 28  78 25 2a 32 2b 32 39 38  |11..8..(x%*2+298|
00000e80  29 2d a9 28 6c 24 29 2a  38 2c 79 25 2a 34 2d 34  |)-.(l$)*8,y%*4-4|
00000e90  30 0d 09 42 07 f1 6c 24  0d 09 4c 06 ef 34 0d 09  |0..B..l$..L..4..|
00000ea0  56 05 87 0d 09 60 05 e1  0d 09 6a 23 dd f2 6e 6f  |V....`....j#..no|
00000eb0  69 73 65 28 73 24 2c 63  68 6e 25 2c 76 6f 6c 25  |ise(s$,chn%,vol%|
00000ec0  2c 70 69 74 25 2c 64 75  72 25 29 0d 09 74 06 ea  |,pit%,dur%)..t..|
00000ed0  85 0d 09 7e 09 ee 85 ea  3a e1 0d 09 88 0d c8 a1  |...~....:.......|
00000ee0  63 68 6e 25 2c 73 24 0d  09 92 18 d4 63 68 6e 25  |chn%,s$.....chn%|
00000ef0  2c 76 6f 6c 25 2c 70 69  74 25 2c 64 75 72 25 0d  |,vol%,pit%,dur%.|
00000f00  09 9c 05 e1 0d 09 a6 1b  dd f2 69 6e 70 75 74 28  |..........input(|
00000f10  74 6f 74 25 2c 74 61 78  25 2c 74 61 79 25 29 0d  |tot%,tax%,tay%).|
00000f20  09 b0 0b e7 65 73 63 25  3a e1 0d 09 ba 0b 2a 46  |....esc%:.....*F|
00000f30  58 32 31 20 30 0d 09 c4  0a 63 6e 74 25 3d 30 0d  |X21 0....cnt%=0.|
00000f40  09 ce 09 69 24 3d 22 22  0d 09 d8 05 f5 0d 09 e2  |...i$=""........|
00000f50  05 f5 0d 09 ec 05 f5 0d  09 f6 0b 6b 25 3d a6 28  |...........k%=.(|
00000f60  31 29 0d 0a 00 17 e7 a6  2d 31 31 33 3a 65 73 63  |1)......-113:esc|
00000f70  25 3d b9 3a 6b 25 3d 31  33 0d 0a 0a 1d fd 6b 25  |%=.:k%=13.....k%|
00000f80  3d 31 33 84 6b 25 3e 33  31 80 20 6b 25 3c 31 32  |=13.k%>31. k%<12|
00000f90  38 84 65 73 63 25 0d 0a  14 14 e7 6b 25 3d 31 32  |8.esc%.....k%=12|
00000fa0  37 80 20 63 6e 74 25 3e  30 8c 0d 0a 1e 0b 63 6e  |7. cnt%>0.....cn|
00000fb0  74 25 2d 3d 31 0d 0a 28  10 69 24 3d c0 69 24 2c  |t%-=1..(.i$=.i$,|
00000fc0  63 6e 74 25 29 0d 0a 32  17 f1 8a 74 61 78 25 2c  |cnt%)..2...tax%,|
00000fd0  74 61 79 25 29 69 24 3b  89 28 31 29 0d 0a 3c 05  |tay%)i$;.(1)..<.|
00000fe0  cd 0d 0a 46 11 fd 6b 25  3c 3e 31 32 37 84 65 73  |...F..k%<>127.es|
00000ff0  63 25 0d 0a 50 18 e7 6b  25 3c 3e 31 33 80 20 63  |c%..P..k%<>13. c|
00001000  6e 74 25 3c 3e 74 6f 74  25 8c 0d 0a 5a 0c e7 63  |nt%<>tot%...Z..c|
00001010  6e 74 25 3d 30 8c 0d 0a  64 2e e7 bd 28 6b 25 29  |nt%=0...d...(k%)|
00001020  3e 3d 22 61 22 80 bd 28  6b 25 29 3c 3d 22 7a 22  |>="a"..(k%)<="z"|
00001030  69 24 3d bd 28 6b 25 2d  33 32 29 8b 69 24 3d bd  |i$=.(k%-32).i$=.|
00001040  28 6b 25 29 0d 0a 6e 05  cc 0d 0a 78 30 e7 bd 28  |(k%)..n....x0..(|
00001050  6b 25 29 3e 3d 22 41 22  80 bd 28 6b 25 29 3c 3d  |k%)>="A"..(k%)<=|
00001060  22 5a 22 69 24 2b 3d bd  28 6b 25 2b 33 32 29 8b  |"Z"i$+=.(k%+32).|
00001070  69 24 2b 3d bd 28 6b 25  29 0d 0a 82 05 cd 0d 0a  |i$+=.(k%).......|
00001080  8c 17 f1 8a 74 61 78 25  2c 74 61 79 25 29 69 24  |....tax%,tay%)i$|
00001090  3b 89 28 31 29 0d 0a 96  0b 63 6e 74 25 2b 3d 31  |;.(1)....cnt%+=1|
000010a0  0d 0a a0 05 cd 0d 0a aa  19 e7 6b 25 3c 3e 31 33  |..........k%<>13|
000010b0  80 20 63 6e 74 25 3d 74  6f 74 25 3a ef 37 0d 0a  |. cnt%=tot%:.7..|
000010c0  b4 0f fd 6b 25 3d 31 33  84 65 73 63 25 0d 0a be  |...k%=13.esc%...|
000010d0  10 e7 65 73 63 25 3a 2a  46 58 31 32 36 0d 0a c8  |..esc%:*FX126...|
000010e0  05 e1 0d 0a d2 26 dd f2  69 6e 66 6f 63 61 72 64  |.....&..infocard|
000010f0  28 74 24 2c 74 61 78 25  2c 74 61 79 25 2c 73 64  |(t$,tax%,tay%,sd|
00001100  78 25 2c 73 79 79 25 29  0d 0a dc 06 ef 35 0d 0a  |x%,syy%).....5..|
00001110  e6 08 e6 30 2c 38 0d 0a  f0 2c c8 93 c8 90 74 61  |...0,8...,....ta|
00001120  78 25 2a 67 25 2c 74 61  79 25 2a 67 25 2c 73 64  |x%*g%,tay%*g%,sd|
00001130  78 25 2a 31 36 30 2b 31  36 30 2c 73 79 79 25 2a  |x%*160+160,syy%*|
00001140  66 25 0d 0a fa 08 e6 30  2c 33 0d 0b 04 30 c8 93  |f%.....0,3...0..|
00001150  c8 90 74 61 78 25 2a 67  25 2b 33 32 30 2c 74 61  |..tax%*g%+320,ta|
00001160  79 25 2a 67 25 2c 73 64  78 25 2a 31 36 30 2d 31  |y%*g%,sdx%*160-1|
00001170  36 32 2c 73 79 79 25 2a  66 25 0d 0b 0e 08 e6 30  |62,syy%*f%.....0|
00001180  2c 30 0d 0b 18 33 e7 73  64 78 25 2a 31 36 30 2b  |,0...3.sdx%*160+|
00001190  31 36 30 3e 3d 31 32 38  30 20 73 72 78 25 3d 31  |160>=1280 srx%=1|
000011a0  32 37 38 8b 73 72 78 25  3d 73 64 78 25 2a 31 36  |278.srx%=sdx%*16|
000011b0  30 2b 31 36 30 0d 0b 22  22 c8 93 74 61 78 25 2a  |0+160..""..tax%*|
000011c0  67 25 2c 74 61 79 25 2a  67 25 2c 73 72 78 25 2c  |g%,tay%*g%,srx%,|
000011d0  73 79 79 25 2a 66 25 0d  0b 2c 09 e6 30 2c 31 33  |syy%*f%..,..0,13|
000011e0  0d 0b 36 22 ec 74 61 78  25 2a 67 25 2b 66 25 2c  |..6".tax%*g%+f%,|
000011f0  74 61 79 25 2a 67 25 2b  73 79 79 25 2a 66 25 2b  |tay%*g%+syy%*f%+|
00001200  66 25 0d 0b 40 11 f0 30  2c a9 28 74 24 29 2a 67  |f%..@..0,.(t$)*g|
00001210  25 2c 30 0d 0b 4a 1f f0  38 35 2c 74 61 78 25 2a  |%,0..J..85,tax%*|
00001220  67 25 2c 74 61 79 25 2a  67 25 2b 73 79 79 25 2a  |g%,tay%*g%+syy%*|
00001230  66 25 0d 0b 54 16 f0 38  31 2c 31 32 38 2b a9 28  |f%..T..81,128+.(|
00001240  74 24 29 2a 67 25 2c 30  0d 0b 5e 08 e6 30 2c 30  |t$)*g%,0..^..0,0|
00001250  0d 0b 68 1c ec 74 61 78  25 2a 67 25 2c 74 61 79  |..h..tax%*g%,tay|
00001260  25 2a 67 25 2b 73 79 79  25 2a 66 25 0d 0b 72 0c  |%*g%+syy%*f%..r.|
00001270  f0 31 2c 66 25 2c 66 25  0d 0b 7c 11 f0 31 2c a9  |.1,f%,f%..|..1,.|
00001280  28 74 24 29 2a 67 25 2c  30 0d 0b 86 0d f0 31 2c  |(t$)*g%,0.....1,|
00001290  66 25 2c 2d 66 25 0d 0b  90 22 ec 74 61 78 25 2a  |f%,-f%...".tax%*|
000012a0  67 25 2b 66 25 2c 74 61  79 25 2a 67 25 2b 73 79  |g%+f%,tay%*g%+sy|
000012b0  79 25 2a 66 25 2b 34 34  0d 0b 9a 07 f1 74 24 0d  |y%*f%+44.....t$.|
000012c0  0b a4 0e e3 4a 25 3d 31  b8 73 64 78 25 0d 0b ae  |....J%=1.sdx%...|
000012d0  1f ec 74 61 78 25 2a 67  25 2b 4a 25 2a 31 36 30  |..tax%*g%+J%*160|
000012e0  2b 31 36 30 2c 74 61 79  25 2a 67 25 0d 0b b8 10  |+160,tay%*g%....|
000012f0  f0 31 2c 30 2c 73 79 79  25 2a 66 25 0d 0b c2 05  |.1,0,syy%*f%....|
00001300  ed 0d 0b cc 0e e3 4a 25  3d 31 b8 73 79 79 25 0d  |......J%=1.syy%.|
00001310  0b d6 1a ec 74 61 78 25  2a 67 25 2c 74 61 79 25  |....tax%*g%,tay%|
00001320  2a 67 25 2b 4a 25 2a 66  25 0d 0b e0 15 f0 31 2c  |*g%+J%*f%.....1,|
00001330  73 64 78 25 2a 31 36 30  2b 31 36 30 2c 30 0d 0b  |sdx%*160+160,0..|
00001340  ea 05 ed 0d 0b f4 06 ef  34 0d 0b fe 05 87 0d 0c  |........4.......|
00001350  08 05 e1 0d 0c 12 13 dd  f2 63 65 6e 74 28 74 24  |.........cent(t$|
00001360  2c 74 61 79 25 29 0d 0c  1c 19 f1 8a 34 30 2d a9  |,tay%)......40-.|
00001370  28 74 24 29 81 32 2c 74  61 79 25 29 74 24 3b 0d  |(t$).2,tay%)t$;.|
00001380  0c 26 05 e1 0d 0c 30 14  dd f2 73 61 76 65 6e 65  |.&....0...savene|
00001390  77 72 65 73 75 6c 74 73  0d 0c 3a 11 e7 61 74 74  |wresults..:..att|
000013a0  65 6e 64 24 3d 22 22 3a  e1 0d 0c 44 32 68 25 3d  |end$="":...D2h%=|
000013b0  ae 28 66 24 2b 22 41 63  68 69 65 76 65 2e 41 63  |.(f$+"Achieve.Ac|
000013c0  68 69 65 76 65 22 2b c3  28 63 6c 61 25 29 2b 22  |hieve"+.(cla%)+"|
000013d0  2e 22 2b 61 74 74 65 6e  64 24 29 0d 0c 4e 0c e3  |."+attend$)..N..|
000013e0  4a 25 3d 31 b8 31 30 0d  0c 58 0b e3 4b 25 3d 31  |J%=1.10..X..K%=1|
000013f0  b8 36 0d 0c 62 14 f1 23  68 25 2c 61 74 74 25 28  |.6..b..#h%,att%(|
00001400  4b 25 2c 4a 25 29 0d 0c  6c 05 ed 0d 0c 76 05 ed  |K%,J%)..l....v..|
00001410  0d 0c 80 08 d9 23 68 25  0d 0c 8a 27 68 25 3d ae  |.....#h%...'h%=.|
00001420  28 66 24 2b 22 48 69 67  68 53 63 6f 72 65 73 2e  |(f$+"HighScores.|
00001430  54 61 62 6c 65 22 2b c3  28 67 6d 65 25 29 29 0d  |Table"+.(gme%)).|
00001440  0c 94 0c e3 4a 25 3d 31  b8 31 30 0d 0c 9e 12 f1  |....J%=1.10.....|
00001450  23 68 25 2c 68 69 67 68  24 28 4a 25 29 0d 0c a8  |#h%,high$(J%)...|
00001460  14 f1 23 68 25 2c 73 63  6f 72 65 73 25 28 4a 25  |..#h%,scores%(J%|
00001470  29 0d 0c b2 05 ed 0d 0c  bc 08 d9 23 68 25 0d 0c  |)..........#h%..|
00001480  c6 05 e1 0d 0c d0 0c dd  f2 6d 6f 75 73 65 31 0d  |.........mouse1.|
00001490  0c da 12 c8 97 fb 31 2c  32 35 35 2c 32 35 35 2c  |......1,255,255,|
000014a0  30 0d 0c e4 10 c8 97 fb  32 2c 32 35 35 2c 30 2c  |0.......2,255,0,|
000014b0  30 0d 0c ee 14 c8 97 fb  33 2c 31 39 32 2c 31 39  |0.......3,192,19|
000014c0  32 2c 31 39 32 0d 0c f8  08 c8 97 ee 31 0d 0d 02  |2,192.......1...|
000014d0  05 e1 0d 0d 0c 14 dd f2  73 71 72 28 77 63 68 25  |........sqr(wch%|
000014e0  2c 63 6f 6c 25 29 0d 0d  16 0b e6 30 2c 63 6f 6c  |,col%).....0,col|
000014f0  25 0d 0d 20 1e c8 93 c8  90 37 30 36 2c 77 63 68  |%.. .....706,wch|
00001500  25 2a 66 25 2b 31 36 34  2c 31 35 36 2c 35 38 0d  |%*f%+164,156,58.|
00001510  0d 2a 05 e1 0d 0d 34 15  dd f2 69 6e 73 65 72 74  |.*....4...insert|
00001520  28 74 61 79 25 2c 76 24  29 0d 0d 3e 13 ec 37 33  |(tay%,v$)..>..73|
00001530  36 2c 74 61 79 25 2a 33  32 2d 32 30 0d 0d 48 07  |6,tay%*32-20..H.|
00001540  f1 76 24 0d 0d 52 05 e1  0d 0d 5c 11 dd f2 69 6e  |.v$..R....\...in|
00001550  66 6f 72 6d 61 74 69 6f  6e 0d 0d 66 17 c8 97 c8  |formation..f....|
00001560  93 37 39 38 2c 33 35 36  2c 31 36 30 2c 33 38 34  |.798,356,160,384|
00001570  0d 0d 70 14 c8 99 22 41  42 43 5f 42 6c 61 6e 6b  |..p..."ABC_Blank|
00001580  22 2c 31 35 0d 0d 7a 15  c8 99 22 41 42 43 5f 43  |",15..z..."ABC_C|
00001590  6f 6c 6f 75 72 22 2c 31  35 0d 0d 84 25 c8 99 22  |olour",15...%.."|
000015a0  41 42 43 5f 53 70 72 69  74 65 22 2c 62 25 2c 22  |ABC_Sprite",b%,"|
000015b0  6d 6f 75 73 65 22 2c 35  31 32 2c 31 31 38 0d 0d  |mouse",512,118..|
000015c0  8e 26 f2 69 6e 66 6f 63  61 72 64 28 22 49 4e 46  |.&.infocard("INF|
000015d0  4f 52 4d 41 54 49 4f 4e  22 2c 32 30 2c 32 32 2c  |ORMATION",20,22,|
000015e0  33 2c 37 29 0d 0d 98 1b  f2 66 69 6c 6c 69 6e 66  |3,7).....fillinf|
000015f0  6f 72 6d 61 74 69 6f 6e  28 31 33 2c 31 35 29 0d  |ormation(13,15).|
00001600  0d a2 0a 70 24 3d 22 58  22 0d 0d ac 13 f2 66 61  |...p$="X".....fa|
00001610  63 74 6d 61 74 69 6f 6e  28 22 22 29 0d 0d b6 0a  |ctmation("")....|
00001620  6f 79 79 25 3d 30 0d 0d  c0 13 c8 99 22 41 42 43  |oyy%=0......"ABC|
00001630  5f 50 61 6c 65 74 74 65  22 0d 0d ca 0e f2 7a 65  |_Palette".....ze|
00001640  72 6f 6d 6f 75 73 65 0d  0d d4 05 f5 0d 0d de 14  |romouse.........|
00001650  c8 97 6d 6f 78 25 2c 6d  6f 79 25 2c 62 75 74 25  |..mox%,moy%,but%|
00001660  0d 0d e8 2c e7 6d 6f 79  25 3e 37 34 30 20 63 6c  |...,.moy%>740 cl|
00001670  79 25 3d 30 8b 63 6c 79  25 3d 28 94 28 6d 6f 79  |y%=0.cly%=(.(moy|
00001680  25 2d 37 34 30 29 81 66  25 29 2b 31 0d 0d f2 12  |%-740).f%)+1....|
00001690  e7 63 6c 79 25 3e 36 3a  63 6c 79 25 3d 36 0d 0d  |.cly%>6:cly%=6..|
000016a0  fc 32 e7 63 6c 79 25 3c  3e 6f 79 79 25 3a 6f 79  |.2.cly%<>oyy%:oy|
000016b0  79 25 3d 63 6c 79 25 3a  f2 66 61 63 74 6d 61 74  |y%=cly%:.factmat|
000016c0  69 6f 6e 28 69 6e 66 6f  24 28 63 6c 79 25 29 29  |ion(info$(cly%))|
000016d0  0d 0e 06 0b fd a4 6c 65  61 76 65 0d 0e 10 06 ef  |......leave.....|
000016e0  37 0d 0e 1a 05 e1 0d 0e  24 14 dd f2 66 61 63 74  |7.......$...fact|
000016f0  6d 61 74 69 6f 6e 28 74  24 29 0d 0e 2e 0c e7 70  |mation(t$).....p|
00001700  24 3d 74 24 3a e1 0d 0e  38 09 70 24 3d 74 24 0d  |$=t$:...8.p$=t$.|
00001710  0e 42 2e e7 6e 69 67 25  74 24 3d 22 41 54 33 20  |.B..nig%t$="AT3 |
00001720  4c 65 76 65 6c 20 22 2b  70 24 8b 74 24 3d c1 74  |Level "+p$.t$=.t|
00001730  24 2c a7 74 24 2c 22 29  22 29 2b 32 29 0d 0e 4c  |$,.t$,")")+2)..L|
00001740  09 e6 30 2c 31 31 0d 0e  56 06 ef 35 0d 0e 60 06  |..0,11..V..5..`.|
00001750  c8 96 0d 0e 6a 13 c8 93  c8 90 30 2c 30 2c 31 32  |....j.....0,0,12|
00001760  37 38 2c 36 34 0d 0e 74  08 e6 30 2c 30 0d 0e 7e  |78,64..t..0,0..~|
00001770  11 c8 93 30 2c 30 2c 31  32 37 38 2c 36 34 0d 0e  |...0,0,1278,64..|
00001780  88 13 ec 36 34 30 2d a9  28 74 24 29 2a 38 2c 34  |...640-.(t$)*8,4|
00001790  34 0d 0e 92 07 f1 74 24  0d 0e 9c 06 ef 34 0d 0e  |4.....t$.....4..|
000017a0  a6 05 87 0d 0e b0 05 e1  0d 0e ba 0b dd f2 73 6f  |..............so|
000017b0  75 6e 64 0d 0e c4 12 e7  ac a6 2d 32 3a 66 6e 63  |und.......-2:fnc|
000017c0  25 3d b9 3a e1 0d 0e ce  0c e7 ac 66 6e 63 25 3a  |%=.:.......fnc%:|
000017d0  e1 0d 0e d8 0a e7 a6 2d  33 31 8c 0d 0e e2 0a 66  |.......-31.....f|
000017e0  6e 63 25 3d a3 0d 0e ec  0e 73 6e 64 25 3d ac 73  |nc%=.....snd%=.s|
000017f0  6e 64 25 0d 0e f6 25 e7  73 6e 64 25 ff 22 56 4f  |nd%...%.snd%."VO|
00001800  4c 55 4d 45 20 22 2b c3  28 4d 25 29 8b ff 22 56  |LUME "+.(M%).."V|
00001810  4f 4c 55 4d 45 20 31 22  0d 0f 00 05 cd 0d 0f 0a  |OLUME 1"........|
00001820  05 e1 0d 0f 14 0b dd f2  66 6c 75 73 68 0d 0f 1e  |........flush...|
00001830  0b 2a 46 58 32 31 20 39  0d 0f 28 05 e1 0d 0f 32  |.*FX21 9..(....2|
00001840  10 dd f2 6e 75 6d 62 65  72 6e 61 6d 65 0d 0f 3c  |...numbername..<|
00001850  0a 65 73 63 25 3d a3 0d  0f 46 07 c8 97 87 0d 0f  |.esc%=...F......|
00001860  50 19 e7 ac 72 70 79 25  3a ef 37 3a f2 65 6e 74  |P...rpy%:.7:.ent|
00001870  65 72 6e 61 6d 65 73 0d  0f 5a 0a e7 65 73 63 25  |ernames..Z..esc%|
00001880  8c 0d 0f 64 0a 72 70 79  25 3d a3 0d 0f 6e 05 cc  |...d.rpy%=...n..|
00001890  0d 0f 78 0a 72 70 79 25  3d b9 0d 0f 82 05 cd 0d  |..x.rpy%=.......|
000018a0  0f 8c 05 e1 0d 0f 96 1b  dd a4 61 72 65 61 28 78  |..........area(x|
000018b0  31 25 2c 79 31 25 2c 78  32 25 2c 79 32 25 29 0d  |1%,y1%,x2%,y2%).|
000018c0  0f a0 19 e7 6d 6f 78 25  3c 78 31 25 84 6d 6f 78  |....mox%<x1%.mox|
000018d0  25 3e 78 32 25 3a 3d a3  0d 0f aa 19 e7 6d 6f 79  |%>x2%:=......moy|
000018e0  25 3c 79 31 25 84 6d 6f  79 25 3e 79 32 25 3a 3d  |%<y1%.moy%>y2%:=|
000018f0  a3 0d 0f b4 06 3d b9 0d  0f be 22 dd f2 63 61 72  |.....=...."..car|
00001900  64 28 74 24 2c 74 61 78  25 2c 74 61 79 25 2c 73  |d(t$,tax%,tay%,s|
00001910  7a 78 25 2c 73 7a 79 25  29 0d 0f c8 06 ef 35 0d  |zx%,szy%).....5.|
00001920  0f d2 08 e6 30 2c 38 0d  0f dc 2a c8 93 c8 90 74  |....0,8...*....t|
00001930  61 78 25 2a 67 25 2c 74  61 79 25 2a 67 25 2c 73  |ax%*g%,tay%*g%,s|
00001940  7a 78 25 2a 65 25 2b 65  25 2c 73 7a 79 25 2a 66  |zx%*e%+e%,szy%*f|
00001950  25 0d 0f e6 09 e6 30 2c  31 31 0d 0f f0 2f c8 93  |%.....0,11.../..|
00001960  c8 90 74 61 78 25 2a 67  25 2b 33 32 30 2c 74 61  |..tax%*g%+320,ta|
00001970  79 25 2a 67 25 2c 73 7a  78 25 2a 65 25 2d 31 36  |y%*g%,szx%*e%-16|
00001980  32 2c 73 7a 79 25 2a 66  25 0d 0f fa 08 e6 30 2c  |2,szy%*f%.....0,|
00001990  30 0d 10 04 2f e7 73 7a  78 25 2a 65 25 2b 65 25  |0.../.szx%*e%+e%|
000019a0  3e 3d 31 32 38 30 20 73  72 78 25 3d 31 32 37 38  |>=1280 srx%=1278|
000019b0  8b 73 72 78 25 3d 73 7a  78 25 2a 65 25 2b 65 25  |.srx%=szx%*e%+e%|
000019c0  0d 10 0e 22 c8 93 74 61  78 25 2a 67 25 2c 74 61  |..."..tax%*g%,ta|
000019d0  79 25 2a 67 25 2c 73 72  78 25 2c 73 7a 79 25 2a  |y%*g%,srx%,szy%*|
000019e0  66 25 0d 10 18 09 e6 30  2c 31 33 0d 10 22 22 ec  |f%.....0,13.."".|
000019f0  74 61 78 25 2a 67 25 2b  66 25 2c 74 61 79 25 2a  |tax%*g%+f%,tay%*|
00001a00  67 25 2b 73 7a 79 25 2a  66 25 2b 66 25 0d 10 2c  |g%+szy%*f%+f%..,|
00001a10  11 f0 30 2c a9 28 74 24  29 2a 67 25 2c 30 0d 10  |..0,.(t$)*g%,0..|
00001a20  36 1f f0 38 35 2c 74 61  78 25 2a 67 25 2c 74 61  |6..85,tax%*g%,ta|
00001a30  79 25 2a 67 25 2b 73 7a  79 25 2a 66 25 0d 10 40  |y%*g%+szy%*f%..@|
00001a40  16 f0 38 31 2c 31 32 38  2b a9 28 74 24 29 2a 67  |..81,128+.(t$)*g|
00001a50  25 2c 30 0d 10 4a 08 e6  30 2c 30 0d 10 54 1c ec  |%,0..J..0,0..T..|
00001a60  74 61 78 25 2a 67 25 2c  74 61 79 25 2a 67 25 2b  |tax%*g%,tay%*g%+|
00001a70  73 7a 79 25 2a 66 25 0d  10 5e 0c f0 31 2c 66 25  |szy%*f%..^..1,f%|
00001a80  2c 66 25 0d 10 68 11 f0  31 2c a9 28 74 24 29 2a  |,f%..h..1,.(t$)*|
00001a90  67 25 2c 30 0d 10 72 0d  f0 31 2c 66 25 2c 2d 66  |g%,0..r..1,f%,-f|
00001aa0  25 0d 10 7c 22 ec 74 61  78 25 2a 67 25 2b 66 25  |%..|".tax%*g%+f%|
00001ab0  2c 74 61 79 25 2a 67 25  2b 73 7a 79 25 2a 66 25  |,tay%*g%+szy%*f%|
00001ac0  2b 34 34 0d 10 86 07 f1  74 24 0d 10 90 0e e3 4a  |+44.....t$.....J|
00001ad0  25 3d 31 b8 73 7a 78 25  0d 10 9a 1d ec 74 61 78  |%=1.szx%.....tax|
00001ae0  25 2a 67 25 2b 4a 25 2a  65 25 2b 65 25 2c 74 61  |%*g%+J%*e%+e%,ta|
00001af0  79 25 2a 67 25 0d 10 a4  10 f0 31 2c 30 2c 73 7a  |y%*g%.....1,0,sz|
00001b00  79 25 2a 66 25 0d 10 ae  05 ed 0d 10 b8 0e e3 4a  |y%*f%..........J|
00001b10  25 3d 31 b8 73 7a 79 25  0d 10 c2 1a ec 74 61 78  |%=1.szy%.....tax|
00001b20  25 2a 67 25 2c 74 61 79  25 2a 67 25 2b 4a 25 2a  |%*g%,tay%*g%+J%*|
00001b30  66 25 0d 10 cc 13 f0 31  2c 73 7a 78 25 2a 65 25  |f%.....1,szx%*e%|
00001b40  2b 65 25 2c 30 0d 10 d6  05 ed 0d 10 e0 06 ef 34  |+e%,0..........4|
00001b50  0d 10 ea 05 87 0d 10 f4  05 e1 0d 10 fe 12 dd f2  |................|
00001b60  69 6e 73 74 72 75 63 74  69 6f 6e 73 0d 11 08 0c  |instructions....|
00001b70  e7 ac a6 2d 33 38 3a e1  0d 11 12 06 ef 37 0d 11  |...-38:......7..|
00001b80  1c 07 c8 97 87 0d 11 26  14 c8 99 22 41 42 43 5f  |.......&..."ABC_|
00001b90  42 6c 61 6e 6b 22 2c 31  35 0d 11 30 15 c8 99 22  |Blank",15..0..."|
00001ba0  41 42 43 5f 43 6f 6c 6f  75 72 22 2c 31 35 0d 11  |ABC_Colour",15..|
00001bb0  3a 08 fb 31 33 36 0d 11  44 05 db 0d 11 4e 08 e6  |:..136..D....N..|
00001bc0  30 2c 35 0d 11 58 17 c8  93 c8 90 32 34 30 2c 30  |0,5..X.....240,0|
00001bd0  2c 31 30 34 30 2c 31 30  32 30 0d 11 62 08 e6 30  |,1040,1020..b..0|
00001be0  2c 30 0d 11 6c 13 c8 93  30 2c 30 2c 31 32 37 38  |,0..l...0,0,1278|
00001bf0  2c 31 30 32 30 0d 11 76  06 fb 30 0d 11 80 08 4b  |,1020..v..0....K|
00001c00  25 3d 30 0d 11 8a 08 59  25 3d 31 0d 11 94 0b e3  |%=0....Y%=1.....|
00001c10  4a 25 3d 31 b8 36 0d 11  9e 06 fb 30 0d 11 a8 08  |J%=1.6.....0....|
00001c20  fb 31 33 36 0d 11 b2 1c  f1 8a 31 2c 59 25 29 74  |.136......1,Y%)t|
00001c30  79 70 24 22 20 22 4a 25  22 20 20 20 20 20 2d 22  |yp$" "J%"     -"|
00001c40  0d 11 bc 08 fb 31 33 33  0d 11 c6 29 f1 8a 31 36  |.....133...)..16|
00001c50  2c 59 25 29 c1 69 6e 66  6f 24 28 4a 25 29 2c a7  |,Y%).info$(J%),.|
00001c60  69 6e 66 6f 24 28 4a 25  29 2c 22 29 22 29 2b 32  |info$(J%),")")+2|
00001c70  29 0d 11 d0 09 59 25 2b  3d 31 0d 11 da 0b e3 58  |)....Y%+=1.....X|
00001c80  25 3d 31 b8 36 0d 11 e4  1b e7 28 70 72 63 25 28  |%=1.6.....(prc%(|
00001c90  4a 25 29 80 32 5e 28 58  25 2d 31 29 29 3e 30 8c  |J%).2^(X%-1))>0.|
00001ca0  0d 11 ee 07 fb 31 34 0d  11 f8 08 fb 31 33 36 0d  |.....14.....136.|
00001cb0  12 02 1d f1 8a 31 2c 59  25 29 22 70 72 61 63 74  |.....1,Y%)"pract|
00001cc0  69 63 65 20 66 22 58 25  22 20 2d 22 0d 12 0c 06  |ice f"X%" -"....|
00001cd0  fb 39 0d 12 16 08 fb 31  33 33 0d 12 20 14 f1 8a  |.9.....133.. ...|
00001ce0  31 36 2c 59 25 29 64 61  74 24 28 4b 25 29 0d 12  |16,Y%)dat$(K%)..|
00001cf0  2a 09 4b 25 2b 3d 31 0d  12 34 09 59 25 2b 3d 31  |*.K%+=1..4.Y%+=1|
00001d00  0d 12 3e 05 cd 0d 12 48  05 ed 0d 12 52 05 ed 0d  |..>....H....R...|
00001d10  12 5c 08 e6 30 2c 30 0d  12 66 13 86 32 34 30 2c  |.\..0,0..f..240,|
00001d20  30 2c 32 34 30 2c 31 30  32 30 0d 12 70 13 c8 99  |0,240,1020..p...|
00001d30  22 41 42 43 5f 50 61 6c  65 74 74 65 22 0d 12 7a  |"ABC_Palette"..z|
00001d40  05 f5 0d 12 84 0b fd a4  6c 65 61 76 65 0d 12 8e  |........leave...|
00001d50  06 ef 37 0d 12 98 1a e7  73 75 6e 25 3e 30 20 73  |..7.....sun%>0 s|
00001d60  75 6e 25 2d 3d 31 8b 73  75 6e 25 3d 31 0d 12 a2  |un%-=1.sun%=1...|
00001d70  09 f2 6d 65 6e 75 0d 12  ac 05 e1 0d 12 b6 0b dd  |..menu..........|
00001d80  f2 61 6d 6f 75 6e 0d 12  c0 0b e3 4a 25 3d 31 b8  |.amoun.....J%=1.|
00001d90  34 0d 12 ca 12 e7 6e 61  6d 65 24 28 4a 25 29 3e  |4.....name$(J%)>|
00001da0  22 22 8c 0d 12 d4 33 c8  99 22 41 42 43 5f 50 72  |""....3.."ABC_Pr|
00001db0  79 6e 74 53 74 72 69 6e  67 22 2c 6e 61 6d 65 24  |yntString",name$|
00001dc0  28 4a 25 29 2c 31 33 32  2c 32 32 38 2d 4a 25 2a  |(J%),132,228-J%*|
00001dd0  31 38 2c 31 2c 37 0d 12  de 36 c8 99 22 41 42 43  |18,1,7...6.."ABC|
00001de0  5f 50 72 79 6e 74 53 74  72 69 6e 67 22 2c 6e 61  |_PryntString",na|
00001df0  6d 65 24 28 4a 25 29 2c  31 33 34 2c 32 32 39 2d  |me$(J%),134,229-|
00001e00  4a 25 2a 31 38 2c 31 2c  4a 25 2b 37 0d 12 e8 2d  |J%*18,1,J%+7...-|
00001e10  c8 99 22 41 42 43 5f 50  72 79 6e 74 53 74 72 69  |.."ABC_PryntStri|
00001e20  6e 67 22 2c 22 3a 22 2c  33 31 32 2c 32 32 38 2d  |ng",":",312,228-|
00001e30  4a 25 2a 31 38 2c 31 2c  37 0d 12 f2 30 c8 99 22  |J%*18,1,7...0.."|
00001e40  41 42 43 5f 50 72 79 6e  74 53 74 72 69 6e 67 22  |ABC_PryntString"|
00001e50  2c 22 3a 22 2c 33 31 34  2c 32 32 39 2d 4a 25 2a  |,":",314,229-J%*|
00001e60  31 38 2c 31 2c 4a 25 2b  37 0d 12 fc 35 c8 99 22  |18,1,J%+7...5.."|
00001e70  41 42 43 5f 50 72 79 6e  74 53 74 72 69 6e 67 22  |ABC_PryntString"|
00001e80  2c c3 28 73 63 72 25 28  4a 25 29 29 2c 33 36 30  |,.(scr%(J%)),360|
00001e90  2c 32 32 38 2d 4a 25 2a  31 38 2c 31 2c 37 0d 13  |,228-J%*18,1,7..|
00001ea0  06 38 c8 99 22 41 42 43  5f 50 72 79 6e 74 53 74  |.8.."ABC_PryntSt|
00001eb0  72 69 6e 67 22 2c c3 28  73 63 72 25 28 4a 25 29  |ring",.(scr%(J%)|
00001ec0  29 2c 33 36 32 2c 32 32  39 2d 4a 25 2a 31 38 2c  |),362,229-J%*18,|
00001ed0  31 2c 4a 25 2b 37 0d 13  10 33 c8 99 22 41 42 43  |1,J%+7...3.."ABC|
00001ee0  5f 50 72 79 6e 74 53 74  72 69 6e 67 22 2c c3 28  |_PryntString",.(|
00001ef0  51 25 29 2b 22 25 22 2c  34 37 30 2c 32 32 38 2d  |Q%)+"%",470,228-|
00001f00  4a 25 2a 31 38 2c 31 2c  37 0d 13 1a 36 c8 99 22  |J%*18,1,7...6.."|
00001f10  41 42 43 5f 50 72 79 6e  74 53 74 72 69 6e 67 22  |ABC_PryntString"|
00001f20  2c c3 28 51 25 29 2b 22  25 22 2c 34 37 32 2c 32  |,.(Q%)+"%",472,2|
00001f30  32 39 2d 4a 25 2a 31 38  2c 31 2c 4a 25 2b 37 0d  |29-J%*18,1,J%+7.|
00001f40  13 24 05 cc 0d 13 2e 31  c8 99 22 41 42 43 5f 50  |.$.....1.."ABC_P|
00001f50  72 79 6e 74 53 74 72 69  6e 67 22 2c c4 38 2c 22  |ryntString",.8,"|
00001f60  2d 22 29 2c 31 33 32 2c  32 32 38 2d 4a 25 2a 31  |-"),132,228-J%*1|
00001f70  38 2c 31 2c 37 0d 13 38  34 c8 99 22 41 42 43 5f  |8,1,7..84.."ABC_|
00001f80  50 72 79 6e 74 53 74 72  69 6e 67 22 2c c4 38 2c  |PryntString",.8,|
00001f90  22 2d 22 29 2c 31 33 34  2c 32 32 39 2d 4a 25 2a  |"-"),134,229-J%*|
00001fa0  31 38 2c 31 2c 4a 25 2b  37 0d 13 42 2d c8 99 22  |18,1,J%+7..B-.."|
00001fb0  41 42 43 5f 50 72 79 6e  74 53 74 72 69 6e 67 22  |ABC_PryntString"|
00001fc0  2c 22 2d 22 2c 33 31 32  2c 32 32 38 2d 4a 25 2a  |,"-",312,228-J%*|
00001fd0  31 38 2c 31 2c 37 0d 13  4c 30 c8 99 22 41 42 43  |18,1,7..L0.."ABC|
00001fe0  5f 50 72 79 6e 74 53 74  72 69 6e 67 22 2c 22 2d  |_PryntString","-|
00001ff0  22 2c 33 31 34 2c 32 32  39 2d 4a 25 2a 31 38 2c  |",314,229-J%*18,|
00002000  31 2c 4a 25 2b 37 0d 13  56 2d c8 99 22 41 42 43  |1,J%+7..V-.."ABC|
00002010  5f 50 72 79 6e 74 53 74  72 69 6e 67 22 2c 22 2d  |_PryntString","-|
00002020  22 2c 33 36 30 2c 32 32  38 2d 4a 25 2a 31 38 2c  |",360,228-J%*18,|
00002030  31 2c 37 0d 13 60 30 c8  99 22 41 42 43 5f 50 72  |1,7..`0.."ABC_Pr|
00002040  79 6e 74 53 74 72 69 6e  67 22 2c 22 2d 22 2c 33  |yntString","-",3|
00002050  36 32 2c 32 32 39 2d 4a  25 2a 31 38 2c 31 2c 4a  |62,229-J%*18,1,J|
00002060  25 2b 37 0d 13 6a 2d c8  99 22 41 42 43 5f 50 72  |%+7..j-.."ABC_Pr|
00002070  79 6e 74 53 74 72 69 6e  67 22 2c 22 2d 22 2c 34  |yntString","-",4|
00002080  37 30 2c 32 32 38 2d 4a  25 2a 31 38 2c 31 2c 37  |70,228-J%*18,1,7|
00002090  0d 13 74 30 c8 99 22 41  42 43 5f 50 72 79 6e 74  |..t0.."ABC_Prynt|
000020a0  53 74 72 69 6e 67 22 2c  22 2d 22 2c 34 37 32 2c  |String","-",472,|
000020b0  32 32 39 2d 4a 25 2a 31  38 2c 31 2c 4a 25 2b 37  |229-J%*18,1,J%+7|
000020c0  0d 13 7e 05 cd 0d 13 88  05 ed 0d 13 92 05 e1 0d  |..~.............|
000020d0  13 9c 10 dd f2 65 6e 74  65 72 6e 61 6d 65 73 0d  |.....enternames.|
000020e0  13 a6 0e 6e 61 6d 65 24  28 29 3d 22 22 0d 13 b0  |...name$()=""...|
000020f0  1e e7 70 6c 79 25 3d 31  3a 6e 61 6d 65 24 28 31  |..ply%=1:name$(1|
00002100  29 3d 61 74 74 65 6e 64  24 3a e1 0d 13 ba 13 c8  |)=attend$:......|
00002110  99 22 41 42 43 5f 42 6c  61 6e 6b 22 2c 33 0d 13  |."ABC_Blank",3..|
00002120  c4 14 c8 99 22 41 42 43  5f 43 6f 6c 6f 75 72 22  |...."ABC_Colour"|
00002130  2c 33 0d 13 ce 09 e6 30  2c 31 32 0d 13 d8 17 c8  |,3.....0,12.....|
00002140  93 c8 90 32 30 30 2c 31  38 30 2c 38 39 36 2c 36  |...200,180,896,6|
00002150  33 32 0d 13 e2 08 e6 30  2c 37 0d 13 ec 15 c8 93  |32.....0,7......|
00002160  32 30 30 2c 31 38 30 2c  38 39 36 2c 36 33 32 0d  |200,180,896,632.|
00002170  13 f6 21 f2 77 69 6e 67  73 28 22 45 4e 54 45 52  |..!.wings("ENTER|
00002180  20 4e 41 4d 45 53 22 2c  31 37 32 2c 31 38 38 29  | NAMES",172,188)|
00002190  0d 14 00 08 fb 31 34 30  0d 14 0a 13 c8 99 22 41  |.....140......"A|
000021a0  42 43 5f 50 61 6c 65 74  74 65 22 0d 14 14 0e e3  |BC_Palette".....|
000021b0  4a 25 3d 31 b8 70 6c 79  25 0d 14 1e 07 fb 31 31  |J%=1.ply%.....11|
000021c0  0d 14 28 27 e7 ac 65 73  63 25 3a f1 8a 33 30 2c  |..('..esc%:..30,|
000021d0  31 32 2b 4a 25 2a 32 29  22 50 4c 41 59 45 52 20  |12+J%*2)"PLAYER |
000021e0  22 4a 25 22 20 3e 22 0d  14 32 07 fb 31 33 0d 14  |"J%" >"..2..13..|
000021f0  3c 18 f2 69 6e 70 75 74  28 38 2c 34 32 2c 31 32  |<..input(8,42,12|
00002200  2b 4a 25 2a 32 29 0d 14  46 06 ef 37 0d 14 50 11  |+J%*2)..F..7..P.|
00002210  e7 69 24 3d 22 22 80 ac  65 73 63 25 8c 0d 14 5a  |.i$=""..esc%...Z|
00002220  16 69 24 3d 22 50 6c 61  79 65 72 20 22 2b c3 28  |.i$="Player "+.(|
00002230  4a 25 29 0d 14 64 13 f1  8a 34 32 2c 31 32 2b 4a  |J%)..d...42,12+J|
00002240  25 2a 32 29 69 24 0d 14  6e 05 cd 0d 14 78 10 6e  |%*2)i$..n....x.n|
00002250  61 6d 65 24 28 4a 25 29  3d 69 24 0d 14 82 05 ed  |ame$(J%)=i$.....|
00002260  0d 14 8c 15 e7 ac 65 73  63 25 3a f2 64 65 6c 61  |......esc%:.dela|
00002270  79 28 35 30 29 0d 14 96  05 e1 0d 14 a0 1b dd a4  |y(50)...........|
00002280  69 6e 69 74 69 61 6c 63  6f 6d 70 72 65 73 73 65  |initialcompresse|
00002290  64 28 73 24 29 0d 14 aa  0f 68 25 3d 8e 28 66 24  |d(s$)....h%=.(f$|
000022a0  2b 73 24 29 0d 14 b4 0d  6c 65 6e 25 3d a2 23 68  |+s$)....len%=.#h|
000022b0  25 0d 14 be 08 d9 23 68  25 0d 14 c8 0b de 7a 25  |%.....#h%.....z%|
000022c0  6c 65 6e 25 0d 14 d2 1d  ff 22 4c 4f 41 44 20 22  |len%....."LOAD "|
000022d0  2b 66 24 2b 73 24 2b 22  20 22 2b c3 7e 28 7a 25  |+f$+s$+" "+.~(z%|
000022e0  29 0d 14 dc 07 3d 7a 25  0d 14 e6 0c dd f2 63 6f  |)....=z%......co|
000022f0  6c 62 6f 78 0d 14 f0 1f  e7 70 6c 79 25 3e 31 84  |lbox.....ply%>1.|
00002300  73 75 62 25 3e 30 84 61  74 74 65 6e 64 24 3d 22  |sub%>0.attend$="|
00002310  22 3a e1 0d 14 fa 11 e7  51 25 3e 39 39 3a 6e 6f  |":......Q%>99:no|
00002320  77 25 3d 33 0d 15 04 18  e7 51 25 3e 34 39 80 51  |w%=3.....Q%>49.Q|
00002330  25 3c 31 30 30 3a 6e 6f  77 25 3d 32 0d 15 0e 11  |%<100:now%=2....|
00002340  e7 51 25 3c 35 30 3a 6e  6f 77 25 3d 31 0d 15 18  |.Q%<50:now%=1...|
00002350  0b c8 8e 6e 6f 77 25 ca  0d 15 22 08 c9 31 2c 32  |...now%..."..1,2|
00002360  0d 15 2c 22 e7 72 65 6d  25 3c 6e 6f 77 25 3a 61  |..,".rem%<now%:a|
00002370  24 3d 22 63 6f 6c 6f 75  72 20 63 68 61 6e 67 65  |$="colour change|
00002380  64 22 0d 15 36 1d e7 6e  6f 77 25 3d 72 65 6d 25  |d"..6..now%=rem%|
00002390  3a 61 24 3d 22 6e 6f 20  63 68 61 6e 67 65 22 0d  |:a$="no change".|
000023a0  15 40 1d e7 72 65 6d 25  3e 6e 6f 77 25 3a 61 24  |.@..rem%>now%:a$|
000023b0  3d 22 74 72 79 20 61 67  61 69 6e 22 0d 15 4a 06  |="try again"..J.|
000023c0  c9 33 0d 15 54 1f e7 72  65 6d 25 3c 33 3a 61 24  |.3..T..rem%<3:a$|
000023d0  3d 22 63 6f 6c 6f 75 72  20 63 68 61 6e 67 65 64  |="colour changed|
000023e0  22 0d 15 5e 25 e7 72 65  6d 25 3e 32 80 72 65 6d  |"..^%.rem%>2.rem|
000023f0  25 3c 31 31 3a 61 24 3d  22 74 72 79 20 66 6f 72  |%<11:a$="try for|
00002400  20 62 6c 75 65 22 0d 15  68 16 e7 72 65 6d 25 3e  | blue"..h..rem%>|
00002410  31 30 3a 61 24 3d 22 62  6c 75 65 22 0d 15 72 05  |10:a$="blue"..r.|
00002420  cb 0d 15 7c 3d c8 99 22  41 42 43 5f 50 72 79 6e  |...|=.."ABC_Pryn|
00002430  74 53 74 72 69 6e 67 22  2c 74 79 70 24 2b 22 20  |tString",typ$+" |
00002440  22 2b c3 28 67 72 64 25  29 2b 22 20 20 20 22 2b  |"+.(grd%)+"   "+|
00002450  61 24 2c 31 33 32 2c 31  33 32 2c 31 2c 37 0d 15  |a$,132,132,1,7..|
00002460  86 3e c8 99 22 41 42 43  5f 50 72 79 6e 74 53 74  |.>.."ABC_PryntSt|
00002470  72 69 6e 67 22 2c 74 79  70 24 2b 22 20 22 2b c3  |ring",typ$+" "+.|
00002480  28 67 72 64 25 29 2b 22  20 20 20 22 2b 61 24 2c  |(grd%)+"   "+a$,|
00002490  31 33 34 2c 31 33 33 2c  31 2c 31 34 0d 15 90 05  |134,133,1,14....|
000024a0  e1 0d 15 9a 0d dd f2 75  70 67 72 61 64 65 0d 15  |.......upgrade..|
000024b0  a4 18 72 65 6d 25 3d 61  74 74 25 28 67 6d 65 25  |..rem%=att%(gme%|
000024c0  2c 69 6e 78 25 29 0d 15  ae 2f e7 51 25 3e 39 39  |,inx%).../.Q%>99|
000024d0  80 61 74 74 25 28 67 6d  65 25 2c 69 6e 78 25 29  |.att%(gme%,inx%)|
000024e0  3e 32 3a 61 74 74 25 28  67 6d 65 25 2c 69 6e 78  |>2:att%(gme%,inx|
000024f0  25 29 2b 3d 31 0d 15 b8  2e e7 51 25 3e 39 39 80  |%)+=1.....Q%>99.|
00002500  61 74 74 25 28 67 6d 65  25 2c 69 6e 78 25 29 3c  |att%(gme%,inx%)<|
00002510  33 3a 61 74 74 25 28 67  6d 65 25 2c 69 6e 78 25  |3:att%(gme%,inx%|
00002520  29 3d 33 0d 15 c2 2e e7  51 25 3e 34 39 80 61 74  |)=3.....Q%>49.at|
00002530  74 25 28 67 6d 65 25 2c  69 6e 78 25 29 3c 32 3a  |t%(gme%,inx%)<2:|
00002540  61 74 74 25 28 67 6d 65  25 2c 69 6e 78 25 29 3d  |att%(gme%,inx%)=|
00002550  32 0d 15 cc 28 e7 61 74  74 25 28 67 6d 65 25 2c  |2...(.att%(gme%,|
00002560  69 6e 78 25 29 3d 30 3a  61 74 74 25 28 67 6d 65  |inx%)=0:att%(gme|
00002570  25 2c 69 6e 78 25 29 3d  31 0d 15 d6 05 e1 0d 15  |%,inx%)=1.......|
00002580  e0 18 dd a4 76 61 6c 69  64 61 74 65 6e 75 6d 62  |....validatenumb|
00002590  65 72 28 61 24 29 0d 15  ea 0d e7 61 24 3d 22 22  |er(a$).....a$=""|
000025a0  3a 3d a3 0d 15 f4 08 4b  25 3d b9 0d 15 fe 0f e3  |:=.....K%=......|
000025b0  4a 25 3d 31 b8 a9 28 61  24 29 0d 16 08 25 e7 c1  |J%=1..(a$)...%..|
000025c0  61 24 2c 4a 25 2c 31 29  3c 22 30 22 84 c1 61 24  |a$,J%,1)<"0"..a$|
000025d0  2c 4a 25 2c 31 29 3e 22  39 22 3a 4b 25 3d a3 0d  |,J%,1)>"9":K%=..|
000025e0  16 12 05 ed 0d 16 1c 07  3d 4b 25 0d 16 26 0f dd  |........=K%..&..|
000025f0  f2 6c 6f 61 64 77 6f 72  64 73 0d 16 30 0e ea 63  |.loadwords..0..c|
00002600  6f 64 25 2c 73 74 72 25  0d 16 3a 0c 68 25 3d 8e  |od%,str%..:.h%=.|
00002610  28 65 24 29 0d 16 44 0d  65 6e 64 25 3d a2 23 68  |(e$)..D.end%=.#h|
00002620  25 0d 16 4e 08 d9 23 68  25 0d 16 58 2d de 77 72  |%..N..#h%..X-.wr|
00002630  64 24 28 32 35 36 29 2c  6b 6e 64 25 28 32 35 36  |d$(256),knd%(256|
00002640  29 2c 63 6f 64 25 35 31  32 2c 73 74 72 25 65 6e  |),cod%512,str%en|
00002650  64 25 2b 26 31 30 0d 16  62 0b 6c 69 6e 6b 3d 31  |d%+&10..b.link=1|
00002660  34 0d 16 6c 09 70 63 3d  31 35 0d 16 76 0d e3 41  |4..l.pc=15..v..A|
00002670  25 3d 30 b8 32 88 32 0d  16 80 0b 50 25 3d 63 6f  |%=0.2.2....P%=co|
00002680  64 25 0d 16 8a 0a 5b 4f  50 54 41 25 0d 16 94 2e  |d%....[OPTA%....|
00002690  4c 44 52 20 52 30 2c 77  6f 72 64 61 64 64 72 3a  |LDR R0,wordaddr:|
000026a0  41 44 52 20 52 31 2c 77  6f 72 64 62 75 66 66 3a  |ADR R1,wordbuff:|
000026b0  4d 4f 56 20 52 32 2c 23  26 30 0d 16 9e 0d 2e 77  |MOV R2,#&0.....w|
000026c0  6f 72 64 72 65 61 64 0d  16 a8 2f 4c 44 52 42 20  |ordread.../LDRB |
000026d0  52 33 2c 5b 52 30 5d 2c  23 26 31 3a 43 4d 50 20  |R3,[R0],#&1:CMP |
000026e0  52 33 2c 23 26 32 30 3a  42 4c 54 20 77 6f 72 64  |R3,#&20:BLT word|
000026f0  66 69 6e 69 73 68 0d 16  b2 3d 43 4d 50 20 52 32  |finish...=CMP R2|
00002700  2c 23 26 46 46 3a 53 54  52 4c 54 42 20 52 33 2c  |,#&FF:STRLTB R3,|
00002710  5b 52 31 5d 2c 23 26 31  3a 41 44 44 20 52 32 2c  |[R1],#&1:ADD R2,|
00002720  52 32 2c 23 26 31 3a 42  41 4c 20 77 6f 72 64 72  |R2,#&1:BAL wordr|
00002730  65 61 64 0d 16 bc 0f 2e  77 6f 72 64 66 69 6e 69  |ead.....wordfini|
00002740  73 68 0d 16 c6 37 4d 4f  56 20 52 33 2c 23 26 44  |sh...7MOV R3,#&D|
00002750  3a 53 54 52 42 20 52 33  2c 5b 52 31 5d 3a 53 54  |:STRB R3,[R1]:ST|
00002760  52 20 52 30 2c 77 6f 72  64 61 64 64 72 3a 4d 4f  |R R0,wordaddr:MO|
00002770  56 20 70 63 2c 6c 69 6e  6b 0d 16 d0 0d 2e 77 6f  |V pc,link.....wo|
00002780  72 64 61 64 64 72 0d 16  da 0d 45 51 55 44 20 73  |rdaddr....EQUD s|
00002790  74 72 25 0d 16 e4 0d 2e  77 6f 72 64 62 75 66 66  |tr%.....wordbuff|
000027a0  0d 16 ee 05 5d 0d 16 f8  05 ed 0d 17 02 1c ff 22  |....].........."|
000027b0  4c 4f 41 44 20 22 2b 65  24 2b 22 20 22 2b c3 7e  |LOAD "+e$+" "+.~|
000027c0  28 73 74 72 25 29 0d 17  0c 0e 65 6e 64 25 2b 3d  |(str%)....end%+=|
000027d0  73 74 72 25 0d 17 16 0a  71 75 65 25 3d 31 0d 17  |str%....que%=1..|
000027e0  20 1d c8 95 71 75 65 25  3c 32 35 36 80 21 77 6f  | ...que%<256.!wo|
000027f0  72 64 61 64 64 72 3c 65  6e 64 25 0d 17 2a 09 d6  |rdaddr<end%..*..|
00002800  63 6f 64 25 0d 17 34 10  61 24 3d 24 77 6f 72 64  |cod%..4.a$=$word|
00002810  62 75 66 66 0d 17 3e 10  c8 95 c0 61 24 2c 31 29  |buff..>....a$,1)|
00002820  3d 22 20 22 0d 17 48 0d  61 24 3d c1 61 24 2c 32  |=" "..H.a$=.a$,2|
00002830  29 0d 17 52 05 ce 0d 17  5c 0e c8 95 c2 61 24 29  |)..R....\....a$)|
00002840  3d 22 20 22 0d 17 66 0b  61 24 3d c0 61 24 29 0d  |=" "..f.a$=.a$).|
00002850  17 70 05 ce 0d 17 7a 0a  f2 77 6f 72 64 73 0d 17  |.p....z..words..|
00002860  84 05 ce 0d 17 8e 05 e1  0d 17 98 0b dd f2 77 6f  |..............wo|
00002870  72 64 73 0d 17 a2 17 e7  a7 61 24 2c 22 24 22 29  |rds......a$,"$")|
00002880  3e 30 84 61 24 3d 22 22  3a e1 0d 17 ac 12 e7 c1  |>0.a$="":.......|
00002890  61 24 2c 32 2c 31 29 3d  22 2c 22 8c 0d 17 b6 17  |a$,2,1)=",".....|
000028a0  6b 6e 64 25 28 71 75 65  25 29 3d 97 28 61 24 29  |knd%(que%)=.(a$)|
000028b0  2d 34 38 0d 17 c0 1e 77  72 64 24 28 71 75 65 25  |-48....wrd$(que%|
000028c0  29 3d c1 61 24 2c a7 61  24 2c 22 2c 22 29 2b 31  |)=.a$,.a$,",")+1|
000028d0  29 0d 17 ca 05 cc 0d 17  d4 11 77 72 64 24 28 71  |).........wrd$(q|
000028e0  75 65 25 29 3d 61 24 0d  17 de 05 cd 0d 17 e8 0b  |ue%)=a$.........|
000028f0  71 75 65 25 2b 3d 31 0d  17 f2 05 e1 0d 17 fc 0c  |que%+=1.........|
00002900  dd a4 63 68 6f 6f 73 65  0d 18 06 0c e7 73 75 62  |..choose.....sub|
00002910  25 3d 30 8c 0d 18 10 05  f5 0d 18 1a 0d 58 25 3d  |%=0..........X%=|
00002920  b3 28 32 35 36 29 0d 18  24 1a fd 77 72 64 24 28  |.(256)..$..wrd$(|
00002930  58 25 29 3e 22 22 80 20  58 25 3c 3e 70 72 65 25  |X%)>"". X%<>pre%|
00002940  0d 18 2e 05 cc 0d 18 38  05 f5 0d 18 42 0d 58 25  |.......8....B.X%|
00002950  3d b3 28 32 35 36 29 0d  18 4c 29 fd 77 72 64 24  |=.(256)..L).wrd$|
00002960  28 58 25 29 3e 22 22 80  20 6b 6e 64 25 28 58 25  |(X%)>"". knd%(X%|
00002970  29 3d 73 75 62 25 80 20  58 25 3c 3e 70 72 65 25  |)=sub%. X%<>pre%|
00002980  0d 18 56 05 cd 0d 18 60  0d 3d 77 72 64 24 28 58  |..V....`.=wrd$(X|
00002990  25 29 0d 18 6a 12 dd a4  63 6f 75 6e 74 28 61 24  |%)..j...count(a$|
000029a0  2c 74 24 29 0d 18 74 0a  63 6e 74 25 3d 30 0d 18  |,t$)..t.cnt%=0..|
000029b0  7e 0f e3 57 25 3d 31 b8  a9 28 61 24 29 0d 18 88  |~..W%=1..(a$)...|
000029c0  19 e7 c1 61 24 2c 57 25  2c 31 29 3d 74 24 3a 63  |...a$,W%,1)=t$:c|
000029d0  6e 74 25 2b 3d 31 0d 18  92 05 ed 0d 18 9c 09 3d  |nt%+=1.........=|
000029e0  63 6e 74 25 0d 18 a6 12  dd a4 65 78 74 72 61 63  |cnt%......extrac|
000029f0  74 28 f8 61 24 29 0d 18  b0 16 7a 24 3d c0 61 24  |t(.a$)....z$=.a$|
00002a00  2c a7 61 24 2c 22 2c 22  29 2d 31 29 0d 18 ba 16  |,.a$,",")-1)....|
00002a10  61 24 3d c1 61 24 2c a7  61 24 2c 22 2c 22 29 2b  |a$=.a$,.a$,",")+|
00002a20  31 29 0d 18 c4 07 3d 7a  24 0d 18 ce 0f dd f2 66  |1)....=z$......f|
00002a30  69 72 65 77 6f 72 6b 73  0d 18 d8 0c e7 51 25 3c  |ireworks.....Q%<|
00002a40  38 30 3a e1 0d 18 e2 13  c8 99 22 41 42 43 5f 42  |80:......."ABC_B|
00002a50  6c 61 6e 6b 22 2c 37 0d  18 ec 14 c8 99 22 41 42  |lank",7......"AB|
00002a60  43 5f 43 6f 6c 6f 75 72  22 2c 37 0d 18 f6 23 f2  |C_Colour",7...#.|
00002a70  6e 6f 69 73 65 28 22 45  6e 64 22 2c 34 2c 26 31  |noise("End",4,&1|
00002a80  37 46 2c 26 31 30 30 30  2c 26 31 30 30 29 0d 19  |7F,&1000,&100)..|
00002a90  00 1f f2 77 69 6e 67 73  28 22 47 41 4d 45 20 4f  |...wings("GAME O|
00002aa0  56 45 52 22 2c 31 37 32  2c 32 33 30 29 0d 19 0a  |VER",172,230)...|
00002ab0  13 c8 99 22 41 42 43 5f  50 61 6c 65 74 74 65 22  |..."ABC_Palette"|
00002ac0  0d 19 14 0c f2 70 61 74  74 65 72 6e 0d 19 1e 05  |.....pattern....|
00002ad0  e1 0d 19 28 17 dd f2 67  72 61 70 68 69 63 73 28  |...(...graphics(|
00002ae0  7a 24 2c 62 63 6c 25 29  0d 19 32 0b e7 ac a6 2d  |z$,bcl%)..2....-|
00002af0  32 3a e1 0d 19 3c 18 e7  a6 2d 32 33 3a f2 64 69  |2:...<...-23:.di|
00002b00  73 70 6c 61 79 28 32 33  2c 31 29 0d 19 46 1a e7  |splay(23,1)..F..|
00002b10  a6 2d 31 31 39 3a f2 64  69 73 70 6c 61 79 28 31  |.-119:.display(1|
00002b20  31 39 2c 32 29 0d 19 50  1a e7 a6 2d 31 32 30 3a  |19,2)..P...-120:|
00002b30  f2 64 69 73 70 6c 61 79  28 31 32 30 2c 33 29 0d  |.display(120,3).|
00002b40  19 5a 05 e1 0d 19 64 18  dd f2 64 69 73 70 6c 61  |.Z....d...displa|
00002b50  79 28 6b 65 65 25 2c 67  72 61 25 29 0d 19 6e 0d  |y(kee%,gra%)..n.|
00002b60  70 69 78 25 3d 67 72 61  25 0d 19 78 07 c8 97 87  |pix%=gra%..x....|
00002b70  0d 19 82 06 ef 37 0d 19  8c 16 c8 99 22 41 42 43  |.....7......"ABC|
00002b80  5f 42 6c 61 6e 6b 22 2c  62 63 6c 25 0d 19 96 17  |_Blank",bcl%....|
00002b90  c8 99 22 41 42 43 5f 43  6f 6c 6f 75 72 22 2c 62  |.."ABC_Colour",b|
00002ba0  63 6c 25 0d 19 a0 0d fb  31 32 38 2b 62 63 6c 25  |cl%.....128+bcl%|
00002bb0  0d 19 aa 06 fb 30 0d 19  b4 2d f2 63 65 6e 74 28  |.....0...-.cent(|
00002bc0  22 54 68 69 73 20 67 72  61 70 68 69 63 20 75 73  |"This graphic us|
00002bd0  65 64 20 66 6f 72 20 74  68 65 20 22 2b 7a 24 2c  |ed for the "+z$,|
00002be0  31 30 29 0d 19 be 2c c8  99 22 4f 53 5f 53 70 72  |10)...,.."OS_Spr|
00002bf0  69 74 65 4f 70 22 2c 32  39 36 2c 62 25 2c 22 7a  |iteOp",296,b%,"z|
00002c00  22 2b c3 28 70 69 78 25  29 b8 2c 2c 2c 41 25 0d  |"+.(pix%).,,,A%.|
00002c10  19 c8 2e c8 99 22 41 42  43 5f 53 70 72 69 74 65  |....."ABC_Sprite|
00002c20  22 2c 62 25 2c 22 7a 22  2b c3 28 70 69 78 25 29  |",b%,"z"+.(pix%)|
00002c30  2c 33 32 30 2d 41 25 81  32 2c 31 34 38 0d 19 d2  |,320-A%.2,148...|
00002c40  13 c8 99 22 41 42 43 5f  50 61 6c 65 74 74 65 22  |..."ABC_Palette"|
00002c50  0d 19 dc 05 f5 0d 19 e6  0c fd ac a6 2d 6b 65 65  |............-kee|
00002c60  25 0d 19 f0 1a e7 73 75  6e 25 3d 30 20 73 75 6e  |%.....sun%=0 sun|
00002c70  25 3d 31 8b 73 75 6e 25  2d 3d 31 0d 19 fa 09 f2  |%=1.sun%-=1.....|
00002c80  6d 65 6e 75 0d 1a 04 05  e1 0d 1a 0e 1c dd f2 72  |menu...........r|
00002c90  65 76 65 61 6c 28 62 63  6c 25 2c 66 6f 72 25 2c  |eveal(bcl%,for%,|
00002ca0  6d 6f 73 25 29 0d 1a 18  0c e7 ac a6 2d 35 32 3a  |mos%).......-52:|
00002cb0  e1 0d 1a 22 07 c8 97 87  0d 1a 2c 06 ef 37 0d 1a  |..."......,..7..|
00002cc0  36 21 c8 99 22 41 42 43  5f 54 72 61 6e 73 66 65  |6!.."ABC_Transfe|
00002cd0  72 22 2c 30 2c 31 33 36  2c 36 34 30 2c 31 38 0d  |r",0,136,640,18.|
00002ce0  1a 40 12 74 24 3d 69 6e  66 6f 24 28 67 72 64 25  |.@.t$=info$(grd%|
00002cf0  29 0d 1a 4a 1d e7 ac 6e  69 67 25 3a 74 24 3d c1  |)..J...nig%:t$=.|
00002d00  74 24 2c a7 74 24 2c 22  29 22 29 2b 32 29 0d 1a  |t$,.t$,")")+2)..|
00002d10  54 06 ef 35 0d 1a 5e 0b  e6 30 2c 62 63 6c 25 0d  |T..5..^..0,bcl%.|
00002d20  1a 68 06 c8 96 0d 1a 72  15 c8 93 c8 90 30 2c 34  |.h.....r.....0,4|
00002d30  37 36 2c 31 32 37 38 2c  36 38 0d 1a 7c 0b e6 30  |76,1278,68..|..0|
00002d40  2c 66 6f 72 25 0d 1a 86  13 c8 93 30 2c 34 37 36  |,for%......0,476|
00002d50  2c 31 32 37 38 2c 36 38  0d 1a 90 08 e6 30 2c 30  |,1278,68.....0,0|
00002d60  0d 1a 9a 14 ec 36 34 30  2d a9 28 74 24 29 2a 38  |.....640-.(t$)*8|
00002d70  2c 35 32 34 0d 1a a4 07  f1 74 24 0d 1a ae 06 ef  |,524.....t$.....|
00002d80  34 0d 1a b8 05 87 0d 1a  c2 05 f5 0d 1a cc 0b fd  |4...............|
00002d90  a4 6c 65 61 76 65 0d 1a  d6 13 c8 99 22 41 42 43  |.leave......"ABC|
00002da0  5f 52 65 73 74 6f 72 65  22 0d 1a e0 0b c8 8e 6d  |_Restore"......m|
00002db0  6f 73 25 ca 0d 1a ea 0e  c9 31 3a f2 6d 6f 75 73  |os%......1:.mous|
00002dc0  65 31 0d 1a f4 0e c9 32  3a f2 6d 6f 75 73 65 32  |e1.....2:.mouse2|
00002dd0  0d 1a fe 05 cb 0d 1b 08  05 e1 0d 1b 12 28 dd f2  |.............(..|
00002de0  72 65 63 28 62 63 6c 25  2c 6d 63 6c 25 2c 73 73  |rec(bcl%,mcl%,ss|
00002df0  78 25 2c 73 73 79 25 2c  78 77 64 25 2c 79 68 74  |x%,ssy%,xwd%,yht|
00002e00  25 29 0d 1b 1c 0b e6 30  2c 6d 63 6c 25 0d 1b 26  |%).....0,mcl%..&|
00002e10  1b c8 93 c8 90 73 73 78  25 2c 73 73 79 25 2c 78  |.....ssx%,ssy%,x|
00002e20  77 64 25 2c 79 68 74 25  0d 1b 30 0b e3 4a 25 3d  |wd%,yht%..0..J%=|
00002e30  30 b8 33 0d 1b 3a 0b e6  30 2c 62 63 6c 25 0d 1b  |0.3..:..0,bcl%..|
00002e40  44 23 c8 93 73 73 78 25  2b 4a 25 2a 34 2c 73 73  |D#..ssx%+J%*4,ss|
00002e50  79 25 2b 4a 25 2a 34 2c  78 77 64 25 2c 79 68 74  |y%+J%*4,xwd%,yht|
00002e60  25 0d 1b 4e 27 c8 93 73  73 78 25 2b 4a 25 2a 34  |%..N'..ssx%+J%*4|
00002e70  2b 32 2c 73 73 79 25 2b  4a 25 2a 34 2c 78 77 64  |+2,ssy%+J%*4,xwd|
00002e80  25 2d 34 2c 79 68 74 25  0d 1b 58 0b 78 77 64 25  |%-4,yht%..X.xwd%|
00002e90  2d 3d 38 0d 1b 62 0b 79  68 74 25 2d 3d 38 0d 1b  |-=8..b.yht%-=8..|
00002ea0  6c 05 ed 0d 1b 76 05 e1  0d 1b 80 1b dd f2 6e 75  |l....v........nu|
00002eb0  6d 62 65 72 73 28 78 24  2c 78 73 63 25 2c 79 73  |mbers(x$,xsc%,ys|
00002ec0  63 25 29 0d 1b 8a 0f e3  4a 25 3d 31 b8 a9 28 78  |c%).....J%=1..(x|
00002ed0  24 29 0d 1b 94 29 c8 99  22 41 42 43 5f 53 70 72  |$)...).."ABC_Spr|
00002ee0  69 74 65 22 2c 62 25 2c  c1 78 24 2c 4a 25 2c 31  |ite",b%,.x$,J%,1|
00002ef0  29 2c 78 73 63 25 2c 79  73 63 25 0d 1b 9e 0c 78  |),xsc%,ysc%....x|
00002f00  73 63 25 2b 3d 33 32 0d  1b a8 05 ed 0d 1b b2 05  |sc%+=32.........|
00002f10  e1 0d 1b bc 0c dd f2 72  61 6e 64 6f 6d 0d 1b c6  |.......random...|
00002f20  07 c8 97 87 0d 1b d0 13  c8 99 22 41 42 43 5f 42  |.........."ABC_B|
00002f30  6c 61 6e 6b 22 2c 33 0d  1b da 14 c8 99 22 41 42  |lank",3......"AB|
00002f40  43 5f 43 6f 6c 6f 75 72  22 2c 33 0d 1b e4 09 e6  |C_Colour",3.....|
00002f50  30 2c 31 32 0d 1b ee 17  c8 93 c8 90 32 30 30 2c  |0,12........200,|
00002f60  31 38 30 2c 38 39 36 2c  36 33 32 0d 1b f8 08 e6  |180,896,632.....|
00002f70  30 2c 37 0d 1c 02 15 c8  93 32 30 30 2c 31 38 30  |0,7......200,180|
00002f80  2c 38 39 36 2c 36 33 32  0d 1c 0c 22 f2 77 69 6e  |,896,632...".win|
00002f90  67 73 28 22 45 4e 54 45  52 20 4e 55 4d 42 45 52  |gs("ENTER NUMBER|
00002fa0  22 2c 31 37 32 2c 31 38  38 29 0d 1c 16 24 c8 99  |",172,188)...$..|
00002fb0  22 41 42 43 5f 53 70 72  69 74 65 22 2c 62 25 2c  |"ABC_Sprite",b%,|
00002fc0  22 73 6d 61 6c 6c 22 2c  34 34 30 2c 39 36 0d 1c  |"small",440,96..|
00002fd0  20 24 c8 99 22 41 42 43  5f 53 70 72 69 74 65 22  | $.."ABC_Sprite"|
00002fe0  2c 62 25 2c 22 73 6d 61  6c 6c 22 2c 31 32 30 2c  |,b%,"small",120,|
00002ff0  39 36 0d 1c 2a 08 fb 31  34 30 0d 1c 34 05 f5 0d  |96..*..140..4...|
00003000  1c 3e 06 fb 37 0d 1c 48  2f f2 63 65 6e 74 28 22  |.>..7..H/.cent("|
00003010  45 6e 74 65 72 20 6e 75  6d 62 65 72 20 62 65 74  |Enter number bet|
00003020  77 65 65 6e 20 31 20 61  6e 64 20 39 39 39 39 22  |ween 1 and 9999"|
00003030  2c 31 34 29 0d 1c 52 18  f2 63 65 6e 74 28 22 3e  |,14)..R..cent(">|
00003040  20 20 20 20 20 20 3c 22  2c 31 36 29 0d 1c 5c 07  |      <",16)..\.|
00003050  fb 31 30 0d 1c 66 0a 65  73 63 25 3d a3 0d 1c 70  |.10..f.esc%=...p|
00003060  13 c8 99 22 41 42 43 5f  50 61 6c 65 74 74 65 22  |..."ABC_Palette"|
00003070  0d 1c 7a 13 f2 69 6e 70  75 74 28 34 2c 33 38 2c  |..z..input(4,38,|
00003080  31 36 29 0d 1c 84 1a 4a  25 3d a4 76 61 6c 69 64  |16)....J%=.valid|
00003090  61 74 65 6e 75 6d 62 65  72 28 69 24 29 0d 1c 8e  |atenumber(i$)...|
000030a0  09 e7 ac 4a 25 8c 0d 1c  98 06 ef 37 0d 1c a2 07  |...J%......7....|
000030b0  fb 31 31 0d 1c ac 28 f2  63 65 6e 74 28 22 4e 6f  |.11...(.cent("No|
000030c0  74 20 61 20 6e 75 6d 62  65 72 20 2d 20 74 72 79  |t a number - try|
000030d0  20 61 67 61 69 6e 22 2c  31 38 29 0d 1c b6 0f f2  | again",18).....|
000030e0  64 65 6c 61 79 28 31 30  30 29 0d 1c c0 16 f2 63  |delay(100).....c|
000030f0  65 6e 74 28 c4 32 35 2c  22 20 22 29 2c 31 38 29  |ent(.25," "),18)|
00003100  0d 1c ca 0a 2a 46 58 31  32 36 0d 1c d4 05 cd 0d  |....*FX126......|
00003110  1c de 07 fd 4a 25 0d 1c  e8 0e 73 65 64 25 3d a0  |....J%....sed%=.|
00003120  28 69 24 29 0d 1c f2 0f  52 25 3d b3 28 2d 73 65  |(i$)....R%=.(-se|
00003130  64 25 29 0d 1c fc 05 e1  0d 1d 06 0d dd f2 73 70  |d%)...........sp|
00003140  61 63 65 6f 72 0d 1d 10  14 61 24 3d 22 70 72 65  |aceor....a$="pre|
00003150  73 73 20 73 70 61 63 65  22 0d 1d 1a 14 78 73 63  |ss space"....xsc|
00003160  25 3d 33 32 30 2d a9 28  61 24 29 2a 38 0d 1d 24  |%=320-.(a$)*8..$|
00003170  26 c8 99 22 41 42 43 5f  50 72 79 6e 74 53 74 72  |&.."ABC_PryntStr|
00003180  69 6e 67 22 2c 61 24 2c  78 73 63 25 2c 36 37 2c  |ing",a$,xsc%,67,|
00003190  31 2c 37 0d 1d 2e 28 c8  99 22 41 42 43 5f 50 72  |1,7...(.."ABC_Pr|
000031a0  79 6e 74 53 74 72 69 6e  67 22 2c 61 24 2c 78 73  |yntString",a$,xs|
000031b0  63 25 2b 32 2c 36 38 2c  31 2c 35 0d 1d 38 0b 61  |c%+2,68,1,5..8.a|
000031c0  24 3d 22 6f 72 22 0d 1d  42 14 78 73 63 25 3d 33  |$="or"..B.xsc%=3|
000031d0  32 30 2d a9 28 61 24 29  2a 38 0d 1d 4c 26 c8 99  |20-.(a$)*8..L&..|
000031e0  22 41 42 43 5f 50 72 79  6e 74 53 74 72 69 6e 67  |"ABC_PryntString|
000031f0  22 2c 61 24 2c 78 73 63  25 2c 34 39 2c 31 2c 37  |",a$,xsc%,49,1,7|
00003200  0d 1d 56 28 c8 99 22 41  42 43 5f 50 72 79 6e 74  |..V(.."ABC_Prynt|
00003210  53 74 72 69 6e 67 22 2c  61 24 2c 78 73 63 25 2b  |String",a$,xsc%+|
00003220  32 2c 35 30 2c 31 2c 35  0d 1d 60 14 61 24 3d 22  |2,50,1,5..`.a$="|
00003230  63 6c 69 63 6b 20 6d 6f  75 73 65 22 0d 1d 6a 14  |click mouse"..j.|
00003240  78 73 63 25 3d 33 32 30  2d a9 28 61 24 29 2a 38  |xsc%=320-.(a$)*8|
00003250  0d 1d 74 26 c8 99 22 41  42 43 5f 50 72 79 6e 74  |..t&.."ABC_Prynt|
00003260  53 74 72 69 6e 67 22 2c  61 24 2c 78 73 63 25 2c  |String",a$,xsc%,|
00003270  33 31 2c 31 2c 37 0d 1d  7e 28 c8 99 22 41 42 43  |31,1,7..~(.."ABC|
00003280  5f 50 72 79 6e 74 53 74  72 69 6e 67 22 2c 61 24  |_PryntString",a$|
00003290  2c 78 73 63 25 2b 32 2c  33 32 2c 31 2c 35 0d 1d  |,xsc%+2,32,1,5..|
000032a0  88 05 e1 0d 1d 92 0b dd  f2 65 6e 74 72 79 0d 1d  |.........entry..|
000032b0  9c 0c e7 ac 74 61 62 25  3a e1 0d 1d a6 3d c8 99  |....tab%:....=..|
000032c0  22 41 42 43 5f 50 72 79  6e 74 53 74 72 69 6e 67  |"ABC_PryntString|
000032d0  22 2c 22 68 69 67 68 20  73 63 6f 72 65 20 74 61  |","high score ta|
000032e0  62 6c 65 20 63 68 61 6e  67 65 64 22 2c 31 33 32  |ble changed",132|
000032f0  2c 38 34 2c 31 2c 37 0d  1d b0 3e c8 99 22 41 42  |,84,1,7...>.."AB|
00003300  43 5f 50 72 79 6e 74 53  74 72 69 6e 67 22 2c 22  |C_PryntString","|
00003310  68 69 67 68 20 73 63 6f  72 65 20 74 61 62 6c 65  |high score table|
00003320  20 63 68 61 6e 67 65 64  22 2c 31 33 34 2c 38 35  | changed",134,85|
00003330  2c 31 2c 31 31 0d 1d ba  05 e1 0d 1d c4 19 dd f2  |,1,11...........|
00003340  66 69 6c 6c 6d 65 6e 75  28 74 61 78 25 2c 74 61  |fillmenu(tax%,ta|
00003350  79 25 29 0d 1d ce 06 ef  35 0d 1d d8 06 fb 30 0d  |y%).....5.....0.|
00003360  1d e2 0b e3 4a 25 3d 30  b8 37 0d 1d ec 07 f3 73  |....J%=0.7.....s|
00003370  24 0d 1d f6 28 ec 74 61  78 25 2a 33 32 2d 67 25  |$...(.tax%*32-g%|
00003380  2c 31 30 32 34 2d 28 74  61 79 25 2a 67 25 2b 4a  |,1024-(tay%*g%+J|
00003390  25 2a 66 25 2b 31 34 38  29 0d 1e 00 12 e7 4a 25  |%*f%+148).....J%|
000033a0  3d 36 f1 74 79 70 24 8b  f1 73 24 0d 1e 0a 05 ed  |=6.typ$..s$.....|
000033b0  0d 1e 14 09 e6 30 2c 31  34 0d 1e 1e 0b e3 4a 25  |.....0,14.....J%|
000033c0  3d 38 b8 39 0d 1e 28 07  f3 73 24 0d 1e 32 28 ec  |=8.9..(..s$..2(.|
000033d0  74 61 78 25 2a 33 32 2d  67 25 2c 31 30 32 34 2d  |tax%*32-g%,1024-|
000033e0  28 74 61 79 25 2a 67 25  2b 4a 25 2a 66 25 2b 31  |(tay%*g%+J%*f%+1|
000033f0  34 38 29 0d 1e 3c 07 f1  73 24 0d 1e 46 05 ed 0d  |48)..<..s$..F...|
00003400  1e 50 06 ef 34 0d 1e 5a  05 87 0d 1e 64 0b e3 4a  |.P..4..Z....d..J|
00003410  25 3d 30 b8 39 0d 1e 6e  0c f2 69 6e 74 28 4a 25  |%=0.9..n..int(J%|
00003420  29 0d 1e 78 05 ed 0d 1e  82 05 e1 0d 1e 8c 0c dd  |)..x............|
00003430  f2 72 65 70 6f 72 74 0d  1e 96 07 c8 97 87 0d 1e  |.report.........|
00003440  a0 0e f2 7a 65 72 6f 6d  6f 75 73 65 0d 1e aa 0a  |...zeromouse....|
00003450  f2 66 6c 75 73 68 0d 1e  b4 10 f2 61 6e 79 70 72  |.flush.....anypr|
00003460  6f 67 72 65 73 73 0d 1e  be 0a f2 6c 69 6d 69 74  |ogress.....limit|
00003470  0d 1e c8 0e f2 66 69 72  65 77 6f 72 6b 73 0d 1e  |.....fireworks..|
00003480  d2 13 c8 99 22 41 42 43  5f 42 6c 61 6e 6b 22 2c  |...."ABC_Blank",|
00003490  33 0d 1e dc 14 c8 99 22  41 42 43 5f 43 6f 6c 6f  |3......"ABC_Colo|
000034a0  75 72 22 2c 33 0d 1e e6  09 e6 30 2c 31 32 0d 1e  |ur",3.....0,12..|
000034b0  f0 16 c8 93 c8 90 32 30  30 2c 30 2c 38 39 36 2c  |......200,0,896,|
000034c0  31 30 32 30 0d 1e fa 08  e6 30 2c 37 0d 1f 04 14  |1020.....0,7....|
000034d0  c8 93 32 30 30 2c 30 2c  38 39 36 2c 31 30 32 30  |..200,0,896,1020|
000034e0  0d 1f 0e 24 c8 99 22 41  42 43 5f 53 70 72 69 74  |...$.."ABC_Sprit|
000034f0  65 22 2c 62 25 2c 22 73  6d 61 6c 6c 22 2c 34 34  |e",b%,"small",44|
00003500  30 2c 35 34 0d 1f 18 24  c8 99 22 41 42 43 5f 53  |0,54...$.."ABC_S|
00003510  70 72 69 74 65 22 2c 62  25 2c 22 73 6d 61 6c 6c  |prite",b%,"small|
00003520  22 2c 31 31 38 2c 35 34  0d 1f 22 1f f2 77 69 6e  |",118,54.."..win|
00003530  67 73 28 22 47 41 4d 45  20 4f 56 45 52 22 2c 31  |gs("GAME OVER",1|
00003540  37 30 2c 32 34 38 29 0d  1f 2c 0c f2 73 70 61 63  |70,248)..,..spac|
00003550  65 6f 72 0d 1f 36 0a f2  65 78 74 72 61 0d 1f 40  |eor..6..extra..@|
00003560  0a f2 61 6d 6f 75 6e 0d  1f 4a 0b f2 63 6f 6c 62  |..amoun..J..colb|
00003570  6f 78 0d 1f 54 0b f2 72  61 74 69 6e 67 0d 1f 5e  |ox..T..rating..^|
00003580  0a f2 65 6e 74 72 79 0d  1f 68 13 c8 99 22 41 42  |..entry..h..."AB|
00003590  43 5f 50 61 6c 65 74 74  65 22 0d 1f 72 05 f5 0d  |C_Palette"..r...|
000035a0  1f 7c 0b fd a4 6c 65 61  76 65 0d 1f 86 05 e1 0d  |.|...leave......|
000035b0  1f 90 0f dd f2 7a 65 72  6f 6d 6f 75 73 65 0d 1f  |.....zeromouse..|
000035c0  9a 05 f5 0d 1f a4 14 c8  97 6d 6f 78 25 2c 6d 6f  |.........mox%,mo|
000035d0  79 25 2c 62 75 74 25 0d  1f ae 0b fd 62 75 74 25  |y%,but%.....but%|
000035e0  3d 30 0d 1f b8 05 e1 0d  1f c2 0b dd a4 6c 65 61  |=0...........lea|
000035f0  76 65 0d 1f cc 14 c8 97  6d 6f 78 25 2c 6d 6f 79  |ve......mox%,moy|
00003600  25 2c 62 75 74 25 0d 1f  d6 1e e7 a6 2d 31 31 33  |%,but%......-113|
00003610  84 a6 2d 39 39 84 a6 2d  37 34 84 62 75 74 25 3e  |..-99..-74.but%>|
00003620  30 8b 3d a3 0d 1f e0 05  f5 0d 1f ea 14 c8 97 6d  |0.=............m|
00003630  6f 78 25 2c 6d 6f 79 25  2c 62 75 74 25 0d 1f f4  |ox%,moy%,but%...|
00003640  1e fd ac a6 2d 31 31 33  80 ac a6 2d 39 39 80 ac  |....-113...-99..|
00003650  a6 2d 37 34 80 62 75 74  25 3d 30 0d 1f fe 0b 2a  |.-74.but%=0....*|
00003660  46 58 32 31 20 39 0d 20  08 06 3d b9 0d 20 12 0a  |FX21 9. ..=.. ..|
00003670  dd f2 71 75 69 74 0d 20  1c 07 c8 97 87 0d 20 26  |..quit. ...... &|
00003680  14 c8 99 22 48 6f 75 72  67 6c 61 73 73 5f 4f 6e  |..."Hourglass_On|
00003690  22 0d 20 30 15 c8 97 c8  93 30 2c 30 2c 31 32 38  |". 0.....0,0,128|
000036a0  30 2c 31 30 32 34 0d 20  3a 15 c8 99 22 41 42 43  |0,1024. :..."ABC|
000036b0  5f 43 6f 6c 6f 75 72 22  2c 31 35 0d 20 44 13 f2  |_Colour",15. D..|
000036c0  73 61 76 65 6e 65 77 72  65 73 75 6c 74 73 0d 20  |savenewresults. |
000036d0  4e 0f d7 22 72 61 6d 3a  4d 65 6e 75 22 0d 20 58  |N.."ram:Menu". X|
000036e0  0c dd f2 76 6f 6c 75 6d  65 0d 20 62 12 4d 25 3d  |...volume. b.M%=|
000036f0  28 4d 25 2b 67 25 29 80  26 37 46 0d 20 6c 14 ff  |(M%+g%).&7F. l..|
00003700  22 56 4f 4c 55 4d 45 20  22 2b c3 28 4d 25 29 0d  |"VOLUME "+.(M%).|
00003710  20 76 0a 75 70 64 25 3d  a3 0d 20 80 05 e1 0d 20  | v.upd%=.. .... |
00003720  8a 0b dd f2 67 72 61 64  65 0d 20 94 0a 73 75 62  |....grade. ..sub|
00003730  25 3d 30 0d 20 9e 0b 67  72 64 25 2b 3d 31 0d 20  |%=0. ..grd%+=1. |
00003740  a8 15 e7 67 72 64 25 3e  62 6e 64 25 3a 67 72 64  |...grd%>bnd%:grd|
00003750  25 3d 31 0d 20 b2 0a 75  70 64 25 3d a3 0d 20 bc  |%=1. ..upd%=.. .|
00003760  05 e1 0d 20 c6 0d dd f2  70 6c 61 79 65 72 73 0d  |... ....players.|
00003770  20 d0 0b 70 6c 79 25 2b  3d 31 0d 20 da 12 e7 70  | ..ply%+=1. ...p|
00003780  6c 79 25 3e 34 3a 70 6c  79 25 3d 31 0d 20 e4 0a  |ly%>4:ply%=1. ..|
00003790  72 70 79 25 3d a3 0d 20  ee 0a 75 70 64 25 3d a3  |rpy%=.. ..upd%=.|
000037a0  0d 20 f8 05 e1 0d 21 02  0f dd f2 6d 65 6e 75 63  |. ....!....menuc|
000037b0  6c 65 61 6e 0d 21 0c 0f  e7 75 70 64 25 3a f2 6d  |lean.!...upd%:.m|
000037c0  65 6e 75 0d 21 16 0e f2  7a 65 72 6f 6d 6f 75 73  |enu.!...zeromous|
000037d0  65 0d 21 20 06 c8 96 0d  21 2a 11 f2 73 71 72 28  |e.! ....!*..sqr(|
000037e0  73 75 6e 25 2c 31 31 29  0d 21 34 11 f2 73 71 72  |sun%,11).!4..sqr|
000037f0  28 62 6f 78 25 2c 31 35  29 0d 21 3e 0e f2 69 6e  |(box%,15).!>..in|
00003800  74 28 73 75 6e 25 29 0d  21 48 0e f2 69 6e 74 28  |t(sun%).!H..int(|
00003810  62 6f 78 25 29 0d 21 52  0d 73 75 6e 25 3d 62 6f  |box%).!R.sun%=bo|
00003820  78 25 0d 21 5c 05 e1 0d  21 66 16 dd f2 6d 73 6b  |x%.!\...!f...msk|
00003830  28 73 24 2c 44 25 2c 45  25 2c 46 25 29 0d 21 70  |(s$,D%,E%,F%).!p|
00003840  24 c8 99 22 41 42 43 5f  53 68 61 70 65 4d 61 73  |$.."ABC_ShapeMas|
00003850  6b 22 2c 62 25 2c 73 24  2c 44 25 2c 45 25 2c 46  |k",b%,s$,D%,E%,F|
00003860  25 0d 21 7a 05 e1 0d 21  84 25 dd f2 6c 61 72 67  |%.!z...!.%..larg|
00003870  65 69 6e 70 75 74 28 74  6f 74 25 2c 74 61 78 25  |einput(tot%,tax%|
00003880  2c 74 61 79 25 2c 63 6f  6c 25 29 0d 21 8e 0b 2a  |,tay%,col%).!..*|
00003890  46 58 32 31 20 30 0d 21  98 0a 63 6e 74 25 3d 30  |FX21 0.!..cnt%=0|
000038a0  0d 21 a2 09 69 24 3d 22  22 0d 21 ac 0b e6 30 2c  |.!..i$="".!...0,|
000038b0  63 6f 6c 25 0d 21 b6 05  f5 0d 21 c0 05 f5 0d 21  |col%.!....!....!|
000038c0  ca 05 f5 0d 21 d4 0b 6b  25 3d a6 28 31 29 0d 21  |....!..k%=.(1).!|
000038d0  de 18 fd 6b 25 3d 31 33  84 6b 25 3e 33 31 80 20  |...k%=13.k%>31. |
000038e0  6b 25 3c 31 32 38 0d 21  e8 14 e7 6b 25 3d 31 32  |k%<128.!...k%=12|
000038f0  37 80 20 63 6e 74 25 3e  30 8c 0d 21 f2 0b 63 6e  |7. cnt%>0..!..cn|
00003900  74 25 2d 3d 31 0d 21 fc  10 69 24 3d c0 69 24 2c  |t%-=1.!..i$=.i$,|
00003910  63 6e 74 25 29 0d 22 06  06 c8 96 0d 22 10 28 c8  |cnt%).".....".(.|
00003920  99 22 41 42 43 5f 50 72  79 6e 74 53 74 72 69 6e  |."ABC_PryntStrin|
00003930  67 22 2c 69 24 2c 74 61  78 25 2c 74 61 79 25 2c  |g",i$,tax%,tay%,|
00003940  31 2c 37 0d 22 1a 2c c8  99 22 41 42 43 5f 50 72  |1,7.".,.."ABC_Pr|
00003950  79 6e 74 53 74 72 69 6e  67 22 2c 69 24 2c 74 61  |yntString",i$,ta|
00003960  78 25 2d 32 2c 74 61 79  25 2b 31 2c 31 2c 39 0d  |x%-2,tay%+1,1,9.|
00003970  22 24 27 c8 93 c8 90 74  61 78 25 2a 32 2b a9 28  |"$'....tax%*2+.(|
00003980  69 24 29 2a 33 32 2c 74  61 79 25 2a 34 2d 36 34  |i$)*32,tay%*4-64|
00003990  2c 33 32 2c 36 34 0d 22  2e 05 cd 0d 22 38 0c fd  |,32,64."...."8..|
000039a0  6b 25 3c 3e 31 32 37 0d  22 42 18 e7 6b 25 3c 3e  |k%<>127."B..k%<>|
000039b0  31 33 80 20 63 6e 74 25  3c 3e 74 6f 74 25 8c 0d  |13. cnt%<>tot%..|
000039c0  22 4c 0d 69 24 2b 3d bd  28 6b 25 29 0d 22 56 06  |"L.i$+=.(k%)."V.|
000039d0  c8 96 0d 22 60 28 c8 99  22 41 42 43 5f 50 72 79  |..."`(.."ABC_Pry|
000039e0  6e 74 53 74 72 69 6e 67  22 2c 69 24 2c 74 61 78  |ntString",i$,tax|
000039f0  25 2c 74 61 79 25 2c 31  2c 37 0d 22 6a 2c c8 99  |%,tay%,1,7."j,..|
00003a00  22 41 42 43 5f 50 72 79  6e 74 53 74 72 69 6e 67  |"ABC_PryntString|
00003a10  22 2c 69 24 2c 74 61 78  25 2d 32 2c 74 61 79 25  |",i$,tax%-2,tay%|
00003a20  2b 31 2c 31 2c 39 0d 22  74 0b 63 6e 74 25 2b 3d  |+1,1,9."t.cnt%+=|
00003a30  31 0d 22 7e 05 cd 0d 22  88 19 e7 6b 25 3c 3e 31  |1."~..."...k%<>1|
00003a40  33 80 20 63 6e 74 25 3d  74 6f 74 25 3a ef 37 0d  |3. cnt%=tot%:.7.|
00003a50  22 92 0a fd 6b 25 3d 31  33 0d 22 9c 05 e1 0d 22  |"...k%=13."...."|
00003a60  a6 0b dd f2 73 74 61 72  74 0d 22 b0 05 f5 0d 22  |....start."...."|
00003a70  ba 0a fd ac a6 2d 39 39  0d 22 c4 0a 74 69 6d 25  |.....-99."..tim%|
00003a80  3d a3 0d 22 ce 0a 73 61  6e 25 3d 30 0d 22 d8 05  |=.."..san%=0."..|
00003a90  f5 0d 22 e2 06 ef 37 0d  22 ec 13 c8 99 22 41 42  |.."...7."...."AB|
00003aa0  43 5f 42 6c 61 6e 6b 22  2c 33 0d 22 f6 14 c8 99  |C_Blank",3."....|
00003ab0  22 41 42 43 5f 43 6f 6c  6f 75 72 22 2c 33 0d 23  |"ABC_Colour",3.#|
00003ac0  00 15 61 24 3d 22 53 54  41 52 54 20 4e 55 4d 42  |..a$="START NUMB|
00003ad0  45 52 22 0d 23 0a 14 78  73 63 25 3d 33 32 30 2d  |ER".#..xsc%=320-|
00003ae0  a9 28 61 24 29 2a 38 0d  23 14 27 c8 99 22 41 42  |.(a$)*8.#.'.."AB|
00003af0  43 5f 50 72 79 6e 74 53  74 72 69 6e 67 22 2c 61  |C_PryntString",a|
00003b00  24 2c 78 73 63 25 2c 31  36 30 2c 31 2c 37 0d 23  |$,xsc%,160,1,7.#|
00003b10  1e 2a c8 99 22 41 42 43  5f 50 72 79 6e 74 53 74  |.*.."ABC_PryntSt|
00003b20  72 69 6e 67 22 2c 61 24  2c 78 73 63 25 2d 32 2c  |ring",a$,xsc%-2,|
00003b30  31 36 31 2c 31 2c 31 31  0d 23 28 13 c8 99 22 41  |161,1,11.#(..."A|
00003b40  42 43 5f 50 61 6c 65 74  74 65 22 0d 23 32 1c f2  |BC_Palette".#2..|
00003b50  6c 61 72 67 65 69 6e 70  75 74 28 33 2c 32 39 36  |largeinput(3,296|
00003b60  2c 31 32 30 2c 33 29 0d  23 3c 0e 66 6f 6c 25 3d  |,120,3).#<.fol%=|
00003b70  bb 28 69 24 29 0d 23 46  17 e7 66 6f 6c 25 3c 31  |.(i$).#F..fol%<1|
00003b80  84 66 6f 6c 25 3e 32 35  36 3a ef 37 0d 23 50 29  |.fol%>256:.7.#P)|
00003b90  fd 66 6f 6c 25 3e 30 80  20 66 6f 6c 25 3c 32 35  |.fol%>0. fol%<25|
00003ba0  37 80 a4 76 61 6c 69 64  61 74 65 6e 75 6d 62 65  |7..validatenumbe|
00003bb0  72 28 69 24 29 0d 23 5a  14 c8 99 22 41 42 43 5f  |r(i$).#Z..."ABC_|
00003bc0  43 6f 6c 6f 75 72 22 2c  33 0d 23 64 0a 73 65 72  |Colour",3.#d.ser|
00003bd0  25 3d b9 0d 23 6e 05 e1  0d ff                    |%=..#n....|
00003bda