� Storker's Run
� By Stuart Bain
�
(	�init
2+��<>17�6:�:�:�" at line ";�:�"FX21":�
<&��4:�23,1;0;0;0;0;19,0,4;0;:�start
F'�5:�23,1,0;0;0;0;19,1,5;0;17,2:�var
P��screen:�main%
Z�?dead=200�clear ��dead
d�?dead:�over
n'�4:�23,1,0;0;0;0;19,0,4;0;:�high:�0
x��start
�A%=0:B%=0:C%=1:*FX210,0
���B%�table ��options
�8��=0:�A%=0:�-99A%=100��-38A%=1��-17A%=2��-82A%=3
�
�A%��>700
��A%=0B%=1-B%:�1:�0
��A%=1�instr
�A�A%=2C%=0:�"FX210,1":�B%=0�db("on",11,13):�db("OFF",30,13):�0
�A�A%=3C%=1:�"FX210,0":�B%=0�db("ON",11,13):�db("off",30,13):�0
��A%=2�A%=3�0
��1:�A%=100
�A�tune("CCCECEEEGEGGGIDDDDG","4448844488444874448"):���(-6)=15
��
�
��options

�header:�window(3,6,34,25)

p�db("CONTROLS",13,1):�db("Z - left...............X - right",1,4):�db("Space - grenade....Return - jump",1,7)

��db("P - pause on.......O - pause off",1,10):�C%�db("S - sound ON.......Q - sound off",1,13)��db("S - sound on.......Q - sound OFF",1,13)

"�db("Escape - abort",10,16)

,K�db("Press 'I' for instructions",4,19):�db("Press Space to start",7,22)

6�

@��instr

JP�header:�window(1,8,38,16):�11,1)"The Story so far"�11,2)"----------------"

T��split("Storker is the champion chosen by his village,and he must protect it from the evil forces attempting to conquer the land. The dreaded giant hedgehogs have banded with the deadly hawks in an all out attack.")

^%�space:�header:�window(1,7,38,17)

h��split("Storker has been assigned an egg-stremely dangerous mission. There is an endless army of hedgehogs advancing whilst the hawk air patrols drop egg-bombs.")

rp�split("However, Storker is equipped with egg-grenades, able to take out both the hedgehogs and the bombs.")

|%�space:�header:�window(1,6,38,19)

���split("To clear each screen, Storker must catch the required number of bugs which buzz overhead. Then he must run to the right edge of the screen.")

���split("Touching hedgehogs or being hit by bombs weakens Storker. His strength is shown at the top. On completion of a sheet, a bonus will be awarded depending on the strength left.")

��space:�

�	��var

�S%=0:li%=2:lev%=1:?sp=244

�%�2:�0,27)�20,�224)�0,7)�20,�224)

�6�0,1:�0,136:�5:��100,�226):�0,136:�0,2:��100,�227)

�u$&110="Storker's  Run":�0,0:�5:�192,96:�doub%:�200,92:�doub%:�192,88:�doub%:�184,92:�doub%:�0,3:�192,92:�doub%:�4

�3X%=28:Y%=1:�calc%:!data=men%:X%=3:Y%=24:�print%

�*�0,1)"SCORE LEV:"�6,3)"EAT:"�16,2)"="

��

���screen

�+!gx=0:!ju=0:!hit=0:!time%=&285F80:!fx=0
7!add=&7600:!data=men%:X%=3:Y%=24:�print%:W%=0:Z%=24
,�1:�31,0,5,225,225,225:�2:�;�17,�225):�3
4!bon=0:!hx=&131C24:��DvB:�I%=0�(lev%-1)�10:�A$:�
&'?htot=��A$,1,1)-1:?btot=��A$,2,1)-1
0F%=��A$,3,1):?tdec=��A$,4)
:"�I%=0�?htot:?tx=hx?I%:�hogpr:�
D?haw=18:�hawpr
NC�10,1);�-(lev%<10);lev%�11,3);F%�18,2);li%�0,3);�"0000"+�S%,5)
X?�db("READY!",7,16):�del(100):�db("      ",7,16):�1,-15,80,2
b X%=0:Y%=24:!old=men%:?ti=?sp
l�
v@�11105,12105,12206,12307,23208,22308,22408,32209,23410,33411
���clear
�:�tune("NNNNPPPPRPRPNNNN","6337633755553338"):�del(100)
�:?dead=0:�time%?2=0�thB�X%=0:Y%=3:A%=0:��bonus:*FX21,5
�>�1,-15,150,1:S%=S%+5:!nu=S%:�numb%:�del(10):�?dead:?dead=0
�8�cle%:lev%=lev%+1:�(lev%-1)�10=0:?sp=?sp-2*(?sp<254)
�3�2:�2,13)"Proceed to level":�3:�db(�lev%,9,15)
�P�(lev%-1)�5=0�del(100):�5,19)"BONUS LIFE":�1,-1,200,4:li%=li%+1:�18,2);li%
��del(200):�cle%
��
�
��dead
�?�I%=0�15:Y%=Y%-1+2*(I%�2):�bird%:�0,-15,5-I%�2,2:�del(10):�
�'�del(60):�tune("HIHfEDD","6453556")
�li%=li%-1:�li%:?dead=0
�del(200):�cle%:�del(60):�

��over
8�I%=1�10:�db(�"GAME  OVER",I%,1),4+I%,14):�del(25):�
 &�tune("EEEEGffEEdE","97397355739")
*�del(200):�cle%:�
4
��high
>�S%<=hs%(4)�tNC
HfI%=-1:�I%=I%+1:�S%>hs%(I%):�J%=3�I%�-1:hs%(J%+1)=hs%(J%):hi$(J%+1)=hi$(J%):�:hs%(I%)=S%:hi$(I%)=""
RM�table:�window(8,26,24,4):�db("Please enter your name",1,1):�28,5,25,33,7
\	*FX21
f/A$="":�B%=�:�B%>31�B%<127��(A$)<10A$=A$+�B%
p�B%=127A$=�A$,�(A$)-1)
z%�db(�A$+" ",10),19,I%*3+1):�B%=13
�hi$(I%)=A$
�
�table
��space:�
���table
�=�scr%:�window(8,1,24,4):�db("Storker's  Famous-Five",1,1)
�[�window(5,7,30,16):�J%=0�4:�db(�"00000"+�hs%(J%),5)+"............."+hi$(J%),1,1+J%*3):�
��
���tune(A$,B$)
�+C$=" CcDdEFfGfHhIJjKkLMmNnOoPQqRrSTtUu"
�9�I%=1��A$:�1,4,�C$,�A$,I%,1))*4,��B$,I%,1):�1,0,0,0:�
��
�|��split(A$)�I%=37:�I%=I%-1:��A$,I%,1)=" ":J%=I%:�I%=I%-1:��A$,I%,1)<>" ":�cent(�A$,I%)):A$=�A$,J%+1):��A$<37:�cent(A$):�
�$��cent(B$)�19-�(B$)/2,�+1);B$:�
5��window(X%,Y%,H%,V%)�28,X%,Y%+V%-1,X%+H%-1,Y%,12
Q�X%*32+4,1019-Y%*32:�1,H%*32-12,0:�1,0,-V%*32+12:�1,-H%*32+12,0:�1,0,V%*32-12
5�0,4,0:�1,0,-V%*32+12:�0,H%*32-20,0:�1,0,V%*32-12
$�
.��db($&110,X%,Y%)�doub%:�
8��del(A%):�=0:���>A%:�
B@��space:�window(13,27,14,4):�db("PRESS  SPACE",1,1):���-99:�
LA��header:�scr%:�window(12,1,16,4):�db("STORKER'S  RUN",1,1):�
V
��init
`L�23,224,0,240,255,255,255,255,0,0,23,225,102,102,102,102,102,102,102,102
jJ�23,226,85,170,85,170,85,170,85,170,23,227,170,85,170,85,170,85,170,85
tU�1,1,0,0,5,0,5,20,126,0,0,-126,126,126:�2,1,0,10,-10,0,10,10,126,0,0,-126,126,126
~R�3,2,-3,0,0,50,0,0,126,0,0,-126,126,126:�4,2,1,-1,0,1,1,0,126,0,0,-126,126,126
�L�Q%1790,hs%(5),hi$(5):�I%=0�4:hi$(I%)="Bainy Soft":hs%(I%)=(5-I%)*1000:�
�`��d@H:men%=&900:�I%=0�407:�men%?I%:�:egg%=men%+288:hda%=men%+304:bda%=men%+368:fly%=men%+392
�9add=&70:data=&72:old=&74:gx=&76:gy=&77:gd=&78:gre=&79
�Cju=&7A:go=&7B:dir=&7C:anim=&7D:hit=&7E:�-256=1ti=&29F �ti=&2A0
�{dead=&7F:got=&80:last=&81:row=&82:col=&83:hx=&84:htot=&87:hco=&88:tx=&89:haw=&8A:bx=&8B:by=&8E:bon=&91:btot=&94:bco=&95
�Ctime%=&60:tco=&63:tdec=&64:fx=&65:fon=&66:fco=&67:nu=&68:sp=&6C
�1tab=&150:�J%=0�27:!(tab+J%*2)=&5800+&140*J%:�
��I%=0�2�2:P%=Q%
�
[OPTI%
�.calc%LDA#0:STAadd+1:STXadd:LDX#3:.ca2:ASLadd:ROLadd+1:DEX:BNEca2:TYA:ASLA:TAY:LDAadd:ADCtab,Y:STAadd:LDAadd+1:ADCtab+1,Y:STAadd+1:RTS
�.print%STXrow:STYcol:LDX#0
�1.p2:LDY#0:.p3:LDA(data),Y:�(add),Y:STA(add),Y
FINY:CPYcol:BNEp3:CLC:LDAadd:ADC#&40:STAadd:LDAadd+1:ADC#1:STAadd+1

8CLC:LDAdata:ADCcol:STAdata:LDAdata+1:ADC#0:STAdata+1
&INX:CPXrow:BNEp2:LDXrow:LDYcol:RTS
[.bird%LDAold:STAdata:LDAold+1:STAdata+1:LDX&45C:LDY&468:JSRcalc%:LDX#3:LDY#24:JSRprint%
(sLDA#men%�256:STAdata:LDA#men%�256:STAdata+1:LDAdir:BEQnpl:CLC:LDAdata:ADC#144:STAdata:LDAdata+1:ADC#0:STAdata+1
2K.npl:LDAanim:�#72:STAanim:CLC:ADCdata:STAdata:LDAdata+1:ADC#0:STAdata+1
<iLDAdata:STAold:LDAdata+1:STAold+1:LDX&460:LDY&464:STX&45C:STY&468:JSRcalc%:LDX#3:LDY#24:JSRprint%:RTS
F=.gren%LDAgre:CMP#200:BCSexplo:LDAgre:BNEmg:LDAdir:BEQgrer
P<LDA&460:STAgx:CLC:LDA&464:ADC#1:STAgy:LDA#1:STAgd:JMPmg1
ZH.grer:LDA&460:CLC:ADC#2:STAgx:LDA&464:ADC#1:STAgy:LDA#0:STAgd:JMPmg1
d/.mg:JSRgrpr:.mg1:INCgre:LDAgre:CMP#8:BCSgdo
n-DECgy:JMPmg2:.gdo:INCgy:.mg2:LDAgd:BNEmgl
xBINCgx:LDAgx:CMP#40:BEQendgre:JMPmg3:.mgl:DECgx:LDAgx:BMIendgre
�W.mg3:JSRgrpr:LDAgre:CMP#15:BEQexplo:RTS:.endgre:LDA#0:STAgot:STAgre:STAgx:STAgy:RTS
�|.explo:LDAgre:CMP#200:BCSex2:LDA#200:STAgre:JSRgrpr:JMPexpr:.ex2:INCgre:LDAgre:CMP#202:BEQex3:RTS:.ex3:JSRexpr:JMPendgre
�h.expr:LDXgx:LDYgy:JSRcalc%:LDA#(egg%+8)�256:STAdata:LDA#(egg%+8)�256:STAdata+1:LDX#1:LDY#8:JMPprint%
�d.grpr:LDXgx:LDYgy:JSRcalc%:LDA#(egg%)�256:STAdata:LDA#(egg%)�256:STAdata+1:LDX#1:LDY#8:JMPprint%
�g.hogpr:CLC:LDA#hda%�256:STAdata:LDA#hda%�256:STAdata+1:LDXtx:LDY#25:JSRcalc%:LDX#2:LDY#32:JMPprint%
�R.hog%LDA#&FF:STAhco:.h1:INChco:LDYhco:LDAhx,Y:STAtx:JSRchhog:LDAdead:BEQh2:RTS
�9.h2:JSRhogpr:LDAtx:BEQback:LDAhit:BNEnewhog:.h3:DECtx
�?.h4:LDXhco:LDAtx:STAhx,X:JSRchhog:LDAhit:BNEnewhog:JSRhogpr
�2.h5:LDAdead:BNEh6:LDAhco:CMPhtot:BNEh1:.h6:RTS
�M.newhog:LDAgot:BNEh3:LDA#1:STAgot:JSRexplo:LDX#s4 �256:LDY#s4 �256:JSRsou
�]CLC:LDA&44C:ADC#10:STA&44C:STAnu:LDA&44D:ADC#0:STA&44D:STAnu+1:LDA#0:LDX#0:LDY#3:JSRnumb%
�.back:LDA#36:STAtx:JMPh4
�g.chhog:CLC:LDA&460:ADC#2:CMPtx:BCCch2:CLC:LDAtx:ADC#3:CMP&460:BCCch2:LDA&464:CMP#23:BCCch2:JSRbonus
}.ch2:LDA#0:STAhit:LDAgot:BNEch3:LDAgy:CMP#25:BCCch3:LDAgx:CMPtx:BCCch3:CLC:LDAtx:ADC#3:CMPgx:BCCch3:LDA#1:STAhit:.ch3:RTS
*.hawk%LDAhaw:CMP&460:BEQbombs:JSRhawpr
<LDAhaw:CMP&460:BCCwri:DEChaw:DEChaw:.wri:INChaw:JSRhawpr
"G.bombs:LDA#&FF:STAbco:.bm1:INCbco:LDXbco:LDAbon,X:BEQchance:JSRbopr
,SLDXbco:INCby,X:JSRchbom:.bm2:LDXbco:LDAby,X:CMP#27:BNEbm3:LDA#0:STAbon,X:JMPbm4
6/.bm3:JSRbopr:.bm4:LDAbco:CMPbtot:BNEbm1:RTS
@S.chance:LDA#4:STA&2A:LDA#0:STA&2B:STA&2C:STA&2D:JSR&AF12:LDA&2A:CMP#1:BNEendcha
J�LDXbco:CLC:LDAhaw:ADC#1:STAbx,X:CMPlast:BNEch9:INCbx,X:LDAbx,X:.ch9:STAlast:LDA#10:STAby,X:LDA#1:STAbon,X:JMPbm3:.endcha:JMPbm4
Tc.hawpr:LDA#bda%�256:STAdata:LDA#bda%�256:STAdata+1:LDXhaw:LDY#9:JSRcalc%:LDX#1:LDY#24:JMPprint%
^Y.bopr:LDAgx:PHA:LDAgy:PHA:LDAbx,X:STAgx:LDAby,X:STAgy:JSRgrpr:PLA:STAgy:PLA:STAgx:RTS
h�.chbom:LDAbx,X:CMP&460:BCCchb2:CLC:LDA&460:ADC#2:CMPbx,X:BCCchb2:LDAby,X:CMP&464:BCCchb2:CLC:LDA&464:ADC#2:CMPby,X:BCCchb2:LDA#0:STAbon,X:JSRbopr:JSRbonus
r\.chb2:LDXbco:LDAgx:CMPbx,X:BNEchb3:LDAgy:CMPby,X:BNEchb3:LDA#0:STAbon,X:JSRbopr:JSRexplo
|}LDX#s4 �256:LDY#s4 �256:JSRsou:CLC:LDA&44C:ADC#200:STA&44C:STAnu:LDA&44D:ADC#0:STA&44D:STAnu+1:LDA#0:LDX#0:LDY#3:JSRnumb%
�
.chb3:RTS
� .mvman%LDAgre:BEQv1:JSRgren%
�.v1:LDAju:BEQv2:JMPjump
�d.v2:LDA#0:STAgo:LDX#&9E:JSRinkey:TYA:BEQv3:JSRleft:JMPv4:.v3:LDX#&BD:JSRinkey:TYA:BEQv4:JSRright
��.v4:LDX#&9D:JSRinkey:TYA:BEQv5:LDAgre:BNEv5:LDX#s3 �256:LDY#s3 �256:JSRsou:JSRgren%:.v5:LDX#&B6:JSRinkey:TYA:BEQv6:LDX#s2 �256:LDY#s2 �256:JSRsou:JSRjump
�Q.v6:LDAgre:BEQv7:JSRgren%:.v7:LDA&45C:CMP&460:BNEv8:LDA&468:CMP&464:BNEv8:RTS
�.v8:JMPbird%
�<.left:LDA#1:STAgo:STAdir:LDA&460:BEQrts:DEC&460:.rts:RTS
ֆ.right:LDA#2:STAgo:LDA#0:STAdir:LDA&460:CMP#37:BEQedge:INC&460:LDA&460:CMP#37:BEQedge:RTS:.edge:LDA&418:BNErts:LDA#200:STAdead:RTS
�#.inkey:LDA#&81:LDY#&FF:JMP&FFF4
�.sou:LDA#7:JMP&FFF1
�=.jump:INCju:LDAju:CMP#6:BCSjdo:DEC&464:JMPj2:.jdo:INC&464
�`.j2:LDAju:CMP#1:BEQj3:LDAgo:CMP#1:BEQjle:CMP#2:BEQjri:JMPj3:.jle:JSRleft:JMPj3:.jri:JSRright
0.j3:LDAju:CMP#10:BNEj4:LDA#0:STAju:.j4:JMPv6
.esc:LDA#50:STAdead:RTS
I.pause:LDAti:STAhit:.p1:LDX#&C9:JSRinkey:TYA:BEQp1:LDAhit:STAti:JMPm2
&'.wait:BITti:BMIwait:LDAsp:STAti:RTS
0C.main%LDX#&EF:JSRinkey:TYA:BEQsoff:LDA#210:LDX#1:LDY#0:JSR&FFF4
:B.soff:LDX#&AE:JSRinkey:TYA:BEQson:LDA#210:LDX#0:LDY#0:JSR&FFF4
D$.son:LDX#&8F:JSRinkey:TYA:BNEesc
N!LDX#&C8:JSRinkey:TYA:BNEpause
X;.m2:JSRmvman%:LDAdead:BNEendma:JSRhog%:LDAdead:BNEendma
bQJSRhawk%:LDAdead:BNEendma:JSRbug%:LDAdead:BNEendma:JSRcount%:LDAdead:BNEendma
lJSRwait:JMPmain%:.endma:RTS
v.endma:RTS
�|.bug%LDAfon:BNEbmv:INCfco:LDAfco:CMP#30:BNEbgnd:LDA#0:STAfco:LDA&418:BEQbgnd:LDA#1:STAfon:LDA#39:STAfx:JMPbmv2:.bgnd:RTS
�i.bmv:JSRfpr:.bmv2:JSRfch:BNEfend:LDAfx:BEQfend:DECfx:JSRfch:BNEfend:JSRfpr:RTS:.fend:LDA#0:STAfon:RTS
�_.fch:LDA&464:CMP#19:BNEfch2:CLC:LDA&460:ADC#2:CMPfx:BCCfch2:CLC:LDAfx:ADC#1:CMP&460:BCCfch2
�g.fgt:LDX#s1 �256:LDY#s1 �256:JSRsou:DEC&418:LDA&418:STAnu:LDA#0:STAnu+1:LDA#4:LDX#11:LDY#3:JSRnumb%
�]CLC:LDA&44C:ADC#50:STA&44C:STAnu:LDA&44D:ADC#0:STA&44D:STAnu+1:LDA#0:LDX#0:LDY#3:JSRnumb%
�bCLC:LDAtime%+2:ADC#3:STAtime%+2:LDAtime%:ADC#24:STAtime%:LDAtime%+1:ADC#0:STAtime%+1:LDA#1:RTS
�.fch2:LDA#0:RTS
�a.fpr:LDA#fly%�256:STAdata:LDA#fly%�256:STAdata+1:LDXfx:LDY#19:JSRcalc%:LDX#1:LDY#16:JMPprint%
�j.numb%PHA:LDA#31:JSR&FFEE:TXA:JSR&FFEE:TYA:JSR&FFEE:PLA:ASLA:TAY:.nu1:JSRnu2:INY:INY:CPY#10:BNEnu1:RTS
�.nu2:LDX#47
�G.nu3:INX:SEC:LDAnu:SBCdec,Y:STAnu:LDAnu+1:SBCdec+1,Y:STAnu+1:BPLnu3
�7CLC:LDAnu:ADCdec,Y:STAnu:LDAnu+1:ADCdec+1,Y:STAnu+1
�TXA:JMP&FFEE
0.dec:EQUW10000:EQUW1000:EQUW100:EQUW10:EQUW1
?.count%INCtco:LDAtco:CMPtdec:BEQbon1:RTS:.bon1:LDA#0:STAtco
B.bonus:SEC:LDAtime%:SBC#8:STAtime%:LDAtime%+1:SBC#0:STAtime%+1
 .LDA#0:LDY#7:.bon2:STA(time%),Y:DEY:BPLbon2
*JDECtime%+2:LDAtime%+2:CMP#6:BCSbon4:LDX#peep �256:LDY#peep �256:JSRsou
44.bon3:LDAtime%+2:BNEbon4:LDA#1:STAdead:.bon4:RTS
>t.doub%LDA#0:STA&70:LDA#31:JSR&FFEE:TXA:JSR&FFEE:TYA:JSR&FFEE:.d1:LDX&70:LDA&110,X:CMP#13:BEQd3:STA&71:INX:STX&70
HfLDX#&71:LDY#0:LDA#10:JSR&FFF1:LDX#1:LDY#0:.d2:LDA&71,X:STA&CF0,Y:INY:STA&CF0,Y:INY:INX:CPX#9:BNEd2
RbLDA#254:JSR&FFEE:LDA#8:JSR&FFEE:LDA#10:JSR&FFEE:LDA#255:JSR&FFEE:LDA#11:JSR&FFEE:JMPd1:.d3:RTS
\..cle%LDA#255:STAdata:JSRclpr:LDA#0:STAdata
fz.clpr:LDY#0:.cl2:LDA#0:STAadd:LDA#&62:STAadd+1:.cl3:LDAdata:STA(add),Y:CLC:LDAadd:ADC#8:STAadd:LDAadd+1:ADC#0:STAadd+1
p=CMP#&79:BNEcl3:LDAadd:CMP#&C0:BNEcl3:INY:CPY#8:BNEcl2:RTS
z�.scr%LDA#17:STAdata:LDY#0:.sc1:LDA#&58:STAadd+1:LDA#0:STAadd:.sc2:LDAdata:STA(add),Y:CLC:LDAadd:ADC#4:STAadd:LDAadd+1:ADC#0:STAadd+1:CMP#&80:BNEsc2:ASLdata:INY:CPY#4:BNEsc1:RTS
�%.peep:EQUW3:EQUW-15:EQUW140:EQUW1
�!.s1:EQUW1:EQUW1:EQUW100:EQUW5
� .s2:EQUW1:EQUW2:EQUW30:EQUW2
� .s3:EQUW1:EQUW3:EQUW40:EQUW3
�!.s4:EQUW0:EQUW-15:EQUW4:EQUW3
�	]:�:�
�� Stork right
�K� 0,0,0,0,0,0,0,128,16,48,48,48,16,16,16,112,128,192,67,192,128,0,0,128
�O� 208,240,96,48,16,0,0,0,240,112,224,80,176,224,4,4,128,128,128,128,0,0,0,0
�6� 0,0,0,0,0,0,0,0,4,4,8,8,4,4,4,10,0,0,0,0,0,0,0,0
�J� 0,0,0,0,0,0,0,144,16,48,48,48,16,16,16,48,128,193,66,193,128,0,0,128
�Q� 176,208,96,48,16,0,0,1,176,208,224,240,240,224,12,4,128,128,128,128,0,0,0,0
�5� 2,4,4,2,1,2,0,0,4,4,4,2,2,9,0,1,0,0,0,0,0,0,8,4
	� Stork left
	L� 16,48,44,48,16,0,0,16,128,192,192,192,128,128,128,224,0,0,0,0,0,0,0,16
	N� 16,16,16,16,0,0,0,0,240,224,112,160,208,112,2,2,176,240,96,192,128,0,0,0
	$5� 0,0,0,0,0,0,0,0,2,2,1,1,2,2,2,5,0,0,0,0,0,0,0,0
	.M� 16,56,36,56,16,0,0,16,128,192,192,192,128,128,128,192,0,0,0,0,0,0,0,144
	8N� 16,16,16,16,0,0,0,0,208,176,112,240,240,112,3,2,208,176,96,192,128,0,0,8
	B5� 0,0,0,0,0,0,1,2,2,2,2,4,4,9,0,8,4,2,2,4,8,4,0,0
	L	� Egg
	V8� 0,0,0,0,102,255,255,102,68,153,37,128,43,68,23,142
	`	� hog
	jH� 0,0,0,0,0,0,0,0,0,0,0,0,0,1,2,5,0,0,0,0,10,5,10,5,0,0,0,0,8,4,10,5
	td� 0,0,17,34,63,63,0,0,10,141,238,255,221,139,6,12,10,5,10,255,255,255,0,0,10,5,206,239,174,6,3,1
	~
� Hawk
	�N� 0,136,238,255,119,0,0,1,111,159,102,255,255,9,9,6,0,17,119,255,238,0,0,8
	�	� Bug
	�3� 68,238,238,103,1,1,2,0,34,119,119,110,8,8,4,0
�

00000000  0d 00 0a 13 f4 20 53 74  6f 72 6b 65 72 27 73 20  |..... Storker's |
00000010  52 75 6e 0d 00 14 14 f4  20 42 79 20 53 74 75 61  |Run..... By Stua|
00000020  72 74 20 42 61 69 6e 0d  00 1e 05 f4 0d 00 28 09  |rt Bain.......(.|
00000030  f2 69 6e 69 74 0d 00 32  2b ee 85 e7 9f 3c 3e 31  |.init..2+....<>1|
00000040  37 eb 36 3a f1 3a f6 3a  f1 22 20 61 74 20 6c 69  |7.6:.:.:." at li|
00000050  6e 65 20 22 3b 9e 3a ff  22 46 58 32 31 22 3a e0  |ne ";.:."FX21":.|
00000060  0d 00 3c 26 f5 eb 34 3a  ef 32 33 2c 31 3b 30 3b  |..<&..4:.23,1;0;|
00000070  30 3b 30 3b 30 3b 31 39  2c 30 2c 34 3b 30 3b 3a  |0;0;0;19,0,4;0;:|
00000080  f2 73 74 61 72 74 0d 00  46 27 eb 35 3a ef 32 33  |.start..F'.5:.23|
00000090  2c 31 2c 30 3b 30 3b 30  3b 30 3b 31 39 2c 31 2c  |,1,0;0;0;0;19,1,|
000000a0  35 3b 30 3b 31 37 2c 32  3a f2 76 61 72 0d 00 50  |5;0;17,2:.var..P|
000000b0  13 f5 f2 73 63 72 65 65  6e 3a d6 6d 61 69 6e 25  |...screen:.main%|
000000c0  0d 00 5a 1b e7 3f 64 65  61 64 3d 32 30 30 f2 63  |..Z..?dead=200.c|
000000d0  6c 65 61 72 20 8b f2 64  65 61 64 0d 00 64 10 fd  |lear ..dead..d..|
000000e0  3f 64 65 61 64 3a f2 6f  76 65 72 0d 00 6e 27 eb  |?dead:.over..n'.|
000000f0  34 3a ef 32 33 2c 31 2c  30 3b 30 3b 30 3b 30 3b  |4:.23,1,0;0;0;0;|
00000100  31 39 2c 30 2c 34 3b 30  3b 3a f2 68 69 67 68 3a  |19,0,4;0;:.high:|
00000110  fd 30 0d 00 78 0b dd f2  73 74 61 72 74 0d 00 82  |.0..x...start...|
00000120  1b 41 25 3d 30 3a 42 25  3d 30 3a 43 25 3d 31 3a  |.A%=0:B%=0:C%=1:|
00000130  2a 46 58 32 31 30 2c 30  0d 00 8c 18 f5 e7 42 25  |*FX210,0......B%|
00000140  f2 74 61 62 6c 65 20 8b  f2 6f 70 74 69 6f 6e 73  |.table ..options|
00000150  0d 00 96 38 f5 d1 3d 30  3a f5 41 25 3d 30 3a e7  |...8..=0:.A%=0:.|
00000160  a6 2d 39 39 41 25 3d 31  30 30 8b e7 a6 2d 33 38  |.-99A%=100...-38|
00000170  41 25 3d 31 8b e7 a6 2d  31 37 41 25 3d 32 8b e7  |A%=1...-17A%=2..|
00000180  a6 2d 38 32 41 25 3d 33  0d 00 a0 0d fd 41 25 84  |.-82A%=3.....A%.|
00000190  91 3e 37 30 30 0d 00 aa  16 e7 41 25 3d 30 42 25  |.>700.....A%=0B%|
000001a0  3d 31 2d 42 25 3a fd 31  3a fd 30 0d 00 b4 0f e7  |=1-B%:.1:.0.....|
000001b0  41 25 3d 31 f2 69 6e 73  74 72 0d 00 be 41 e7 41  |A%=1.instr...A.A|
000001c0  25 3d 32 43 25 3d 30 3a  ff 22 46 58 32 31 30 2c  |%=2C%=0:."FX210,|
000001d0  31 22 3a e7 42 25 3d 30  f2 64 62 28 22 6f 6e 22  |1":.B%=0.db("on"|
000001e0  2c 31 31 2c 31 33 29 3a  f2 64 62 28 22 4f 46 46  |,11,13):.db("OFF|
000001f0  22 2c 33 30 2c 31 33 29  3a fd 30 0d 00 c8 41 e7  |",30,13):.0...A.|
00000200  41 25 3d 33 43 25 3d 31  3a ff 22 46 58 32 31 30  |A%=3C%=1:."FX210|
00000210  2c 30 22 3a e7 42 25 3d  30 f2 64 62 28 22 4f 4e  |,0":.B%=0.db("ON|
00000220  22 2c 31 31 2c 31 33 29  3a f2 64 62 28 22 6f 66  |",11,13):.db("of|
00000230  66 22 2c 33 30 2c 31 33  29 3a fd 30 0d 00 d2 10  |f",30,13):.0....|
00000240  e7 41 25 3d 32 84 41 25  3d 33 fd 30 0d 00 dc 0e  |.A%=2.A%=3.0....|
00000250  fd 31 3a fd 41 25 3d 31  30 30 0d 00 e6 41 f2 74  |.1:.A%=100...A.t|
00000260  75 6e 65 28 22 43 43 43  45 43 45 45 45 47 45 47  |une("CCCECEEEGEG|
00000270  47 47 49 44 44 44 44 47  22 2c 22 34 34 34 38 38  |GGIDDDDG","44488|
00000280  34 34 34 38 38 34 34 34  38 37 34 34 34 38 22 29  |44488444874448")|
00000290  3a f5 fd 96 28 2d 36 29  3d 31 35 0d 00 f0 05 e1  |:...(-6)=15.....|
000002a0  0d 00 fa 0d dd f2 6f 70  74 69 6f 6e 73 0d 01 04  |......options...|
000002b0  1e f2 68 65 61 64 65 72  3a f2 77 69 6e 64 6f 77  |..header:.window|
000002c0  28 33 2c 36 2c 33 34 2c  32 35 29 0d 01 0e 70 f2  |(3,6,34,25)...p.|
000002d0  64 62 28 22 43 4f 4e 54  52 4f 4c 53 22 2c 31 33  |db("CONTROLS",13|
000002e0  2c 31 29 3a f2 64 62 28  22 5a 20 2d 20 6c 65 66  |,1):.db("Z - lef|
000002f0  74 2e 2e 2e 2e 2e 2e 2e  2e 2e 2e 2e 2e 2e 2e 2e  |t...............|
00000300  58 20 2d 20 72 69 67 68  74 22 2c 31 2c 34 29 3a  |X - right",1,4):|
00000310  f2 64 62 28 22 53 70 61  63 65 20 2d 20 67 72 65  |.db("Space - gre|
00000320  6e 61 64 65 2e 2e 2e 2e  52 65 74 75 72 6e 20 2d  |nade....Return -|
00000330  20 6a 75 6d 70 22 2c 31  2c 37 29 0d 01 18 8d f2  | jump",1,7).....|
00000340  64 62 28 22 50 20 2d 20  70 61 75 73 65 20 6f 6e  |db("P - pause on|
00000350  2e 2e 2e 2e 2e 2e 2e 4f  20 2d 20 70 61 75 73 65  |.......O - pause|
00000360  20 6f 66 66 22 2c 31 2c  31 30 29 3a e7 43 25 f2  | off",1,10):.C%.|
00000370  64 62 28 22 53 20 2d 20  73 6f 75 6e 64 20 4f 4e  |db("S - sound ON|
00000380  2e 2e 2e 2e 2e 2e 2e 51  20 2d 20 73 6f 75 6e 64  |.......Q - sound|
00000390  20 6f 66 66 22 2c 31 2c  31 33 29 8b f2 64 62 28  | off",1,13)..db(|
000003a0  22 53 20 2d 20 73 6f 75  6e 64 20 6f 6e 2e 2e 2e  |"S - sound on...|
000003b0  2e 2e 2e 2e 51 20 2d 20  73 6f 75 6e 64 20 4f 46  |....Q - sound OF|
000003c0  46 22 2c 31 2c 31 33 29  0d 01 22 1f f2 64 62 28  |F",1,13).."..db(|
000003d0  22 45 73 63 61 70 65 20  2d 20 61 62 6f 72 74 22  |"Escape - abort"|
000003e0  2c 31 30 2c 31 36 29 0d  01 2c 4b f2 64 62 28 22  |,10,16)..,K.db("|
000003f0  50 72 65 73 73 20 27 49  27 20 66 6f 72 20 69 6e  |Press 'I' for in|
00000400  73 74 72 75 63 74 69 6f  6e 73 22 2c 34 2c 31 39  |structions",4,19|
00000410  29 3a f2 64 62 28 22 50  72 65 73 73 20 53 70 61  |):.db("Press Spa|
00000420  63 65 20 74 6f 20 73 74  61 72 74 22 2c 37 2c 32  |ce to start",7,2|
00000430  32 29 0d 01 36 05 e1 0d  01 40 0b dd f2 69 6e 73  |2)..6....@...ins|
00000440  74 72 0d 01 4a 50 f2 68  65 61 64 65 72 3a f2 77  |tr..JP.header:.w|
00000450  69 6e 64 6f 77 28 31 2c  38 2c 33 38 2c 31 36 29  |indow(1,8,38,16)|
00000460  3a f1 8a 31 31 2c 31 29  22 54 68 65 20 53 74 6f  |:..11,1)"The Sto|
00000470  72 79 20 73 6f 20 66 61  72 22 8a 31 31 2c 32 29  |ry so far".11,2)|
00000480  22 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |"---------------|
00000490  2d 22 0d 01 54 db f2 73  70 6c 69 74 28 22 53 74  |-"..T..split("St|
000004a0  6f 72 6b 65 72 20 69 73  20 74 68 65 20 63 68 61  |orker is the cha|
000004b0  6d 70 69 6f 6e 20 63 68  6f 73 65 6e 20 62 79 20  |mpion chosen by |
000004c0  68 69 73 20 76 69 6c 6c  61 67 65 2c 61 6e 64 20  |his village,and |
000004d0  68 65 20 6d 75 73 74 20  70 72 6f 74 65 63 74 20  |he must protect |
000004e0  69 74 20 66 72 6f 6d 20  74 68 65 20 65 76 69 6c  |it from the evil|
000004f0  20 66 6f 72 63 65 73 20  61 74 74 65 6d 70 74 69  | forces attempti|
00000500  6e 67 20 74 6f 20 63 6f  6e 71 75 65 72 20 74 68  |ng to conquer th|
00000510  65 20 6c 61 6e 64 2e 20  54 68 65 20 64 72 65 61  |e land. The drea|
00000520  64 65 64 20 67 69 61 6e  74 20 68 65 64 67 65 68  |ded giant hedgeh|
00000530  6f 67 73 20 68 61 76 65  20 62 61 6e 64 65 64 20  |ogs have banded |
00000540  77 69 74 68 20 74 68 65  20 64 65 61 64 6c 79 20  |with the deadly |
00000550  68 61 77 6b 73 20 69 6e  20 61 6e 20 61 6c 6c 20  |hawks in an all |
00000560  6f 75 74 20 61 74 74 61  63 6b 2e 22 29 0d 01 5e  |out attack.")..^|
00000570  25 f2 73 70 61 63 65 3a  f2 68 65 61 64 65 72 3a  |%.space:.header:|
00000580  f2 77 69 6e 64 6f 77 28  31 2c 37 2c 33 38 2c 31  |.window(1,7,38,1|
00000590  37 29 0d 01 68 a6 f2 73  70 6c 69 74 28 22 53 74  |7)..h..split("St|
000005a0  6f 72 6b 65 72 20 68 61  73 20 62 65 65 6e 20 61  |orker has been a|
000005b0  73 73 69 67 6e 65 64 20  61 6e 20 65 67 67 2d 73  |ssigned an egg-s|
000005c0  74 72 65 6d 65 6c 79 20  64 61 6e 67 65 72 6f 75  |tremely dangerou|
000005d0  73 20 6d 69 73 73 69 6f  6e 2e 20 54 68 65 72 65  |s mission. There|
000005e0  20 69 73 20 61 6e 20 65  6e 64 6c 65 73 73 20 61  | is an endless a|
000005f0  72 6d 79 20 6f 66 20 68  65 64 67 65 68 6f 67 73  |rmy of hedgehogs|
00000600  20 61 64 76 61 6e 63 69  6e 67 20 77 68 69 6c 73  | advancing whils|
00000610  74 20 74 68 65 20 68 61  77 6b 20 61 69 72 20 70  |t the hawk air p|
00000620  61 74 72 6f 6c 73 20 64  72 6f 70 20 65 67 67 2d  |atrols drop egg-|
00000630  62 6f 6d 62 73 2e 22 29  0d 01 72 70 f2 73 70 6c  |bombs.")..rp.spl|
00000640  69 74 28 22 48 6f 77 65  76 65 72 2c 20 53 74 6f  |it("However, Sto|
00000650  72 6b 65 72 20 69 73 20  65 71 75 69 70 70 65 64  |rker is equipped|
00000660  20 77 69 74 68 20 65 67  67 2d 67 72 65 6e 61 64  | with egg-grenad|
00000670  65 73 2c 20 61 62 6c 65  20 74 6f 20 74 61 6b 65  |es, able to take|
00000680  20 6f 75 74 20 62 6f 74  68 20 74 68 65 20 68 65  | out both the he|
00000690  64 67 65 68 6f 67 73 20  61 6e 64 20 74 68 65 20  |dgehogs and the |
000006a0  62 6f 6d 62 73 2e 22 29  0d 01 7c 25 f2 73 70 61  |bombs.")..|%.spa|
000006b0  63 65 3a f2 68 65 61 64  65 72 3a f2 77 69 6e 64  |ce:.header:.wind|
000006c0  6f 77 28 31 2c 36 2c 33  38 2c 31 39 29 0d 01 86  |ow(1,6,38,19)...|
000006d0  99 f2 73 70 6c 69 74 28  22 54 6f 20 63 6c 65 61  |..split("To clea|
000006e0  72 20 65 61 63 68 20 73  63 72 65 65 6e 2c 20 53  |r each screen, S|
000006f0  74 6f 72 6b 65 72 20 6d  75 73 74 20 63 61 74 63  |torker must catc|
00000700  68 20 74 68 65 20 72 65  71 75 69 72 65 64 20 6e  |h the required n|
00000710  75 6d 62 65 72 20 6f 66  20 62 75 67 73 20 77 68  |umber of bugs wh|
00000720  69 63 68 20 62 75 7a 7a  20 6f 76 65 72 68 65 61  |ich buzz overhea|
00000730  64 2e 20 54 68 65 6e 20  68 65 20 6d 75 73 74 20  |d. Then he must |
00000740  72 75 6e 20 74 6f 20 74  68 65 20 72 69 67 68 74  |run to the right|
00000750  20 65 64 67 65 20 6f 66  20 74 68 65 20 73 63 72  | edge of the scr|
00000760  65 65 6e 2e 22 29 0d 01  90 bb f2 73 70 6c 69 74  |een.").....split|
00000770  28 22 54 6f 75 63 68 69  6e 67 20 68 65 64 67 65  |("Touching hedge|
00000780  68 6f 67 73 20 6f 72 20  62 65 69 6e 67 20 68 69  |hogs or being hi|
00000790  74 20 62 79 20 62 6f 6d  62 73 20 77 65 61 6b 65  |t by bombs weake|
000007a0  6e 73 20 53 74 6f 72 6b  65 72 2e 20 48 69 73 20  |ns Storker. His |
000007b0  73 74 72 65 6e 67 74 68  20 69 73 20 73 68 6f 77  |strength is show|
000007c0  6e 20 61 74 20 74 68 65  20 74 6f 70 2e 20 4f 6e  |n at the top. On|
000007d0  20 63 6f 6d 70 6c 65 74  69 6f 6e 20 6f 66 20 61  | completion of a|
000007e0  20 73 68 65 65 74 2c 20  61 20 62 6f 6e 75 73 20  | sheet, a bonus |
000007f0  77 69 6c 6c 20 62 65 20  61 77 61 72 64 65 64 20  |will be awarded |
00000800  64 65 70 65 6e 64 69 6e  67 20 6f 6e 20 74 68 65  |depending on the|
00000810  20 73 74 72 65 6e 67 74  68 20 6c 65 66 74 2e 22  | strength left."|
00000820  29 0d 01 9a 0c f2 73 70  61 63 65 3a e1 0d 01 a4  |).....space:....|
00000830  09 dd f2 76 61 72 0d 01  ae 1d 53 25 3d 30 3a 6c  |...var....S%=0:l|
00000840  69 25 3d 32 3a 6c 65 76  25 3d 31 3a 3f 73 70 3d  |i%=2:lev%=1:?sp=|
00000850  32 34 34 0d 01 b8 25 fb  32 3a f1 8a 30 2c 32 37  |244...%.2:..0,27|
00000860  29 c4 32 30 2c bd 32 32  34 29 8a 30 2c 37 29 c4  |).20,.224).0,7).|
00000870  32 30 2c bd 32 32 34 29  0d 01 c2 36 e6 30 2c 31  |20,.224)...6.0,1|
00000880  3a ec 30 2c 31 33 36 3a  ef 35 3a f1 c4 31 30 30  |:.0,136:.5:..100|
00000890  2c bd 32 32 36 29 3a ec  30 2c 31 33 36 3a e6 30  |,.226):.0,136:.0|
000008a0  2c 32 3a f1 c4 31 30 30  2c bd 32 32 37 29 0d 01  |,2:..100,.227)..|
000008b0  cc 75 24 26 31 31 30 3d  22 53 74 6f 72 6b 65 72  |.u$&110="Storker|
000008c0  27 73 20 20 52 75 6e 22  3a e6 30 2c 30 3a ef 35  |'s  Run":.0,0:.5|
000008d0  3a ec 31 39 32 2c 39 36  3a d6 64 6f 75 62 25 3a  |:.192,96:.doub%:|
000008e0  ec 32 30 30 2c 39 32 3a  d6 64 6f 75 62 25 3a ec  |.200,92:.doub%:.|
000008f0  31 39 32 2c 38 38 3a d6  64 6f 75 62 25 3a ec 31  |192,88:.doub%:.1|
00000900  38 34 2c 39 32 3a d6 64  6f 75 62 25 3a e6 30 2c  |84,92:.doub%:.0,|
00000910  33 3a ec 31 39 32 2c 39  32 3a d6 64 6f 75 62 25  |3:.192,92:.doub%|
00000920  3a ef 34 0d 01 d6 33 58  25 3d 32 38 3a 59 25 3d  |:.4...3X%=28:Y%=|
00000930  31 3a d6 63 61 6c 63 25  3a 21 64 61 74 61 3d 6d  |1:.calc%:!data=m|
00000940  65 6e 25 3a 58 25 3d 33  3a 59 25 3d 32 34 3a d6  |en%:X%=3:Y%=24:.|
00000950  70 72 69 6e 74 25 0d 01  e0 2a f1 8a 30 2c 31 29  |print%...*..0,1)|
00000960  22 53 43 4f 52 45 20 4c  45 56 3a 22 8a 36 2c 33  |"SCORE LEV:".6,3|
00000970  29 22 45 41 54 3a 22 8a  31 36 2c 32 29 22 3d 22  |)"EAT:".16,2)"="|
00000980  0d 01 ea 05 e1 0d 01 f4  0c dd f2 73 63 72 65 65  |...........scree|
00000990  6e 0d 01 fe 2b 21 67 78  3d 30 3a 21 6a 75 3d 30  |n...+!gx=0:!ju=0|
000009a0  3a 21 68 69 74 3d 30 3a  21 74 69 6d 65 25 3d 26  |:!hit=0:!time%=&|
000009b0  32 38 35 46 38 30 3a 21  66 78 3d 30 0d 02 08 37  |285F80:!fx=0...7|
000009c0  21 61 64 64 3d 26 37 36  30 30 3a 21 64 61 74 61  |!add=&7600:!data|
000009d0  3d 6d 65 6e 25 3a 58 25  3d 33 3a 59 25 3d 32 34  |=men%:X%=3:Y%=24|
000009e0  3a d6 70 72 69 6e 74 25  3a 57 25 3d 30 3a 5a 25  |:.print%:W%=0:Z%|
000009f0  3d 32 34 0d 02 12 2c fb  31 3a ef 33 31 2c 30 2c  |=24...,.1:.31,0,|
00000a00  35 2c 32 32 35 2c 32 32  35 2c 32 32 35 3a fb 32  |5,225,225,225:.2|
00000a10  3a f1 3b c4 31 37 2c bd  32 32 35 29 3a fb 33 0d  |:.;.17,.225):.3.|
00000a20  02 1c 34 21 62 6f 6e 3d  30 3a 21 68 78 3d 26 31  |..4!bon=0:!hx=&1|
00000a30  33 31 43 32 34 3a f7 8d  44 76 42 3a e3 49 25 3d  |31C24:..DvB:.I%=|
00000a40  30 b8 28 6c 65 76 25 2d  31 29 83 31 30 3a f3 41  |0.(lev%-1).10:.A|
00000a50  24 3a ed 0d 02 26 27 3f  68 74 6f 74 3d bb c1 41  |$:...&'?htot=..A|
00000a60  24 2c 31 2c 31 29 2d 31  3a 3f 62 74 6f 74 3d bb  |$,1,1)-1:?btot=.|
00000a70  c1 41 24 2c 32 2c 31 29  2d 31 0d 02 30 1e 46 25  |.A$,2,1)-1..0.F%|
00000a80  3d bb c1 41 24 2c 33 2c  31 29 3a 3f 74 64 65 63  |=..A$,3,1):?tdec|
00000a90  3d bb c1 41 24 2c 34 29  0d 02 3a 22 e3 49 25 3d  |=..A$,4)..:".I%=|
00000aa0  30 b8 3f 68 74 6f 74 3a  3f 74 78 3d 68 78 3f 49  |0.?htot:?tx=hx?I|
00000ab0  25 3a d6 68 6f 67 70 72  3a ed 0d 02 44 12 3f 68  |%:.hogpr:...D.?h|
00000ac0  61 77 3d 31 38 3a d6 68  61 77 70 72 0d 02 4e 43  |aw=18:.hawpr..NC|
00000ad0  f1 8a 31 30 2c 31 29 3b  89 2d 28 6c 65 76 25 3c  |..10,1);.-(lev%<|
00000ae0  31 30 29 3b 6c 65 76 25  8a 31 31 2c 33 29 3b 46  |10);lev%.11,3);F|
00000af0  25 8a 31 38 2c 32 29 3b  6c 69 25 8a 30 2c 33 29  |%.18,2);li%.0,3)|
00000b00  3b c2 22 30 30 30 30 22  2b c3 53 25 2c 35 29 0d  |;."0000"+.S%,5).|
00000b10  02 58 3f f2 64 62 28 22  52 45 41 44 59 21 22 2c  |.X?.db("READY!",|
00000b20  37 2c 31 36 29 3a f2 64  65 6c 28 31 30 30 29 3a  |7,16):.del(100):|
00000b30  f2 64 62 28 22 20 20 20  20 20 20 22 2c 37 2c 31  |.db("      ",7,1|
00000b40  36 29 3a d4 31 2c 2d 31  35 2c 38 30 2c 32 0d 02  |6):.1,-15,80,2..|
00000b50  62 20 58 25 3d 30 3a 59  25 3d 32 34 3a 21 6f 6c  |b X%=0:Y%=24:!ol|
00000b60  64 3d 6d 65 6e 25 3a 3f  74 69 3d 3f 73 70 0d 02  |d=men%:?ti=?sp..|
00000b70  6c 05 e1 0d 02 76 40 dc  31 31 31 30 35 2c 31 32  |l....v@.11105,12|
00000b80  31 30 35 2c 31 32 32 30  36 2c 31 32 33 30 37 2c  |105,12206,12307,|
00000b90  32 33 32 30 38 2c 32 32  33 30 38 2c 32 32 34 30  |23208,22308,2240|
00000ba0  38 2c 33 32 32 30 39 2c  32 33 34 31 30 2c 33 33  |8,32209,23410,33|
00000bb0  34 31 31 0d 02 80 0b dd  f2 63 6c 65 61 72 0d 02  |411......clear..|
00000bc0  8a 3a f2 74 75 6e 65 28  22 4e 4e 4e 4e 50 50 50  |.:.tune("NNNNPPP|
00000bd0  50 52 50 52 50 4e 4e 4e  4e 22 2c 22 36 33 33 37  |PRPRPNNNN","6337|
00000be0  36 33 33 37 35 35 35 35  33 33 33 38 22 29 3a f2  |633755553338"):.|
00000bf0  64 65 6c 28 31 30 30 29  0d 02 94 3a 3f 64 65 61  |del(100)...:?dea|
00000c00  64 3d 30 3a e7 74 69 6d  65 25 3f 32 3d 30 e5 8d  |d=0:.time%?2=0..|
00000c10  74 68 42 8b 58 25 3d 30  3a 59 25 3d 33 3a 41 25  |thB.X%=0:Y%=3:A%|
00000c20  3d 30 3a f5 d6 62 6f 6e  75 73 3a 2a 46 58 32 31  |=0:..bonus:*FX21|
00000c30  2c 35 0d 02 9e 3e d4 31  2c 2d 31 35 2c 31 35 30  |,5...>.1,-15,150|
00000c40  2c 31 3a 53 25 3d 53 25  2b 35 3a 21 6e 75 3d 53  |,1:S%=S%+5:!nu=S|
00000c50  25 3a d6 6e 75 6d 62 25  3a f2 64 65 6c 28 31 30  |%:.numb%:.del(10|
00000c60  29 3a fd 3f 64 65 61 64  3a 3f 64 65 61 64 3d 30  |):.?dead:?dead=0|
00000c70  0d 02 a8 38 d6 63 6c 65  25 3a 6c 65 76 25 3d 6c  |...8.cle%:lev%=l|
00000c80  65 76 25 2b 31 3a e7 28  6c 65 76 25 2d 31 29 83  |ev%+1:.(lev%-1).|
00000c90  31 30 3d 30 3a 3f 73 70  3d 3f 73 70 2d 32 2a 28  |10=0:?sp=?sp-2*(|
00000ca0  3f 73 70 3c 32 35 34 29  0d 02 b2 33 fb 32 3a f1  |?sp<254)...3.2:.|
00000cb0  8a 32 2c 31 33 29 22 50  72 6f 63 65 65 64 20 74  |.2,13)"Proceed t|
00000cc0  6f 20 6c 65 76 65 6c 22  3a fb 33 3a f2 64 62 28  |o level":.3:.db(|
00000cd0  c3 6c 65 76 25 2c 39 2c  31 35 29 0d 02 bc 50 e7  |.lev%,9,15)...P.|
00000ce0  28 6c 65 76 25 2d 31 29  83 35 3d 30 f2 64 65 6c  |(lev%-1).5=0.del|
00000cf0  28 31 30 30 29 3a f1 8a  35 2c 31 39 29 22 42 4f  |(100):..5,19)"BO|
00000d00  4e 55 53 20 4c 49 46 45  22 3a d4 31 2c 2d 31 2c  |NUS LIFE":.1,-1,|
00000d10  32 30 30 2c 34 3a 6c 69  25 3d 6c 69 25 2b 31 3a  |200,4:li%=li%+1:|
00000d20  f1 8a 31 38 2c 32 29 3b  6c 69 25 0d 02 c6 13 f2  |..18,2);li%.....|
00000d30  64 65 6c 28 32 30 30 29  3a d6 63 6c 65 25 0d 02  |del(200):.cle%..|
00000d40  d0 05 e1 0d 02 da 0a dd  f2 64 65 61 64 0d 02 e4  |.........dead...|
00000d50  3f e3 49 25 3d 30 b8 31  35 3a 59 25 3d 59 25 2d  |?.I%=0.15:Y%=Y%-|
00000d60  31 2b 32 2a 28 49 25 83  32 29 3a d6 62 69 72 64  |1+2*(I%.2):.bird|
00000d70  25 3a d4 30 2c 2d 31 35  2c 35 2d 49 25 83 32 2c  |%:.0,-15,5-I%.2,|
00000d80  32 3a f2 64 65 6c 28 31  30 29 3a ed 0d 02 ee 27  |2:.del(10):....'|
00000d90  f2 64 65 6c 28 36 30 29  3a f2 74 75 6e 65 28 22  |.del(60):.tune("|
00000da0  48 49 48 66 45 44 44 22  2c 22 36 34 35 33 35 35  |HIHfEDD","645355|
00000db0  36 22 29 0d 02 f8 1a 6c  69 25 3d 6c 69 25 2d 31  |6")....li%=li%-1|
00000dc0  3a e7 6c 69 25 3a 3f 64  65 61 64 3d 30 0d 03 02  |:.li%:?dead=0...|
00000dd0  1e f2 64 65 6c 28 32 30  30 29 3a d6 63 6c 65 25  |..del(200):.cle%|
00000de0  3a f2 64 65 6c 28 36 30  29 3a e1 0d 03 0c 0a dd  |:.del(60):......|
00000df0  f2 6f 76 65 72 0d 03 16  38 e3 49 25 3d 31 b8 31  |.over...8.I%=1.1|
00000e00  30 3a f2 64 62 28 c1 22  47 41 4d 45 20 20 4f 56  |0:.db(."GAME  OV|
00000e10  45 52 22 2c 49 25 2c 31  29 2c 34 2b 49 25 2c 31  |ER",I%,1),4+I%,1|
00000e20  34 29 3a f2 64 65 6c 28  32 35 29 3a ed 0d 03 20  |4):.del(25):... |
00000e30  26 f2 74 75 6e 65 28 22  45 45 45 45 47 66 66 45  |&.tune("EEEEGffE|
00000e40  45 64 45 22 2c 22 39 37  33 39 37 33 35 35 37 33  |EdE","9739735573|
00000e50  39 22 29 0d 03 2a 15 f2  64 65 6c 28 32 30 30 29  |9")..*..del(200)|
00000e60  3a d6 63 6c 65 25 3a e1  0d 03 34 0a dd f2 68 69  |:.cle%:...4...hi|
00000e70  67 68 0d 03 3e 14 e7 53  25 3c 3d 68 73 25 28 34  |gh..>..S%<=hs%(4|
00000e80  29 e5 8d 74 4e 43 0d 03  48 66 49 25 3d 2d 31 3a  |)..tNC..HfI%=-1:|
00000e90  f5 49 25 3d 49 25 2b 31  3a fd 53 25 3e 68 73 25  |.I%=I%+1:.S%>hs%|
00000ea0  28 49 25 29 3a e3 4a 25  3d 33 b8 49 25 88 2d 31  |(I%):.J%=3.I%.-1|
00000eb0  3a 68 73 25 28 4a 25 2b  31 29 3d 68 73 25 28 4a  |:hs%(J%+1)=hs%(J|
00000ec0  25 29 3a 68 69 24 28 4a  25 2b 31 29 3d 68 69 24  |%):hi$(J%+1)=hi$|
00000ed0  28 4a 25 29 3a ed 3a 68  73 25 28 49 25 29 3d 53  |(J%):.:hs%(I%)=S|
00000ee0  25 3a 68 69 24 28 49 25  29 3d 22 22 0d 03 52 4d  |%:hi$(I%)=""..RM|
00000ef0  f2 74 61 62 6c 65 3a f2  77 69 6e 64 6f 77 28 38  |.table:.window(8|
00000f00  2c 32 36 2c 32 34 2c 34  29 3a f2 64 62 28 22 50  |,26,24,4):.db("P|
00000f10  6c 65 61 73 65 20 65 6e  74 65 72 20 79 6f 75 72  |lease enter your|
00000f20  20 6e 61 6d 65 22 2c 31  2c 31 29 3a ef 32 38 2c  | name",1,1):.28,|
00000f30  35 2c 32 35 2c 33 33 2c  37 0d 03 5c 09 2a 46 58  |5,25,33,7..\.*FX|
00000f40  32 31 0d 03 66 2f 41 24  3d 22 22 3a f5 42 25 3d  |21..f/A$="":.B%=|
00000f50  a5 3a e7 42 25 3e 33 31  80 42 25 3c 31 32 37 80  |.:.B%>31.B%<127.|
00000f60  a9 28 41 24 29 3c 31 30  41 24 3d 41 24 2b bd 42  |.(A$)<10A$=A$+.B|
00000f70  25 0d 03 70 1a e7 42 25  3d 31 32 37 41 24 3d c0  |%..p..B%=127A$=.|
00000f80  41 24 2c a9 28 41 24 29  2d 31 29 0d 03 7a 25 f2  |A$,.(A$)-1)..z%.|
00000f90  64 62 28 c0 41 24 2b 22  20 22 2c 31 30 29 2c 31  |db(.A$+" ",10),1|
00000fa0  39 2c 49 25 2a 33 2b 31  29 3a fd 42 25 3d 31 33  |9,I%*3+1):.B%=13|
00000fb0  0d 03 84 0e 68 69 24 28  49 25 29 3d 41 24 0d 03  |....hi$(I%)=A$..|
00000fc0  8e 0a f2 74 61 62 6c 65  0d 03 98 0c f2 73 70 61  |...table.....spa|
00000fd0  63 65 3a e1 0d 03 a2 0b  dd f2 74 61 62 6c 65 0d  |ce:.......table.|
00000fe0  03 ac 3d d6 73 63 72 25  3a f2 77 69 6e 64 6f 77  |..=.scr%:.window|
00000ff0  28 38 2c 31 2c 32 34 2c  34 29 3a f2 64 62 28 22  |(8,1,24,4):.db("|
00001000  53 74 6f 72 6b 65 72 27  73 20 20 46 61 6d 6f 75  |Storker's  Famou|
00001010  73 2d 46 69 76 65 22 2c  31 2c 31 29 0d 03 b6 5b  |s-Five",1,1)...[|
00001020  f2 77 69 6e 64 6f 77 28  35 2c 37 2c 33 30 2c 31  |.window(5,7,30,1|
00001030  36 29 3a e3 4a 25 3d 30  b8 34 3a f2 64 62 28 c2  |6):.J%=0.4:.db(.|
00001040  22 30 30 30 30 30 22 2b  c3 68 73 25 28 4a 25 29  |"00000"+.hs%(J%)|
00001050  2c 35 29 2b 22 2e 2e 2e  2e 2e 2e 2e 2e 2e 2e 2e  |,5)+"...........|
00001060  2e 2e 22 2b 68 69 24 28  4a 25 29 2c 31 2c 31 2b  |.."+hi$(J%),1,1+|
00001070  4a 25 2a 33 29 3a ed 0d  03 c0 05 e1 0d 03 ca 11  |J%*3):..........|
00001080  dd f2 74 75 6e 65 28 41  24 2c 42 24 29 0d 03 d4  |..tune(A$,B$)...|
00001090  2b 43 24 3d 22 20 43 63  44 64 45 46 66 47 66 48  |+C$=" CcDdEFfGfH|
000010a0  68 49 4a 6a 4b 6b 4c 4d  6d 4e 6e 4f 6f 50 51 71  |hIJjKkLMmNnOoPQq|
000010b0  52 72 53 54 74 55 75 22  0d 03 de 39 e3 49 25 3d  |RrSTtUu"...9.I%=|
000010c0  31 b8 a9 41 24 3a d4 31  2c 34 2c a7 43 24 2c c1  |1..A$:.1,4,.C$,.|
000010d0  41 24 2c 49 25 2c 31 29  29 2a 34 2c bb c1 42 24  |A$,I%,1))*4,..B$|
000010e0  2c 49 25 2c 31 29 3a d4  31 2c 30 2c 30 2c 30 3a  |,I%,1):.1,0,0,0:|
000010f0  ed 0d 03 e8 05 e1 0d 03  f2 7c dd f2 73 70 6c 69  |.........|..spli|
00001100  74 28 41 24 29 f5 49 25  3d 33 37 3a f5 49 25 3d  |t(A$).I%=37:.I%=|
00001110  49 25 2d 31 3a fd c1 41  24 2c 49 25 2c 31 29 3d  |I%-1:..A$,I%,1)=|
00001120  22 20 22 3a 4a 25 3d 49  25 3a f5 49 25 3d 49 25  |" ":J%=I%:.I%=I%|
00001130  2d 31 3a fd c1 41 24 2c  49 25 2c 31 29 3c 3e 22  |-1:..A$,I%,1)<>"|
00001140  20 22 3a f2 63 65 6e 74  28 c0 41 24 2c 49 25 29  | ":.cent(.A$,I%)|
00001150  29 3a 41 24 3d c1 41 24  2c 4a 25 2b 31 29 3a fd  |):A$=.A$,J%+1):.|
00001160  a9 41 24 3c 33 37 3a f2  63 65 6e 74 28 41 24 29  |.A$<37:.cent(A$)|
00001170  3a e1 0d 03 fc 24 dd f2  63 65 6e 74 28 42 24 29  |:....$..cent(B$)|
00001180  f1 8a 31 39 2d a9 28 42  24 29 2f 32 2c bc 2b 31  |..19-.(B$)/2,.+1|
00001190  29 3b 42 24 3a e1 0d 04  06 35 dd f2 77 69 6e 64  |);B$:....5..wind|
000011a0  6f 77 28 58 25 2c 59 25  2c 48 25 2c 56 25 29 ef  |ow(X%,Y%,H%,V%).|
000011b0  32 38 2c 58 25 2c 59 25  2b 56 25 2d 31 2c 58 25  |28,X%,Y%+V%-1,X%|
000011c0  2b 48 25 2d 31 2c 59 25  2c 31 32 0d 04 10 51 ec  |+H%-1,Y%,12...Q.|
000011d0  58 25 2a 33 32 2b 34 2c  31 30 31 39 2d 59 25 2a  |X%*32+4,1019-Y%*|
000011e0  33 32 3a f0 31 2c 48 25  2a 33 32 2d 31 32 2c 30  |32:.1,H%*32-12,0|
000011f0  3a f0 31 2c 30 2c 2d 56  25 2a 33 32 2b 31 32 3a  |:.1,0,-V%*32+12:|
00001200  f0 31 2c 2d 48 25 2a 33  32 2b 31 32 2c 30 3a f0  |.1,-H%*32+12,0:.|
00001210  31 2c 30 2c 56 25 2a 33  32 2d 31 32 0d 04 1a 35  |1,0,V%*32-12...5|
00001220  f0 30 2c 34 2c 30 3a f0  31 2c 30 2c 2d 56 25 2a  |.0,4,0:.1,0,-V%*|
00001230  33 32 2b 31 32 3a f0 30  2c 48 25 2a 33 32 2d 32  |32+12:.0,H%*32-2|
00001240  30 2c 30 3a f0 31 2c 30  2c 56 25 2a 33 32 2d 31  |0,0:.1,0,V%*32-1|
00001250  32 0d 04 24 05 e1 0d 04  2e 1d dd f2 64 62 28 24  |2..$........db($|
00001260  26 31 31 30 2c 58 25 2c  59 25 29 d6 64 6f 75 62  |&110,X%,Y%).doub|
00001270  25 3a e1 0d 04 38 1a dd  f2 64 65 6c 28 41 25 29  |%:...8...del(A%)|
00001280  3a d1 3d 30 3a f5 fd 91  3e 41 25 3a e1 0d 04 42  |:.=0:...>A%:...B|
00001290  40 dd f2 73 70 61 63 65  3a f2 77 69 6e 64 6f 77  |@..space:.window|
000012a0  28 31 33 2c 32 37 2c 31  34 2c 34 29 3a f2 64 62  |(13,27,14,4):.db|
000012b0  28 22 50 52 45 53 53 20  20 53 50 41 43 45 22 2c  |("PRESS  SPACE",|
000012c0  31 2c 31 29 3a f5 fd a6  2d 39 39 3a e1 0d 04 4c  |1,1):...-99:...L|
000012d0  41 dd f2 68 65 61 64 65  72 3a d6 73 63 72 25 3a  |A..header:.scr%:|
000012e0  f2 77 69 6e 64 6f 77 28  31 32 2c 31 2c 31 36 2c  |.window(12,1,16,|
000012f0  34 29 3a f2 64 62 28 22  53 54 4f 52 4b 45 52 27  |4):.db("STORKER'|
00001300  53 20 20 52 55 4e 22 2c  31 2c 31 29 3a e1 0d 04  |S  RUN",1,1):...|
00001310  56 0a dd f2 69 6e 69 74  0d 04 60 4c ef 32 33 2c  |V...init..`L.23,|
00001320  32 32 34 2c 30 2c 32 34  30 2c 32 35 35 2c 32 35  |224,0,240,255,25|
00001330  35 2c 32 35 35 2c 32 35  35 2c 30 2c 30 2c 32 33  |5,255,255,0,0,23|
00001340  2c 32 32 35 2c 31 30 32  2c 31 30 32 2c 31 30 32  |,225,102,102,102|
00001350  2c 31 30 32 2c 31 30 32  2c 31 30 32 2c 31 30 32  |,102,102,102,102|
00001360  2c 31 30 32 0d 04 6a 4a  ef 32 33 2c 32 32 36 2c  |,102..jJ.23,226,|
00001370  38 35 2c 31 37 30 2c 38  35 2c 31 37 30 2c 38 35  |85,170,85,170,85|
00001380  2c 31 37 30 2c 38 35 2c  31 37 30 2c 32 33 2c 32  |,170,85,170,23,2|
00001390  32 37 2c 31 37 30 2c 38  35 2c 31 37 30 2c 38 35  |27,170,85,170,85|
000013a0  2c 31 37 30 2c 38 35 2c  31 37 30 2c 38 35 0d 04  |,170,85,170,85..|
000013b0  74 55 e2 31 2c 31 2c 30  2c 30 2c 35 2c 30 2c 35  |tU.1,1,0,0,5,0,5|
000013c0  2c 32 30 2c 31 32 36 2c  30 2c 30 2c 2d 31 32 36  |,20,126,0,0,-126|
000013d0  2c 31 32 36 2c 31 32 36  3a e2 32 2c 31 2c 30 2c  |,126,126:.2,1,0,|
000013e0  31 30 2c 2d 31 30 2c 30  2c 31 30 2c 31 30 2c 31  |10,-10,0,10,10,1|
000013f0  32 36 2c 30 2c 30 2c 2d  31 32 36 2c 31 32 36 2c  |26,0,0,-126,126,|
00001400  31 32 36 0d 04 7e 52 e2  33 2c 32 2c 2d 33 2c 30  |126..~R.3,2,-3,0|
00001410  2c 30 2c 35 30 2c 30 2c  30 2c 31 32 36 2c 30 2c  |,0,50,0,0,126,0,|
00001420  30 2c 2d 31 32 36 2c 31  32 36 2c 31 32 36 3a e2  |0,-126,126,126:.|
00001430  34 2c 32 2c 31 2c 2d 31  2c 30 2c 31 2c 31 2c 30  |4,2,1,-1,0,1,1,0|
00001440  2c 31 32 36 2c 30 2c 30  2c 2d 31 32 36 2c 31 32  |,126,0,0,-126,12|
00001450  36 2c 31 32 36 0d 04 88  4c de 51 25 31 37 39 30  |6,126...L.Q%1790|
00001460  2c 68 73 25 28 35 29 2c  68 69 24 28 35 29 3a e3  |,hs%(5),hi$(5):.|
00001470  49 25 3d 30 b8 34 3a 68  69 24 28 49 25 29 3d 22  |I%=0.4:hi$(I%)="|
00001480  42 61 69 6e 79 20 53 6f  66 74 22 3a 68 73 25 28  |Bainy Soft":hs%(|
00001490  49 25 29 3d 28 35 2d 49  25 29 2a 31 30 30 30 3a  |I%)=(5-I%)*1000:|
000014a0  ed 0d 04 92 60 f7 8d 64  40 48 3a 6d 65 6e 25 3d  |....`..d@H:men%=|
000014b0  26 39 30 30 3a e3 49 25  3d 30 b8 34 30 37 3a f3  |&900:.I%=0.407:.|
000014c0  6d 65 6e 25 3f 49 25 3a  ed 3a 65 67 67 25 3d 6d  |men%?I%:.:egg%=m|
000014d0  65 6e 25 2b 32 38 38 3a  68 64 61 25 3d 6d 65 6e  |en%+288:hda%=men|
000014e0  25 2b 33 30 34 3a 62 64  61 25 3d 6d 65 6e 25 2b  |%+304:bda%=men%+|
000014f0  33 36 38 3a 66 6c 79 25  3d 6d 65 6e 25 2b 33 39  |368:fly%=men%+39|
00001500  32 0d 04 9c 39 61 64 64  3d 26 37 30 3a 64 61 74  |2...9add=&70:dat|
00001510  61 3d 26 37 32 3a 6f 6c  64 3d 26 37 34 3a 67 78  |a=&72:old=&74:gx|
00001520  3d 26 37 36 3a 67 79 3d  26 37 37 3a 67 64 3d 26  |=&76:gy=&77:gd=&|
00001530  37 38 3a 67 72 65 3d 26  37 39 0d 04 a6 43 6a 75  |78:gre=&79...Cju|
00001540  3d 26 37 41 3a 67 6f 3d  26 37 42 3a 64 69 72 3d  |=&7A:go=&7B:dir=|
00001550  26 37 43 3a 61 6e 69 6d  3d 26 37 44 3a 68 69 74  |&7C:anim=&7D:hit|
00001560  3d 26 37 45 3a e7 a6 2d  32 35 36 3d 31 74 69 3d  |=&7E:..-256=1ti=|
00001570  26 32 39 46 20 8b 74 69  3d 26 32 41 30 0d 04 b0  |&29F .ti=&2A0...|
00001580  7b 64 65 61 64 3d 26 37  46 3a 67 6f 74 3d 26 38  |{dead=&7F:got=&8|
00001590  30 3a 6c 61 73 74 3d 26  38 31 3a 72 6f 77 3d 26  |0:last=&81:row=&|
000015a0  38 32 3a 63 6f 6c 3d 26  38 33 3a 68 78 3d 26 38  |82:col=&83:hx=&8|
000015b0  34 3a 68 74 6f 74 3d 26  38 37 3a 68 63 6f 3d 26  |4:htot=&87:hco=&|
000015c0  38 38 3a 74 78 3d 26 38  39 3a 68 61 77 3d 26 38  |88:tx=&89:haw=&8|
000015d0  41 3a 62 78 3d 26 38 42  3a 62 79 3d 26 38 45 3a  |A:bx=&8B:by=&8E:|
000015e0  62 6f 6e 3d 26 39 31 3a  62 74 6f 74 3d 26 39 34  |bon=&91:btot=&94|
000015f0  3a 62 63 6f 3d 26 39 35  0d 04 ba 43 74 69 6d 65  |:bco=&95...Ctime|
00001600  25 3d 26 36 30 3a 74 63  6f 3d 26 36 33 3a 74 64  |%=&60:tco=&63:td|
00001610  65 63 3d 26 36 34 3a 66  78 3d 26 36 35 3a 66 6f  |ec=&64:fx=&65:fo|
00001620  6e 3d 26 36 36 3a 66 63  6f 3d 26 36 37 3a 6e 75  |n=&66:fco=&67:nu|
00001630  3d 26 36 38 3a 73 70 3d  26 36 43 0d 04 c4 31 74  |=&68:sp=&6C...1t|
00001640  61 62 3d 26 31 35 30 3a  e3 4a 25 3d 30 b8 32 37  |ab=&150:.J%=0.27|
00001650  3a 21 28 74 61 62 2b 4a  25 2a 32 29 3d 26 35 38  |:!(tab+J%*2)=&58|
00001660  30 30 2b 26 31 34 30 2a  4a 25 3a ed 0d 04 ce 13  |00+&140*J%:.....|
00001670  e3 49 25 3d 30 b8 32 88  32 3a 50 25 3d 51 25 0d  |.I%=0.2.2:P%=Q%.|
00001680  04 d8 0a 5b 4f 50 54 49  25 0d 04 e2 8a 2e 63 61  |...[OPTI%.....ca|
00001690  6c 63 25 4c 44 41 23 30  3a 53 54 41 61 64 64 2b  |lc%LDA#0:STAadd+|
000016a0  31 3a 53 54 58 61 64 64  3a 4c 44 58 23 33 3a 2e  |1:STXadd:LDX#3:.|
000016b0  63 61 32 3a 41 53 4c 61  64 64 3a 52 4f 4c 61 64  |ca2:ASLadd:ROLad|
000016c0  64 2b 31 3a 44 45 58 3a  42 4e 45 63 61 32 3a 54  |d+1:DEX:BNEca2:T|
000016d0  59 41 3a 41 53 4c 41 3a  54 41 59 3a 4c 44 41 61  |YA:ASLA:TAY:LDAa|
000016e0  64 64 3a 41 44 43 74 61  62 2c 59 3a 53 54 41 61  |dd:ADCtab,Y:STAa|
000016f0  64 64 3a 4c 44 41 61 64  64 2b 31 3a 41 44 43 74  |dd:LDAadd+1:ADCt|
00001700  61 62 2b 31 2c 59 3a 53  54 41 61 64 64 2b 31 3a  |ab+1,Y:STAadd+1:|
00001710  52 54 53 0d 04 ec 1e 2e  70 72 69 6e 74 25 53 54  |RTS.....print%ST|
00001720  58 72 6f 77 3a 53 54 59  63 6f 6c 3a 4c 44 58 23  |Xrow:STYcol:LDX#|
00001730  30 0d 04 f6 31 2e 70 32  3a 4c 44 59 23 30 3a 2e  |0...1.p2:LDY#0:.|
00001740  70 33 3a 4c 44 41 28 64  61 74 61 29 2c 59 3a 82  |p3:LDA(data),Y:.|
00001750  28 61 64 64 29 2c 59 3a  53 54 41 28 61 64 64 29  |(add),Y:STA(add)|
00001760  2c 59 0d 05 00 46 49 4e  59 3a 43 50 59 63 6f 6c  |,Y...FINY:CPYcol|
00001770  3a 42 4e 45 70 33 3a 43  4c 43 3a 4c 44 41 61 64  |:BNEp3:CLC:LDAad|
00001780  64 3a 41 44 43 23 26 34  30 3a 53 54 41 61 64 64  |d:ADC#&40:STAadd|
00001790  3a 4c 44 41 61 64 64 2b  31 3a 41 44 43 23 31 3a  |:LDAadd+1:ADC#1:|
000017a0  53 54 41 61 64 64 2b 31  0d 05 0a 38 43 4c 43 3a  |STAadd+1...8CLC:|
000017b0  4c 44 41 64 61 74 61 3a  41 44 43 63 6f 6c 3a 53  |LDAdata:ADCcol:S|
000017c0  54 41 64 61 74 61 3a 4c  44 41 64 61 74 61 2b 31  |TAdata:LDAdata+1|
000017d0  3a 41 44 43 23 30 3a 53  54 41 64 61 74 61 2b 31  |:ADC#0:STAdata+1|
000017e0  0d 05 14 26 49 4e 58 3a  43 50 58 72 6f 77 3a 42  |...&INX:CPXrow:B|
000017f0  4e 45 70 32 3a 4c 44 58  72 6f 77 3a 4c 44 59 63  |NEp2:LDXrow:LDYc|
00001800  6f 6c 3a 52 54 53 0d 05  1e 5b 2e 62 69 72 64 25  |ol:RTS...[.bird%|
00001810  4c 44 41 6f 6c 64 3a 53  54 41 64 61 74 61 3a 4c  |LDAold:STAdata:L|
00001820  44 41 6f 6c 64 2b 31 3a  53 54 41 64 61 74 61 2b  |DAold+1:STAdata+|
00001830  31 3a 4c 44 58 26 34 35  43 3a 4c 44 59 26 34 36  |1:LDX&45C:LDY&46|
00001840  38 3a 4a 53 52 63 61 6c  63 25 3a 4c 44 58 23 33  |8:JSRcalc%:LDX#3|
00001850  3a 4c 44 59 23 32 34 3a  4a 53 52 70 72 69 6e 74  |:LDY#24:JSRprint|
00001860  25 0d 05 28 73 4c 44 41  23 6d 65 6e 25 83 32 35  |%..(sLDA#men%.25|
00001870  36 3a 53 54 41 64 61 74  61 3a 4c 44 41 23 6d 65  |6:STAdata:LDA#me|
00001880  6e 25 81 32 35 36 3a 53  54 41 64 61 74 61 2b 31  |n%.256:STAdata+1|
00001890  3a 4c 44 41 64 69 72 3a  42 45 51 6e 70 6c 3a 43  |:LDAdir:BEQnpl:C|
000018a0  4c 43 3a 4c 44 41 64 61  74 61 3a 41 44 43 23 31  |LC:LDAdata:ADC#1|
000018b0  34 34 3a 53 54 41 64 61  74 61 3a 4c 44 41 64 61  |44:STAdata:LDAda|
000018c0  74 61 2b 31 3a 41 44 43  23 30 3a 53 54 41 64 61  |ta+1:ADC#0:STAda|
000018d0  74 61 2b 31 0d 05 32 4b  2e 6e 70 6c 3a 4c 44 41  |ta+1..2K.npl:LDA|
000018e0  61 6e 69 6d 3a 82 23 37  32 3a 53 54 41 61 6e 69  |anim:.#72:STAani|
000018f0  6d 3a 43 4c 43 3a 41 44  43 64 61 74 61 3a 53 54  |m:CLC:ADCdata:ST|
00001900  41 64 61 74 61 3a 4c 44  41 64 61 74 61 2b 31 3a  |Adata:LDAdata+1:|
00001910  41 44 43 23 30 3a 53 54  41 64 61 74 61 2b 31 0d  |ADC#0:STAdata+1.|
00001920  05 3c 69 4c 44 41 64 61  74 61 3a 53 54 41 6f 6c  |.<iLDAdata:STAol|
00001930  64 3a 4c 44 41 64 61 74  61 2b 31 3a 53 54 41 6f  |d:LDAdata+1:STAo|
00001940  6c 64 2b 31 3a 4c 44 58  26 34 36 30 3a 4c 44 59  |ld+1:LDX&460:LDY|
00001950  26 34 36 34 3a 53 54 58  26 34 35 43 3a 53 54 59  |&464:STX&45C:STY|
00001960  26 34 36 38 3a 4a 53 52  63 61 6c 63 25 3a 4c 44  |&468:JSRcalc%:LD|
00001970  58 23 33 3a 4c 44 59 23  32 34 3a 4a 53 52 70 72  |X#3:LDY#24:JSRpr|
00001980  69 6e 74 25 3a 52 54 53  0d 05 46 3d 2e 67 72 65  |int%:RTS..F=.gre|
00001990  6e 25 4c 44 41 67 72 65  3a 43 4d 50 23 32 30 30  |n%LDAgre:CMP#200|
000019a0  3a 42 43 53 65 78 70 6c  6f 3a 4c 44 41 67 72 65  |:BCSexplo:LDAgre|
000019b0  3a 42 4e 45 6d 67 3a 4c  44 41 64 69 72 3a 42 45  |:BNEmg:LDAdir:BE|
000019c0  51 67 72 65 72 0d 05 50  3c 4c 44 41 26 34 36 30  |Qgrer..P<LDA&460|
000019d0  3a 53 54 41 67 78 3a 43  4c 43 3a 4c 44 41 26 34  |:STAgx:CLC:LDA&4|
000019e0  36 34 3a 41 44 43 23 31  3a 53 54 41 67 79 3a 4c  |64:ADC#1:STAgy:L|
000019f0  44 41 23 31 3a 53 54 41  67 64 3a 4a 4d 50 6d 67  |DA#1:STAgd:JMPmg|
00001a00  31 0d 05 5a 48 2e 67 72  65 72 3a 4c 44 41 26 34  |1..ZH.grer:LDA&4|
00001a10  36 30 3a 43 4c 43 3a 41  44 43 23 32 3a 53 54 41  |60:CLC:ADC#2:STA|
00001a20  67 78 3a 4c 44 41 26 34  36 34 3a 41 44 43 23 31  |gx:LDA&464:ADC#1|
00001a30  3a 53 54 41 67 79 3a 4c  44 41 23 30 3a 53 54 41  |:STAgy:LDA#0:STA|
00001a40  67 64 3a 4a 4d 50 6d 67  31 0d 05 64 2f 2e 6d 67  |gd:JMPmg1..d/.mg|
00001a50  3a 4a 53 52 67 72 70 72  3a 2e 6d 67 31 3a 49 4e  |:JSRgrpr:.mg1:IN|
00001a60  43 67 72 65 3a 4c 44 41  67 72 65 3a 43 4d 50 23  |Cgre:LDAgre:CMP#|
00001a70  38 3a 42 43 53 67 64 6f  0d 05 6e 2d 44 45 43 67  |8:BCSgdo..n-DECg|
00001a80  79 3a 4a 4d 50 6d 67 32  3a 2e 67 64 6f 3a 49 4e  |y:JMPmg2:.gdo:IN|
00001a90  43 67 79 3a 2e 6d 67 32  3a 4c 44 41 67 64 3a 42  |Cgy:.mg2:LDAgd:B|
00001aa0  4e 45 6d 67 6c 0d 05 78  42 49 4e 43 67 78 3a 4c  |NEmgl..xBINCgx:L|
00001ab0  44 41 67 78 3a 43 4d 50  23 34 30 3a 42 45 51 65  |DAgx:CMP#40:BEQe|
00001ac0  6e 64 67 72 65 3a 4a 4d  50 6d 67 33 3a 2e 6d 67  |ndgre:JMPmg3:.mg|
00001ad0  6c 3a 44 45 43 67 78 3a  4c 44 41 67 78 3a 42 4d  |l:DECgx:LDAgx:BM|
00001ae0  49 65 6e 64 67 72 65 0d  05 82 57 2e 6d 67 33 3a  |Iendgre...W.mg3:|
00001af0  4a 53 52 67 72 70 72 3a  4c 44 41 67 72 65 3a 43  |JSRgrpr:LDAgre:C|
00001b00  4d 50 23 31 35 3a 42 45  51 65 78 70 6c 6f 3a 52  |MP#15:BEQexplo:R|
00001b10  54 53 3a 2e 65 6e 64 67  72 65 3a 4c 44 41 23 30  |TS:.endgre:LDA#0|
00001b20  3a 53 54 41 67 6f 74 3a  53 54 41 67 72 65 3a 53  |:STAgot:STAgre:S|
00001b30  54 41 67 78 3a 53 54 41  67 79 3a 52 54 53 0d 05  |TAgx:STAgy:RTS..|
00001b40  8c 7c 2e 65 78 70 6c 6f  3a 4c 44 41 67 72 65 3a  |.|.explo:LDAgre:|
00001b50  43 4d 50 23 32 30 30 3a  42 43 53 65 78 32 3a 4c  |CMP#200:BCSex2:L|
00001b60  44 41 23 32 30 30 3a 53  54 41 67 72 65 3a 4a 53  |DA#200:STAgre:JS|
00001b70  52 67 72 70 72 3a 4a 4d  50 65 78 70 72 3a 2e 65  |Rgrpr:JMPexpr:.e|
00001b80  78 32 3a 49 4e 43 67 72  65 3a 4c 44 41 67 72 65  |x2:INCgre:LDAgre|
00001b90  3a 43 4d 50 23 32 30 32  3a 42 45 51 65 78 33 3a  |:CMP#202:BEQex3:|
00001ba0  52 54 53 3a 2e 65 78 33  3a 4a 53 52 65 78 70 72  |RTS:.ex3:JSRexpr|
00001bb0  3a 4a 4d 50 65 6e 64 67  72 65 0d 05 96 68 2e 65  |:JMPendgre...h.e|
00001bc0  78 70 72 3a 4c 44 58 67  78 3a 4c 44 59 67 79 3a  |xpr:LDXgx:LDYgy:|
00001bd0  4a 53 52 63 61 6c 63 25  3a 4c 44 41 23 28 65 67  |JSRcalc%:LDA#(eg|
00001be0  67 25 2b 38 29 83 32 35  36 3a 53 54 41 64 61 74  |g%+8).256:STAdat|
00001bf0  61 3a 4c 44 41 23 28 65  67 67 25 2b 38 29 81 32  |a:LDA#(egg%+8).2|
00001c00  35 36 3a 53 54 41 64 61  74 61 2b 31 3a 4c 44 58  |56:STAdata+1:LDX|
00001c10  23 31 3a 4c 44 59 23 38  3a 4a 4d 50 70 72 69 6e  |#1:LDY#8:JMPprin|
00001c20  74 25 0d 05 a0 64 2e 67  72 70 72 3a 4c 44 58 67  |t%...d.grpr:LDXg|
00001c30  78 3a 4c 44 59 67 79 3a  4a 53 52 63 61 6c 63 25  |x:LDYgy:JSRcalc%|
00001c40  3a 4c 44 41 23 28 65 67  67 25 29 83 32 35 36 3a  |:LDA#(egg%).256:|
00001c50  53 54 41 64 61 74 61 3a  4c 44 41 23 28 65 67 67  |STAdata:LDA#(egg|
00001c60  25 29 81 32 35 36 3a 53  54 41 64 61 74 61 2b 31  |%).256:STAdata+1|
00001c70  3a 4c 44 58 23 31 3a 4c  44 59 23 38 3a 4a 4d 50  |:LDX#1:LDY#8:JMP|
00001c80  70 72 69 6e 74 25 0d 05  aa 67 2e 68 6f 67 70 72  |print%...g.hogpr|
00001c90  3a 43 4c 43 3a 4c 44 41  23 68 64 61 25 83 32 35  |:CLC:LDA#hda%.25|
00001ca0  36 3a 53 54 41 64 61 74  61 3a 4c 44 41 23 68 64  |6:STAdata:LDA#hd|
00001cb0  61 25 81 32 35 36 3a 53  54 41 64 61 74 61 2b 31  |a%.256:STAdata+1|
00001cc0  3a 4c 44 58 74 78 3a 4c  44 59 23 32 35 3a 4a 53  |:LDXtx:LDY#25:JS|
00001cd0  52 63 61 6c 63 25 3a 4c  44 58 23 32 3a 4c 44 59  |Rcalc%:LDX#2:LDY|
00001ce0  23 33 32 3a 4a 4d 50 70  72 69 6e 74 25 0d 05 b4  |#32:JMPprint%...|
00001cf0  52 2e 68 6f 67 25 4c 44  41 23 26 46 46 3a 53 54  |R.hog%LDA#&FF:ST|
00001d00  41 68 63 6f 3a 2e 68 31  3a 49 4e 43 68 63 6f 3a  |Ahco:.h1:INChco:|
00001d10  4c 44 59 68 63 6f 3a 4c  44 41 68 78 2c 59 3a 53  |LDYhco:LDAhx,Y:S|
00001d20  54 41 74 78 3a 4a 53 52  63 68 68 6f 67 3a 4c 44  |TAtx:JSRchhog:LD|
00001d30  41 64 65 61 64 3a 42 45  51 68 32 3a 52 54 53 0d  |Adead:BEQh2:RTS.|
00001d40  05 be 39 2e 68 32 3a 4a  53 52 68 6f 67 70 72 3a  |..9.h2:JSRhogpr:|
00001d50  4c 44 41 74 78 3a 42 45  51 62 61 63 6b 3a 4c 44  |LDAtx:BEQback:LD|
00001d60  41 68 69 74 3a 42 4e 45  6e 65 77 68 6f 67 3a 2e  |Ahit:BNEnewhog:.|
00001d70  68 33 3a 44 45 43 74 78  0d 05 c8 3f 2e 68 34 3a  |h3:DECtx...?.h4:|
00001d80  4c 44 58 68 63 6f 3a 4c  44 41 74 78 3a 53 54 41  |LDXhco:LDAtx:STA|
00001d90  68 78 2c 58 3a 4a 53 52  63 68 68 6f 67 3a 4c 44  |hx,X:JSRchhog:LD|
00001da0  41 68 69 74 3a 42 4e 45  6e 65 77 68 6f 67 3a 4a  |Ahit:BNEnewhog:J|
00001db0  53 52 68 6f 67 70 72 0d  05 d2 32 2e 68 35 3a 4c  |SRhogpr...2.h5:L|
00001dc0  44 41 64 65 61 64 3a 42  4e 45 68 36 3a 4c 44 41  |DAdead:BNEh6:LDA|
00001dd0  68 63 6f 3a 43 4d 50 68  74 6f 74 3a 42 4e 45 68  |hco:CMPhtot:BNEh|
00001de0  31 3a 2e 68 36 3a 52 54  53 0d 05 dc 4d 2e 6e 65  |1:.h6:RTS...M.ne|
00001df0  77 68 6f 67 3a 4c 44 41  67 6f 74 3a 42 4e 45 68  |whog:LDAgot:BNEh|
00001e00  33 3a 4c 44 41 23 31 3a  53 54 41 67 6f 74 3a 4a  |3:LDA#1:STAgot:J|
00001e10  53 52 65 78 70 6c 6f 3a  4c 44 58 23 73 34 20 83  |SRexplo:LDX#s4 .|
00001e20  32 35 36 3a 4c 44 59 23  73 34 20 81 32 35 36 3a  |256:LDY#s4 .256:|
00001e30  4a 53 52 73 6f 75 0d 05  e6 5d 43 4c 43 3a 4c 44  |JSRsou...]CLC:LD|
00001e40  41 26 34 34 43 3a 41 44  43 23 31 30 3a 53 54 41  |A&44C:ADC#10:STA|
00001e50  26 34 34 43 3a 53 54 41  6e 75 3a 4c 44 41 26 34  |&44C:STAnu:LDA&4|
00001e60  34 44 3a 41 44 43 23 30  3a 53 54 41 26 34 34 44  |4D:ADC#0:STA&44D|
00001e70  3a 53 54 41 6e 75 2b 31  3a 4c 44 41 23 30 3a 4c  |:STAnu+1:LDA#0:L|
00001e80  44 58 23 30 3a 4c 44 59  23 33 3a 4a 53 52 6e 75  |DX#0:LDY#3:JSRnu|
00001e90  6d 62 25 0d 05 f0 1c 2e  62 61 63 6b 3a 4c 44 41  |mb%.....back:LDA|
00001ea0  23 33 36 3a 53 54 41 74  78 3a 4a 4d 50 68 34 0d  |#36:STAtx:JMPh4.|
00001eb0  05 fa 67 2e 63 68 68 6f  67 3a 43 4c 43 3a 4c 44  |..g.chhog:CLC:LD|
00001ec0  41 26 34 36 30 3a 41 44  43 23 32 3a 43 4d 50 74  |A&460:ADC#2:CMPt|
00001ed0  78 3a 42 43 43 63 68 32  3a 43 4c 43 3a 4c 44 41  |x:BCCch2:CLC:LDA|
00001ee0  74 78 3a 41 44 43 23 33  3a 43 4d 50 26 34 36 30  |tx:ADC#3:CMP&460|
00001ef0  3a 42 43 43 63 68 32 3a  4c 44 41 26 34 36 34 3a  |:BCCch2:LDA&464:|
00001f00  43 4d 50 23 32 33 3a 42  43 43 63 68 32 3a 4a 53  |CMP#23:BCCch2:JS|
00001f10  52 62 6f 6e 75 73 0d 06  04 7d 2e 63 68 32 3a 4c  |Rbonus...}.ch2:L|
00001f20  44 41 23 30 3a 53 54 41  68 69 74 3a 4c 44 41 67  |DA#0:STAhit:LDAg|
00001f30  6f 74 3a 42 4e 45 63 68  33 3a 4c 44 41 67 79 3a  |ot:BNEch3:LDAgy:|
00001f40  43 4d 50 23 32 35 3a 42  43 43 63 68 33 3a 4c 44  |CMP#25:BCCch3:LD|
00001f50  41 67 78 3a 43 4d 50 74  78 3a 42 43 43 63 68 33  |Agx:CMPtx:BCCch3|
00001f60  3a 43 4c 43 3a 4c 44 41  74 78 3a 41 44 43 23 33  |:CLC:LDAtx:ADC#3|
00001f70  3a 43 4d 50 67 78 3a 42  43 43 63 68 33 3a 4c 44  |:CMPgx:BCCch3:LD|
00001f80  41 23 31 3a 53 54 41 68  69 74 3a 2e 63 68 33 3a  |A#1:STAhit:.ch3:|
00001f90  52 54 53 0d 06 0e 2a 2e  68 61 77 6b 25 4c 44 41  |RTS...*.hawk%LDA|
00001fa0  68 61 77 3a 43 4d 50 26  34 36 30 3a 42 45 51 62  |haw:CMP&460:BEQb|
00001fb0  6f 6d 62 73 3a 4a 53 52  68 61 77 70 72 0d 06 18  |ombs:JSRhawpr...|
00001fc0  3c 4c 44 41 68 61 77 3a  43 4d 50 26 34 36 30 3a  |<LDAhaw:CMP&460:|
00001fd0  42 43 43 77 72 69 3a 44  45 43 68 61 77 3a 44 45  |BCCwri:DEChaw:DE|
00001fe0  43 68 61 77 3a 2e 77 72  69 3a 49 4e 43 68 61 77  |Chaw:.wri:INChaw|
00001ff0  3a 4a 53 52 68 61 77 70  72 0d 06 22 47 2e 62 6f  |:JSRhawpr.."G.bo|
00002000  6d 62 73 3a 4c 44 41 23  26 46 46 3a 53 54 41 62  |mbs:LDA#&FF:STAb|
00002010  63 6f 3a 2e 62 6d 31 3a  49 4e 43 62 63 6f 3a 4c  |co:.bm1:INCbco:L|
00002020  44 58 62 63 6f 3a 4c 44  41 62 6f 6e 2c 58 3a 42  |DXbco:LDAbon,X:B|
00002030  45 51 63 68 61 6e 63 65  3a 4a 53 52 62 6f 70 72  |EQchance:JSRbopr|
00002040  0d 06 2c 53 4c 44 58 62  63 6f 3a 49 4e 43 62 79  |..,SLDXbco:INCby|
00002050  2c 58 3a 4a 53 52 63 68  62 6f 6d 3a 2e 62 6d 32  |,X:JSRchbom:.bm2|
00002060  3a 4c 44 58 62 63 6f 3a  4c 44 41 62 79 2c 58 3a  |:LDXbco:LDAby,X:|
00002070  43 4d 50 23 32 37 3a 42  4e 45 62 6d 33 3a 4c 44  |CMP#27:BNEbm3:LD|
00002080  41 23 30 3a 53 54 41 62  6f 6e 2c 58 3a 4a 4d 50  |A#0:STAbon,X:JMP|
00002090  62 6d 34 0d 06 36 2f 2e  62 6d 33 3a 4a 53 52 62  |bm4..6/.bm3:JSRb|
000020a0  6f 70 72 3a 2e 62 6d 34  3a 4c 44 41 62 63 6f 3a  |opr:.bm4:LDAbco:|
000020b0  43 4d 50 62 74 6f 74 3a  42 4e 45 62 6d 31 3a 52  |CMPbtot:BNEbm1:R|
000020c0  54 53 0d 06 40 53 2e 63  68 61 6e 63 65 3a 4c 44  |TS..@S.chance:LD|
000020d0  41 23 34 3a 53 54 41 26  32 41 3a 4c 44 41 23 30  |A#4:STA&2A:LDA#0|
000020e0  3a 53 54 41 26 32 42 3a  53 54 41 26 32 43 3a 53  |:STA&2B:STA&2C:S|
000020f0  54 41 26 32 44 3a 4a 53  52 26 41 46 31 32 3a 4c  |TA&2D:JSR&AF12:L|
00002100  44 41 26 32 41 3a 43 4d  50 23 31 3a 42 4e 45 65  |DA&2A:CMP#1:BNEe|
00002110  6e 64 63 68 61 0d 06 4a  83 4c 44 58 62 63 6f 3a  |ndcha..J.LDXbco:|
00002120  43 4c 43 3a 4c 44 41 68  61 77 3a 41 44 43 23 31  |CLC:LDAhaw:ADC#1|
00002130  3a 53 54 41 62 78 2c 58  3a 43 4d 50 6c 61 73 74  |:STAbx,X:CMPlast|
00002140  3a 42 4e 45 63 68 39 3a  49 4e 43 62 78 2c 58 3a  |:BNEch9:INCbx,X:|
00002150  4c 44 41 62 78 2c 58 3a  2e 63 68 39 3a 53 54 41  |LDAbx,X:.ch9:STA|
00002160  6c 61 73 74 3a 4c 44 41  23 31 30 3a 53 54 41 62  |last:LDA#10:STAb|
00002170  79 2c 58 3a 4c 44 41 23  31 3a 53 54 41 62 6f 6e  |y,X:LDA#1:STAbon|
00002180  2c 58 3a 4a 4d 50 62 6d  33 3a 2e 65 6e 64 63 68  |,X:JMPbm3:.endch|
00002190  61 3a 4a 4d 50 62 6d 34  0d 06 54 63 2e 68 61 77  |a:JMPbm4..Tc.haw|
000021a0  70 72 3a 4c 44 41 23 62  64 61 25 83 32 35 36 3a  |pr:LDA#bda%.256:|
000021b0  53 54 41 64 61 74 61 3a  4c 44 41 23 62 64 61 25  |STAdata:LDA#bda%|
000021c0  81 32 35 36 3a 53 54 41  64 61 74 61 2b 31 3a 4c  |.256:STAdata+1:L|
000021d0  44 58 68 61 77 3a 4c 44  59 23 39 3a 4a 53 52 63  |DXhaw:LDY#9:JSRc|
000021e0  61 6c 63 25 3a 4c 44 58  23 31 3a 4c 44 59 23 32  |alc%:LDX#1:LDY#2|
000021f0  34 3a 4a 4d 50 70 72 69  6e 74 25 0d 06 5e 59 2e  |4:JMPprint%..^Y.|
00002200  62 6f 70 72 3a 4c 44 41  67 78 3a 50 48 41 3a 4c  |bopr:LDAgx:PHA:L|
00002210  44 41 67 79 3a 50 48 41  3a 4c 44 41 62 78 2c 58  |DAgy:PHA:LDAbx,X|
00002220  3a 53 54 41 67 78 3a 4c  44 41 62 79 2c 58 3a 53  |:STAgx:LDAby,X:S|
00002230  54 41 67 79 3a 4a 53 52  67 72 70 72 3a 50 4c 41  |TAgy:JSRgrpr:PLA|
00002240  3a 53 54 41 67 79 3a 50  4c 41 3a 53 54 41 67 78  |:STAgy:PLA:STAgx|
00002250  3a 52 54 53 0d 06 68 9e  2e 63 68 62 6f 6d 3a 4c  |:RTS..h..chbom:L|
00002260  44 41 62 78 2c 58 3a 43  4d 50 26 34 36 30 3a 42  |DAbx,X:CMP&460:B|
00002270  43 43 63 68 62 32 3a 43  4c 43 3a 4c 44 41 26 34  |CCchb2:CLC:LDA&4|
00002280  36 30 3a 41 44 43 23 32  3a 43 4d 50 62 78 2c 58  |60:ADC#2:CMPbx,X|
00002290  3a 42 43 43 63 68 62 32  3a 4c 44 41 62 79 2c 58  |:BCCchb2:LDAby,X|
000022a0  3a 43 4d 50 26 34 36 34  3a 42 43 43 63 68 62 32  |:CMP&464:BCCchb2|
000022b0  3a 43 4c 43 3a 4c 44 41  26 34 36 34 3a 41 44 43  |:CLC:LDA&464:ADC|
000022c0  23 32 3a 43 4d 50 62 79  2c 58 3a 42 43 43 63 68  |#2:CMPby,X:BCCch|
000022d0  62 32 3a 4c 44 41 23 30  3a 53 54 41 62 6f 6e 2c  |b2:LDA#0:STAbon,|
000022e0  58 3a 4a 53 52 62 6f 70  72 3a 4a 53 52 62 6f 6e  |X:JSRbopr:JSRbon|
000022f0  75 73 0d 06 72 5c 2e 63  68 62 32 3a 4c 44 58 62  |us..r\.chb2:LDXb|
00002300  63 6f 3a 4c 44 41 67 78  3a 43 4d 50 62 78 2c 58  |co:LDAgx:CMPbx,X|
00002310  3a 42 4e 45 63 68 62 33  3a 4c 44 41 67 79 3a 43  |:BNEchb3:LDAgy:C|
00002320  4d 50 62 79 2c 58 3a 42  4e 45 63 68 62 33 3a 4c  |MPby,X:BNEchb3:L|
00002330  44 41 23 30 3a 53 54 41  62 6f 6e 2c 58 3a 4a 53  |DA#0:STAbon,X:JS|
00002340  52 62 6f 70 72 3a 4a 53  52 65 78 70 6c 6f 0d 06  |Rbopr:JSRexplo..|
00002350  7c 7d 4c 44 58 23 73 34  20 83 32 35 36 3a 4c 44  ||}LDX#s4 .256:LD|
00002360  59 23 73 34 20 81 32 35  36 3a 4a 53 52 73 6f 75  |Y#s4 .256:JSRsou|
00002370  3a 43 4c 43 3a 4c 44 41  26 34 34 43 3a 41 44 43  |:CLC:LDA&44C:ADC|
00002380  23 32 30 30 3a 53 54 41  26 34 34 43 3a 53 54 41  |#200:STA&44C:STA|
00002390  6e 75 3a 4c 44 41 26 34  34 44 3a 41 44 43 23 30  |nu:LDA&44D:ADC#0|
000023a0  3a 53 54 41 26 34 34 44  3a 53 54 41 6e 75 2b 31  |:STA&44D:STAnu+1|
000023b0  3a 4c 44 41 23 30 3a 4c  44 58 23 30 3a 4c 44 59  |:LDA#0:LDX#0:LDY|
000023c0  23 33 3a 4a 53 52 6e 75  6d 62 25 0d 06 86 0d 2e  |#3:JSRnumb%.....|
000023d0  63 68 62 33 3a 52 54 53  0d 06 90 20 2e 6d 76 6d  |chb3:RTS... .mvm|
000023e0  61 6e 25 4c 44 41 67 72  65 3a 42 45 51 76 31 3a  |an%LDAgre:BEQv1:|
000023f0  4a 53 52 67 72 65 6e 25  0d 06 9a 1b 2e 76 31 3a  |JSRgren%.....v1:|
00002400  4c 44 41 6a 75 3a 42 45  51 76 32 3a 4a 4d 50 6a  |LDAju:BEQv2:JMPj|
00002410  75 6d 70 0d 06 a4 64 2e  76 32 3a 4c 44 41 23 30  |ump...d.v2:LDA#0|
00002420  3a 53 54 41 67 6f 3a 4c  44 58 23 26 39 45 3a 4a  |:STAgo:LDX#&9E:J|
00002430  53 52 69 6e 6b 65 79 3a  54 59 41 3a 42 45 51 76  |SRinkey:TYA:BEQv|
00002440  33 3a 4a 53 52 6c 65 66  74 3a 4a 4d 50 76 34 3a  |3:JSRleft:JMPv4:|
00002450  2e 76 33 3a 4c 44 58 23  26 42 44 3a 4a 53 52 69  |.v3:LDX#&BD:JSRi|
00002460  6e 6b 65 79 3a 54 59 41  3a 42 45 51 76 34 3a 4a  |nkey:TYA:BEQv4:J|
00002470  53 52 72 69 67 68 74 0d  06 ae 9d 2e 76 34 3a 4c  |SRright.....v4:L|
00002480  44 58 23 26 39 44 3a 4a  53 52 69 6e 6b 65 79 3a  |DX#&9D:JSRinkey:|
00002490  54 59 41 3a 42 45 51 76  35 3a 4c 44 41 67 72 65  |TYA:BEQv5:LDAgre|
000024a0  3a 42 4e 45 76 35 3a 4c  44 58 23 73 33 20 83 32  |:BNEv5:LDX#s3 .2|
000024b0  35 36 3a 4c 44 59 23 73  33 20 81 32 35 36 3a 4a  |56:LDY#s3 .256:J|
000024c0  53 52 73 6f 75 3a 4a 53  52 67 72 65 6e 25 3a 2e  |SRsou:JSRgren%:.|
000024d0  76 35 3a 4c 44 58 23 26  42 36 3a 4a 53 52 69 6e  |v5:LDX#&B6:JSRin|
000024e0  6b 65 79 3a 54 59 41 3a  42 45 51 76 36 3a 4c 44  |key:TYA:BEQv6:LD|
000024f0  58 23 73 32 20 83 32 35  36 3a 4c 44 59 23 73 32  |X#s2 .256:LDY#s2|
00002500  20 81 32 35 36 3a 4a 53  52 73 6f 75 3a 4a 53 52  | .256:JSRsou:JSR|
00002510  6a 75 6d 70 0d 06 b8 51  2e 76 36 3a 4c 44 41 67  |jump...Q.v6:LDAg|
00002520  72 65 3a 42 45 51 76 37  3a 4a 53 52 67 72 65 6e  |re:BEQv7:JSRgren|
00002530  25 3a 2e 76 37 3a 4c 44  41 26 34 35 43 3a 43 4d  |%:.v7:LDA&45C:CM|
00002540  50 26 34 36 30 3a 42 4e  45 76 38 3a 4c 44 41 26  |P&460:BNEv8:LDA&|
00002550  34 36 38 3a 43 4d 50 26  34 36 34 3a 42 4e 45 76  |468:CMP&464:BNEv|
00002560  38 3a 52 54 53 0d 06 c2  10 2e 76 38 3a 4a 4d 50  |8:RTS.....v8:JMP|
00002570  62 69 72 64 25 0d 06 cc  3c 2e 6c 65 66 74 3a 4c  |bird%...<.left:L|
00002580  44 41 23 31 3a 53 54 41  67 6f 3a 53 54 41 64 69  |DA#1:STAgo:STAdi|
00002590  72 3a 4c 44 41 26 34 36  30 3a 42 45 51 72 74 73  |r:LDA&460:BEQrts|
000025a0  3a 44 45 43 26 34 36 30  3a 2e 72 74 73 3a 52 54  |:DEC&460:.rts:RT|
000025b0  53 0d 06 d6 86 2e 72 69  67 68 74 3a 4c 44 41 23  |S.....right:LDA#|
000025c0  32 3a 53 54 41 67 6f 3a  4c 44 41 23 30 3a 53 54  |2:STAgo:LDA#0:ST|
000025d0  41 64 69 72 3a 4c 44 41  26 34 36 30 3a 43 4d 50  |Adir:LDA&460:CMP|
000025e0  23 33 37 3a 42 45 51 65  64 67 65 3a 49 4e 43 26  |#37:BEQedge:INC&|
000025f0  34 36 30 3a 4c 44 41 26  34 36 30 3a 43 4d 50 23  |460:LDA&460:CMP#|
00002600  33 37 3a 42 45 51 65 64  67 65 3a 52 54 53 3a 2e  |37:BEQedge:RTS:.|
00002610  65 64 67 65 3a 4c 44 41  26 34 31 38 3a 42 4e 45  |edge:LDA&418:BNE|
00002620  72 74 73 3a 4c 44 41 23  32 30 30 3a 53 54 41 64  |rts:LDA#200:STAd|
00002630  65 61 64 3a 52 54 53 0d  06 e0 23 2e 69 6e 6b 65  |ead:RTS...#.inke|
00002640  79 3a 4c 44 41 23 26 38  31 3a 4c 44 59 23 26 46  |y:LDA#&81:LDY#&F|
00002650  46 3a 4a 4d 50 26 46 46  46 34 0d 06 ea 17 2e 73  |F:JMP&FFF4.....s|
00002660  6f 75 3a 4c 44 41 23 37  3a 4a 4d 50 26 46 46 46  |ou:LDA#7:JMP&FFF|
00002670  31 0d 06 f4 3d 2e 6a 75  6d 70 3a 49 4e 43 6a 75  |1...=.jump:INCju|
00002680  3a 4c 44 41 6a 75 3a 43  4d 50 23 36 3a 42 43 53  |:LDAju:CMP#6:BCS|
00002690  6a 64 6f 3a 44 45 43 26  34 36 34 3a 4a 4d 50 6a  |jdo:DEC&464:JMPj|
000026a0  32 3a 2e 6a 64 6f 3a 49  4e 43 26 34 36 34 0d 06  |2:.jdo:INC&464..|
000026b0  fe 60 2e 6a 32 3a 4c 44  41 6a 75 3a 43 4d 50 23  |.`.j2:LDAju:CMP#|
000026c0  31 3a 42 45 51 6a 33 3a  4c 44 41 67 6f 3a 43 4d  |1:BEQj3:LDAgo:CM|
000026d0  50 23 31 3a 42 45 51 6a  6c 65 3a 43 4d 50 23 32  |P#1:BEQjle:CMP#2|
000026e0  3a 42 45 51 6a 72 69 3a  4a 4d 50 6a 33 3a 2e 6a  |:BEQjri:JMPj3:.j|
000026f0  6c 65 3a 4a 53 52 6c 65  66 74 3a 4a 4d 50 6a 33  |le:JSRleft:JMPj3|
00002700  3a 2e 6a 72 69 3a 4a 53  52 72 69 67 68 74 0d 07  |:.jri:JSRright..|
00002710  08 30 2e 6a 33 3a 4c 44  41 6a 75 3a 43 4d 50 23  |.0.j3:LDAju:CMP#|
00002720  31 30 3a 42 4e 45 6a 34  3a 4c 44 41 23 30 3a 53  |10:BNEj4:LDA#0:S|
00002730  54 41 6a 75 3a 2e 6a 34  3a 4a 4d 50 76 36 0d 07  |TAju:.j4:JMPv6..|
00002740  12 1b 2e 65 73 63 3a 4c  44 41 23 35 30 3a 53 54  |...esc:LDA#50:ST|
00002750  41 64 65 61 64 3a 52 54  53 0d 07 1c 49 2e 70 61  |Adead:RTS...I.pa|
00002760  75 73 65 3a 4c 44 41 74  69 3a 53 54 41 68 69 74  |use:LDAti:STAhit|
00002770  3a 2e 70 31 3a 4c 44 58  23 26 43 39 3a 4a 53 52  |:.p1:LDX#&C9:JSR|
00002780  69 6e 6b 65 79 3a 54 59  41 3a 42 45 51 70 31 3a  |inkey:TYA:BEQp1:|
00002790  4c 44 41 68 69 74 3a 53  54 41 74 69 3a 4a 4d 50  |LDAhit:STAti:JMP|
000027a0  6d 32 0d 07 26 27 2e 77  61 69 74 3a 42 49 54 74  |m2..&'.wait:BITt|
000027b0  69 3a 42 4d 49 77 61 69  74 3a 4c 44 41 73 70 3a  |i:BMIwait:LDAsp:|
000027c0  53 54 41 74 69 3a 52 54  53 0d 07 30 43 2e 6d 61  |STAti:RTS..0C.ma|
000027d0  69 6e 25 4c 44 58 23 26  45 46 3a 4a 53 52 69 6e  |in%LDX#&EF:JSRin|
000027e0  6b 65 79 3a 54 59 41 3a  42 45 51 73 6f 66 66 3a  |key:TYA:BEQsoff:|
000027f0  4c 44 41 23 32 31 30 3a  4c 44 58 23 31 3a 4c 44  |LDA#210:LDX#1:LD|
00002800  59 23 30 3a 4a 53 52 26  46 46 46 34 0d 07 3a 42  |Y#0:JSR&FFF4..:B|
00002810  2e 73 6f 66 66 3a 4c 44  58 23 26 41 45 3a 4a 53  |.soff:LDX#&AE:JS|
00002820  52 69 6e 6b 65 79 3a 54  59 41 3a 42 45 51 73 6f  |Rinkey:TYA:BEQso|
00002830  6e 3a 4c 44 41 23 32 31  30 3a 4c 44 58 23 30 3a  |n:LDA#210:LDX#0:|
00002840  4c 44 59 23 30 3a 4a 53  52 26 46 46 46 34 0d 07  |LDY#0:JSR&FFF4..|
00002850  44 24 2e 73 6f 6e 3a 4c  44 58 23 26 38 46 3a 4a  |D$.son:LDX#&8F:J|
00002860  53 52 69 6e 6b 65 79 3a  54 59 41 3a 42 4e 45 65  |SRinkey:TYA:BNEe|
00002870  73 63 0d 07 4e 21 4c 44  58 23 26 43 38 3a 4a 53  |sc..N!LDX#&C8:JS|
00002880  52 69 6e 6b 65 79 3a 54  59 41 3a 42 4e 45 70 61  |Rinkey:TYA:BNEpa|
00002890  75 73 65 0d 07 58 3b 2e  6d 32 3a 4a 53 52 6d 76  |use..X;.m2:JSRmv|
000028a0  6d 61 6e 25 3a 4c 44 41  64 65 61 64 3a 42 4e 45  |man%:LDAdead:BNE|
000028b0  65 6e 64 6d 61 3a 4a 53  52 68 6f 67 25 3a 4c 44  |endma:JSRhog%:LD|
000028c0  41 64 65 61 64 3a 42 4e  45 65 6e 64 6d 61 0d 07  |Adead:BNEendma..|
000028d0  62 51 4a 53 52 68 61 77  6b 25 3a 4c 44 41 64 65  |bQJSRhawk%:LDAde|
000028e0  61 64 3a 42 4e 45 65 6e  64 6d 61 3a 4a 53 52 62  |ad:BNEendma:JSRb|
000028f0  75 67 25 3a 4c 44 41 64  65 61 64 3a 42 4e 45 65  |ug%:LDAdead:BNEe|
00002900  6e 64 6d 61 3a 4a 53 52  63 6f 75 6e 74 25 3a 4c  |ndma:JSRcount%:L|
00002910  44 41 64 65 61 64 3a 42  4e 45 65 6e 64 6d 61 0d  |DAdead:BNEendma.|
00002920  07 6c 1f 4a 53 52 77 61  69 74 3a 4a 4d 50 6d 61  |.l.JSRwait:JMPma|
00002930  69 6e 25 3a 2e 65 6e 64  6d 61 3a 52 54 53 0d 07  |in%:.endma:RTS..|
00002940  76 0e 2e 65 6e 64 6d 61  3a 52 54 53 0d 07 80 7c  |v..endma:RTS...||
00002950  2e 62 75 67 25 4c 44 41  66 6f 6e 3a 42 4e 45 62  |.bug%LDAfon:BNEb|
00002960  6d 76 3a 49 4e 43 66 63  6f 3a 4c 44 41 66 63 6f  |mv:INCfco:LDAfco|
00002970  3a 43 4d 50 23 33 30 3a  42 4e 45 62 67 6e 64 3a  |:CMP#30:BNEbgnd:|
00002980  4c 44 41 23 30 3a 53 54  41 66 63 6f 3a 4c 44 41  |LDA#0:STAfco:LDA|
00002990  26 34 31 38 3a 42 45 51  62 67 6e 64 3a 4c 44 41  |&418:BEQbgnd:LDA|
000029a0  23 31 3a 53 54 41 66 6f  6e 3a 4c 44 41 23 33 39  |#1:STAfon:LDA#39|
000029b0  3a 53 54 41 66 78 3a 4a  4d 50 62 6d 76 32 3a 2e  |:STAfx:JMPbmv2:.|
000029c0  62 67 6e 64 3a 52 54 53  0d 07 8a 69 2e 62 6d 76  |bgnd:RTS...i.bmv|
000029d0  3a 4a 53 52 66 70 72 3a  2e 62 6d 76 32 3a 4a 53  |:JSRfpr:.bmv2:JS|
000029e0  52 66 63 68 3a 42 4e 45  66 65 6e 64 3a 4c 44 41  |Rfch:BNEfend:LDA|
000029f0  66 78 3a 42 45 51 66 65  6e 64 3a 44 45 43 66 78  |fx:BEQfend:DECfx|
00002a00  3a 4a 53 52 66 63 68 3a  42 4e 45 66 65 6e 64 3a  |:JSRfch:BNEfend:|
00002a10  4a 53 52 66 70 72 3a 52  54 53 3a 2e 66 65 6e 64  |JSRfpr:RTS:.fend|
00002a20  3a 4c 44 41 23 30 3a 53  54 41 66 6f 6e 3a 52 54  |:LDA#0:STAfon:RT|
00002a30  53 0d 07 94 5f 2e 66 63  68 3a 4c 44 41 26 34 36  |S..._.fch:LDA&46|
00002a40  34 3a 43 4d 50 23 31 39  3a 42 4e 45 66 63 68 32  |4:CMP#19:BNEfch2|
00002a50  3a 43 4c 43 3a 4c 44 41  26 34 36 30 3a 41 44 43  |:CLC:LDA&460:ADC|
00002a60  23 32 3a 43 4d 50 66 78  3a 42 43 43 66 63 68 32  |#2:CMPfx:BCCfch2|
00002a70  3a 43 4c 43 3a 4c 44 41  66 78 3a 41 44 43 23 31  |:CLC:LDAfx:ADC#1|
00002a80  3a 43 4d 50 26 34 36 30  3a 42 43 43 66 63 68 32  |:CMP&460:BCCfch2|
00002a90  0d 07 9e 67 2e 66 67 74  3a 4c 44 58 23 73 31 20  |...g.fgt:LDX#s1 |
00002aa0  83 32 35 36 3a 4c 44 59  23 73 31 20 81 32 35 36  |.256:LDY#s1 .256|
00002ab0  3a 4a 53 52 73 6f 75 3a  44 45 43 26 34 31 38 3a  |:JSRsou:DEC&418:|
00002ac0  4c 44 41 26 34 31 38 3a  53 54 41 6e 75 3a 4c 44  |LDA&418:STAnu:LD|
00002ad0  41 23 30 3a 53 54 41 6e  75 2b 31 3a 4c 44 41 23  |A#0:STAnu+1:LDA#|
00002ae0  34 3a 4c 44 58 23 31 31  3a 4c 44 59 23 33 3a 4a  |4:LDX#11:LDY#3:J|
00002af0  53 52 6e 75 6d 62 25 0d  07 a8 5d 43 4c 43 3a 4c  |SRnumb%...]CLC:L|
00002b00  44 41 26 34 34 43 3a 41  44 43 23 35 30 3a 53 54  |DA&44C:ADC#50:ST|
00002b10  41 26 34 34 43 3a 53 54  41 6e 75 3a 4c 44 41 26  |A&44C:STAnu:LDA&|
00002b20  34 34 44 3a 41 44 43 23  30 3a 53 54 41 26 34 34  |44D:ADC#0:STA&44|
00002b30  44 3a 53 54 41 6e 75 2b  31 3a 4c 44 41 23 30 3a  |D:STAnu+1:LDA#0:|
00002b40  4c 44 58 23 30 3a 4c 44  59 23 33 3a 4a 53 52 6e  |LDX#0:LDY#3:JSRn|
00002b50  75 6d 62 25 0d 07 b2 62  43 4c 43 3a 4c 44 41 74  |umb%...bCLC:LDAt|
00002b60  69 6d 65 25 2b 32 3a 41  44 43 23 33 3a 53 54 41  |ime%+2:ADC#3:STA|
00002b70  74 69 6d 65 25 2b 32 3a  4c 44 41 74 69 6d 65 25  |time%+2:LDAtime%|
00002b80  3a 41 44 43 23 32 34 3a  53 54 41 74 69 6d 65 25  |:ADC#24:STAtime%|
00002b90  3a 4c 44 41 74 69 6d 65  25 2b 31 3a 41 44 43 23  |:LDAtime%+1:ADC#|
00002ba0  30 3a 53 54 41 74 69 6d  65 25 2b 31 3a 4c 44 41  |0:STAtime%+1:LDA|
00002bb0  23 31 3a 52 54 53 0d 07  bc 13 2e 66 63 68 32 3a  |#1:RTS.....fch2:|
00002bc0  4c 44 41 23 30 3a 52 54  53 0d 07 c6 61 2e 66 70  |LDA#0:RTS...a.fp|
00002bd0  72 3a 4c 44 41 23 66 6c  79 25 83 32 35 36 3a 53  |r:LDA#fly%.256:S|
00002be0  54 41 64 61 74 61 3a 4c  44 41 23 66 6c 79 25 81  |TAdata:LDA#fly%.|
00002bf0  32 35 36 3a 53 54 41 64  61 74 61 2b 31 3a 4c 44  |256:STAdata+1:LD|
00002c00  58 66 78 3a 4c 44 59 23  31 39 3a 4a 53 52 63 61  |Xfx:LDY#19:JSRca|
00002c10  6c 63 25 3a 4c 44 58 23  31 3a 4c 44 59 23 31 36  |lc%:LDX#1:LDY#16|
00002c20  3a 4a 4d 50 70 72 69 6e  74 25 0d 07 d0 6a 2e 6e  |:JMPprint%...j.n|
00002c30  75 6d 62 25 50 48 41 3a  4c 44 41 23 33 31 3a 4a  |umb%PHA:LDA#31:J|
00002c40  53 52 26 46 46 45 45 3a  54 58 41 3a 4a 53 52 26  |SR&FFEE:TXA:JSR&|
00002c50  46 46 45 45 3a 54 59 41  3a 4a 53 52 26 46 46 45  |FFEE:TYA:JSR&FFE|
00002c60  45 3a 50 4c 41 3a 41 53  4c 41 3a 54 41 59 3a 2e  |E:PLA:ASLA:TAY:.|
00002c70  6e 75 31 3a 4a 53 52 6e  75 32 3a 49 4e 59 3a 49  |nu1:JSRnu2:INY:I|
00002c80  4e 59 3a 43 50 59 23 31  30 3a 42 4e 45 6e 75 31  |NY:CPY#10:BNEnu1|
00002c90  3a 52 54 53 0d 07 da 0f  2e 6e 75 32 3a 4c 44 58  |:RTS.....nu2:LDX|
00002ca0  23 34 37 0d 07 e4 47 2e  6e 75 33 3a 49 4e 58 3a  |#47...G.nu3:INX:|
00002cb0  53 45 43 3a 4c 44 41 6e  75 3a 53 42 43 64 65 63  |SEC:LDAnu:SBCdec|
00002cc0  2c 59 3a 53 54 41 6e 75  3a 4c 44 41 6e 75 2b 31  |,Y:STAnu:LDAnu+1|
00002cd0  3a 53 42 43 64 65 63 2b  31 2c 59 3a 53 54 41 6e  |:SBCdec+1,Y:STAn|
00002ce0  75 2b 31 3a 42 50 4c 6e  75 33 0d 07 ee 37 43 4c  |u+1:BPLnu3...7CL|
00002cf0  43 3a 4c 44 41 6e 75 3a  41 44 43 64 65 63 2c 59  |C:LDAnu:ADCdec,Y|
00002d00  3a 53 54 41 6e 75 3a 4c  44 41 6e 75 2b 31 3a 41  |:STAnu:LDAnu+1:A|
00002d10  44 43 64 65 63 2b 31 2c  59 3a 53 54 41 6e 75 2b  |DCdec+1,Y:STAnu+|
00002d20  31 0d 07 f8 10 54 58 41  3a 4a 4d 50 26 46 46 45  |1....TXA:JMP&FFE|
00002d30  45 0d 08 02 30 2e 64 65  63 3a 45 51 55 57 31 30  |E...0.dec:EQUW10|
00002d40  30 30 30 3a 45 51 55 57  31 30 30 30 3a 45 51 55  |000:EQUW1000:EQU|
00002d50  57 31 30 30 3a 45 51 55  57 31 30 3a 45 51 55 57  |W100:EQUW10:EQUW|
00002d60  31 0d 08 0c 3f 2e 63 6f  75 6e 74 25 49 4e 43 74  |1...?.count%INCt|
00002d70  63 6f 3a 4c 44 41 74 63  6f 3a 43 4d 50 74 64 65  |co:LDAtco:CMPtde|
00002d80  63 3a 42 45 51 62 6f 6e  31 3a 52 54 53 3a 2e 62  |c:BEQbon1:RTS:.b|
00002d90  6f 6e 31 3a 4c 44 41 23  30 3a 53 54 41 74 63 6f  |on1:LDA#0:STAtco|
00002da0  0d 08 16 42 2e 62 6f 6e  75 73 3a 53 45 43 3a 4c  |...B.bonus:SEC:L|
00002db0  44 41 74 69 6d 65 25 3a  53 42 43 23 38 3a 53 54  |DAtime%:SBC#8:ST|
00002dc0  41 74 69 6d 65 25 3a 4c  44 41 74 69 6d 65 25 2b  |Atime%:LDAtime%+|
00002dd0  31 3a 53 42 43 23 30 3a  53 54 41 74 69 6d 65 25  |1:SBC#0:STAtime%|
00002de0  2b 31 0d 08 20 2e 4c 44  41 23 30 3a 4c 44 59 23  |+1.. .LDA#0:LDY#|
00002df0  37 3a 2e 62 6f 6e 32 3a  53 54 41 28 74 69 6d 65  |7:.bon2:STA(time|
00002e00  25 29 2c 59 3a 44 45 59  3a 42 50 4c 62 6f 6e 32  |%),Y:DEY:BPLbon2|
00002e10  0d 08 2a 4a 44 45 43 74  69 6d 65 25 2b 32 3a 4c  |..*JDECtime%+2:L|
00002e20  44 41 74 69 6d 65 25 2b  32 3a 43 4d 50 23 36 3a  |DAtime%+2:CMP#6:|
00002e30  42 43 53 62 6f 6e 34 3a  4c 44 58 23 70 65 65 70  |BCSbon4:LDX#peep|
00002e40  20 83 32 35 36 3a 4c 44  59 23 70 65 65 70 20 81  | .256:LDY#peep .|
00002e50  32 35 36 3a 4a 53 52 73  6f 75 0d 08 34 34 2e 62  |256:JSRsou..44.b|
00002e60  6f 6e 33 3a 4c 44 41 74  69 6d 65 25 2b 32 3a 42  |on3:LDAtime%+2:B|
00002e70  4e 45 62 6f 6e 34 3a 4c  44 41 23 31 3a 53 54 41  |NEbon4:LDA#1:STA|
00002e80  64 65 61 64 3a 2e 62 6f  6e 34 3a 52 54 53 0d 08  |dead:.bon4:RTS..|
00002e90  3e 74 2e 64 6f 75 62 25  4c 44 41 23 30 3a 53 54  |>t.doub%LDA#0:ST|
00002ea0  41 26 37 30 3a 4c 44 41  23 33 31 3a 4a 53 52 26  |A&70:LDA#31:JSR&|
00002eb0  46 46 45 45 3a 54 58 41  3a 4a 53 52 26 46 46 45  |FFEE:TXA:JSR&FFE|
00002ec0  45 3a 54 59 41 3a 4a 53  52 26 46 46 45 45 3a 2e  |E:TYA:JSR&FFEE:.|
00002ed0  64 31 3a 4c 44 58 26 37  30 3a 4c 44 41 26 31 31  |d1:LDX&70:LDA&11|
00002ee0  30 2c 58 3a 43 4d 50 23  31 33 3a 42 45 51 64 33  |0,X:CMP#13:BEQd3|
00002ef0  3a 53 54 41 26 37 31 3a  49 4e 58 3a 53 54 58 26  |:STA&71:INX:STX&|
00002f00  37 30 0d 08 48 66 4c 44  58 23 26 37 31 3a 4c 44  |70..HfLDX#&71:LD|
00002f10  59 23 30 3a 4c 44 41 23  31 30 3a 4a 53 52 26 46  |Y#0:LDA#10:JSR&F|
00002f20  46 46 31 3a 4c 44 58 23  31 3a 4c 44 59 23 30 3a  |FF1:LDX#1:LDY#0:|
00002f30  2e 64 32 3a 4c 44 41 26  37 31 2c 58 3a 53 54 41  |.d2:LDA&71,X:STA|
00002f40  26 43 46 30 2c 59 3a 49  4e 59 3a 53 54 41 26 43  |&CF0,Y:INY:STA&C|
00002f50  46 30 2c 59 3a 49 4e 59  3a 49 4e 58 3a 43 50 58  |F0,Y:INY:INX:CPX|
00002f60  23 39 3a 42 4e 45 64 32  0d 08 52 62 4c 44 41 23  |#9:BNEd2..RbLDA#|
00002f70  32 35 34 3a 4a 53 52 26  46 46 45 45 3a 4c 44 41  |254:JSR&FFEE:LDA|
00002f80  23 38 3a 4a 53 52 26 46  46 45 45 3a 4c 44 41 23  |#8:JSR&FFEE:LDA#|
00002f90  31 30 3a 4a 53 52 26 46  46 45 45 3a 4c 44 41 23  |10:JSR&FFEE:LDA#|
00002fa0  32 35 35 3a 4a 53 52 26  46 46 45 45 3a 4c 44 41  |255:JSR&FFEE:LDA|
00002fb0  23 31 31 3a 4a 53 52 26  46 46 45 45 3a 4a 4d 50  |#11:JSR&FFEE:JMP|
00002fc0  64 31 3a 2e 64 33 3a 52  54 53 0d 08 5c 2e 2e 63  |d1:.d3:RTS..\..c|
00002fd0  6c 65 25 4c 44 41 23 32  35 35 3a 53 54 41 64 61  |le%LDA#255:STAda|
00002fe0  74 61 3a 4a 53 52 63 6c  70 72 3a 4c 44 41 23 30  |ta:JSRclpr:LDA#0|
00002ff0  3a 53 54 41 64 61 74 61  0d 08 66 7a 2e 63 6c 70  |:STAdata..fz.clp|
00003000  72 3a 4c 44 59 23 30 3a  2e 63 6c 32 3a 4c 44 41  |r:LDY#0:.cl2:LDA|
00003010  23 30 3a 53 54 41 61 64  64 3a 4c 44 41 23 26 36  |#0:STAadd:LDA#&6|
00003020  32 3a 53 54 41 61 64 64  2b 31 3a 2e 63 6c 33 3a  |2:STAadd+1:.cl3:|
00003030  4c 44 41 64 61 74 61 3a  53 54 41 28 61 64 64 29  |LDAdata:STA(add)|
00003040  2c 59 3a 43 4c 43 3a 4c  44 41 61 64 64 3a 41 44  |,Y:CLC:LDAadd:AD|
00003050  43 23 38 3a 53 54 41 61  64 64 3a 4c 44 41 61 64  |C#8:STAadd:LDAad|
00003060  64 2b 31 3a 41 44 43 23  30 3a 53 54 41 61 64 64  |d+1:ADC#0:STAadd|
00003070  2b 31 0d 08 70 3d 43 4d  50 23 26 37 39 3a 42 4e  |+1..p=CMP#&79:BN|
00003080  45 63 6c 33 3a 4c 44 41  61 64 64 3a 43 4d 50 23  |Ecl3:LDAadd:CMP#|
00003090  26 43 30 3a 42 4e 45 63  6c 33 3a 49 4e 59 3a 43  |&C0:BNEcl3:INY:C|
000030a0  50 59 23 38 3a 42 4e 45  63 6c 32 3a 52 54 53 0d  |PY#8:BNEcl2:RTS.|
000030b0  08 7a b4 2e 73 63 72 25  4c 44 41 23 31 37 3a 53  |.z..scr%LDA#17:S|
000030c0  54 41 64 61 74 61 3a 4c  44 59 23 30 3a 2e 73 63  |TAdata:LDY#0:.sc|
000030d0  31 3a 4c 44 41 23 26 35  38 3a 53 54 41 61 64 64  |1:LDA#&58:STAadd|
000030e0  2b 31 3a 4c 44 41 23 30  3a 53 54 41 61 64 64 3a  |+1:LDA#0:STAadd:|
000030f0  2e 73 63 32 3a 4c 44 41  64 61 74 61 3a 53 54 41  |.sc2:LDAdata:STA|
00003100  28 61 64 64 29 2c 59 3a  43 4c 43 3a 4c 44 41 61  |(add),Y:CLC:LDAa|
00003110  64 64 3a 41 44 43 23 34  3a 53 54 41 61 64 64 3a  |dd:ADC#4:STAadd:|
00003120  4c 44 41 61 64 64 2b 31  3a 41 44 43 23 30 3a 53  |LDAadd+1:ADC#0:S|
00003130  54 41 61 64 64 2b 31 3a  43 4d 50 23 26 38 30 3a  |TAadd+1:CMP#&80:|
00003140  42 4e 45 73 63 32 3a 41  53 4c 64 61 74 61 3a 49  |BNEsc2:ASLdata:I|
00003150  4e 59 3a 43 50 59 23 34  3a 42 4e 45 73 63 31 3a  |NY:CPY#4:BNEsc1:|
00003160  52 54 53 0d 08 84 25 2e  70 65 65 70 3a 45 51 55  |RTS...%.peep:EQU|
00003170  57 33 3a 45 51 55 57 2d  31 35 3a 45 51 55 57 31  |W3:EQUW-15:EQUW1|
00003180  34 30 3a 45 51 55 57 31  0d 08 8e 21 2e 73 31 3a  |40:EQUW1...!.s1:|
00003190  45 51 55 57 31 3a 45 51  55 57 31 3a 45 51 55 57  |EQUW1:EQUW1:EQUW|
000031a0  31 30 30 3a 45 51 55 57  35 0d 08 98 20 2e 73 32  |100:EQUW5... .s2|
000031b0  3a 45 51 55 57 31 3a 45  51 55 57 32 3a 45 51 55  |:EQUW1:EQUW2:EQU|
000031c0  57 33 30 3a 45 51 55 57  32 0d 08 a2 20 2e 73 33  |W30:EQUW2... .s3|
000031d0  3a 45 51 55 57 31 3a 45  51 55 57 33 3a 45 51 55  |:EQUW1:EQUW3:EQU|
000031e0  57 34 30 3a 45 51 55 57  33 0d 08 ac 21 2e 73 34  |W40:EQUW3...!.s4|
000031f0  3a 45 51 55 57 30 3a 45  51 55 57 2d 31 35 3a 45  |:EQUW0:EQUW-15:E|
00003200  51 55 57 34 3a 45 51 55  57 33 0d 08 b6 09 5d 3a  |QUW4:EQUW3....]:|
00003210  ed 3a e1 0d 08 c0 11 f4  20 53 74 6f 72 6b 20 72  |.:...... Stork r|
00003220  69 67 68 74 0d 08 ca 4b  dc 20 30 2c 30 2c 30 2c  |ight...K. 0,0,0,|
00003230  30 2c 30 2c 30 2c 30 2c  31 32 38 2c 31 36 2c 34  |0,0,0,0,128,16,4|
00003240  38 2c 34 38 2c 34 38 2c  31 36 2c 31 36 2c 31 36  |8,48,48,16,16,16|
00003250  2c 31 31 32 2c 31 32 38  2c 31 39 32 2c 36 37 2c  |,112,128,192,67,|
00003260  31 39 32 2c 31 32 38 2c  30 2c 30 2c 31 32 38 0d  |192,128,0,0,128.|
00003270  08 d4 4f dc 20 32 30 38  2c 32 34 30 2c 39 36 2c  |..O. 208,240,96,|
00003280  34 38 2c 31 36 2c 30 2c  30 2c 30 2c 32 34 30 2c  |48,16,0,0,0,240,|
00003290  31 31 32 2c 32 32 34 2c  38 30 2c 31 37 36 2c 32  |112,224,80,176,2|
000032a0  32 34 2c 34 2c 34 2c 31  32 38 2c 31 32 38 2c 31  |24,4,4,128,128,1|
000032b0  32 38 2c 31 32 38 2c 30  2c 30 2c 30 2c 30 0d 08  |28,128,0,0,0,0..|
000032c0  de 36 dc 20 30 2c 30 2c  30 2c 30 2c 30 2c 30 2c  |.6. 0,0,0,0,0,0,|
000032d0  30 2c 30 2c 34 2c 34 2c  38 2c 38 2c 34 2c 34 2c  |0,0,4,4,8,8,4,4,|
000032e0  34 2c 31 30 2c 30 2c 30  2c 30 2c 30 2c 30 2c 30  |4,10,0,0,0,0,0,0|
000032f0  2c 30 2c 30 0d 08 e8 4a  dc 20 30 2c 30 2c 30 2c  |,0,0...J. 0,0,0,|
00003300  30 2c 30 2c 30 2c 30 2c  31 34 34 2c 31 36 2c 34  |0,0,0,0,144,16,4|
00003310  38 2c 34 38 2c 34 38 2c  31 36 2c 31 36 2c 31 36  |8,48,48,16,16,16|
00003320  2c 34 38 2c 31 32 38 2c  31 39 33 2c 36 36 2c 31  |,48,128,193,66,1|
00003330  39 33 2c 31 32 38 2c 30  2c 30 2c 31 32 38 0d 08  |93,128,0,0,128..|
00003340  f2 51 dc 20 31 37 36 2c  32 30 38 2c 39 36 2c 34  |.Q. 176,208,96,4|
00003350  38 2c 31 36 2c 30 2c 30  2c 31 2c 31 37 36 2c 32  |8,16,0,0,1,176,2|
00003360  30 38 2c 32 32 34 2c 32  34 30 2c 32 34 30 2c 32  |08,224,240,240,2|
00003370  32 34 2c 31 32 2c 34 2c  31 32 38 2c 31 32 38 2c  |24,12,4,128,128,|
00003380  31 32 38 2c 31 32 38 2c  30 2c 30 2c 30 2c 30 0d  |128,128,0,0,0,0.|
00003390  08 fc 35 dc 20 32 2c 34  2c 34 2c 32 2c 31 2c 32  |..5. 2,4,4,2,1,2|
000033a0  2c 30 2c 30 2c 34 2c 34  2c 34 2c 32 2c 32 2c 39  |,0,0,4,4,4,2,2,9|
000033b0  2c 30 2c 31 2c 30 2c 30  2c 30 2c 30 2c 30 2c 30  |,0,1,0,0,0,0,0,0|
000033c0  2c 38 2c 34 0d 09 06 10  f4 20 53 74 6f 72 6b 20  |,8,4..... Stork |
000033d0  6c 65 66 74 0d 09 10 4c  dc 20 31 36 2c 34 38 2c  |left...L. 16,48,|
000033e0  34 34 2c 34 38 2c 31 36  2c 30 2c 30 2c 31 36 2c  |44,48,16,0,0,16,|
000033f0  31 32 38 2c 31 39 32 2c  31 39 32 2c 31 39 32 2c  |128,192,192,192,|
00003400  31 32 38 2c 31 32 38 2c  31 32 38 2c 32 32 34 2c  |128,128,128,224,|
00003410  30 2c 30 2c 30 2c 30 2c  30 2c 30 2c 30 2c 31 36  |0,0,0,0,0,0,0,16|
00003420  0d 09 1a 4e dc 20 31 36  2c 31 36 2c 31 36 2c 31  |...N. 16,16,16,1|
00003430  36 2c 30 2c 30 2c 30 2c  30 2c 32 34 30 2c 32 32  |6,0,0,0,0,240,22|
00003440  34 2c 31 31 32 2c 31 36  30 2c 32 30 38 2c 31 31  |4,112,160,208,11|
00003450  32 2c 32 2c 32 2c 31 37  36 2c 32 34 30 2c 39 36  |2,2,2,176,240,96|
00003460  2c 31 39 32 2c 31 32 38  2c 30 2c 30 2c 30 0d 09  |,192,128,0,0,0..|
00003470  24 35 dc 20 30 2c 30 2c  30 2c 30 2c 30 2c 30 2c  |$5. 0,0,0,0,0,0,|
00003480  30 2c 30 2c 32 2c 32 2c  31 2c 31 2c 32 2c 32 2c  |0,0,2,2,1,1,2,2,|
00003490  32 2c 35 2c 30 2c 30 2c  30 2c 30 2c 30 2c 30 2c  |2,5,0,0,0,0,0,0,|
000034a0  30 2c 30 0d 09 2e 4d dc  20 31 36 2c 35 36 2c 33  |0,0...M. 16,56,3|
000034b0  36 2c 35 36 2c 31 36 2c  30 2c 30 2c 31 36 2c 31  |6,56,16,0,0,16,1|
000034c0  32 38 2c 31 39 32 2c 31  39 32 2c 31 39 32 2c 31  |28,192,192,192,1|
000034d0  32 38 2c 31 32 38 2c 31  32 38 2c 31 39 32 2c 30  |28,128,128,192,0|
000034e0  2c 30 2c 30 2c 30 2c 30  2c 30 2c 30 2c 31 34 34  |,0,0,0,0,0,0,144|
000034f0  0d 09 38 4e dc 20 31 36  2c 31 36 2c 31 36 2c 31  |..8N. 16,16,16,1|
00003500  36 2c 30 2c 30 2c 30 2c  30 2c 32 30 38 2c 31 37  |6,0,0,0,0,208,17|
00003510  36 2c 31 31 32 2c 32 34  30 2c 32 34 30 2c 31 31  |6,112,240,240,11|
00003520  32 2c 33 2c 32 2c 32 30  38 2c 31 37 36 2c 39 36  |2,3,2,208,176,96|
00003530  2c 31 39 32 2c 31 32 38  2c 30 2c 30 2c 38 0d 09  |,192,128,0,0,8..|
00003540  42 35 dc 20 30 2c 30 2c  30 2c 30 2c 30 2c 30 2c  |B5. 0,0,0,0,0,0,|
00003550  31 2c 32 2c 32 2c 32 2c  32 2c 34 2c 34 2c 39 2c  |1,2,2,2,2,4,4,9,|
00003560  30 2c 38 2c 34 2c 32 2c  32 2c 34 2c 38 2c 34 2c  |0,8,4,2,2,4,8,4,|
00003570  30 2c 30 0d 09 4c 09 f4  20 45 67 67 0d 09 56 38  |0,0..L.. Egg..V8|
00003580  dc 20 30 2c 30 2c 30 2c  30 2c 31 30 32 2c 32 35  |. 0,0,0,0,102,25|
00003590  35 2c 32 35 35 2c 31 30  32 2c 36 38 2c 31 35 33  |5,255,102,68,153|
000035a0  2c 33 37 2c 31 32 38 2c  34 33 2c 36 38 2c 32 33  |,37,128,43,68,23|
000035b0  2c 31 34 32 0d 09 60 09  f4 20 68 6f 67 0d 09 6a  |,142..`.. hog..j|
000035c0  48 dc 20 30 2c 30 2c 30  2c 30 2c 30 2c 30 2c 30  |H. 0,0,0,0,0,0,0|
000035d0  2c 30 2c 30 2c 30 2c 30  2c 30 2c 30 2c 31 2c 32  |,0,0,0,0,0,0,1,2|
000035e0  2c 35 2c 30 2c 30 2c 30  2c 30 2c 31 30 2c 35 2c  |,5,0,0,0,0,10,5,|
000035f0  31 30 2c 35 2c 30 2c 30  2c 30 2c 30 2c 38 2c 34  |10,5,0,0,0,0,8,4|
00003600  2c 31 30 2c 35 0d 09 74  64 dc 20 30 2c 30 2c 31  |,10,5..td. 0,0,1|
00003610  37 2c 33 34 2c 36 33 2c  36 33 2c 30 2c 30 2c 31  |7,34,63,63,0,0,1|
00003620  30 2c 31 34 31 2c 32 33  38 2c 32 35 35 2c 32 32  |0,141,238,255,22|
00003630  31 2c 31 33 39 2c 36 2c  31 32 2c 31 30 2c 35 2c  |1,139,6,12,10,5,|
00003640  31 30 2c 32 35 35 2c 32  35 35 2c 32 35 35 2c 30  |10,255,255,255,0|
00003650  2c 30 2c 31 30 2c 35 2c  32 30 36 2c 32 33 39 2c  |,0,10,5,206,239,|
00003660  31 37 34 2c 36 2c 33 2c  31 0d 09 7e 0a f4 20 48  |174,6,3,1..~.. H|
00003670  61 77 6b 0d 09 88 4e dc  20 30 2c 31 33 36 2c 32  |awk...N. 0,136,2|
00003680  33 38 2c 32 35 35 2c 31  31 39 2c 30 2c 30 2c 31  |38,255,119,0,0,1|
00003690  2c 31 31 31 2c 31 35 39  2c 31 30 32 2c 32 35 35  |,111,159,102,255|
000036a0  2c 32 35 35 2c 39 2c 39  2c 36 2c 30 2c 31 37 2c  |,255,9,9,6,0,17,|
000036b0  31 31 39 2c 32 35 35 2c  32 33 38 2c 30 2c 30 2c  |119,255,238,0,0,|
000036c0  38 0d 09 92 09 f4 20 42  75 67 0d 09 9c 33 dc 20  |8..... Bug...3. |
000036d0  36 38 2c 32 33 38 2c 32  33 38 2c 31 30 33 2c 31  |68,238,238,103,1|
000036e0  2c 31 2c 32 2c 30 2c 33  34 2c 31 31 39 2c 31 31  |,1,2,0,34,119,11|
000036f0  39 2c 31 31 30 2c 38 2c  38 2c 34 2c 30 0d ff     |9,110,8,8,4,0..|
000036ff