�    Starfield EUG
� by Dominic Ford 1997
:
(��DJA
2�>&1D00�A
<�2:�=&2CD0:�23,1,0;0;0;0;
F�pass=0�2�2:P%=&2CD0:[OPT pass:.start LDA#12:LDX#(coli �256):LDY#(coli �256):JSR&FFF1:INCcoli:LDAcoli:CMP#16:BNEstart:JSRon
P�.program LDA#0:STAlinno:LDA#(text � 256):STA&74:LDA#(text � 256):STA&75:LDA#0:STApage:.pages JSRminc:JSRdopage:JSRwaic:JSRfade:INCpage:LDApage:CMP#3:BNEpages:JMPprogram
Z�.dopage LDA#0:STAline:.pageloop LDXlinno:LDAspace,X:STAlen:JSRwrite:INClinno:INCline:LDAline:CMP#3:BNEpageloop:LDXclock:LDA&E000,X:�#7:BNEnotblack:LDA#1:.notblack STAofc:JSRwait:LDAofc:STAonc:STAflacyc+3:LDA#0:STAcycle:JMPmini
d�.write LDXline:LDA#0:STA&70:STAxc:LDAaddress,X:STA&71:.newchar LDA#0:STAx:JSRreaddef:LDXlen:.newline SEI:LDA#0:STAy:LDA&70:STA&72:LDA&71:STA&73:JSRgetdata
ne.next LSRbyte:BCCblank:LDAbts,X:STA&76:LDY#0:.loop LDA(&72),Y:�#&C0:STA(&72),Y:INY:CPY&76:BNEloop
x�.blank LDA&72:CLC:ADC#&80:STA&72:LDA&73:ADC#2:STA&73:INCy:LDAy:CMP#8:BNEnext:INCx:LDA&70:CLC:ADCbts,X:STA&70:LDA&71:ADC#0:STA&71:LDAx:CMP#8:BNEnewline:CLI
�VINCxc:LDAxc:CMPchars,X:BNEnewchar:LDA&74:CLC:ADC#10:STA&74:LDA&75:ADC#0:STA&75:RTS
�X.readdef LDYxc:LDA(&74),Y:STAascii:LDA#&A:LDX#(ascii �256):LDY#(ascii �256):JMP&FFF1
�a.getdata LDY#8:LDXx:.getloop LDAascii,Y:�power,X:CMPpower,X:ROLbyte:DEY:BNEgetloop:LDXlen:RTS
��.mini JSRminw:RTS:.minw LDA#0:STAclock+1:LDA#&F0:.waitloop CMPclock+1:BCSwaitloop:LDA#&91:LDX#0:JSR&FFF4:CPY#32:BNEnoe:JSRoff:PLA:PLA:PLA:PLA:PLA:PLA:.noe RTS
��.minc JSRmini:RTS:.waic JSRwait:RTS:.wait JSRminw:JSRminw:RTS:.fade LDA#0:STAofc:JSRwait:LDA#7:STAonc:LDA#5:STAcycle:JSRmini
�B.fade LDA#0:STAofc:JSRwait:LDA#7:STAonc:LDA#5:STAcycle:JSRmini
�xLDA#0:STA&70:LDA#&30:STA&71:LDY#0:.clear LDA(&70),Y:�#&3F:STA(&70),Y:INY:BNEclear:INC&71:LDA&71:CMP#&80:BNEclear:RTS
�i.on SEI:LDA&204:STAvector:LDA&205:STAvector+1:LDA#(irq � 256):STA&204:LDA#(irq � 256):STA&205:CLI:RTS
�:.off SEI:LDAvector:STA&204:LDAvector+1:STA&205:CLI:RTS
�y.irq INCclock+1:INCclock:LDAclock:�#7:BNEirqend:TXA:PHA:TYA:PHA:JSRstars:JSRflash:PLA:TAY:PLA:TAX:.irqend JMP(vector)
�.flash LDXcycle:CPX#&FF:BEQendf:LDAflacyc,X:BEQoverf:STAcoli+1:LDA#8:STAcoli:LDA#12:LDX#(coli �256):LDY#(coli �256):JSR&FFF1:INCcycle:.endf RTS:.overf LDA#&FF:STAcycle:RTS
�.stars INCb:LDAb:CMP#7:BCCnowrap:LDA#0:STAb:.nowrap CLC:ADC#1:STAcoli:LDA#7:STAcoli+1:LDA#12:LDX#(coli �256):LDY#(coli �256):JSR&FFF1:LDAcoli:CLC:ADC#8:STAcoli:LDAonc:STAcoli+1
�3LDA#12:LDX#(coli �256):LDY#(coli �256):JSR&FFF1

�LDAc:STAcoli:LDA#0:STAcoli+1:LDA#12:LDX#(coli �256):LDY#(coli �256):JSR&FFF1:LDAb:CLC:ADC#1:STAc:LDAcoli:CLC:ADC#8:STAcoli:LDAofc:STAcoli+1:LDA#12:LDX#(coli �256):LDY#(coli �256):JMP&FFF1

j.text EQUS" EUG31                        Press     <SPACE> to continue A         D Ford    Screen    "

�.space EQUB0:EQUB0:EQUB1:EQUB0:EQUB0:EQUB0:EQUB1:EQUB0:EQUB0:.address EQUB&3A:EQUB&4E:EQUB&62:.power EQUB128:EQUB64:EQUB32:EQUB16:EQUB8:EQUB4:EQUB2:EQUB1:.flacyc EQUB4:EQUB6:EQUB7:EQUB0:EQUB0:EQUB7:EQUB6:EQUB4:EQUB16:EQUB0

"�.x EQUB0:.y EQUB0:.xc EQUB0:.len EQUB0:.byte EQUB0:.line EQUB0:.page EQUB0:.clock EQUW5:.vector EQUW0:.linno EQUB0:.bts EQUB8:EQUB16:.chars EQUB10:EQUB5:.ascii EQUB0:EQUD0:EQUD0:.b EQUB1:.c EQUB1:.coli EQUD0:EQUB0

,,.ofc EQUB0:.onc EQUB7:.cycle EQUB&FF:]:�

6*LOAD TitData

@
�start

J�"MENU"
�

00000000  0d 00 0a 16 f4 20 20 20  20 53 74 61 72 66 69 65  |.....    Starfie|
00000010  6c 64 20 45 55 47 0d 00  14 1a f4 20 62 79 20 44  |ld EUG..... by D|
00000020  6f 6d 69 6e 69 63 20 46  6f 72 64 20 31 39 39 37  |ominic Ford 1997|
00000030  0d 00 1e 05 3a 0d 00 28  0b ee 85 e5 8d 44 4a 41  |....:..(.....DJA|
00000040  0d 00 32 0e e7 90 3e 26  31 44 30 30 8c 41 0d 00  |..2...>&1D00.A..|
00000050  3c 1d eb 32 3a d3 3d 26  32 43 44 30 3a ef 32 33  |<..2:.=&2CD0:.23|
00000060  2c 31 2c 30 3b 30 3b 30  3b 30 3b 0d 00 46 7f e3  |,1,0;0;0;0;..F..|
00000070  70 61 73 73 3d 30 b8 32  88 32 3a 50 25 3d 26 32  |pass=0.2.2:P%=&2|
00000080  43 44 30 3a 5b 4f 50 54  20 70 61 73 73 3a 2e 73  |CD0:[OPT pass:.s|
00000090  74 61 72 74 20 4c 44 41  23 31 32 3a 4c 44 58 23  |tart LDA#12:LDX#|
000000a0  28 63 6f 6c 69 20 83 32  35 36 29 3a 4c 44 59 23  |(coli .256):LDY#|
000000b0  28 63 6f 6c 69 20 81 32  35 36 29 3a 4a 53 52 26  |(coli .256):JSR&|
000000c0  46 46 46 31 3a 49 4e 43  63 6f 6c 69 3a 4c 44 41  |FFF1:INCcoli:LDA|
000000d0  63 6f 6c 69 3a 43 4d 50  23 31 36 3a 42 4e 45 73  |coli:CMP#16:BNEs|
000000e0  74 61 72 74 3a 4a 53 52  6f 6e 0d 00 50 ac 2e 70  |tart:JSRon..P..p|
000000f0  72 6f 67 72 61 6d 20 4c  44 41 23 30 3a 53 54 41  |rogram LDA#0:STA|
00000100  6c 69 6e 6e 6f 3a 4c 44  41 23 28 74 65 78 74 20  |linno:LDA#(text |
00000110  83 20 32 35 36 29 3a 53  54 41 26 37 34 3a 4c 44  |. 256):STA&74:LD|
00000120  41 23 28 74 65 78 74 20  81 20 32 35 36 29 3a 53  |A#(text . 256):S|
00000130  54 41 26 37 35 3a 4c 44  41 23 30 3a 53 54 41 70  |TA&75:LDA#0:STAp|
00000140  61 67 65 3a 2e 70 61 67  65 73 20 4a 53 52 6d 69  |age:.pages JSRmi|
00000150  6e 63 3a 4a 53 52 64 6f  70 61 67 65 3a 4a 53 52  |nc:JSRdopage:JSR|
00000160  77 61 69 63 3a 4a 53 52  66 61 64 65 3a 49 4e 43  |waic:JSRfade:INC|
00000170  70 61 67 65 3a 4c 44 41  70 61 67 65 3a 43 4d 50  |page:LDApage:CMP|
00000180  23 33 3a 42 4e 45 70 61  67 65 73 3a 4a 4d 50 70  |#3:BNEpages:JMPp|
00000190  72 6f 67 72 61 6d 0d 00  5a e6 2e 64 6f 70 61 67  |rogram..Z..dopag|
000001a0  65 20 4c 44 41 23 30 3a  53 54 41 6c 69 6e 65 3a  |e LDA#0:STAline:|
000001b0  2e 70 61 67 65 6c 6f 6f  70 20 4c 44 58 6c 69 6e  |.pageloop LDXlin|
000001c0  6e 6f 3a 4c 44 41 73 70  61 63 65 2c 58 3a 53 54  |no:LDAspace,X:ST|
000001d0  41 6c 65 6e 3a 4a 53 52  77 72 69 74 65 3a 49 4e  |Alen:JSRwrite:IN|
000001e0  43 6c 69 6e 6e 6f 3a 49  4e 43 6c 69 6e 65 3a 4c  |Clinno:INCline:L|
000001f0  44 41 6c 69 6e 65 3a 43  4d 50 23 33 3a 42 4e 45  |DAline:CMP#3:BNE|
00000200  70 61 67 65 6c 6f 6f 70  3a 4c 44 58 63 6c 6f 63  |pageloop:LDXcloc|
00000210  6b 3a 4c 44 41 26 45 30  30 30 2c 58 3a 80 23 37  |k:LDA&E000,X:.#7|
00000220  3a 42 4e 45 6e 6f 74 62  6c 61 63 6b 3a 4c 44 41  |:BNEnotblack:LDA|
00000230  23 31 3a 2e 6e 6f 74 62  6c 61 63 6b 20 53 54 41  |#1:.notblack STA|
00000240  6f 66 63 3a 4a 53 52 77  61 69 74 3a 4c 44 41 6f  |ofc:JSRwait:LDAo|
00000250  66 63 3a 53 54 41 6f 6e  63 3a 53 54 41 66 6c 61  |fc:STAonc:STAfla|
00000260  63 79 63 2b 33 3a 4c 44  41 23 30 3a 53 54 41 63  |cyc+3:LDA#0:STAc|
00000270  79 63 6c 65 3a 4a 4d 50  6d 69 6e 69 0d 00 64 9e  |ycle:JMPmini..d.|
00000280  2e 77 72 69 74 65 20 4c  44 58 6c 69 6e 65 3a 4c  |.write LDXline:L|
00000290  44 41 23 30 3a 53 54 41  26 37 30 3a 53 54 41 78  |DA#0:STA&70:STAx|
000002a0  63 3a 4c 44 41 61 64 64  72 65 73 73 2c 58 3a 53  |c:LDAaddress,X:S|
000002b0  54 41 26 37 31 3a 2e 6e  65 77 63 68 61 72 20 4c  |TA&71:.newchar L|
000002c0  44 41 23 30 3a 53 54 41  78 3a 4a 53 52 72 65 61  |DA#0:STAx:JSRrea|
000002d0  64 64 65 66 3a 4c 44 58  6c 65 6e 3a 2e 6e 65 77  |ddef:LDXlen:.new|
000002e0  6c 69 6e 65 20 53 45 49  3a 4c 44 41 23 30 3a 53  |line SEI:LDA#0:S|
000002f0  54 41 79 3a 4c 44 41 26  37 30 3a 53 54 41 26 37  |TAy:LDA&70:STA&7|
00000300  32 3a 4c 44 41 26 37 31  3a 53 54 41 26 37 33 3a  |2:LDA&71:STA&73:|
00000310  4a 53 52 67 65 74 64 61  74 61 0d 00 6e 65 2e 6e  |JSRgetdata..ne.n|
00000320  65 78 74 20 4c 53 52 62  79 74 65 3a 42 43 43 62  |ext LSRbyte:BCCb|
00000330  6c 61 6e 6b 3a 4c 44 41  62 74 73 2c 58 3a 53 54  |lank:LDAbts,X:ST|
00000340  41 26 37 36 3a 4c 44 59  23 30 3a 2e 6c 6f 6f 70  |A&76:LDY#0:.loop|
00000350  20 4c 44 41 28 26 37 32  29 2c 59 3a 82 23 26 43  | LDA(&72),Y:.#&C|
00000360  30 3a 53 54 41 28 26 37  32 29 2c 59 3a 49 4e 59  |0:STA(&72),Y:INY|
00000370  3a 43 50 59 26 37 36 3a  42 4e 45 6c 6f 6f 70 0d  |:CPY&76:BNEloop.|
00000380  00 78 9e 2e 62 6c 61 6e  6b 20 4c 44 41 26 37 32  |.x..blank LDA&72|
00000390  3a 43 4c 43 3a 41 44 43  23 26 38 30 3a 53 54 41  |:CLC:ADC#&80:STA|
000003a0  26 37 32 3a 4c 44 41 26  37 33 3a 41 44 43 23 32  |&72:LDA&73:ADC#2|
000003b0  3a 53 54 41 26 37 33 3a  49 4e 43 79 3a 4c 44 41  |:STA&73:INCy:LDA|
000003c0  79 3a 43 4d 50 23 38 3a  42 4e 45 6e 65 78 74 3a  |y:CMP#8:BNEnext:|
000003d0  49 4e 43 78 3a 4c 44 41  26 37 30 3a 43 4c 43 3a  |INCx:LDA&70:CLC:|
000003e0  41 44 43 62 74 73 2c 58  3a 53 54 41 26 37 30 3a  |ADCbts,X:STA&70:|
000003f0  4c 44 41 26 37 31 3a 41  44 43 23 30 3a 53 54 41  |LDA&71:ADC#0:STA|
00000400  26 37 31 3a 4c 44 41 78  3a 43 4d 50 23 38 3a 42  |&71:LDAx:CMP#8:B|
00000410  4e 45 6e 65 77 6c 69 6e  65 3a 43 4c 49 0d 00 82  |NEnewline:CLI...|
00000420  56 49 4e 43 78 63 3a 4c  44 41 78 63 3a 43 4d 50  |VINCxc:LDAxc:CMP|
00000430  63 68 61 72 73 2c 58 3a  42 4e 45 6e 65 77 63 68  |chars,X:BNEnewch|
00000440  61 72 3a 4c 44 41 26 37  34 3a 43 4c 43 3a 41 44  |ar:LDA&74:CLC:AD|
00000450  43 23 31 30 3a 53 54 41  26 37 34 3a 4c 44 41 26  |C#10:STA&74:LDA&|
00000460  37 35 3a 41 44 43 23 30  3a 53 54 41 26 37 35 3a  |75:ADC#0:STA&75:|
00000470  52 54 53 0d 00 8c 58 2e  72 65 61 64 64 65 66 20  |RTS...X.readdef |
00000480  4c 44 59 78 63 3a 4c 44  41 28 26 37 34 29 2c 59  |LDYxc:LDA(&74),Y|
00000490  3a 53 54 41 61 73 63 69  69 3a 4c 44 41 23 26 41  |:STAascii:LDA#&A|
000004a0  3a 4c 44 58 23 28 61 73  63 69 69 20 83 32 35 36  |:LDX#(ascii .256|
000004b0  29 3a 4c 44 59 23 28 61  73 63 69 69 20 81 32 35  |):LDY#(ascii .25|
000004c0  36 29 3a 4a 4d 50 26 46  46 46 31 0d 00 96 61 2e  |6):JMP&FFF1...a.|
000004d0  67 65 74 64 61 74 61 20  4c 44 59 23 38 3a 4c 44  |getdata LDY#8:LD|
000004e0  58 78 3a 2e 67 65 74 6c  6f 6f 70 20 4c 44 41 61  |Xx:.getloop LDAa|
000004f0  73 63 69 69 2c 59 3a 80  70 6f 77 65 72 2c 58 3a  |scii,Y:.power,X:|
00000500  43 4d 50 70 6f 77 65 72  2c 58 3a 52 4f 4c 62 79  |CMPpower,X:ROLby|
00000510  74 65 3a 44 45 59 3a 42  4e 45 67 65 74 6c 6f 6f  |te:DEY:BNEgetloo|
00000520  70 3a 4c 44 58 6c 65 6e  3a 52 54 53 0d 00 a0 a2  |p:LDXlen:RTS....|
00000530  2e 6d 69 6e 69 20 4a 53  52 6d 69 6e 77 3a 52 54  |.mini JSRminw:RT|
00000540  53 3a 2e 6d 69 6e 77 20  4c 44 41 23 30 3a 53 54  |S:.minw LDA#0:ST|
00000550  41 63 6c 6f 63 6b 2b 31  3a 4c 44 41 23 26 46 30  |Aclock+1:LDA#&F0|
00000560  3a 2e 77 61 69 74 6c 6f  6f 70 20 43 4d 50 63 6c  |:.waitloop CMPcl|
00000570  6f 63 6b 2b 31 3a 42 43  53 77 61 69 74 6c 6f 6f  |ock+1:BCSwaitloo|
00000580  70 3a 4c 44 41 23 26 39  31 3a 4c 44 58 23 30 3a  |p:LDA#&91:LDX#0:|
00000590  4a 53 52 26 46 46 46 34  3a 43 50 59 23 33 32 3a  |JSR&FFF4:CPY#32:|
000005a0  42 4e 45 6e 6f 65 3a 4a  53 52 6f 66 66 3a 50 4c  |BNEnoe:JSRoff:PL|
000005b0  41 3a 50 4c 41 3a 50 4c  41 3a 50 4c 41 3a 50 4c  |A:PLA:PLA:PLA:PL|
000005c0  41 3a 50 4c 41 3a 2e 6e  6f 65 20 52 54 53 0d 00  |A:PLA:.noe RTS..|
000005d0  aa 80 2e 6d 69 6e 63 20  4a 53 52 6d 69 6e 69 3a  |...minc JSRmini:|
000005e0  52 54 53 3a 2e 77 61 69  63 20 4a 53 52 77 61 69  |RTS:.waic JSRwai|
000005f0  74 3a 52 54 53 3a 2e 77  61 69 74 20 4a 53 52 6d  |t:RTS:.wait JSRm|
00000600  69 6e 77 3a 4a 53 52 6d  69 6e 77 3a 52 54 53 3a  |inw:JSRminw:RTS:|
00000610  2e 66 61 64 65 20 4c 44  41 23 30 3a 53 54 41 6f  |.fade LDA#0:STAo|
00000620  66 63 3a 4a 53 52 77 61  69 74 3a 4c 44 41 23 37  |fc:JSRwait:LDA#7|
00000630  3a 53 54 41 6f 6e 63 3a  4c 44 41 23 35 3a 53 54  |:STAonc:LDA#5:ST|
00000640  41 63 79 63 6c 65 3a 4a  53 52 6d 69 6e 69 0d 00  |Acycle:JSRmini..|
00000650  b4 42 2e 66 61 64 65 20  4c 44 41 23 30 3a 53 54  |.B.fade LDA#0:ST|
00000660  41 6f 66 63 3a 4a 53 52  77 61 69 74 3a 4c 44 41  |Aofc:JSRwait:LDA|
00000670  23 37 3a 53 54 41 6f 6e  63 3a 4c 44 41 23 35 3a  |#7:STAonc:LDA#5:|
00000680  53 54 41 63 79 63 6c 65  3a 4a 53 52 6d 69 6e 69  |STAcycle:JSRmini|
00000690  0d 00 be 78 4c 44 41 23  30 3a 53 54 41 26 37 30  |...xLDA#0:STA&70|
000006a0  3a 4c 44 41 23 26 33 30  3a 53 54 41 26 37 31 3a  |:LDA#&30:STA&71:|
000006b0  4c 44 59 23 30 3a 2e 63  6c 65 61 72 20 4c 44 41  |LDY#0:.clear LDA|
000006c0  28 26 37 30 29 2c 59 3a  80 23 26 33 46 3a 53 54  |(&70),Y:.#&3F:ST|
000006d0  41 28 26 37 30 29 2c 59  3a 49 4e 59 3a 42 4e 45  |A(&70),Y:INY:BNE|
000006e0  63 6c 65 61 72 3a 49 4e  43 26 37 31 3a 4c 44 41  |clear:INC&71:LDA|
000006f0  26 37 31 3a 43 4d 50 23  26 38 30 3a 42 4e 45 63  |&71:CMP#&80:BNEc|
00000700  6c 65 61 72 3a 52 54 53  0d 00 c8 69 2e 6f 6e 20  |lear:RTS...i.on |
00000710  53 45 49 3a 4c 44 41 26  32 30 34 3a 53 54 41 76  |SEI:LDA&204:STAv|
00000720  65 63 74 6f 72 3a 4c 44  41 26 32 30 35 3a 53 54  |ector:LDA&205:ST|
00000730  41 76 65 63 74 6f 72 2b  31 3a 4c 44 41 23 28 69  |Avector+1:LDA#(i|
00000740  72 71 20 83 20 32 35 36  29 3a 53 54 41 26 32 30  |rq . 256):STA&20|
00000750  34 3a 4c 44 41 23 28 69  72 71 20 81 20 32 35 36  |4:LDA#(irq . 256|
00000760  29 3a 53 54 41 26 32 30  35 3a 43 4c 49 3a 52 54  |):STA&205:CLI:RT|
00000770  53 0d 00 d2 3a 2e 6f 66  66 20 53 45 49 3a 4c 44  |S...:.off SEI:LD|
00000780  41 76 65 63 74 6f 72 3a  53 54 41 26 32 30 34 3a  |Avector:STA&204:|
00000790  4c 44 41 76 65 63 74 6f  72 2b 31 3a 53 54 41 26  |LDAvector+1:STA&|
000007a0  32 30 35 3a 43 4c 49 3a  52 54 53 0d 00 dc 79 2e  |205:CLI:RTS...y.|
000007b0  69 72 71 20 49 4e 43 63  6c 6f 63 6b 2b 31 3a 49  |irq INCclock+1:I|
000007c0  4e 43 63 6c 6f 63 6b 3a  4c 44 41 63 6c 6f 63 6b  |NCclock:LDAclock|
000007d0  3a 80 23 37 3a 42 4e 45  69 72 71 65 6e 64 3a 54  |:.#7:BNEirqend:T|
000007e0  58 41 3a 50 48 41 3a 54  59 41 3a 50 48 41 3a 4a  |XA:PHA:TYA:PHA:J|
000007f0  53 52 73 74 61 72 73 3a  4a 53 52 66 6c 61 73 68  |SRstars:JSRflash|
00000800  3a 50 4c 41 3a 54 41 59  3a 50 4c 41 3a 54 41 58  |:PLA:TAY:PLA:TAX|
00000810  3a 2e 69 72 71 65 6e 64  20 4a 4d 50 28 76 65 63  |:.irqend JMP(vec|
00000820  74 6f 72 29 0d 00 e6 af  2e 66 6c 61 73 68 20 4c  |tor).....flash L|
00000830  44 58 63 79 63 6c 65 3a  43 50 58 23 26 46 46 3a  |DXcycle:CPX#&FF:|
00000840  42 45 51 65 6e 64 66 3a  4c 44 41 66 6c 61 63 79  |BEQendf:LDAflacy|
00000850  63 2c 58 3a 42 45 51 6f  76 65 72 66 3a 53 54 41  |c,X:BEQoverf:STA|
00000860  63 6f 6c 69 2b 31 3a 4c  44 41 23 38 3a 53 54 41  |coli+1:LDA#8:STA|
00000870  63 6f 6c 69 3a 4c 44 41  23 31 32 3a 4c 44 58 23  |coli:LDA#12:LDX#|
00000880  28 63 6f 6c 69 20 83 32  35 36 29 3a 4c 44 59 23  |(coli .256):LDY#|
00000890  28 63 6f 6c 69 20 81 32  35 36 29 3a 4a 53 52 26  |(coli .256):JSR&|
000008a0  46 46 46 31 3a 49 4e 43  63 79 63 6c 65 3a 2e 65  |FFF1:INCcycle:.e|
000008b0  6e 64 66 20 52 54 53 3a  2e 6f 76 65 72 66 20 4c  |ndf RTS:.overf L|
000008c0  44 41 23 26 46 46 3a 53  54 41 63 79 63 6c 65 3a  |DA#&FF:STAcycle:|
000008d0  52 54 53 0d 00 f0 b4 2e  73 74 61 72 73 20 49 4e  |RTS.....stars IN|
000008e0  43 62 3a 4c 44 41 62 3a  43 4d 50 23 37 3a 42 43  |Cb:LDAb:CMP#7:BC|
000008f0  43 6e 6f 77 72 61 70 3a  4c 44 41 23 30 3a 53 54  |Cnowrap:LDA#0:ST|
00000900  41 62 3a 2e 6e 6f 77 72  61 70 20 43 4c 43 3a 41  |Ab:.nowrap CLC:A|
00000910  44 43 23 31 3a 53 54 41  63 6f 6c 69 3a 4c 44 41  |DC#1:STAcoli:LDA|
00000920  23 37 3a 53 54 41 63 6f  6c 69 2b 31 3a 4c 44 41  |#7:STAcoli+1:LDA|
00000930  23 31 32 3a 4c 44 58 23  28 63 6f 6c 69 20 83 32  |#12:LDX#(coli .2|
00000940  35 36 29 3a 4c 44 59 23  28 63 6f 6c 69 20 81 32  |56):LDY#(coli .2|
00000950  35 36 29 3a 4a 53 52 26  46 46 46 31 3a 4c 44 41  |56):JSR&FFF1:LDA|
00000960  63 6f 6c 69 3a 43 4c 43  3a 41 44 43 23 38 3a 53  |coli:CLC:ADC#8:S|
00000970  54 41 63 6f 6c 69 3a 4c  44 41 6f 6e 63 3a 53 54  |TAcoli:LDAonc:ST|
00000980  41 63 6f 6c 69 2b 31 0d  00 fa 33 4c 44 41 23 31  |Acoli+1...3LDA#1|
00000990  32 3a 4c 44 58 23 28 63  6f 6c 69 20 83 32 35 36  |2:LDX#(coli .256|
000009a0  29 3a 4c 44 59 23 28 63  6f 6c 69 20 81 32 35 36  |):LDY#(coli .256|
000009b0  29 3a 4a 53 52 26 46 46  46 31 0d 01 04 bf 4c 44  |):JSR&FFF1....LD|
000009c0  41 63 3a 53 54 41 63 6f  6c 69 3a 4c 44 41 23 30  |Ac:STAcoli:LDA#0|
000009d0  3a 53 54 41 63 6f 6c 69  2b 31 3a 4c 44 41 23 31  |:STAcoli+1:LDA#1|
000009e0  32 3a 4c 44 58 23 28 63  6f 6c 69 20 83 32 35 36  |2:LDX#(coli .256|
000009f0  29 3a 4c 44 59 23 28 63  6f 6c 69 20 81 32 35 36  |):LDY#(coli .256|
00000a00  29 3a 4a 53 52 26 46 46  46 31 3a 4c 44 41 62 3a  |):JSR&FFF1:LDAb:|
00000a10  43 4c 43 3a 41 44 43 23  31 3a 53 54 41 63 3a 4c  |CLC:ADC#1:STAc:L|
00000a20  44 41 63 6f 6c 69 3a 43  4c 43 3a 41 44 43 23 38  |DAcoli:CLC:ADC#8|
00000a30  3a 53 54 41 63 6f 6c 69  3a 4c 44 41 6f 66 63 3a  |:STAcoli:LDAofc:|
00000a40  53 54 41 63 6f 6c 69 2b  31 3a 4c 44 41 23 31 32  |STAcoli+1:LDA#12|
00000a50  3a 4c 44 58 23 28 63 6f  6c 69 20 83 32 35 36 29  |:LDX#(coli .256)|
00000a60  3a 4c 44 59 23 28 63 6f  6c 69 20 81 32 35 36 29  |:LDY#(coli .256)|
00000a70  3a 4a 4d 50 26 46 46 46  31 0d 01 0e 6a 2e 74 65  |:JMP&FFF1...j.te|
00000a80  78 74 20 45 51 55 53 22  20 45 55 47 33 31 20 20  |xt EQUS" EUG31  |
00000a90  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000aa0  20 20 20 20 20 20 50 72  65 73 73 20 20 20 20 20  |      Press     |
00000ab0  3c 53 50 41 43 45 3e 20  74 6f 20 63 6f 6e 74 69  |<SPACE> to conti|
00000ac0  6e 75 65 20 41 20 20 20  20 20 20 20 20 20 44 20  |nue A         D |
00000ad0  46 6f 72 64 20 20 20 20  53 63 72 65 65 6e 20 20  |Ford    Screen  |
00000ae0  20 20 22 0d 01 18 e2 2e  73 70 61 63 65 20 45 51  |  ".....space EQ|
00000af0  55 42 30 3a 45 51 55 42  30 3a 45 51 55 42 31 3a  |UB0:EQUB0:EQUB1:|
00000b00  45 51 55 42 30 3a 45 51  55 42 30 3a 45 51 55 42  |EQUB0:EQUB0:EQUB|
00000b10  30 3a 45 51 55 42 31 3a  45 51 55 42 30 3a 45 51  |0:EQUB1:EQUB0:EQ|
00000b20  55 42 30 3a 2e 61 64 64  72 65 73 73 20 45 51 55  |UB0:.address EQU|
00000b30  42 26 33 41 3a 45 51 55  42 26 34 45 3a 45 51 55  |B&3A:EQUB&4E:EQU|
00000b40  42 26 36 32 3a 2e 70 6f  77 65 72 20 45 51 55 42  |B&62:.power EQUB|
00000b50  31 32 38 3a 45 51 55 42  36 34 3a 45 51 55 42 33  |128:EQUB64:EQUB3|
00000b60  32 3a 45 51 55 42 31 36  3a 45 51 55 42 38 3a 45  |2:EQUB16:EQUB8:E|
00000b70  51 55 42 34 3a 45 51 55  42 32 3a 45 51 55 42 31  |QUB4:EQUB2:EQUB1|
00000b80  3a 2e 66 6c 61 63 79 63  20 45 51 55 42 34 3a 45  |:.flacyc EQUB4:E|
00000b90  51 55 42 36 3a 45 51 55  42 37 3a 45 51 55 42 30  |QUB6:EQUB7:EQUB0|
00000ba0  3a 45 51 55 42 30 3a 45  51 55 42 37 3a 45 51 55  |:EQUB0:EQUB7:EQU|
00000bb0  42 36 3a 45 51 55 42 34  3a 45 51 55 42 31 36 3a  |B6:EQUB4:EQUB16:|
00000bc0  45 51 55 42 30 0d 01 22  d9 2e 78 20 45 51 55 42  |EQUB0.."..x EQUB|
00000bd0  30 3a 2e 79 20 45 51 55  42 30 3a 2e 78 63 20 45  |0:.y EQUB0:.xc E|
00000be0  51 55 42 30 3a 2e 6c 65  6e 20 45 51 55 42 30 3a  |QUB0:.len EQUB0:|
00000bf0  2e 62 79 74 65 20 45 51  55 42 30 3a 2e 6c 69 6e  |.byte EQUB0:.lin|
00000c00  65 20 45 51 55 42 30 3a  2e 70 61 67 65 20 45 51  |e EQUB0:.page EQ|
00000c10  55 42 30 3a 2e 63 6c 6f  63 6b 20 45 51 55 57 35  |UB0:.clock EQUW5|
00000c20  3a 2e 76 65 63 74 6f 72  20 45 51 55 57 30 3a 2e  |:.vector EQUW0:.|
00000c30  6c 69 6e 6e 6f 20 45 51  55 42 30 3a 2e 62 74 73  |linno EQUB0:.bts|
00000c40  20 45 51 55 42 38 3a 45  51 55 42 31 36 3a 2e 63  | EQUB8:EQUB16:.c|
00000c50  68 61 72 73 20 45 51 55  42 31 30 3a 45 51 55 42  |hars EQUB10:EQUB|
00000c60  35 3a 2e 61 73 63 69 69  20 45 51 55 42 30 3a 45  |5:.ascii EQUB0:E|
00000c70  51 55 44 30 3a 45 51 55  44 30 3a 2e 62 20 45 51  |QUD0:EQUD0:.b EQ|
00000c80  55 42 31 3a 2e 63 20 45  51 55 42 31 3a 2e 63 6f  |UB1:.c EQUB1:.co|
00000c90  6c 69 20 45 51 55 44 30  3a 45 51 55 42 30 0d 01  |li EQUD0:EQUB0..|
00000ca0  2c 2c 2e 6f 66 63 20 45  51 55 42 30 3a 2e 6f 6e  |,,.ofc EQUB0:.on|
00000cb0  63 20 45 51 55 42 37 3a  2e 63 79 63 6c 65 20 45  |c EQUB7:.cycle E|
00000cc0  51 55 42 26 46 46 3a 5d  3a ed 0d 01 36 11 2a 4c  |QUB&FF:]:...6.*L|
00000cd0  4f 41 44 20 54 69 74 44  61 74 61 0d 01 40 0a d6  |OAD TitData..@..|
00000ce0  73 74 61 72 74 0d 01 4a  0b d7 22 4d 45 4e 55 22  |start..J.."MENU"|
00000cf0  0d ff                                             |..|
00000cf2