P%=&1C80:O%=&6480:[OPTpass
�.complete CPY#&14:BEQcongu:JMPscreen:.congu JSRsboard:LDA#(cmptxt � 256):STA&72:LDA#(cmptxt � 256):STA&73:LDA#2:STAxch:LDA#7:STAych:JSRstring:LDA#(cmptxtb � 256):STA&72:LDA#(cmptxtb � 256):STA&73:LDA#3:STAxch:LDA#14:STAych
JSRstring:.theend JMPtheend
(�.mainclear LDAmtype:BEQnoclearm:LDAxpos:CMPxmoo:BNEmci:LDAypos:CMPymoo:BEQmcii:.mci LDAclearup:BEQnoclearm:.mcii LDA#1:STAchanged:JSRdelyou
2ZLDXxpos:LDYypos:JSRmcd:LDA#0:STAwiper:STAwiperm:LDXxmont:LDYymont:JMPmcd:.noclearm RTS
<�.dispmon LDAmtype:BEQnomonsr:LDA&78:PHA:LDA&79:PHA:LDAfine:PHA:LDAxpos:PHA:LDAypos:PHA:LDAwiper:PHA:LDAwiperm:STAwiper:LDAxmont:STAxpos:LDAymont:STAypos:LDAmfine:STAfine:LDA&7A:STA&78:LDA&7B:STA&79
F�LDA#&2F:STAwirep+1:STAwirepb+1:LDA#&C0:STAwirep:LDA#&E0:STAwirepb:LDA#1:STAmflag:JSRdispshr:LDA&78:STA&7A:LDA&79:STA&7B:PLA:STAwiper:PLA:STAypos:PLA:STAxpos:PLA:STAfine:PLA:STA&79:PLA:STA&78:LDA#0:STAmflag:.nomonsr RTS
P�.monset LDAyscr:ASL A:ASL A:ASL A:ASL A:CLC:ADCxscr:ADC#&20:STA&71:LDY#0:STY&70:INY:STYmfine:LDY#&FB:LDA(&70),Y:ASL A:ROL A:ROL A:�#3:TAX:LDAmonpd,X:STAxmont
Z�INY:LDA(&70),Y:ASL A:ROL A:ROL A:�#3:TAX:LDAmonpd,X:STAymont:INY:LDA(&70),Y:ASL A:ROL A:ROL A:�#3:STAmtype:LDA#&FF:STAmdir:.lasexit RTS
d�.monpro LDAxmont:STAxmoo:LDAymont:STAymoo:LDA#0:STAclearup:LDAmtype:BEQlasexit:CMP#3:BNEnomonstl:LDA#0:STAmfine:STAmonstat:.nomonstl LDAxpos:CMPxmont:BNEmontch:LDAypos:CMPymont:BNEmontch:LDA#1:STAclearup:STApowchange:LDAfnst:BEQmontch
n;LDApower:SEC:SBC#8:STApower:BCSmontche:PLA:PLA:JMPkillu
x�.montche LDAmtype:CMP#3:BNEmontch:PLA:PLA:JMPzap:.montch JSRmovemst:LDAxpos:CMPxmont:BNElasexit:LDAypos:CMPymont:BNElasexit:LDA#1:STAclearup:STApowchange:LDApower:SEC:SBC#8:STApower:BCSlasexit:PLA:PLA:JMPkillu
��.laser LDA#&81:LDX#&A6:LDY#&FF:JSRosbyte:BCClasexit:LDAlastat:BNElasexit:LDAsound:BEQnolassd:LDA#7:LDX#(switn �256):LDY#(switn �256):JSRosword:.nolassd LDApower:STApowchange:SEC:SBC#4:STApower
�BCSlasokay:.lasdie PLA:PLA
��.killu JSRgameover:JMPprog:.lasokay LDAxmont:CMPxpos:BNEnotont:LDAymont:CMPypos:BNEnotont:LDA#0:STAmtype:RTS:.notont SEI:LDAxpos:ASL A:ASL A:ASL A:ASL A:ASL A:ASL A:CLC:ADC#&80:STAlasad:LDA#0:ADC#&37:STA&71
�[LDAxpos:LSR A:LSR A:CLC:ADC&71:ADCypos:STA&71:LDAypos:ASL A:ASL A:CLC:ADC&71:STAlasad+1
��LDAface:STAlasdir:BEQlefire:LDAlasad:CLC:ADC#&40:STAlasad:LDA#9:SEC:SBCxpos:LDXxpos:CPX#1:BEQcorrigf:CPX#5:BEQcorrigf:BNEfinfire:.corrigf INClasad+1:JMPfinfire
�w.lefire DEClasad+1:LDAxpos:.finfire ASL A:ASL A:ASL A:CMP#&20:BCCshrange:LDA#&1F:.shrange STAlastat:LDA#0:STAlastep
��LDA#1:LDXface:BNElealt:LDA#&FF:.lealt CLC:ADCxpos:STAxf:STAxset:LDAypos:STAyset:STAyf:JSRgetblock:CMP#&10:BCCnoobstr:LDA#0:STAlastat:.noobstr CLI:JMPwait
�Y.dispyou LDA#&2F:STAwirep+1:STAwirepb+1:LDA#&80:STAwirep:LDA#&A0:STAwirepb:JMPdispshr
��.deadedch LDAdeaded:BEQnotdeadd:LDAmtype:CMP#3:BEQnodisp:LDA#0:STAmtype:.nodisp LDA&7A:CLC:ADC#&80:STA&70:LDA&7B:ADC#2:STA&71:LDY#31:.deada LDA&2FC0,Y:STA(&7A),Y:LDA&2FE0,Y:STA(&70),Y:DEY:BNEdeada
�hLDApower:STApowchange:CLC:ADC#4:BCCoverpowm:LDA#254:.overpowm STApower:LDA#0:STAdeaded:.notdeadd RTS
�.irq INCclock:LDA&80:CLC:ADC#1:CMPclock:BNEnohelpc:INC&80:.nohelpc LDAlastat:BEQnolas:LDAmtype:BEQnohitm:LDAxmont:CMPxf:BNEnohitm:LDAymont:CMPyf:BNEnohitm:LDA#1:STAlastat:STAdeaded
�H.nohitm JSRsavevar:DEClastat:LDAlastep:CLC:ADC#8:STAlastep:LDAlasdir
�-BEQlasleft:BNElasright:.nolas JMP(vector)

�.lasright LDYlastep:JSRlaseorp:CPY#&28:BCCridel:TYA:SEC:SBC#&20:JSRlaseory:.ridel LDAlastat:BNEricont:LDAlastep:SEC:SBC#&18:BCSnormn:LDA#0:.normn TAY

.ristop JSRlaseorp

�CPYlastep:BEQricontb:TYA:CLC:ADC#8:TAY:JMPristop:.ricontb JSRdelyou:.ricont LDAlastep:�#&3F:BNErwall:INCxf:LDAxf:STAxset:LDAyf:STAyset:JSRgetblock:CMP#&10:BCCrwall:LDA#1:STAlastat:.rwall JMPloadvar

"�.lasleft LDA#0:SEC:SBClastep:JSRlaseory:CPY#&E0:BCSledel:TYA:CLC:ADC#&20:JSRlaseory:.ledel LDAlastat:BNElecont:LDA#0:SEC:SBClastep:STAlastep:CLC:ADC#&18:BCCnorln:LDA#&F8

,.norln TAY

6�.lestop JSRlaseorp:CPYlastep:BEQlecontb:TYA:SEC:SBC#8:TAY:JMPlestop:.lecontb JSRdelyou:.lecont LDAlastep:�#&3F:BNElwall:DECxf:LDAxf:STAxset:LDAyf:STAyset

@BJSRgetblock:CMP#&10:BCClwall:LDA#1:STAlastat:.lwall JMPloadvar

J=.laseory TAY:.laseorp LDA(lasad),Y:�#&3F:STA(lasad),Y:RTS

T�.scroff LDA#0:STAlastat:LDA#16:STAscrofd:.scrofflop LDA#&C:LDX#(scrofd �256):LDY#(scrofd �256):JSRosword:DECscrofd:LDAscrofd:BNEscrofflop:RTS

^9]:�0,6)~P%:� P%>&2000 � �''"Code Overflow to:";~P%:�

h�
�

00000000  0d 00 0a 1e 50 25 3d 26  31 43 38 30 3a 4f 25 3d  |....P%=&1C80:O%=|
00000010  26 36 34 38 30 3a 5b 4f  50 54 70 61 73 73 0d 00  |&6480:[OPTpass..|
00000020  14 e2 2e 63 6f 6d 70 6c  65 74 65 20 43 50 59 23  |...complete CPY#|
00000030  26 31 34 3a 42 45 51 63  6f 6e 67 75 3a 4a 4d 50  |&14:BEQcongu:JMP|
00000040  73 63 72 65 65 6e 3a 2e  63 6f 6e 67 75 20 4a 53  |screen:.congu JS|
00000050  52 73 62 6f 61 72 64 3a  4c 44 41 23 28 63 6d 70  |Rsboard:LDA#(cmp|
00000060  74 78 74 20 83 20 32 35  36 29 3a 53 54 41 26 37  |txt . 256):STA&7|
00000070  32 3a 4c 44 41 23 28 63  6d 70 74 78 74 20 81 20  |2:LDA#(cmptxt . |
00000080  32 35 36 29 3a 53 54 41  26 37 33 3a 4c 44 41 23  |256):STA&73:LDA#|
00000090  32 3a 53 54 41 78 63 68  3a 4c 44 41 23 37 3a 53  |2:STAxch:LDA#7:S|
000000a0  54 41 79 63 68 3a 4a 53  52 73 74 72 69 6e 67 3a  |TAych:JSRstring:|
000000b0  4c 44 41 23 28 63 6d 70  74 78 74 62 20 83 20 32  |LDA#(cmptxtb . 2|
000000c0  35 36 29 3a 53 54 41 26  37 32 3a 4c 44 41 23 28  |56):STA&72:LDA#(|
000000d0  63 6d 70 74 78 74 62 20  81 20 32 35 36 29 3a 53  |cmptxtb . 256):S|
000000e0  54 41 26 37 33 3a 4c 44  41 23 33 3a 53 54 41 78  |TA&73:LDA#3:STAx|
000000f0  63 68 3a 4c 44 41 23 31  34 3a 53 54 41 79 63 68  |ch:LDA#14:STAych|
00000100  0d 00 1e 1f 4a 53 52 73  74 72 69 6e 67 3a 2e 74  |....JSRstring:.t|
00000110  68 65 65 6e 64 20 4a 4d  50 74 68 65 65 6e 64 0d  |heend JMPtheend.|
00000120  00 28 8f 2e 6d 61 69 6e  63 6c 65 61 72 20 4c 44  |.(..mainclear LD|
00000130  41 6d 74 79 70 65 3a 42  45 51 6e 6f 63 6c 65 61  |Amtype:BEQnoclea|
00000140  72 6d 3a 4c 44 41 78 70  6f 73 3a 43 4d 50 78 6d  |rm:LDAxpos:CMPxm|
00000150  6f 6f 3a 42 4e 45 6d 63  69 3a 4c 44 41 79 70 6f  |oo:BNEmci:LDAypo|
00000160  73 3a 43 4d 50 79 6d 6f  6f 3a 42 45 51 6d 63 69  |s:CMPymoo:BEQmci|
00000170  69 3a 2e 6d 63 69 20 4c  44 41 63 6c 65 61 72 75  |i:.mci LDAclearu|
00000180  70 3a 42 45 51 6e 6f 63  6c 65 61 72 6d 3a 2e 6d  |p:BEQnoclearm:.m|
00000190  63 69 69 20 4c 44 41 23  31 3a 53 54 41 63 68 61  |cii LDA#1:STAcha|
000001a0  6e 67 65 64 3a 4a 53 52  64 65 6c 79 6f 75 0d 00  |nged:JSRdelyou..|
000001b0  32 5a 4c 44 58 78 70 6f  73 3a 4c 44 59 79 70 6f  |2ZLDXxpos:LDYypo|
000001c0  73 3a 4a 53 52 6d 63 64  3a 4c 44 41 23 30 3a 53  |s:JSRmcd:LDA#0:S|
000001d0  54 41 77 69 70 65 72 3a  53 54 41 77 69 70 65 72  |TAwiper:STAwiper|
000001e0  6d 3a 4c 44 58 78 6d 6f  6e 74 3a 4c 44 59 79 6d  |m:LDXxmont:LDYym|
000001f0  6f 6e 74 3a 4a 4d 50 6d  63 64 3a 2e 6e 6f 63 6c  |ont:JMPmcd:.nocl|
00000200  65 61 72 6d 20 52 54 53  0d 00 3c c9 2e 64 69 73  |earm RTS..<..dis|
00000210  70 6d 6f 6e 20 4c 44 41  6d 74 79 70 65 3a 42 45  |pmon LDAmtype:BE|
00000220  51 6e 6f 6d 6f 6e 73 72  3a 4c 44 41 26 37 38 3a  |Qnomonsr:LDA&78:|
00000230  50 48 41 3a 4c 44 41 26  37 39 3a 50 48 41 3a 4c  |PHA:LDA&79:PHA:L|
00000240  44 41 66 69 6e 65 3a 50  48 41 3a 4c 44 41 78 70  |DAfine:PHA:LDAxp|
00000250  6f 73 3a 50 48 41 3a 4c  44 41 79 70 6f 73 3a 50  |os:PHA:LDAypos:P|
00000260  48 41 3a 4c 44 41 77 69  70 65 72 3a 50 48 41 3a  |HA:LDAwiper:PHA:|
00000270  4c 44 41 77 69 70 65 72  6d 3a 53 54 41 77 69 70  |LDAwiperm:STAwip|
00000280  65 72 3a 4c 44 41 78 6d  6f 6e 74 3a 53 54 41 78  |er:LDAxmont:STAx|
00000290  70 6f 73 3a 4c 44 41 79  6d 6f 6e 74 3a 53 54 41  |pos:LDAymont:STA|
000002a0  79 70 6f 73 3a 4c 44 41  6d 66 69 6e 65 3a 53 54  |ypos:LDAmfine:ST|
000002b0  41 66 69 6e 65 3a 4c 44  41 26 37 41 3a 53 54 41  |Afine:LDA&7A:STA|
000002c0  26 37 38 3a 4c 44 41 26  37 42 3a 53 54 41 26 37  |&78:LDA&7B:STA&7|
000002d0  39 0d 00 46 de 4c 44 41  23 26 32 46 3a 53 54 41  |9..F.LDA#&2F:STA|
000002e0  77 69 72 65 70 2b 31 3a  53 54 41 77 69 72 65 70  |wirep+1:STAwirep|
000002f0  62 2b 31 3a 4c 44 41 23  26 43 30 3a 53 54 41 77  |b+1:LDA#&C0:STAw|
00000300  69 72 65 70 3a 4c 44 41  23 26 45 30 3a 53 54 41  |irep:LDA#&E0:STA|
00000310  77 69 72 65 70 62 3a 4c  44 41 23 31 3a 53 54 41  |wirepb:LDA#1:STA|
00000320  6d 66 6c 61 67 3a 4a 53  52 64 69 73 70 73 68 72  |mflag:JSRdispshr|
00000330  3a 4c 44 41 26 37 38 3a  53 54 41 26 37 41 3a 4c  |:LDA&78:STA&7A:L|
00000340  44 41 26 37 39 3a 53 54  41 26 37 42 3a 50 4c 41  |DA&79:STA&7B:PLA|
00000350  3a 53 54 41 77 69 70 65  72 3a 50 4c 41 3a 53 54  |:STAwiper:PLA:ST|
00000360  41 79 70 6f 73 3a 50 4c  41 3a 53 54 41 78 70 6f  |Aypos:PLA:STAxpo|
00000370  73 3a 50 4c 41 3a 53 54  41 66 69 6e 65 3a 50 4c  |s:PLA:STAfine:PL|
00000380  41 3a 53 54 41 26 37 39  3a 50 4c 41 3a 53 54 41  |A:STA&79:PLA:STA|
00000390  26 37 38 3a 4c 44 41 23  30 3a 53 54 41 6d 66 6c  |&78:LDA#0:STAmfl|
000003a0  61 67 3a 2e 6e 6f 6d 6f  6e 73 72 20 52 54 53 0d  |ag:.nomonsr RTS.|
000003b0  00 50 a1 2e 6d 6f 6e 73  65 74 20 4c 44 41 79 73  |.P..monset LDAys|
000003c0  63 72 3a 41 53 4c 20 41  3a 41 53 4c 20 41 3a 41  |cr:ASL A:ASL A:A|
000003d0  53 4c 20 41 3a 41 53 4c  20 41 3a 43 4c 43 3a 41  |SL A:ASL A:CLC:A|
000003e0  44 43 78 73 63 72 3a 41  44 43 23 26 32 30 3a 53  |DCxscr:ADC#&20:S|
000003f0  54 41 26 37 31 3a 4c 44  59 23 30 3a 53 54 59 26  |TA&71:LDY#0:STY&|
00000400  37 30 3a 49 4e 59 3a 53  54 59 6d 66 69 6e 65 3a  |70:INY:STYmfine:|
00000410  4c 44 59 23 26 46 42 3a  4c 44 41 28 26 37 30 29  |LDY#&FB:LDA(&70)|
00000420  2c 59 3a 41 53 4c 20 41  3a 52 4f 4c 20 41 3a 52  |,Y:ASL A:ROL A:R|
00000430  4f 4c 20 41 3a 80 23 33  3a 54 41 58 3a 4c 44 41  |OL A:.#3:TAX:LDA|
00000440  6d 6f 6e 70 64 2c 58 3a  53 54 41 78 6d 6f 6e 74  |monpd,X:STAxmont|
00000450  0d 00 5a 8b 49 4e 59 3a  4c 44 41 28 26 37 30 29  |..Z.INY:LDA(&70)|
00000460  2c 59 3a 41 53 4c 20 41  3a 52 4f 4c 20 41 3a 52  |,Y:ASL A:ROL A:R|
00000470  4f 4c 20 41 3a 80 23 33  3a 54 41 58 3a 4c 44 41  |OL A:.#3:TAX:LDA|
00000480  6d 6f 6e 70 64 2c 58 3a  53 54 41 79 6d 6f 6e 74  |monpd,X:STAymont|
00000490  3a 49 4e 59 3a 4c 44 41  28 26 37 30 29 2c 59 3a  |:INY:LDA(&70),Y:|
000004a0  41 53 4c 20 41 3a 52 4f  4c 20 41 3a 52 4f 4c 20  |ASL A:ROL A:ROL |
000004b0  41 3a 80 23 33 3a 53 54  41 6d 74 79 70 65 3a 4c  |A:.#3:STAmtype:L|
000004c0  44 41 23 26 46 46 3a 53  54 41 6d 64 69 72 3a 2e  |DA#&FF:STAmdir:.|
000004d0  6c 61 73 65 78 69 74 20  52 54 53 0d 00 64 ee 2e  |lasexit RTS..d..|
000004e0  6d 6f 6e 70 72 6f 20 4c  44 41 78 6d 6f 6e 74 3a  |monpro LDAxmont:|
000004f0  53 54 41 78 6d 6f 6f 3a  4c 44 41 79 6d 6f 6e 74  |STAxmoo:LDAymont|
00000500  3a 53 54 41 79 6d 6f 6f  3a 4c 44 41 23 30 3a 53  |:STAymoo:LDA#0:S|
00000510  54 41 63 6c 65 61 72 75  70 3a 4c 44 41 6d 74 79  |TAclearup:LDAmty|
00000520  70 65 3a 42 45 51 6c 61  73 65 78 69 74 3a 43 4d  |pe:BEQlasexit:CM|
00000530  50 23 33 3a 42 4e 45 6e  6f 6d 6f 6e 73 74 6c 3a  |P#3:BNEnomonstl:|
00000540  4c 44 41 23 30 3a 53 54  41 6d 66 69 6e 65 3a 53  |LDA#0:STAmfine:S|
00000550  54 41 6d 6f 6e 73 74 61  74 3a 2e 6e 6f 6d 6f 6e  |TAmonstat:.nomon|
00000560  73 74 6c 20 4c 44 41 78  70 6f 73 3a 43 4d 50 78  |stl LDAxpos:CMPx|
00000570  6d 6f 6e 74 3a 42 4e 45  6d 6f 6e 74 63 68 3a 4c  |mont:BNEmontch:L|
00000580  44 41 79 70 6f 73 3a 43  4d 50 79 6d 6f 6e 74 3a  |DAypos:CMPymont:|
00000590  42 4e 45 6d 6f 6e 74 63  68 3a 4c 44 41 23 31 3a  |BNEmontch:LDA#1:|
000005a0  53 54 41 63 6c 65 61 72  75 70 3a 53 54 41 70 6f  |STAclearup:STApo|
000005b0  77 63 68 61 6e 67 65 3a  4c 44 41 66 6e 73 74 3a  |wchange:LDAfnst:|
000005c0  42 45 51 6d 6f 6e 74 63  68 0d 00 6e 3b 4c 44 41  |BEQmontch..n;LDA|
000005d0  70 6f 77 65 72 3a 53 45  43 3a 53 42 43 23 38 3a  |power:SEC:SBC#8:|
000005e0  53 54 41 70 6f 77 65 72  3a 42 43 53 6d 6f 6e 74  |STApower:BCSmont|
000005f0  63 68 65 3a 50 4c 41 3a  50 4c 41 3a 4a 4d 50 6b  |che:PLA:PLA:JMPk|
00000600  69 6c 6c 75 0d 00 78 d5  2e 6d 6f 6e 74 63 68 65  |illu..x..montche|
00000610  20 4c 44 41 6d 74 79 70  65 3a 43 4d 50 23 33 3a  | LDAmtype:CMP#3:|
00000620  42 4e 45 6d 6f 6e 74 63  68 3a 50 4c 41 3a 50 4c  |BNEmontch:PLA:PL|
00000630  41 3a 4a 4d 50 7a 61 70  3a 2e 6d 6f 6e 74 63 68  |A:JMPzap:.montch|
00000640  20 4a 53 52 6d 6f 76 65  6d 73 74 3a 4c 44 41 78  | JSRmovemst:LDAx|
00000650  70 6f 73 3a 43 4d 50 78  6d 6f 6e 74 3a 42 4e 45  |pos:CMPxmont:BNE|
00000660  6c 61 73 65 78 69 74 3a  4c 44 41 79 70 6f 73 3a  |lasexit:LDAypos:|
00000670  43 4d 50 79 6d 6f 6e 74  3a 42 4e 45 6c 61 73 65  |CMPymont:BNElase|
00000680  78 69 74 3a 4c 44 41 23  31 3a 53 54 41 63 6c 65  |xit:LDA#1:STAcle|
00000690  61 72 75 70 3a 53 54 41  70 6f 77 63 68 61 6e 67  |arup:STApowchang|
000006a0  65 3a 4c 44 41 70 6f 77  65 72 3a 53 45 43 3a 53  |e:LDApower:SEC:S|
000006b0  42 43 23 38 3a 53 54 41  70 6f 77 65 72 3a 42 43  |BC#8:STApower:BC|
000006c0  53 6c 61 73 65 78 69 74  3a 50 4c 41 3a 50 4c 41  |Slasexit:PLA:PLA|
000006d0  3a 4a 4d 50 6b 69 6c 6c  75 0d 00 82 c4 2e 6c 61  |:JMPkillu.....la|
000006e0  73 65 72 20 4c 44 41 23  26 38 31 3a 4c 44 58 23  |ser LDA#&81:LDX#|
000006f0  26 41 36 3a 4c 44 59 23  26 46 46 3a 4a 53 52 6f  |&A6:LDY#&FF:JSRo|
00000700  73 62 79 74 65 3a 42 43  43 6c 61 73 65 78 69 74  |sbyte:BCClasexit|
00000710  3a 4c 44 41 6c 61 73 74  61 74 3a 42 4e 45 6c 61  |:LDAlastat:BNEla|
00000720  73 65 78 69 74 3a 4c 44  41 73 6f 75 6e 64 3a 42  |sexit:LDAsound:B|
00000730  45 51 6e 6f 6c 61 73 73  64 3a 4c 44 41 23 37 3a  |EQnolassd:LDA#7:|
00000740  4c 44 58 23 28 73 77 69  74 6e 20 83 32 35 36 29  |LDX#(switn .256)|
00000750  3a 4c 44 59 23 28 73 77  69 74 6e 20 81 32 35 36  |:LDY#(switn .256|
00000760  29 3a 4a 53 52 6f 73 77  6f 72 64 3a 2e 6e 6f 6c  |):JSRosword:.nol|
00000770  61 73 73 64 20 4c 44 41  70 6f 77 65 72 3a 53 54  |assd LDApower:ST|
00000780  41 70 6f 77 63 68 61 6e  67 65 3a 53 45 43 3a 53  |Apowchange:SEC:S|
00000790  42 43 23 34 3a 53 54 41  70 6f 77 65 72 0d 00 8c  |BC#4:STApower...|
000007a0  1e 42 43 53 6c 61 73 6f  6b 61 79 3a 2e 6c 61 73  |.BCSlasokay:.las|
000007b0  64 69 65 20 50 4c 41 3a  50 4c 41 0d 00 96 d2 2e  |die PLA:PLA.....|
000007c0  6b 69 6c 6c 75 20 4a 53  52 67 61 6d 65 6f 76 65  |killu JSRgameove|
000007d0  72 3a 4a 4d 50 70 72 6f  67 3a 2e 6c 61 73 6f 6b  |r:JMPprog:.lasok|
000007e0  61 79 20 4c 44 41 78 6d  6f 6e 74 3a 43 4d 50 78  |ay LDAxmont:CMPx|
000007f0  70 6f 73 3a 42 4e 45 6e  6f 74 6f 6e 74 3a 4c 44  |pos:BNEnotont:LD|
00000800  41 79 6d 6f 6e 74 3a 43  4d 50 79 70 6f 73 3a 42  |Aymont:CMPypos:B|
00000810  4e 45 6e 6f 74 6f 6e 74  3a 4c 44 41 23 30 3a 53  |NEnotont:LDA#0:S|
00000820  54 41 6d 74 79 70 65 3a  52 54 53 3a 2e 6e 6f 74  |TAmtype:RTS:.not|
00000830  6f 6e 74 20 53 45 49 3a  4c 44 41 78 70 6f 73 3a  |ont SEI:LDAxpos:|
00000840  41 53 4c 20 41 3a 41 53  4c 20 41 3a 41 53 4c 20  |ASL A:ASL A:ASL |
00000850  41 3a 41 53 4c 20 41 3a  41 53 4c 20 41 3a 41 53  |A:ASL A:ASL A:AS|
00000860  4c 20 41 3a 43 4c 43 3a  41 44 43 23 26 38 30 3a  |L A:CLC:ADC#&80:|
00000870  53 54 41 6c 61 73 61 64  3a 4c 44 41 23 30 3a 41  |STAlasad:LDA#0:A|
00000880  44 43 23 26 33 37 3a 53  54 41 26 37 31 0d 00 a0  |DC#&37:STA&71...|
00000890  5b 4c 44 41 78 70 6f 73  3a 4c 53 52 20 41 3a 4c  |[LDAxpos:LSR A:L|
000008a0  53 52 20 41 3a 43 4c 43  3a 41 44 43 26 37 31 3a  |SR A:CLC:ADC&71:|
000008b0  41 44 43 79 70 6f 73 3a  53 54 41 26 37 31 3a 4c  |ADCypos:STA&71:L|
000008c0  44 41 79 70 6f 73 3a 41  53 4c 20 41 3a 41 53 4c  |DAypos:ASL A:ASL|
000008d0  20 41 3a 43 4c 43 3a 41  44 43 26 37 31 3a 53 54  | A:CLC:ADC&71:ST|
000008e0  41 6c 61 73 61 64 2b 31  0d 00 aa a3 4c 44 41 66  |Alasad+1....LDAf|
000008f0  61 63 65 3a 53 54 41 6c  61 73 64 69 72 3a 42 45  |ace:STAlasdir:BE|
00000900  51 6c 65 66 69 72 65 3a  4c 44 41 6c 61 73 61 64  |Qlefire:LDAlasad|
00000910  3a 43 4c 43 3a 41 44 43  23 26 34 30 3a 53 54 41  |:CLC:ADC#&40:STA|
00000920  6c 61 73 61 64 3a 4c 44  41 23 39 3a 53 45 43 3a  |lasad:LDA#9:SEC:|
00000930  53 42 43 78 70 6f 73 3a  4c 44 58 78 70 6f 73 3a  |SBCxpos:LDXxpos:|
00000940  43 50 58 23 31 3a 42 45  51 63 6f 72 72 69 67 66  |CPX#1:BEQcorrigf|
00000950  3a 43 50 58 23 35 3a 42  45 51 63 6f 72 72 69 67  |:CPX#5:BEQcorrig|
00000960  66 3a 42 4e 45 66 69 6e  66 69 72 65 3a 2e 63 6f  |f:BNEfinfire:.co|
00000970  72 72 69 67 66 20 49 4e  43 6c 61 73 61 64 2b 31  |rrigf INClasad+1|
00000980  3a 4a 4d 50 66 69 6e 66  69 72 65 0d 00 b4 77 2e  |:JMPfinfire...w.|
00000990  6c 65 66 69 72 65 20 44  45 43 6c 61 73 61 64 2b  |lefire DEClasad+|
000009a0  31 3a 4c 44 41 78 70 6f  73 3a 2e 66 69 6e 66 69  |1:LDAxpos:.finfi|
000009b0  72 65 20 41 53 4c 20 41  3a 41 53 4c 20 41 3a 41  |re ASL A:ASL A:A|
000009c0  53 4c 20 41 3a 43 4d 50  23 26 32 30 3a 42 43 43  |SL A:CMP#&20:BCC|
000009d0  73 68 72 61 6e 67 65 3a  4c 44 41 23 26 31 46 3a  |shrange:LDA#&1F:|
000009e0  2e 73 68 72 61 6e 67 65  20 53 54 41 6c 61 73 74  |.shrange STAlast|
000009f0  61 74 3a 4c 44 41 23 30  3a 53 54 41 6c 61 73 74  |at:LDA#0:STAlast|
00000a00  65 70 0d 00 be 9d 4c 44  41 23 31 3a 4c 44 58 66  |ep....LDA#1:LDXf|
00000a10  61 63 65 3a 42 4e 45 6c  65 61 6c 74 3a 4c 44 41  |ace:BNElealt:LDA|
00000a20  23 26 46 46 3a 2e 6c 65  61 6c 74 20 43 4c 43 3a  |#&FF:.lealt CLC:|
00000a30  41 44 43 78 70 6f 73 3a  53 54 41 78 66 3a 53 54  |ADCxpos:STAxf:ST|
00000a40  41 78 73 65 74 3a 4c 44  41 79 70 6f 73 3a 53 54  |Axset:LDAypos:ST|
00000a50  41 79 73 65 74 3a 53 54  41 79 66 3a 4a 53 52 67  |Ayset:STAyf:JSRg|
00000a60  65 74 62 6c 6f 63 6b 3a  43 4d 50 23 26 31 30 3a  |etblock:CMP#&10:|
00000a70  42 43 43 6e 6f 6f 62 73  74 72 3a 4c 44 41 23 30  |BCCnoobstr:LDA#0|
00000a80  3a 53 54 41 6c 61 73 74  61 74 3a 2e 6e 6f 6f 62  |:STAlastat:.noob|
00000a90  73 74 72 20 43 4c 49 3a  4a 4d 50 77 61 69 74 0d  |str CLI:JMPwait.|
00000aa0  00 c8 59 2e 64 69 73 70  79 6f 75 20 4c 44 41 23  |..Y.dispyou LDA#|
00000ab0  26 32 46 3a 53 54 41 77  69 72 65 70 2b 31 3a 53  |&2F:STAwirep+1:S|
00000ac0  54 41 77 69 72 65 70 62  2b 31 3a 4c 44 41 23 26  |TAwirepb+1:LDA#&|
00000ad0  38 30 3a 53 54 41 77 69  72 65 70 3a 4c 44 41 23  |80:STAwirep:LDA#|
00000ae0  26 41 30 3a 53 54 41 77  69 72 65 70 62 3a 4a 4d  |&A0:STAwirepb:JM|
00000af0  50 64 69 73 70 73 68 72  0d 00 d2 c8 2e 64 65 61  |Pdispshr.....dea|
00000b00  64 65 64 63 68 20 4c 44  41 64 65 61 64 65 64 3a  |dedch LDAdeaded:|
00000b10  42 45 51 6e 6f 74 64 65  61 64 64 3a 4c 44 41 6d  |BEQnotdeadd:LDAm|
00000b20  74 79 70 65 3a 43 4d 50  23 33 3a 42 45 51 6e 6f  |type:CMP#3:BEQno|
00000b30  64 69 73 70 3a 4c 44 41  23 30 3a 53 54 41 6d 74  |disp:LDA#0:STAmt|
00000b40  79 70 65 3a 2e 6e 6f 64  69 73 70 20 4c 44 41 26  |ype:.nodisp LDA&|
00000b50  37 41 3a 43 4c 43 3a 41  44 43 23 26 38 30 3a 53  |7A:CLC:ADC#&80:S|
00000b60  54 41 26 37 30 3a 4c 44  41 26 37 42 3a 41 44 43  |TA&70:LDA&7B:ADC|
00000b70  23 32 3a 53 54 41 26 37  31 3a 4c 44 59 23 33 31  |#2:STA&71:LDY#31|
00000b80  3a 2e 64 65 61 64 61 20  4c 44 41 26 32 46 43 30  |:.deada LDA&2FC0|
00000b90  2c 59 3a 53 54 41 28 26  37 41 29 2c 59 3a 4c 44  |,Y:STA(&7A),Y:LD|
00000ba0  41 26 32 46 45 30 2c 59  3a 53 54 41 28 26 37 30  |A&2FE0,Y:STA(&70|
00000bb0  29 2c 59 3a 44 45 59 3a  42 4e 45 64 65 61 64 61  |),Y:DEY:BNEdeada|
00000bc0  0d 00 dc 68 4c 44 41 70  6f 77 65 72 3a 53 54 41  |...hLDApower:STA|
00000bd0  70 6f 77 63 68 61 6e 67  65 3a 43 4c 43 3a 41 44  |powchange:CLC:AD|
00000be0  43 23 34 3a 42 43 43 6f  76 65 72 70 6f 77 6d 3a  |C#4:BCCoverpowm:|
00000bf0  4c 44 41 23 32 35 34 3a  2e 6f 76 65 72 70 6f 77  |LDA#254:.overpow|
00000c00  6d 20 53 54 41 70 6f 77  65 72 3a 4c 44 41 23 30  |m STApower:LDA#0|
00000c10  3a 53 54 41 64 65 61 64  65 64 3a 2e 6e 6f 74 64  |:STAdeaded:.notd|
00000c20  65 61 64 64 20 52 54 53  0d 00 e6 b8 2e 69 72 71  |eadd RTS.....irq|
00000c30  20 49 4e 43 63 6c 6f 63  6b 3a 4c 44 41 26 38 30  | INCclock:LDA&80|
00000c40  3a 43 4c 43 3a 41 44 43  23 31 3a 43 4d 50 63 6c  |:CLC:ADC#1:CMPcl|
00000c50  6f 63 6b 3a 42 4e 45 6e  6f 68 65 6c 70 63 3a 49  |ock:BNEnohelpc:I|
00000c60  4e 43 26 38 30 3a 2e 6e  6f 68 65 6c 70 63 20 4c  |NC&80:.nohelpc L|
00000c70  44 41 6c 61 73 74 61 74  3a 42 45 51 6e 6f 6c 61  |DAlastat:BEQnola|
00000c80  73 3a 4c 44 41 6d 74 79  70 65 3a 42 45 51 6e 6f  |s:LDAmtype:BEQno|
00000c90  68 69 74 6d 3a 4c 44 41  78 6d 6f 6e 74 3a 43 4d  |hitm:LDAxmont:CM|
00000ca0  50 78 66 3a 42 4e 45 6e  6f 68 69 74 6d 3a 4c 44  |Pxf:BNEnohitm:LD|
00000cb0  41 79 6d 6f 6e 74 3a 43  4d 50 79 66 3a 42 4e 45  |Aymont:CMPyf:BNE|
00000cc0  6e 6f 68 69 74 6d 3a 4c  44 41 23 31 3a 53 54 41  |nohitm:LDA#1:STA|
00000cd0  6c 61 73 74 61 74 3a 53  54 41 64 65 61 64 65 64  |lastat:STAdeaded|
00000ce0  0d 00 f0 48 2e 6e 6f 68  69 74 6d 20 4a 53 52 73  |...H.nohitm JSRs|
00000cf0  61 76 65 76 61 72 3a 44  45 43 6c 61 73 74 61 74  |avevar:DEClastat|
00000d00  3a 4c 44 41 6c 61 73 74  65 70 3a 43 4c 43 3a 41  |:LDAlastep:CLC:A|
00000d10  44 43 23 38 3a 53 54 41  6c 61 73 74 65 70 3a 4c  |DC#8:STAlastep:L|
00000d20  44 41 6c 61 73 64 69 72  0d 00 fa 2d 42 45 51 6c  |DAlasdir...-BEQl|
00000d30  61 73 6c 65 66 74 3a 42  4e 45 6c 61 73 72 69 67  |asleft:BNElasrig|
00000d40  68 74 3a 2e 6e 6f 6c 61  73 20 4a 4d 50 28 76 65  |ht:.nolas JMP(ve|
00000d50  63 74 6f 72 29 0d 01 04  99 2e 6c 61 73 72 69 67  |ctor).....lasrig|
00000d60  68 74 20 4c 44 59 6c 61  73 74 65 70 3a 4a 53 52  |ht LDYlastep:JSR|
00000d70  6c 61 73 65 6f 72 70 3a  43 50 59 23 26 32 38 3a  |laseorp:CPY#&28:|
00000d80  42 43 43 72 69 64 65 6c  3a 54 59 41 3a 53 45 43  |BCCridel:TYA:SEC|
00000d90  3a 53 42 43 23 26 32 30  3a 4a 53 52 6c 61 73 65  |:SBC#&20:JSRlase|
00000da0  6f 72 79 3a 2e 72 69 64  65 6c 20 4c 44 41 6c 61  |ory:.ridel LDAla|
00000db0  73 74 61 74 3a 42 4e 45  72 69 63 6f 6e 74 3a 4c  |stat:BNEricont:L|
00000dc0  44 41 6c 61 73 74 65 70  3a 53 45 43 3a 53 42 43  |DAlastep:SEC:SBC|
00000dd0  23 26 31 38 3a 42 43 53  6e 6f 72 6d 6e 3a 4c 44  |#&18:BCSnormn:LD|
00000de0  41 23 30 3a 2e 6e 6f 72  6d 6e 20 54 41 59 0d 01  |A#0:.normn TAY..|
00000df0  0e 16 2e 72 69 73 74 6f  70 20 4a 53 52 6c 61 73  |...ristop JSRlas|
00000e00  65 6f 72 70 0d 01 18 c9  43 50 59 6c 61 73 74 65  |eorp....CPYlaste|
00000e10  70 3a 42 45 51 72 69 63  6f 6e 74 62 3a 54 59 41  |p:BEQricontb:TYA|
00000e20  3a 43 4c 43 3a 41 44 43  23 38 3a 54 41 59 3a 4a  |:CLC:ADC#8:TAY:J|
00000e30  4d 50 72 69 73 74 6f 70  3a 2e 72 69 63 6f 6e 74  |MPristop:.ricont|
00000e40  62 20 4a 53 52 64 65 6c  79 6f 75 3a 2e 72 69 63  |b JSRdelyou:.ric|
00000e50  6f 6e 74 20 4c 44 41 6c  61 73 74 65 70 3a 80 23  |ont LDAlastep:.#|
00000e60  26 33 46 3a 42 4e 45 72  77 61 6c 6c 3a 49 4e 43  |&3F:BNErwall:INC|
00000e70  78 66 3a 4c 44 41 78 66  3a 53 54 41 78 73 65 74  |xf:LDAxf:STAxset|
00000e80  3a 4c 44 41 79 66 3a 53  54 41 79 73 65 74 3a 4a  |:LDAyf:STAyset:J|
00000e90  53 52 67 65 74 62 6c 6f  63 6b 3a 43 4d 50 23 26  |SRgetblock:CMP#&|
00000ea0  31 30 3a 42 43 43 72 77  61 6c 6c 3a 4c 44 41 23  |10:BCCrwall:LDA#|
00000eb0  31 3a 53 54 41 6c 61 73  74 61 74 3a 2e 72 77 61  |1:STAlastat:.rwa|
00000ec0  6c 6c 20 4a 4d 50 6c 6f  61 64 76 61 72 0d 01 22  |ll JMPloadvar.."|
00000ed0  ad 2e 6c 61 73 6c 65 66  74 20 4c 44 41 23 30 3a  |..lasleft LDA#0:|
00000ee0  53 45 43 3a 53 42 43 6c  61 73 74 65 70 3a 4a 53  |SEC:SBClastep:JS|
00000ef0  52 6c 61 73 65 6f 72 79  3a 43 50 59 23 26 45 30  |Rlaseory:CPY#&E0|
00000f00  3a 42 43 53 6c 65 64 65  6c 3a 54 59 41 3a 43 4c  |:BCSledel:TYA:CL|
00000f10  43 3a 41 44 43 23 26 32  30 3a 4a 53 52 6c 61 73  |C:ADC#&20:JSRlas|
00000f20  65 6f 72 79 3a 2e 6c 65  64 65 6c 20 4c 44 41 6c  |eory:.ledel LDAl|
00000f30  61 73 74 61 74 3a 42 4e  45 6c 65 63 6f 6e 74 3a  |astat:BNElecont:|
00000f40  4c 44 41 23 30 3a 53 45  43 3a 53 42 43 6c 61 73  |LDA#0:SEC:SBClas|
00000f50  74 65 70 3a 53 54 41 6c  61 73 74 65 70 3a 43 4c  |tep:STAlastep:CL|
00000f60  43 3a 41 44 43 23 26 31  38 3a 42 43 43 6e 6f 72  |C:ADC#&18:BCCnor|
00000f70  6c 6e 3a 4c 44 41 23 26  46 38 0d 01 2c 0e 2e 6e  |ln:LDA#&F8..,..n|
00000f80  6f 72 6c 6e 20 54 41 59  0d 01 36 9d 2e 6c 65 73  |orln TAY..6..les|
00000f90  74 6f 70 20 4a 53 52 6c  61 73 65 6f 72 70 3a 43  |top JSRlaseorp:C|
00000fa0  50 59 6c 61 73 74 65 70  3a 42 45 51 6c 65 63 6f  |PYlastep:BEQleco|
00000fb0  6e 74 62 3a 54 59 41 3a  53 45 43 3a 53 42 43 23  |ntb:TYA:SEC:SBC#|
00000fc0  38 3a 54 41 59 3a 4a 4d  50 6c 65 73 74 6f 70 3a  |8:TAY:JMPlestop:|
00000fd0  2e 6c 65 63 6f 6e 74 62  20 4a 53 52 64 65 6c 79  |.lecontb JSRdely|
00000fe0  6f 75 3a 2e 6c 65 63 6f  6e 74 20 4c 44 41 6c 61  |ou:.lecont LDAla|
00000ff0  73 74 65 70 3a 80 23 26  33 46 3a 42 4e 45 6c 77  |step:.#&3F:BNElw|
00001000  61 6c 6c 3a 44 45 43 78  66 3a 4c 44 41 78 66 3a  |all:DECxf:LDAxf:|
00001010  53 54 41 78 73 65 74 3a  4c 44 41 79 66 3a 53 54  |STAxset:LDAyf:ST|
00001020  41 79 73 65 74 0d 01 40  42 4a 53 52 67 65 74 62  |Ayset..@BJSRgetb|
00001030  6c 6f 63 6b 3a 43 4d 50  23 26 31 30 3a 42 43 43  |lock:CMP#&10:BCC|
00001040  6c 77 61 6c 6c 3a 4c 44  41 23 31 3a 53 54 41 6c  |lwall:LDA#1:STAl|
00001050  61 73 74 61 74 3a 2e 6c  77 61 6c 6c 20 4a 4d 50  |astat:.lwall JMP|
00001060  6c 6f 61 64 76 61 72 0d  01 4a 3d 2e 6c 61 73 65  |loadvar..J=.lase|
00001070  6f 72 79 20 54 41 59 3a  2e 6c 61 73 65 6f 72 70  |ory TAY:.laseorp|
00001080  20 4c 44 41 28 6c 61 73  61 64 29 2c 59 3a 82 23  | LDA(lasad),Y:.#|
00001090  26 33 46 3a 53 54 41 28  6c 61 73 61 64 29 2c 59  |&3F:STA(lasad),Y|
000010a0  3a 52 54 53 0d 01 54 91  2e 73 63 72 6f 66 66 20  |:RTS..T..scroff |
000010b0  4c 44 41 23 30 3a 53 54  41 6c 61 73 74 61 74 3a  |LDA#0:STAlastat:|
000010c0  4c 44 41 23 31 36 3a 53  54 41 73 63 72 6f 66 64  |LDA#16:STAscrofd|
000010d0  3a 2e 73 63 72 6f 66 66  6c 6f 70 20 4c 44 41 23  |:.scrofflop LDA#|
000010e0  26 43 3a 4c 44 58 23 28  73 63 72 6f 66 64 20 83  |&C:LDX#(scrofd .|
000010f0  32 35 36 29 3a 4c 44 59  23 28 73 63 72 6f 66 64  |256):LDY#(scrofd|
00001100  20 81 32 35 36 29 3a 4a  53 52 6f 73 77 6f 72 64  | .256):JSRosword|
00001110  3a 44 45 43 73 63 72 6f  66 64 3a 4c 44 41 73 63  |:DECscrofd:LDAsc|
00001120  72 6f 66 64 3a 42 4e 45  73 63 72 6f 66 66 6c 6f  |rofd:BNEscrofflo|
00001130  70 3a 52 54 53 0d 01 5e  39 5d 3a f1 8a 30 2c 36  |p:RTS..^9]:..0,6|
00001140  29 7e 50 25 3a e7 20 50  25 3e 26 32 30 30 30 20  |)~P%:. P%>&2000 |
00001150  8c 20 f1 27 27 22 43 6f  64 65 20 4f 76 65 72 66  |. .''"Code Overf|
00001160  6c 6f 77 20 74 6f 3a 22  3b 7e 50 25 3a e0 0d 01  |low to:";~P%:...|
00001170  68 05 e1 0d ff                                    |h....|
00001175