Home » Personal collection » Acorn ADFS disks » Archimedes » Unlabelled_disk_3.ADF » com/Result
com/Result
This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.
Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.
| Tape/disk: | Home » Personal collection » Acorn ADFS disks » Archimedes » Unlabelled_disk_3.ADF |
| Filename: | com/Result |
| Read OK: | ✔ |
| File size: | 7CE4 bytes |
| Load address: | 110CC |
| Exec address: | 110CC |
Duplicates
There is 1 duplicate copy of this file in the archive:
- Personal collection » Acorn ADFS disks » Archimedes » Unlabelled_disk_3.ADF » com/Result
- Personal collection » Acorn hard disk » misc » misc2 » shipw4/com/Result
File contents
\ ShipWrecked
\ Dominic Ford
\ C^$ Version
P%=2
O%=&5302
.xch EQUB0
.ych EQUB0
.col EQUB0
.score EQUW0
.scrch EQUB0
.titstat EQUB0
.mdir EQUB0
.xset EQUB0
.yset EQUB0
.xscr EQUB0
.yscr EQUB0
.xpos EQUB0
.ypos EQUB0
.mfine EQUB0
.mtype EQUB0
.scrno EQUB0
.upvelo EQUB0
.xold EQUB0
.yold EQUB0
.fine EQUB0
.sound EQUB1
.clock EQUB0
.titcyc EQUB0
.invflag EQUB0
.face EQUB1
.phase EQUB0
.rghts EQUB0
.wiper EQUB0
.movstag EQUB0
.changed EQUB0
.power EQUB0
.powchange EQUB0
.objects EQUW0
.obch EQUB0
.getstat EQUB0
.lastat EQUB0
.lasad EQUW0
.lasdir EQUB0
.lastep EQUB0
.xf EQUB0
.yf EQUB0
.wirep EQUW0
.wirepb EQUW0
.xmont EQUB0
.ymont EQUB0
.mflag EQUB0
.monstat EQUB0
.wiperm EQUB0
.deaded EQUB0
.clearup EQUB0
.xmoo EQUB0
.ymoo EQUB0
.fnst EQUB0
.scrtxt EQUD0
.shoot EQUB0
.delyou LDXxmoo
LDYymoo
.mcd STXxset
STYyset
.dark LDY#5
CPYxscr
BNEreald
DEY
CPYyscr
BNEreald
LDA#&1A
CMPobjects
BEQreald
CMPobjects+1
BEQreald
LDA#0
STA&72
JMPblockon+6
.reald JMPblockon
]
IFP%>&70THENPRINT"Code Overflow to
";P%
END
P%=&1000
O%=&5800
[OPT pass
LDA#&FF
STAscrtxt+3
SEI
LDA#(irq MOD 256)
STA&314
LDA#(irq DIV 256)
STA&315
CLI
.prog JSRtitle
JSRblascr
JSRscroff
LDY#0
LDA#3
STA&70
LDA#&30
STA&71
.lines LDA(&70),Y
ORA#12
STA(&70),Y
LDA&70
CLC
ADC#8
STA&70
LDA&71
ADC#0
STA&71
CMP#&6C
BNElines
STApowchange
STAobch
STAscrch
LDY#255
STYpower
STYobjects
STYobjects+1
INY
STYscore
STYscore+1
.scobarlop LDAsbar,Y
CMP#&FF
BEQstext
JSRoswrch
INY
JMPscobarlop
.stext LDA#1
STAcol
LDA#2
STAxch
LDA#24
STAych
LDA#(scort MOD 256)
STA&72
LDA#(scort DIV 256)
STA&73
JSRstring
LDA#13
STAxch
INC&72
JSRstring
LDA#8
STAxch
LDA#28
STAych
INC&72
JSRstring
.game LDA#0
STAxscr
STAyscr
LDA#2
STAxpos
STAypos
LDX#&30
.clrpot STXclrpnt+2
STXclrplp+2
.clrplp LDA&30FE
AND#&7F
.clrpnt STA&30FE
INX
CPX#&80
BNEclrpot
.newscr JSRscreen
.oldscr JSRquitch
JSRsboard
LDA#0
STAmovstag
LDAfine
BEQmoveslop
STAchanged
LDAwiper
PHA
JSRmainclear
PLA
STAwiper
.moveslop LDAchanged
BEQnodyou
JSRdispyou
.nodyou JSRdispmon
JSRwait
INCmovstag
LDAmovstag
CMP#3
BNEmoveslop
LDAmfine
PHA
LDAfine
STAfnst
LDA#0
STAmovstag
STAchanged
STAfine
STAmfine
JSRdispyou
JSRdispmon
PLA
STAmfine
JSRwait
JSRmainclear
.finend JSRlaser
JSRdeadedch
JSRmonpro
JSRgetoput
LDAupvelo
BEQfallh
JSRjumpup
LDAxpos
STAxset
LDAypos
STAyset
JSRgetblock
CMP#10
BNEnofall
BEQwatt
.fallh LDAxpos
STAxset
LDAypos
STAyset
JSRgetblock
CMP#8
BEQwatt
CMP#10
BEQwatt
CMP#14
BEQladder
.laddown LDAypos
CMP#9
BEQdownscr
INCyset
JSRgetblock
JSRdoorch
BCSfalldown
AND#&30
BEQfalldown
BNEnofall
.downscr LDA#0
STAypos
INCyscr
JMPnewscr
.watt JMPzap
.ladder JMP ladderb
.falldown LDA#5
STAfine
INCypos
.nofall LDA#((oldscr-1) DIV 256)
PHA
LDA#((oldscr-1) MOD 256)
PHA
.moveyou LDA#2
JSRkeybyte
BCCnjump
JSRjump
.njump LDA#0
JSRkeybyte
BCSleft
.nleft LDA#1
JSRkeybyte
BCCnright
BCSright
.left LDA#0
STAface
STArghts
LDAxpos
BEQleftscr
SEC
SBC#1
STAxset
LDAypos
STAyset
JSRgetblock
JSRdoorch
BCSnoupl
AND#&30
CMP#&10
BEQnomove
CMP#&20
BEQnomove
CMP#&30
BNEnoupl
DECypos
DECxpos
LDA#3
STAfine
.nright RTS
.noupl DECxpos
LDA#1
STAfine
.nomove RTS
.right LDA#0
STArghts
LDA#1
STAface
LDAxpos
CMP#9
BEQrightscr
CLC
ADC#1
STAxset
LDAypos
STAyset
JSRgetblock
JSRdoorch
BCSnoupr
AND#&30
CMP#&10
BEQnomover
CMP#&20
BEQnomover
CMP#&30
BNEnoupr
DECypos
LDA#4
.nouprs INCxpos
STAfine
.nosnd RTS
.noupr LDA#2
JMPnouprs
.nomover LDA#1
STArghts
STAchanged
RTS
.leftscr LDA#9
STAxpos
DECxscr
.scrpass JMPscreen
.rightscr LDA#0
STAxpos
INCxscr
BNEscrpass
.jump LDAypos
CMP#9
BEQnosnd
CLC
ADC#1
STAyset
LDAxpos
STAxset
JSRgetblock
AND#&30
BEQnosnd
LDA#3
STAupvelo
LDAsound
BEQnosnd
LDA#7
LDX#(jumpn MOD 256)
LDY#(jumpn DIV 256)
JMPosword
.dispshr SEI
LDAwiper
BEQnowipe
LDY#0
.wiplop LDA(wirep),Y
STA(&78),Y
INY
CPY#32
BNEwiplop
LDA&78
CLC
ADC#&80
STA&78
LDA&79
ADC#2
STA&79
LDY#0
.wipeb LDA(wirepb),Y
STA(&78),Y
INY
CPY#32
BNEwipeb
.nowipe LDA#1
STAwiper
LDAxpos
ASL A
ASL A
ASL A
ASL A
ASL A
ASL A
STA&70
LDAxpos
LSR A
LSR A
CLC
ADC#&35
STA&71
LDAypos
CLC
ADC&71
STA&71
LDAypos
ASL A
ASL A
CLC
ADC&71
STA&71
LDY#0
STY&72
LDA#&1A
STA&73
LDXmovstag
LDAsequen,X
CLC
ADCfine
TAX
LDA&70
CLC
ADClowad,X
STA&70
LDA&71
ADChighad,X
STA&71
LDAmflag
BNEmonsadr
CPX#0
BEQnophase
LDAmovstag
CMP#2
BEQnophase
LDXphase
INX
.addph LDA&72
CLC
ADC#&80
STA&72
LDA&73
ADC#0
STA&73
DEX
BNEaddph
LDAphase
EOR#1
STAphase
JMPnophase
.monsadr LDAmonstat
EOR#1
STAmonstat
ASL A
ASL A
ASL A
ASL A
ASL A
CLC
ADC#&80
STA&72
LDA#&1B
STA&73
LDA#1
STAwiperm
LDAmtype
CMP#2
BNEnotyptr
LDA&72
CLC
ADC#&80
STA&72
LDA&73
ADC#0
STA&73
.notyptr JMPleface
.nophase LDArghts
BEQnotrght
LDA&70
CLC
ADC#32
STA&70
LDA&71
ADC#0
STA&71
.notrght LDAface
BNEleface
LDA&72
CLC
ADC#&20
STA&72
.leface LDA&70
STA&78
LDA&71
STA&79
.ladisp LDA(&70),Y
STA(wirep),Y
ORA(&72),Y
STA(&70),Y
INY
CPY#32
BNEladisp
LDA&72
CLC
ADC#&40
STA&72
LDA&73
ADC#0
STA&73
LDA&70
CLC
ADC#&80
STA&70
LDA&71
ADC#2
STA&71
LDY#0
.lbdisp LDA(&70),Y
STA(wirepb),Y
ORA(&72),Y
STA(&70),Y
INY
CPY#32
BNElbdisp
CLI
RTS
.wait LDAclock
CMP&80
BNEwait
LDAclock
ADC#5
STA&80
RTS
.jumpup DECupvelo
LDAypos
BEQupscr
SEC
SBC#1
STAyset
LDAxpos
STAxset
JSRgetblock
JSRdoorch
BCSupone
AND#&30
BEQupone
LDA#0
STAupvelo
RTS
.upone LDA#6
STAfine
DECypos
RTS
.upscr DECyscr
LDA#9
STAypos
JMPscreen
.screen LDA#0
STAclearup
STAlastat
STAinvflag
JSRscroff
LDAxpos
STAxold
LDAypos
STAyold
JSRpoint
LDA#&FF
STAyset
.ylop LDA#&FF
STAxset
INCyset
.xlop INCxset
JSRdark
LDAxset
CMP#9
BEQnexty
JMPxlop
.nexty LDAyset
CMP#9
BNEylop
JSRsboard
JSRnamscr
.scron LDA&D011
ORA#&10
STA&D011
LDAclock
CLC
ADC#4
STA&80
LDA#0
STAwiper
STAwiperm
LDA#1
STAchanged
JMPmonset
.ladderb LDA#3
JSRkeybyte
BCSfallset
LDA#2
JSRkeybyte
BCCstable
LDA#1
STAupvelo
JSRjumpup
JMPoldscr
.stable JMPnofall
.fallset JMPladdown
.blockon JSRobjcheck
JSRgetblock
LDAxset
ASL A
ASL A
ASL A
ASL A
ASL A
ASL A
STA&70
LDAxset
LSR A
LSR A
CLC
ADC#&35
STA&71
LDAyset
CLC
ADC&71
STA&71
LDAyset
ASL A
ASL A
CLC
ADC&71
STA&71
LDA&72
LSR A
LSR A
CLC
ADC#&20
STA&73
LDA&72
CMP#30
BEQdoorcol
LSR A
ROR A
ROR A
AND#&C0
STA&72
LDY#0
.transtop LDA(&70),Y
AND#&C0
CLC
ADC(&72),Y
STA(&70),Y
INY
CPY#&40
BNEtranstop
LDY#0
LDA&72
CLC
ADC#&40
STA&72
LDA&70
CLC
ADC#&80
STA&70
LDA&71
ADC#2
STA&71
.transbot LDA(&70),Y
AND#&C0
CLC
ADC(&72),Y
STA(&70),Y
INY
CPY#&40
BNEtransbot
RTS
.doorcol JMPlocktype
.getblock LDA#&30
CLC
ADCxscr
STA&71
LDAyscr
ASL A
ASL A
ASL A
ASL A
CLC
ADC&71
STAscrno
STA&71
LDAyset
STA&70
ASL A
ASL A
ASL A
PHA
CLC
ADC&70
STA&70
PLA
ASL A
CLC
ADC&70
STA&70
LDYxset
LDAxdata,Y
TAY
LDA(&70),Y
ROL A
ROL A
ROL A
AND#3
STA&72
INY
LDA(&70),Y
LSR A
LSR A
LSR A
LSR A
AND#12
CLC
ADC&72
STA&72
LDAxset
LSR A
TAY
LDAhbdat,Y
TAY
LDA(&70),Y
STA&73
LDAxset
AND#1
BNEbit2
LDA&73
ASL A
ROL A
ROL A
JMPfbgot
.bit2 LDA&73
ASL A
ROL A
.fbgot AND#1
ASL A
ASL A
ASL A
ASL A
CLC
ADC&72
ASL A
STA&72
RTS
.blascr JSRscroff
LDY#0
STY&70
LDA#&30
STA&71
.blanlop LDA(&70),Y
AND#&C0
STA(&70),Y
INY
BNEblanlop
INC&71
LDA&71
CMP#&80
BNEblanlop
JMPscron
.putch ASL A
ASL A
ASL A
TAX
LDA#0
STA&70
LDA#&30
STA&71
LDYxch
.xlopc BEQnoxch
LDA&70
CLC
ADC#&20
STA&70
LDA&71
ADC#0
STA&71
DEY
JMPxlopc
.noxch LDYych
.ylopc BEQnoych
LDA&70
CLC
ADC#&80
STA&70
LDA&71
ADC#2
STA&71
DEY
JMPylopc
.noych LDY#0
.sline LDA&C00,X
.linelop PHA
ASL A
ROL A
ROL A
AND#3
BEQblanch
STA&80
LDA#0
.colch CLC
ADCcol
DEC&80
BNEcolch
.blanch STA&80
LDA(&70),Y
AND#&C0
ORA&80
EORinvflag
STA(&70),Y
TYA
CLC
ADC#8
TAY
CMP#&20
BCSnewlin
PLA
ASL A
ASL A
JMPlinelop
.newlin AND#7
TAY
PLA
INY
INX
CPY#8
BNEsline
RTS
.string LDY#0
LDA(&72),Y
CMP#&FF
BEQstrend
JSRputch
INCxch
LDA&72
CLC
ADC#1
STA&72
LDA&73
ADC#0
STA&73
JMPstring
.quitch LDA#7
JSRkeybyte
BCSquitok
.strend RTS
.quitok PLA
PLA
LDA#8
JSRkeybyte
BCCzap
JMPprog
.zap LDAxold
STAxpos
LDAyold
STAypos
LDAsound
BEQnozaps
LDA#7
LDX#(zapn MOD 256)
LDY#(zapn DIV 256)
JSRosword
.nozaps LDA#1
STApowchange
LDApower
SEC
SBC#&28
STApower
BEQyoudie
BCCyoudie
JMPnewscr
.youdie JMPkillu
.gameover LDA#5
STAxch
LDA#16
STAych
LDA#1
STAcol
LDA#(gamdead MOD 256)
STA&72
LDA#(gamdead DIV 256)
STA&73
JSRstring
LDA#0
PHA
.bellop LDAclock
CLC
ADC#100
STA&80
.belwait LDAclock
CMP&80
BNEbelwait
LDAsound
BEQnobell
LDA#7
LDX#(over MOD 256)
LDY#(over DIV 256)
JSRosword
.nobell PLA
CLC
ADC#1
PHA
CMP#4
BNEbellop
PLA
RTS
.gamdead EQUB7
EQUB1
EQUB12
EQUB5
EQUB0
EQUB22
EQUB19
EQUB5
EQUB15
EQUB255
.over EQUW1
EQUW-15
EQUW0
EQUW5
.sboard LDApowchange
BEQnopower
LDX#0
.powlop LDA&7C70,X
AND#&C0
ORA#4
STA&7C70,X
INX
CPXpower
BNEpowlop
.pownol LDA&7C70,X
AND#&C0
STA&7C70,X
INX
BNEpownol
.nopower LDAobch
BEQfinobsc
LDA#8
STAxch
LDA#26
STAych
LDAobjects
CMP#&20
BCSblankoba
TAY
JSRdrawop
JMPsecondo
.blankoba JSRblankob
JMPsecondo
.blankob LDA#0
JSRputch
INCxch
LDA#0
JSRputch
INCych
LDA#0
JSRputch
DECxch
LDA#0
JMPputch
.secondo LDA#10
STAxch
LDA#26
STAych
LDAobjects+1
CMP#&20
BCSblankobb
TAY
JSRdrawop
JMPfinobsc
.blankobb JSRblankob
.finobsc LDAscrch
BEQnoscr
JSRscorb
.noscr LDAobch
BEQnoobch
LDAclock
CLC
ADC#5
STA&80
.noobch LDA#0
STAobch
STApowchange
STAscrch
RTS
.drawop LDAxch
LSR A
STAxset
LDAych
SEC
SBC#2
LSR A
STAyset
JSRdrawobj
.objecth LDY#0
.oblop LDA&FA0,Y
AND#15
STA&F20,Y
LDA&FC0,Y
AND#15
STA&F40,Y
LDA&FE0,Y
LSR A
LSR A
LSR A
LSR A
AND#15
STA&F60,Y
LDA&FE0,Y
AND#15
STA&F80,Y
INY
CPY#32
BNEoblop
RTS
.objcheck LDY#0
.obclop LDA&F20,Y
CMPxset
BNEnotthat
LDA&F40,Y
CMPyset
BNEnotthat
LDA&F60,Y
CMPxscr
BNEnotthat
LDA&F80,Y
CMPyscr
BEQ drawobj
.notthat INY
CPY#32
BNEobclop
RTS
.drawobj PLA
PLA
LDAxset
ASL A
STAxch
LDAyset
CLC
ADC#1
ASL A
STAych
LDA&F00,Y
STAcol
TYA
CLC
ADC#&E0
STA&7F
LDA#0
STA&72
LDA#&A
STA&73
JSRobjdisp
INCxch
INC&73
JSRobjdisp
INCych
LDA#&E
STA&73
JSRobjdisp
DECxch
DEC&73
JSRobjdisp
LDY#8
LDA#0
.clearspob STA&BFF,Y
DEY
BNEclearspob
RTS
.objdisp LDY&7F
LDX#8
.objdlop LDA(&72),Y
STA&BFF,X
TYA
SEC
SBC#32
TAY
DEX
BNEobjdlop
TXA
JMPputch
.getoput LDA#4
JSRkeybyte
BCSpickup
LDA#0
STAgetstat
.keyhang RTS
.pickup LDAgetstat
BNEkeyhang
LDAsound
BEQnogp
LDA#7
LDX#(switn MOD 256)
LDY#(switn DIV 256)
JSRosword
.nogp LDAobjects+1
CMP#&20
BCSnoputdown
TAY
LDAxscr
STA&F60,Y
LDAyscr
STA&F80,Y
LDAxpos
STA&F20,Y
LDAypos
STA&F40,Y
STY&70
JSRpuzz
.noputdown LDAobjects
STAobjects+1
LDY#0
.obglop LDA&F20,Y
CPY&70
BEQnotgot
CMPxpos
BNEnotgot
LDA&F40,Y
CMPypos
BNEnotgot
LDA&F60,Y
CMPxscr
BNEnotgot
LDA&F80,Y
CMPyscr
BEQgettobj
.notgot INY
CPY#32
BNEobglop
STYobjects
JMPnogetob
.gettobj CPY#28
BCCnoener
LDA#&FF
STA&F20,Y
STApower
STApowchange
STAscrch
SED
LDAscore
CLC
ADC#5
STAscore
LDAscore+1
ADC#0
STAscore+1
CLD
LDA#7
LDX#(enrup MOD 256)
LDY#(enrup DIV 256)
JSRosword
LDY#32
STYobjects
JMPnogetob
.noener STYobjects
LDA#&FF
STA&F20,Y
.nogetob LDAxpos
STAxset
LDAypos
STAyset
JSRblockon
LDA#0
STAwiper
LDA#1
STAchanged
STAobch
STAgetstat
RTS
.title JSRblascr
JSRobjecth
.titlop INCtitstat
LDAtitstat
AND#7
TAY
LDAtitscrs,Y
LSR A
LSR A
LSR A
LSR A
STAxscr
LDAtitscrs,Y
AND#&0F
STAyscr
JSRscreen
LDA#&30
STAinvflag
LDA#5
STAcol
LDA#4
STAxch
LDA#5
STAych
LDA#(name MOD 256)
STA&72
LDA#(name DIV 256)
STA&73
JSRstring
LDA#3
STAxch
LDA#16
STAych
LDA#(creda MOD 256)
STA&72
LDA#(creda DIV 256)
STA&73
JSRstring
LDA#4
STAxch
LDA#18
STAych
LDA#(credb MOD 256)
STA&72
JSRstring
LDA#4
STAxch
LDA#20
STAych
LDA#(credc MOD 256)
STA&72
LDA#(credc DIV 256)
STA&73
JSRstring
LDA#8
STAxch
LDA#22
STAych
LDA#(credd MOD 256)
STA&72
JSRstring
LDA#0
STAxch
LDA#30
STAych
LDA#(space MOD 256)
STA&72
LDA#(space DIV 256)
STA&73
JSRstring
LDAclock
SEC
SBC#1
STA&80
.soundpr LDA#6
STAxch
LDA#26
STAych
LDA#(sndoff MOD 256)
STA&72
LDA#(sndoff DIV 256)
STA&73
LDAsound
BEQsoundset
LDA#(sndon MOD 256)
STA&72
.soundset JSRstring
.sstop LDA#9
JSRkeybyte
BCSsstop
.spacwait LDAclock
CMP&80
BEQnextscr
LDA#9
JSRkeybyte
BCSseor
LDA#4
JSRkeybyte
BCCspacwait
RTS
.nextscr INCtitcyc
DEC&80
LDAtitcyc
AND#3
BNEspacwait
JMPtitlop
.seor LDAsound
EOR#1
STAsound
JMPsoundpr
.sbar EQUB18
EQUB1
EQUB4
EQUB25
EQUB4
EQUW0
EQUW252
EQUB25
EQUB4
EQUW576
EQUW252
EQUB25
EQUB85
EQUW288
EQUW96
EQUB25
EQUB4
EQUW704
EQUW252
EQUB25
EQUB4
EQUW1280
EQUW252
EQUB25
EQUB85
EQUW992
EQUW96
EQUB25
EQUB4
EQUW384
EQUW96
EQUB25
EQUB4
EQUW896
EQUW96
EQUB25
EQUB85
EQUW640
EQUW252
EQUB18
EQUB3
EQUB4
EQUB25
EQUB4
EQUW96
EQUW224
EQUB25
EQUB4
EQUW480
EQUW224
EQUB25
EQUB85
EQUW288
EQUW128
EQUB25
EQUB4
EQUW800
EQUW224
EQUB25
EQUB4
EQUW1184
EQUW224
EQUB25
EQUB85
EQUW992
EQUW128
EQUB18
EQUB1
EQUB1
EQUB25
EQUB4
EQUW128
EQUW92
EQUB25
EQUB4
EQUW448
EQUW92
EQUB25
EQUB85
EQUW128
EQUW0
EQUB25
EQUB85
EQUW448
EQUW0
EQUB25
EQUB4
EQUW704
EQUW92
EQUB25
EQUB4
EQUW1280
EQUW92
EQUB25
EQUB85
EQUW704
EQUW0
EQUB25
EQUB85
EQUW1280
EQUW0
EQUB&FF
P%=&400
O%=&5400
.credc EQUB4
EQUB22
EQUB12
EQUB23
EQUB13
EQUB23
EQUB3
EQUB0
EQUB6
EQUB22
EQUB15
EQUB4
EQUB255
.credd EQUB23
EQUB31
EQUB31
EQUB28
EQUB255
.space EQUB14
EQUB15
EQUB5
EQUB16
EQUB16
EQUB0
EQUB16
EQUB14
EQUB1
EQUB3
EQUB5
EQUB0
EQUB17
EQUB22
EQUB0
EQUB16
EQUB17
EQUB1
EQUB15
EQUB17
EQUB255
.name EQUB16
EQUB8
EQUB23
EQUB14
EQUB0
EQUB20
EQUB15
EQUB5
EQUB3
EQUB10
EQUB5
EQUB4
EQUB255
.point LDAyscr
ASL A
ASL A
ASL A
ASL A
CLC
ADCxscr
ADC#&30
STApoiyn+2
TAX
.poiyn LDA&30FE
AND#&80
BNEvis
STXpois+2
STXorps+2
LDA#&80
.orps ORA&30FE
.pois STA&30FE
SED
LDAscore
CLC
ADC#1
STAscore
LDAscore+1
ADC#0
STAscore+1
CLD
INCscrch
.vis RTS
.scorb LDAscore
AND#15
CLC
ADC#22
STAscrtxt+2
LDAscore
LSR A
LSR A
LSR A
LSR A
CLC
ADC#22
STAscrtxt+1
LDAscore+1
AND#15
CLC
ADC#22
STAscrtxt
LDA#3
STAxch
LDA#30
STAych
LDA#17
STAcol
LDA#(scrtxt MOD 256)
STA&72
LDA#(scrtxt DIV 256)
STA&73
JMPstring
.doorch PHA
CMP#30
BNEnodor
LDA#6
JSRkeybyte
BCCnodor
LDAyscr
ASL A
ASL A
ASL A
ASL A
CLC
ADCxscr
ADC#&30
JSRadofcol
SEC
SBC#1
CMPobjects
BEQdoor
CMPobjects+1
BNEnodor
.door PLA
SEC
RTS
.nodor PLA
CLC
RTS
.locktype LSR A
ROR A
ROR A
AND#&C0
STA&72
LDY#0
.transtop LDA(&70),Y
AND#&C0
JSRcolbyt
STA(&70),Y
INY
CPY#&40
BNEtranstop
LDY#0
LDA&72
CLC
ADC#&40
STA&72
LDA&70
CLC
ADC#&80
STA&70
LDA&71
ADC#2
STA&71
.transbot LDA(&70),Y
AND#&C0
JSRcolbyt
STA(&70),Y
INY
CPY#&40
BNEtransbot
RTS
.colbyt PHA
LDAscrno
JSRadofcol
TAX
LDAdoorc,X
TAX
PLA
.colblop CLC
ADC(&72),Y
DEX
BNEcolblop
RTS
.adofcol STAreadcll+2
STAreadclh+2
.readcll LDA&10FE
LSR A
LSR A
LSR A
LSR A
AND#4
STAsmad+1
.readclh LDA&10FF
ASL A
ROL A
ROL A
AND#3
CLC
.smad ADC#0
RTS
.puzz LDA&FA0,Y
LSR A
LSR A
LSR A
LSR A
CMPxscr
BNEnopuzz
LDA&FC0,Y
LSR A
LSR A
LSR A
LSR A
CMPyscr
BEQpsolv
.nopuzz RTS
.psolv LDAsound
BEQpuzsnd
LDA#7
LDX#(puzn MOD 256)
LDY#(puzn DIV 256)
JSRosword
.puzsnd LDY&70
LDA&700,Y
CMP#32
BCSpuswap
TAX
LDA&F20,Y
STA&F20,X
LDA&F40,Y
STA&F40,X
LDA&F60,Y
STA&F60,X
LDA&F80,Y
STA&F80,X
.puswap LDA#&78
STA&F20,Y
LDA&720,Y
CMP#32
BCSpumovo
TAX
LDA&740,Y
AND#15
STA&F40,X
LDA&740,Y
LSR A
LSR A
LSR A
LSR A
STA&F20,X
.pumovo LDA&760,Y
CMP#&FF
BNEpuzbloc
.blopcb LDA#1
STAscrch
SED
LDAscore
CLC
ADC#&20
STAscore
LDAscore+1
ADC#0
STAscore+1
CLD
JMPcomplete
.puzn EQUW1
EQUW3
EQUW52
EQUW20
.puzbloc LDXxscr
STXxch
LDXyscr
STXych
AND#15
STAyscr
LDA&760,Y
LSR A
LSR A
LSR A
LSR A
STAxscr
.blolop LDA&780,Y
AND#15
STAyset
LDA&780,Y
LSR A
LSR A
LSR A
LSR A
STAxset
PHA
TYA
PHA
JSRgetblock
PLA
TAX
PLA
PHA
TAY
LDAxdata,Y
TAY
LDA&7A0,X
AND#3
LSR A
ROR A
ROR A
STAcol
LDA(&70),Y
AND#&3F
ORAcol
STA(&70),Y
INY
LDA&7A0,X
AND#12
ASL A
ASL A
ASL A
ASL A
STAcol
LDA(&70),Y
AND#&3F
ORAcol
STA(&70),Y
PLA
LSR A
TAY
LDAhbdat,Y
TAY
LDA&7A0,X
AND#16
ASL A
ASL A
STAcol
LDAxset
AND#1
BEQsecpuz
LDA(&70),Y
AND#&7F
CLC
ADCcol
ADCcol
STA(&70),Y
JMPfirpuz
.secpuz LDA(&70),Y
AND#&BF
CLC
ADCcol
STA(&70),Y
.firpuz TXA
CLC
ADC#&40
TAY
CMP#&80
BCSendbloc
JMPblolop
.endbloc LDAxch
STAxscr
LDAych
STAyscr
JMPblopcb
.namscr LDY#0
TYA
.scrnam STAnamt,Y
INY
CPY#16
BNEscrnam
LDAyscr
ASL A
ASL A
ASL A
ASL A
CLC
ADCxscr
TAY
LDA&6B0,Y
TAX
LDA&900,X
STAxch
LSR A
STAcol
LDA#8
SEC
SBCcol
TAY
.wrnam LDA&901,X
STAnamt,Y
INY
INX
DECxch
BNEwrnam
LDA#20
STAcol
LDX#2
STXxch
DEX
STXych
LDA#(namt MOD 256)
STA&72
LDA#(namt DIV 256)
STA&73
JMPstring
P%=&100
O%=&6800
.titscrs EQUB&34
EQUB&52
EQUB&42
EQUB&E2
EQUB&51
EQUB&93
EQUB&90
EQUB&E1
.monpd EQUB&02
EQUB&04
EQUB&06
EQUB&08
.jumpn EQUW1
EQUW1
EQUW52
EQUW5
.zapn EQUW1
EQUW2
EQUW52
EQUW10
.switn EQUW1
EQUW3
EQUW52
EQUW2
.scort EQUB16
EQUB3
EQUB22
EQUB15
EQUB5
EQUB255
.powt EQUB14
EQUB22
EQUB20
EQUB5
EQUB15
EQUB255
.obstxt EQUB22
EQUB2
EQUB9
EQUB16
EQUB255
.sequen EQUB0
EQUB14
EQUB28
.lowad EQUB0
EQUB&30
EQUB&D0
EQUB&B0
EQUB&50
EQUB&80
EQUB&80
.highad EQUB0
EQUB0
EQUB&FF
EQUB2
EQUB2
EQUB&FD
EQUB2
EQUB0
EQUB&20
EQUB&E0
EQUB&A0
EQUB&60
EQUB&80
EQUB&80
EQUB0
EQUB0
EQUB&FF
EQUB2
EQUB2
EQUB&FD
EQUB2
EQUB0
EQUB&10
EQUB&F0
EQUB&90
EQUB&70
EQUB0
EQUB0
EQUB0
EQUB0
EQUB&FF
EQUB2
EQUB2
EQUB0
EQUB0
.xdata EQUB0
EQUB2
EQUB5
EQUB7
EQUB10
EQUB12
EQUB15
EQUB17
EQUB20
EQUB22
.hbdat EQUB4
EQUB9
EQUB14
EQUB19
EQUB24
.doorc EQUB0
EQUB1
EQUB4
EQUB5
EQUB16
EQUB17
EQUB20
EQUB21
.namt EQUS"----------------"
EQUB255
.creda EQUB14
EQUB15
EQUB22
EQUB7
EQUB15
EQUB1
EQUB12
EQUB12
EQUB5
EQUB4
EQUB0
EQUB1
EQUB13
EQUB4
EQUB255
.credb EQUB4
EQUB5
EQUB16
EQUB23
EQUB7
EQUB13
EQUB5
EQUB4
EQUB0
EQUB2
EQUB21
EQUB255
.sndon EQUB16
EQUB22
EQUB18
EQUB13
EQUB4
EQUB0
EQUB22
EQUB13
EQUB0
EQUB255
.sndoff EQUB16
EQUB22
EQUB18
EQUB13
EQUB4
EQUB0
EQUB22
EQUB6
EQUB6
EQUB255
.enrup EQUW1
EQUW1
EQUW52
EQUW20
P%=&1C80
O%=&6480
.complete CPY#&14
BEQcongu
JMPscreen
.congu JSRsboard
LDA#(cmptxt MOD 256)
STA&72
LDA#(cmptxt DIV 256)
STA&73
LDA#2
STAxch
LDA#7
STAych
JSRstring
LDA#(cmptxtb MOD 256)
STA&72
LDA#(cmptxtb DIV 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
LDXxpos
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
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
.monset LDAyscr
ASL A
ASL A
ASL A
ASL A
CLC
ADCxscr
ADC#&30
STA&71
LDY#0
STY&70
INY
STYmfine
LDY#&FB
LDA(&70),Y
ASL A
ROL A
ROL A
AND#3
TAX
LDAmonpd,X
STAxmont
INY
LDA(&70),Y
ASL A
ROL A
ROL A
AND#3
TAX
LDAmonpd,X
STAymont
INY
LDA(&70),Y
ASL A
ROL A
ROL A
AND#3
STAmtype
LDA#&FF
STAmdir
.lasexit RTS
.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
LDApower
SEC
SBC#8
STApower
BCSmontche
PLA
PLA
JMPkillu
.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#6
JSRkeybyte
BCClasexit
LDAlastat
BNElasexit
LDAsound
BEQnolassd
LDA#7
LDX#(switn MOD256)
LDY#(switn DIV256)
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
.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
.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
LDApower
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
.nohitm JSRsavevar
DEClastat
LDAlastep
CLC
ADC#8
STAlastep
LDAlasdir
BEQlasleft
BNElasright
.nolas JMPROMirq
.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
AND#&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
.lestop JSRlaseorp
CPYlastep
BEQlecontb
TYA
SEC
SBC#8
TAY
JMPlestop
.lecontb JSRdelyou
.lecont LDAlastep
AND#&3F
BNElwall
DECxf
LDAxf
STAxset
LDAyf
STAyset
JSRgetblock
CMP#&10
BCClwall
LDA#1
STAlastat
.lwall JMPloadvar
.laseory TAY
.laseorp LDA(lasad),Y
EOR#&3F
STA(lasad),Y
RTS
.scroff LDA#0
STAlastat
LDA&D011
AND#&EF
STA&D011
RTS
P%=&2300
O%=&A00
.savevar LDA&70
STA&88
LDA&71
STA&89
LDA&72
STA&8A
LDA&73
STA&8B
LDAxset
STA&8C
LDAyset
STA&8D
STX&8F
STY&87
RTS
.loadvar LDA&88
STA&70
LDA&89
STA&71
LDA&8A
STA&72
LDA&8B
STA&73
LDA&8C
STAxset
LDA&8D
STAyset
LDX&8F
LDY&87
JMPROMirq
.xmom LDXxmont
CPXxpos
BEQonyou
BCCritemt
DEX
JSRlrxmsh
BCSonyou
DECxmont
LDA#1
.xmend STAmfine
RTS
.ritemt INX
JSRlrxmsh
BCSonyou
INCxmont
LDA#2
BNExmend
.onyou LDA#0
BEQxmend
.lrxmsh STXxset
LDAymont
STAyset
JSRgetblock
CMP#&10
RTS
.cmptxt EQUB3
EQUB22
EQUB13
EQUB7
EQUB15
EQUB1
EQUB17
EQUB18
EQUB11
EQUB1
EQUB17
EQUB23
EQUB22
EQUB13
EQUB16
EQUB&FF
P%=&2D80
O%=&A80
.movemst LDAmtype
CMP#2
BEQypatrol
CMP#1
BNEmovemqut
.xpatrol LDAxmont
BEQrevdir
CMP#9
BEQrevdir
ADCmdir
STAxset
LDAymont
STAyset
JSRgetblock
CMP#&10
BCSrevdir
INCyset
JSRgetblock
CMP#&10
BCCrevdir
LDAxset
STAxmont
.movemqut RTS
.revdir LDAmdir
EOR#&FE
STAmdir
CLC
ADCxmont
STAxmont
LDAmfine
EOR#3
STAmfine
RTS
.ypatrol LDXymont
CPXypos
BEQxadjb
BCCdownmt
DEX
JSRypshr
DECymont
LDA#6
STAmfine
RTS
.ypshr STXyset
LDAxmont
STAxset
JSRgetblock
CMP#&10
BCSxadj
RTS
.downmt INX
JSRypshr
INCymont
LDA#5
STAmfine
RTS
.xadj PLA
PLA
.xadjb JMPxmom
.cmptxtb EQUB7
EQUB1
EQUB12
EQUB5
EQUB0
EQUB3
EQUB22
EQUB12
EQUB14
EQUB11
EQUB5
EQUB17
EQUB5
EQUB&FF
\ MOS System
P%=&8000
O%=&3F00
.keybyte CMP#8
BEQshiftk
TAX
LDA&DC00
ANDjoyst,X
BEQsekey
LDA&C5
CMPkeyp,X
BEQsekey
CLC
RTS
.sekey SEC
RTS
.shiftk LDA&28D
AND#1
BNEsekey
CLC
RTS
.joyst EQUB4
EQUB8
EQUB1
EQUB2
EQUB&FF
EQUB16
EQUB&FF
EQUB&FF
EQUB&FF
EQUB&FF
.keyp EQUB12
EQUB23
EQUB37
EQUB36
EQUB60
EQUB0
EQUB41
EQUB57
EQUB&FF
EQUB13
.osword RTS
.oswrch RTS \ Temporary
.ROMirq JMP&EA31c�����5"B����bFB���X%"!���zA���H"!R�H1������7��(��)Q�af DBw��������& �����Z""Bf���U#2s����rw3!R��z7"!s���%1c��y31fh!d���˻i��(��(b�A3D1u��������wQ�����f#""CV5"B�����J1sw5!����D!U��Y"!3��w"�X% 2"D�����X%�{'�j��QUAd3 �'0"B���������i"A������5#"2333t�����9Awhb���w3���U"���7RxG R$3������H�{'�Z��(rwa�3 �(@Ds��������y7��˻��ygUDTef���̻k3�G$2f���Y%"2��&1s�z$!s�%Ah3C������7"�k�
����q�3 �("c�����˼��%��˻�����f������̻J"�y7"3���z7!��X"A��7#R�X31�f4������i3"�k�9����q�"w'"�������̪Ya������˻����˻���A$B��$B����$t��X%3�zG!B��$R�X2s������53�[�)���Uq�""!2w��˼�˼�w0�������̻̼�̻��wa8!��7"!b���7"R��zG""t�i3!��'1fy#Bw�����H$3�J�)��t3Qe2c������ʼzD3���̻������̼��3A�X"R��D!U���U!D���f!���$2fy'""t"t�����yD3�
�(��R"R����������$���������̻̼�j"0�yD1s�w3����#"����5c��7!DwG#"BB������wD�9�(��t3"����������Yr��������̻̼�% Ds��7!��Y%R���X%2����H"!B��5#2cX32S�����X%3�)�(��t"Bf���������FQ����������̛i w$R��Y#S��8"b���X"!����z3!f�h6!B�f!������X"�)"�'�wC"5!u���������w���������̼8# wY2c��h6"D�z3!d���G"1�����5"���%��71w�����8�(�!�f" 23iBt���������X"R��������̛%fz43w��i#3��U!B���y3!R����X#"c��GR�i!U�����j3s�!�wC"Qe3it����������51f���˻��6f�jF3���H"2c�G$!3����%!3����G$!t��U#3�Id��˼��%!�!��1�Uq�D"h"U���������H$3d�����U# ���y3S��zD"2wyG""����H"s���i6"Bt��5#"�z7Bd�����H$���A�wa�UE!T���������y%!3C4# w����$R���%""��6"2s���6#2s����D!2���X!��U!D�����y5"R��A�f0�3Su����������%"!D����71S��G$"c�h3"B���Y%""Bw���w$!���yRu�%3t�����h31��A�fQ"3������˻���fQ�xf5"R��j!"���I""R��5#c���y3"""����Y1f��X"!Ux#!2������$�U1�D!R����������W5"����h&!R�i!"S��zD"2��X5Bf���f#""S���z#!3���U3�F$ "!c�����FQ3!�"!"S�����������5q����y$"#QUDU���G4R��z3"c���X5"R���H4Bd��7R�x 2!D�����5"!d�����˻�����6Q�����X"r�WD���iF2f��7"2���yW"!R��zW!2��i#!��%C$"t����X5"2S�������̻���w$��������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������� 00000000 5c 20 53 68 69 70 57 72 65 63 6b 65 64 0d 0a 5c |\ ShipWrecked..\|
00000010 20 44 6f 6d 69 6e 69 63 20 46 6f 72 64 0d 0a 5c | Dominic Ford..\|
00000020 20 43 5e 24 20 56 65 72 73 69 6f 6e 0d 0a 0d 0a | C^$ Version....|
00000030 50 25 3d 32 0d 0a 4f 25 3d 26 35 33 30 32 0d 0a |P%=2..O%=&5302..|
00000040 0d 0a 2e 78 63 68 20 45 51 55 42 30 0d 0a 2e 79 |...xch EQUB0...y|
00000050 63 68 20 45 51 55 42 30 0d 0a 2e 63 6f 6c 20 45 |ch EQUB0...col E|
00000060 51 55 42 30 0d 0a 2e 73 63 6f 72 65 20 45 51 55 |QUB0...score EQU|
00000070 57 30 0d 0a 2e 73 63 72 63 68 20 45 51 55 42 30 |W0...scrch EQUB0|
00000080 0d 0a 2e 74 69 74 73 74 61 74 20 45 51 55 42 30 |...titstat EQUB0|
00000090 0d 0a 2e 6d 64 69 72 20 45 51 55 42 30 0d 0a 2e |...mdir EQUB0...|
000000a0 78 73 65 74 20 45 51 55 42 30 0d 0a 2e 79 73 65 |xset EQUB0...yse|
000000b0 74 20 45 51 55 42 30 0d 0a 2e 78 73 63 72 20 45 |t EQUB0...xscr E|
000000c0 51 55 42 30 0d 0a 2e 79 73 63 72 20 45 51 55 42 |QUB0...yscr EQUB|
000000d0 30 0d 0a 2e 78 70 6f 73 20 45 51 55 42 30 0d 0a |0...xpos EQUB0..|
000000e0 2e 79 70 6f 73 20 45 51 55 42 30 0d 0a 2e 6d 66 |.ypos EQUB0...mf|
000000f0 69 6e 65 20 45 51 55 42 30 0d 0a 2e 6d 74 79 70 |ine EQUB0...mtyp|
00000100 65 20 45 51 55 42 30 0d 0a 2e 73 63 72 6e 6f 20 |e EQUB0...scrno |
00000110 45 51 55 42 30 0d 0a 2e 75 70 76 65 6c 6f 20 45 |EQUB0...upvelo E|
00000120 51 55 42 30 0d 0a 2e 78 6f 6c 64 20 45 51 55 42 |QUB0...xold EQUB|
00000130 30 0d 0a 2e 79 6f 6c 64 20 45 51 55 42 30 0d 0a |0...yold EQUB0..|
00000140 2e 66 69 6e 65 20 45 51 55 42 30 0d 0a 2e 73 6f |.fine EQUB0...so|
00000150 75 6e 64 20 45 51 55 42 31 0d 0a 2e 63 6c 6f 63 |und EQUB1...cloc|
00000160 6b 20 45 51 55 42 30 0d 0a 2e 74 69 74 63 79 63 |k EQUB0...titcyc|
00000170 20 45 51 55 42 30 0d 0a 2e 69 6e 76 66 6c 61 67 | EQUB0...invflag|
00000180 20 45 51 55 42 30 0d 0a 2e 66 61 63 65 20 45 51 | EQUB0...face EQ|
00000190 55 42 31 0d 0a 2e 70 68 61 73 65 20 45 51 55 42 |UB1...phase EQUB|
000001a0 30 0d 0a 2e 72 67 68 74 73 20 45 51 55 42 30 0d |0...rghts EQUB0.|
000001b0 0a 2e 77 69 70 65 72 20 45 51 55 42 30 0d 0a 2e |..wiper EQUB0...|
000001c0 6d 6f 76 73 74 61 67 20 45 51 55 42 30 0d 0a 2e |movstag EQUB0...|
000001d0 63 68 61 6e 67 65 64 20 45 51 55 42 30 0d 0a 2e |changed EQUB0...|
000001e0 70 6f 77 65 72 20 45 51 55 42 30 0d 0a 2e 70 6f |power EQUB0...po|
000001f0 77 63 68 61 6e 67 65 20 45 51 55 42 30 0d 0a 2e |wchange EQUB0...|
00000200 6f 62 6a 65 63 74 73 20 45 51 55 57 30 0d 0a 2e |objects EQUW0...|
00000210 6f 62 63 68 20 45 51 55 42 30 0d 0a 2e 67 65 74 |obch EQUB0...get|
00000220 73 74 61 74 20 45 51 55 42 30 0d 0a 2e 6c 61 73 |stat EQUB0...las|
00000230 74 61 74 20 45 51 55 42 30 0d 0a 2e 6c 61 73 61 |tat EQUB0...lasa|
00000240 64 20 45 51 55 57 30 0d 0a 2e 6c 61 73 64 69 72 |d EQUW0...lasdir|
00000250 20 45 51 55 42 30 0d 0a 2e 6c 61 73 74 65 70 20 | EQUB0...lastep |
00000260 45 51 55 42 30 0d 0a 2e 78 66 20 45 51 55 42 30 |EQUB0...xf EQUB0|
00000270 0d 0a 2e 79 66 20 45 51 55 42 30 0d 0a 2e 77 69 |...yf EQUB0...wi|
00000280 72 65 70 20 45 51 55 57 30 0d 0a 2e 77 69 72 65 |rep EQUW0...wire|
00000290 70 62 20 45 51 55 57 30 0d 0a 2e 78 6d 6f 6e 74 |pb EQUW0...xmont|
000002a0 20 45 51 55 42 30 0d 0a 2e 79 6d 6f 6e 74 20 45 | EQUB0...ymont E|
000002b0 51 55 42 30 0d 0a 2e 6d 66 6c 61 67 20 45 51 55 |QUB0...mflag EQU|
000002c0 42 30 0d 0a 2e 6d 6f 6e 73 74 61 74 20 45 51 55 |B0...monstat EQU|
000002d0 42 30 0d 0a 2e 77 69 70 65 72 6d 20 45 51 55 42 |B0...wiperm EQUB|
000002e0 30 0d 0a 2e 64 65 61 64 65 64 20 45 51 55 42 30 |0...deaded EQUB0|
000002f0 0d 0a 2e 63 6c 65 61 72 75 70 20 45 51 55 42 30 |...clearup EQUB0|
00000300 0d 0a 2e 78 6d 6f 6f 20 45 51 55 42 30 0d 0a 2e |...xmoo EQUB0...|
00000310 79 6d 6f 6f 20 45 51 55 42 30 0d 0a 2e 66 6e 73 |ymoo EQUB0...fns|
00000320 74 20 45 51 55 42 30 0d 0a 2e 73 63 72 74 78 74 |t EQUB0...scrtxt|
00000330 20 45 51 55 44 30 0d 0a 2e 73 68 6f 6f 74 20 45 | EQUD0...shoot E|
00000340 51 55 42 30 0d 0a 2e 64 65 6c 79 6f 75 20 4c 44 |QUB0...delyou LD|
00000350 58 78 6d 6f 6f 0d 0a 4c 44 59 79 6d 6f 6f 0d 0a |Xxmoo..LDYymoo..|
00000360 2e 6d 63 64 20 53 54 58 78 73 65 74 0d 0a 53 54 |.mcd STXxset..ST|
00000370 59 79 73 65 74 0d 0a 2e 64 61 72 6b 20 4c 44 59 |Yyset...dark LDY|
00000380 23 35 0d 0a 43 50 59 78 73 63 72 0d 0a 42 4e 45 |#5..CPYxscr..BNE|
00000390 72 65 61 6c 64 0d 0a 44 45 59 0d 0a 43 50 59 79 |reald..DEY..CPYy|
000003a0 73 63 72 0d 0a 42 4e 45 72 65 61 6c 64 0d 0a 4c |scr..BNEreald..L|
000003b0 44 41 23 26 31 41 0d 0a 43 4d 50 6f 62 6a 65 63 |DA#&1A..CMPobjec|
000003c0 74 73 0d 0a 42 45 51 72 65 61 6c 64 0d 0a 43 4d |ts..BEQreald..CM|
000003d0 50 6f 62 6a 65 63 74 73 2b 31 0d 0a 42 45 51 72 |Pobjects+1..BEQr|
000003e0 65 61 6c 64 0d 0a 4c 44 41 23 30 0d 0a 53 54 41 |eald..LDA#0..STA|
000003f0 26 37 32 0d 0a 4a 4d 50 62 6c 6f 63 6b 6f 6e 2b |&72..JMPblockon+|
00000400 36 0d 0a 2e 72 65 61 6c 64 20 4a 4d 50 62 6c 6f |6...reald JMPblo|
00000410 63 6b 6f 6e 0d 0a 5d 0d 0a 49 46 50 25 3e 26 37 |ckon..]..IFP%>&7|
00000420 30 54 48 45 4e 50 52 49 4e 54 22 43 6f 64 65 20 |0THENPRINT"Code |
00000430 4f 76 65 72 66 6c 6f 77 20 74 6f 0d 0a 22 3b 50 |Overflow to..";P|
00000440 25 0d 0a 45 4e 44 0d 0a 50 25 3d 26 31 30 30 30 |%..END..P%=&1000|
00000450 0d 0a 4f 25 3d 26 35 38 30 30 0d 0a 5b 4f 50 54 |..O%=&5800..[OPT|
00000460 20 70 61 73 73 0d 0a 4c 44 41 23 26 46 46 0d 0a | pass..LDA#&FF..|
00000470 53 54 41 73 63 72 74 78 74 2b 33 0d 0a 53 45 49 |STAscrtxt+3..SEI|
00000480 0d 0a 4c 44 41 23 28 69 72 71 20 4d 4f 44 20 32 |..LDA#(irq MOD 2|
00000490 35 36 29 0d 0a 53 54 41 26 33 31 34 0d 0a 4c 44 |56)..STA&314..LD|
000004a0 41 23 28 69 72 71 20 44 49 56 20 32 35 36 29 0d |A#(irq DIV 256).|
000004b0 0a 53 54 41 26 33 31 35 0d 0a 43 4c 49 0d 0a 2e |.STA&315..CLI...|
000004c0 70 72 6f 67 20 4a 53 52 74 69 74 6c 65 0d 0a 4a |prog JSRtitle..J|
000004d0 53 52 62 6c 61 73 63 72 0d 0a 4a 53 52 73 63 72 |SRblascr..JSRscr|
000004e0 6f 66 66 0d 0a 4c 44 59 23 30 0d 0a 4c 44 41 23 |off..LDY#0..LDA#|
000004f0 33 0d 0a 53 54 41 26 37 30 0d 0a 4c 44 41 23 26 |3..STA&70..LDA#&|
00000500 33 30 0d 0a 53 54 41 26 37 31 0d 0a 2e 6c 69 6e |30..STA&71...lin|
00000510 65 73 20 4c 44 41 28 26 37 30 29 2c 59 0d 0a 4f |es LDA(&70),Y..O|
00000520 52 41 23 31 32 0d 0a 53 54 41 28 26 37 30 29 2c |RA#12..STA(&70),|
00000530 59 0d 0a 4c 44 41 26 37 30 0d 0a 43 4c 43 0d 0a |Y..LDA&70..CLC..|
00000540 41 44 43 23 38 0d 0a 53 54 41 26 37 30 0d 0a 4c |ADC#8..STA&70..L|
00000550 44 41 26 37 31 0d 0a 41 44 43 23 30 0d 0a 53 54 |DA&71..ADC#0..ST|
00000560 41 26 37 31 0d 0a 43 4d 50 23 26 36 43 0d 0a 42 |A&71..CMP#&6C..B|
00000570 4e 45 6c 69 6e 65 73 0d 0a 53 54 41 70 6f 77 63 |NElines..STApowc|
00000580 68 61 6e 67 65 0d 0a 53 54 41 6f 62 63 68 0d 0a |hange..STAobch..|
00000590 53 54 41 73 63 72 63 68 0d 0a 4c 44 59 23 32 35 |STAscrch..LDY#25|
000005a0 35 0d 0a 53 54 59 70 6f 77 65 72 0d 0a 53 54 59 |5..STYpower..STY|
000005b0 6f 62 6a 65 63 74 73 0d 0a 53 54 59 6f 62 6a 65 |objects..STYobje|
000005c0 63 74 73 2b 31 0d 0a 49 4e 59 0d 0a 53 54 59 73 |cts+1..INY..STYs|
000005d0 63 6f 72 65 0d 0a 53 54 59 73 63 6f 72 65 2b 31 |core..STYscore+1|
000005e0 0d 0a 2e 73 63 6f 62 61 72 6c 6f 70 20 4c 44 41 |...scobarlop LDA|
000005f0 73 62 61 72 2c 59 0d 0a 43 4d 50 23 26 46 46 0d |sbar,Y..CMP#&FF.|
00000600 0a 42 45 51 73 74 65 78 74 0d 0a 4a 53 52 6f 73 |.BEQstext..JSRos|
00000610 77 72 63 68 0d 0a 49 4e 59 0d 0a 4a 4d 50 73 63 |wrch..INY..JMPsc|
00000620 6f 62 61 72 6c 6f 70 0d 0a 2e 73 74 65 78 74 20 |obarlop...stext |
00000630 4c 44 41 23 31 0d 0a 53 54 41 63 6f 6c 0d 0a 4c |LDA#1..STAcol..L|
00000640 44 41 23 32 0d 0a 53 54 41 78 63 68 0d 0a 4c 44 |DA#2..STAxch..LD|
00000650 41 23 32 34 0d 0a 53 54 41 79 63 68 0d 0a 4c 44 |A#24..STAych..LD|
00000660 41 23 28 73 63 6f 72 74 20 4d 4f 44 20 32 35 36 |A#(scort MOD 256|
00000670 29 0d 0a 53 54 41 26 37 32 0d 0a 4c 44 41 23 28 |)..STA&72..LDA#(|
00000680 73 63 6f 72 74 20 44 49 56 20 32 35 36 29 0d 0a |scort DIV 256)..|
00000690 53 54 41 26 37 33 0d 0a 4a 53 52 73 74 72 69 6e |STA&73..JSRstrin|
000006a0 67 0d 0a 4c 44 41 23 31 33 0d 0a 53 54 41 78 63 |g..LDA#13..STAxc|
000006b0 68 0d 0a 49 4e 43 26 37 32 0d 0a 4a 53 52 73 74 |h..INC&72..JSRst|
000006c0 72 69 6e 67 0d 0a 4c 44 41 23 38 0d 0a 53 54 41 |ring..LDA#8..STA|
000006d0 78 63 68 0d 0a 4c 44 41 23 32 38 0d 0a 53 54 41 |xch..LDA#28..STA|
000006e0 79 63 68 0d 0a 49 4e 43 26 37 32 0d 0a 4a 53 52 |ych..INC&72..JSR|
000006f0 73 74 72 69 6e 67 0d 0a 2e 67 61 6d 65 20 4c 44 |string...game LD|
00000700 41 23 30 0d 0a 53 54 41 78 73 63 72 0d 0a 53 54 |A#0..STAxscr..ST|
00000710 41 79 73 63 72 0d 0a 4c 44 41 23 32 0d 0a 53 54 |Ayscr..LDA#2..ST|
00000720 41 78 70 6f 73 0d 0a 53 54 41 79 70 6f 73 0d 0a |Axpos..STAypos..|
00000730 4c 44 58 23 26 33 30 0d 0a 2e 63 6c 72 70 6f 74 |LDX#&30...clrpot|
00000740 20 53 54 58 63 6c 72 70 6e 74 2b 32 0d 0a 53 54 | STXclrpnt+2..ST|
00000750 58 63 6c 72 70 6c 70 2b 32 0d 0a 2e 63 6c 72 70 |Xclrplp+2...clrp|
00000760 6c 70 20 4c 44 41 26 33 30 46 45 0d 0a 41 4e 44 |lp LDA&30FE..AND|
00000770 23 26 37 46 0d 0a 2e 63 6c 72 70 6e 74 20 53 54 |#&7F...clrpnt ST|
00000780 41 26 33 30 46 45 0d 0a 49 4e 58 0d 0a 43 50 58 |A&30FE..INX..CPX|
00000790 23 26 38 30 0d 0a 42 4e 45 63 6c 72 70 6f 74 0d |#&80..BNEclrpot.|
000007a0 0a 2e 6e 65 77 73 63 72 20 4a 53 52 73 63 72 65 |..newscr JSRscre|
000007b0 65 6e 0d 0a 2e 6f 6c 64 73 63 72 20 4a 53 52 71 |en...oldscr JSRq|
000007c0 75 69 74 63 68 0d 0a 4a 53 52 73 62 6f 61 72 64 |uitch..JSRsboard|
000007d0 0d 0a 4c 44 41 23 30 0d 0a 53 54 41 6d 6f 76 73 |..LDA#0..STAmovs|
000007e0 74 61 67 0d 0a 4c 44 41 66 69 6e 65 0d 0a 42 45 |tag..LDAfine..BE|
000007f0 51 6d 6f 76 65 73 6c 6f 70 0d 0a 53 54 41 63 68 |Qmoveslop..STAch|
00000800 61 6e 67 65 64 0d 0a 4c 44 41 77 69 70 65 72 0d |anged..LDAwiper.|
00000810 0a 50 48 41 0d 0a 4a 53 52 6d 61 69 6e 63 6c 65 |.PHA..JSRmaincle|
00000820 61 72 0d 0a 50 4c 41 0d 0a 53 54 41 77 69 70 65 |ar..PLA..STAwipe|
00000830 72 0d 0a 2e 6d 6f 76 65 73 6c 6f 70 20 4c 44 41 |r...moveslop LDA|
00000840 63 68 61 6e 67 65 64 0d 0a 42 45 51 6e 6f 64 79 |changed..BEQnody|
00000850 6f 75 0d 0a 4a 53 52 64 69 73 70 79 6f 75 0d 0a |ou..JSRdispyou..|
00000860 2e 6e 6f 64 79 6f 75 20 4a 53 52 64 69 73 70 6d |.nodyou JSRdispm|
00000870 6f 6e 0d 0a 4a 53 52 77 61 69 74 0d 0a 49 4e 43 |on..JSRwait..INC|
00000880 6d 6f 76 73 74 61 67 0d 0a 4c 44 41 6d 6f 76 73 |movstag..LDAmovs|
00000890 74 61 67 0d 0a 43 4d 50 23 33 0d 0a 42 4e 45 6d |tag..CMP#3..BNEm|
000008a0 6f 76 65 73 6c 6f 70 0d 0a 4c 44 41 6d 66 69 6e |oveslop..LDAmfin|
000008b0 65 0d 0a 50 48 41 0d 0a 4c 44 41 66 69 6e 65 0d |e..PHA..LDAfine.|
000008c0 0a 53 54 41 66 6e 73 74 0d 0a 4c 44 41 23 30 0d |.STAfnst..LDA#0.|
000008d0 0a 53 54 41 6d 6f 76 73 74 61 67 0d 0a 53 54 41 |.STAmovstag..STA|
000008e0 63 68 61 6e 67 65 64 0d 0a 53 54 41 66 69 6e 65 |changed..STAfine|
000008f0 0d 0a 53 54 41 6d 66 69 6e 65 0d 0a 4a 53 52 64 |..STAmfine..JSRd|
00000900 69 73 70 79 6f 75 0d 0a 4a 53 52 64 69 73 70 6d |ispyou..JSRdispm|
00000910 6f 6e 0d 0a 50 4c 41 0d 0a 53 54 41 6d 66 69 6e |on..PLA..STAmfin|
00000920 65 0d 0a 4a 53 52 77 61 69 74 0d 0a 4a 53 52 6d |e..JSRwait..JSRm|
00000930 61 69 6e 63 6c 65 61 72 0d 0a 2e 66 69 6e 65 6e |ainclear...finen|
00000940 64 20 4a 53 52 6c 61 73 65 72 0d 0a 4a 53 52 64 |d JSRlaser..JSRd|
00000950 65 61 64 65 64 63 68 0d 0a 4a 53 52 6d 6f 6e 70 |eadedch..JSRmonp|
00000960 72 6f 0d 0a 4a 53 52 67 65 74 6f 70 75 74 0d 0a |ro..JSRgetoput..|
00000970 4c 44 41 75 70 76 65 6c 6f 0d 0a 42 45 51 66 61 |LDAupvelo..BEQfa|
00000980 6c 6c 68 0d 0a 4a 53 52 6a 75 6d 70 75 70 0d 0a |llh..JSRjumpup..|
00000990 4c 44 41 78 70 6f 73 0d 0a 53 54 41 78 73 65 74 |LDAxpos..STAxset|
000009a0 0d 0a 4c 44 41 79 70 6f 73 0d 0a 53 54 41 79 73 |..LDAypos..STAys|
000009b0 65 74 0d 0a 4a 53 52 67 65 74 62 6c 6f 63 6b 0d |et..JSRgetblock.|
000009c0 0a 43 4d 50 23 31 30 0d 0a 42 4e 45 6e 6f 66 61 |.CMP#10..BNEnofa|
000009d0 6c 6c 0d 0a 42 45 51 77 61 74 74 0d 0a 2e 66 61 |ll..BEQwatt...fa|
000009e0 6c 6c 68 20 4c 44 41 78 70 6f 73 0d 0a 53 54 41 |llh LDAxpos..STA|
000009f0 78 73 65 74 0d 0a 4c 44 41 79 70 6f 73 0d 0a 53 |xset..LDAypos..S|
00000a00 54 41 79 73 65 74 0d 0a 4a 53 52 67 65 74 62 6c |TAyset..JSRgetbl|
00000a10 6f 63 6b 0d 0a 43 4d 50 23 38 0d 0a 42 45 51 77 |ock..CMP#8..BEQw|
00000a20 61 74 74 0d 0a 43 4d 50 23 31 30 0d 0a 42 45 51 |att..CMP#10..BEQ|
00000a30 77 61 74 74 0d 0a 43 4d 50 23 31 34 0d 0a 42 45 |watt..CMP#14..BE|
00000a40 51 6c 61 64 64 65 72 0d 0a 2e 6c 61 64 64 6f 77 |Qladder...laddow|
00000a50 6e 20 4c 44 41 79 70 6f 73 0d 0a 43 4d 50 23 39 |n LDAypos..CMP#9|
00000a60 0d 0a 42 45 51 64 6f 77 6e 73 63 72 0d 0a 49 4e |..BEQdownscr..IN|
00000a70 43 79 73 65 74 0d 0a 4a 53 52 67 65 74 62 6c 6f |Cyset..JSRgetblo|
00000a80 63 6b 0d 0a 4a 53 52 64 6f 6f 72 63 68 0d 0a 42 |ck..JSRdoorch..B|
00000a90 43 53 66 61 6c 6c 64 6f 77 6e 0d 0a 41 4e 44 23 |CSfalldown..AND#|
00000aa0 26 33 30 0d 0a 42 45 51 66 61 6c 6c 64 6f 77 6e |&30..BEQfalldown|
00000ab0 0d 0a 42 4e 45 6e 6f 66 61 6c 6c 0d 0a 2e 64 6f |..BNEnofall...do|
00000ac0 77 6e 73 63 72 20 4c 44 41 23 30 0d 0a 53 54 41 |wnscr LDA#0..STA|
00000ad0 79 70 6f 73 0d 0a 49 4e 43 79 73 63 72 0d 0a 4a |ypos..INCyscr..J|
00000ae0 4d 50 6e 65 77 73 63 72 0d 0a 2e 77 61 74 74 20 |MPnewscr...watt |
00000af0 4a 4d 50 7a 61 70 0d 0a 2e 6c 61 64 64 65 72 20 |JMPzap...ladder |
00000b00 4a 4d 50 20 6c 61 64 64 65 72 62 0d 0a 2e 66 61 |JMP ladderb...fa|
00000b10 6c 6c 64 6f 77 6e 20 4c 44 41 23 35 0d 0a 53 54 |lldown LDA#5..ST|
00000b20 41 66 69 6e 65 0d 0a 49 4e 43 79 70 6f 73 0d 0a |Afine..INCypos..|
00000b30 2e 6e 6f 66 61 6c 6c 20 4c 44 41 23 28 28 6f 6c |.nofall LDA#((ol|
00000b40 64 73 63 72 2d 31 29 20 44 49 56 20 32 35 36 29 |dscr-1) DIV 256)|
00000b50 0d 0a 50 48 41 0d 0a 4c 44 41 23 28 28 6f 6c 64 |..PHA..LDA#((old|
00000b60 73 63 72 2d 31 29 20 4d 4f 44 20 32 35 36 29 0d |scr-1) MOD 256).|
00000b70 0a 50 48 41 0d 0a 2e 6d 6f 76 65 79 6f 75 20 4c |.PHA...moveyou L|
00000b80 44 41 23 32 0d 0a 4a 53 52 6b 65 79 62 79 74 65 |DA#2..JSRkeybyte|
00000b90 0d 0a 42 43 43 6e 6a 75 6d 70 0d 0a 4a 53 52 6a |..BCCnjump..JSRj|
00000ba0 75 6d 70 0d 0a 2e 6e 6a 75 6d 70 20 4c 44 41 23 |ump...njump LDA#|
00000bb0 30 0d 0a 4a 53 52 6b 65 79 62 79 74 65 0d 0a 42 |0..JSRkeybyte..B|
00000bc0 43 53 6c 65 66 74 0d 0a 2e 6e 6c 65 66 74 20 4c |CSleft...nleft L|
00000bd0 44 41 23 31 0d 0a 4a 53 52 6b 65 79 62 79 74 65 |DA#1..JSRkeybyte|
00000be0 0d 0a 42 43 43 6e 72 69 67 68 74 0d 0a 42 43 53 |..BCCnright..BCS|
00000bf0 72 69 67 68 74 0d 0a 2e 6c 65 66 74 20 4c 44 41 |right...left LDA|
00000c00 23 30 0d 0a 53 54 41 66 61 63 65 0d 0a 53 54 41 |#0..STAface..STA|
00000c10 72 67 68 74 73 0d 0a 4c 44 41 78 70 6f 73 0d 0a |rghts..LDAxpos..|
00000c20 42 45 51 6c 65 66 74 73 63 72 0d 0a 53 45 43 0d |BEQleftscr..SEC.|
00000c30 0a 53 42 43 23 31 0d 0a 53 54 41 78 73 65 74 0d |.SBC#1..STAxset.|
00000c40 0a 4c 44 41 79 70 6f 73 0d 0a 53 54 41 79 73 65 |.LDAypos..STAyse|
00000c50 74 0d 0a 4a 53 52 67 65 74 62 6c 6f 63 6b 0d 0a |t..JSRgetblock..|
00000c60 4a 53 52 64 6f 6f 72 63 68 0d 0a 42 43 53 6e 6f |JSRdoorch..BCSno|
00000c70 75 70 6c 0d 0a 41 4e 44 23 26 33 30 0d 0a 43 4d |upl..AND#&30..CM|
00000c80 50 23 26 31 30 0d 0a 42 45 51 6e 6f 6d 6f 76 65 |P#&10..BEQnomove|
00000c90 0d 0a 43 4d 50 23 26 32 30 0d 0a 42 45 51 6e 6f |..CMP#&20..BEQno|
00000ca0 6d 6f 76 65 0d 0a 43 4d 50 23 26 33 30 0d 0a 42 |move..CMP#&30..B|
00000cb0 4e 45 6e 6f 75 70 6c 0d 0a 44 45 43 79 70 6f 73 |NEnoupl..DECypos|
00000cc0 0d 0a 44 45 43 78 70 6f 73 0d 0a 4c 44 41 23 33 |..DECxpos..LDA#3|
00000cd0 0d 0a 53 54 41 66 69 6e 65 0d 0a 2e 6e 72 69 67 |..STAfine...nrig|
00000ce0 68 74 20 52 54 53 0d 0a 2e 6e 6f 75 70 6c 20 44 |ht RTS...noupl D|
00000cf0 45 43 78 70 6f 73 0d 0a 4c 44 41 23 31 0d 0a 53 |ECxpos..LDA#1..S|
00000d00 54 41 66 69 6e 65 0d 0a 2e 6e 6f 6d 6f 76 65 20 |TAfine...nomove |
00000d10 52 54 53 0d 0a 2e 72 69 67 68 74 20 4c 44 41 23 |RTS...right LDA#|
00000d20 30 0d 0a 53 54 41 72 67 68 74 73 0d 0a 4c 44 41 |0..STArghts..LDA|
00000d30 23 31 0d 0a 53 54 41 66 61 63 65 0d 0a 4c 44 41 |#1..STAface..LDA|
00000d40 78 70 6f 73 0d 0a 43 4d 50 23 39 0d 0a 42 45 51 |xpos..CMP#9..BEQ|
00000d50 72 69 67 68 74 73 63 72 0d 0a 43 4c 43 0d 0a 41 |rightscr..CLC..A|
00000d60 44 43 23 31 0d 0a 53 54 41 78 73 65 74 0d 0a 4c |DC#1..STAxset..L|
00000d70 44 41 79 70 6f 73 0d 0a 53 54 41 79 73 65 74 0d |DAypos..STAyset.|
00000d80 0a 4a 53 52 67 65 74 62 6c 6f 63 6b 0d 0a 4a 53 |.JSRgetblock..JS|
00000d90 52 64 6f 6f 72 63 68 0d 0a 42 43 53 6e 6f 75 70 |Rdoorch..BCSnoup|
00000da0 72 0d 0a 41 4e 44 23 26 33 30 0d 0a 43 4d 50 23 |r..AND#&30..CMP#|
00000db0 26 31 30 0d 0a 42 45 51 6e 6f 6d 6f 76 65 72 0d |&10..BEQnomover.|
00000dc0 0a 43 4d 50 23 26 32 30 0d 0a 42 45 51 6e 6f 6d |.CMP#&20..BEQnom|
00000dd0 6f 76 65 72 0d 0a 43 4d 50 23 26 33 30 0d 0a 42 |over..CMP#&30..B|
00000de0 4e 45 6e 6f 75 70 72 0d 0a 44 45 43 79 70 6f 73 |NEnoupr..DECypos|
00000df0 0d 0a 4c 44 41 23 34 0d 0a 2e 6e 6f 75 70 72 73 |..LDA#4...nouprs|
00000e00 20 49 4e 43 78 70 6f 73 0d 0a 53 54 41 66 69 6e | INCxpos..STAfin|
00000e10 65 0d 0a 2e 6e 6f 73 6e 64 20 52 54 53 0d 0a 2e |e...nosnd RTS...|
00000e20 6e 6f 75 70 72 20 4c 44 41 23 32 0d 0a 4a 4d 50 |noupr LDA#2..JMP|
00000e30 6e 6f 75 70 72 73 0d 0a 2e 6e 6f 6d 6f 76 65 72 |nouprs...nomover|
00000e40 20 4c 44 41 23 31 0d 0a 53 54 41 72 67 68 74 73 | LDA#1..STArghts|
00000e50 0d 0a 53 54 41 63 68 61 6e 67 65 64 0d 0a 52 54 |..STAchanged..RT|
00000e60 53 0d 0a 2e 6c 65 66 74 73 63 72 20 4c 44 41 23 |S...leftscr LDA#|
00000e70 39 0d 0a 53 54 41 78 70 6f 73 0d 0a 44 45 43 78 |9..STAxpos..DECx|
00000e80 73 63 72 0d 0a 2e 73 63 72 70 61 73 73 20 4a 4d |scr...scrpass JM|
00000e90 50 73 63 72 65 65 6e 0d 0a 2e 72 69 67 68 74 73 |Pscreen...rights|
00000ea0 63 72 20 4c 44 41 23 30 0d 0a 53 54 41 78 70 6f |cr LDA#0..STAxpo|
00000eb0 73 0d 0a 49 4e 43 78 73 63 72 0d 0a 42 4e 45 73 |s..INCxscr..BNEs|
00000ec0 63 72 70 61 73 73 0d 0a 2e 6a 75 6d 70 20 4c 44 |crpass...jump LD|
00000ed0 41 79 70 6f 73 0d 0a 43 4d 50 23 39 0d 0a 42 45 |Aypos..CMP#9..BE|
00000ee0 51 6e 6f 73 6e 64 0d 0a 43 4c 43 0d 0a 41 44 43 |Qnosnd..CLC..ADC|
00000ef0 23 31 0d 0a 53 54 41 79 73 65 74 0d 0a 4c 44 41 |#1..STAyset..LDA|
00000f00 78 70 6f 73 0d 0a 53 54 41 78 73 65 74 0d 0a 4a |xpos..STAxset..J|
00000f10 53 52 67 65 74 62 6c 6f 63 6b 0d 0a 41 4e 44 23 |SRgetblock..AND#|
00000f20 26 33 30 0d 0a 42 45 51 6e 6f 73 6e 64 0d 0a 4c |&30..BEQnosnd..L|
00000f30 44 41 23 33 0d 0a 53 54 41 75 70 76 65 6c 6f 0d |DA#3..STAupvelo.|
00000f40 0a 4c 44 41 73 6f 75 6e 64 0d 0a 42 45 51 6e 6f |.LDAsound..BEQno|
00000f50 73 6e 64 0d 0a 4c 44 41 23 37 0d 0a 4c 44 58 23 |snd..LDA#7..LDX#|
00000f60 28 6a 75 6d 70 6e 20 4d 4f 44 20 32 35 36 29 0d |(jumpn MOD 256).|
00000f70 0a 4c 44 59 23 28 6a 75 6d 70 6e 20 44 49 56 20 |.LDY#(jumpn DIV |
00000f80 32 35 36 29 0d 0a 4a 4d 50 6f 73 77 6f 72 64 0d |256)..JMPosword.|
00000f90 0a 2e 64 69 73 70 73 68 72 20 53 45 49 0d 0a 4c |..dispshr SEI..L|
00000fa0 44 41 77 69 70 65 72 0d 0a 42 45 51 6e 6f 77 69 |DAwiper..BEQnowi|
00000fb0 70 65 0d 0a 4c 44 59 23 30 0d 0a 2e 77 69 70 6c |pe..LDY#0...wipl|
00000fc0 6f 70 20 4c 44 41 28 77 69 72 65 70 29 2c 59 0d |op LDA(wirep),Y.|
00000fd0 0a 53 54 41 28 26 37 38 29 2c 59 0d 0a 49 4e 59 |.STA(&78),Y..INY|
00000fe0 0d 0a 43 50 59 23 33 32 0d 0a 42 4e 45 77 69 70 |..CPY#32..BNEwip|
00000ff0 6c 6f 70 0d 0a 4c 44 41 26 37 38 0d 0a 43 4c 43 |lop..LDA&78..CLC|
00001000 0d 0a 41 44 43 23 26 38 30 0d 0a 53 54 41 26 37 |..ADC#&80..STA&7|
00001010 38 0d 0a 4c 44 41 26 37 39 0d 0a 41 44 43 23 32 |8..LDA&79..ADC#2|
00001020 0d 0a 53 54 41 26 37 39 0d 0a 4c 44 59 23 30 0d |..STA&79..LDY#0.|
00001030 0a 2e 77 69 70 65 62 20 4c 44 41 28 77 69 72 65 |..wipeb LDA(wire|
00001040 70 62 29 2c 59 0d 0a 53 54 41 28 26 37 38 29 2c |pb),Y..STA(&78),|
00001050 59 0d 0a 49 4e 59 0d 0a 43 50 59 23 33 32 0d 0a |Y..INY..CPY#32..|
00001060 42 4e 45 77 69 70 65 62 0d 0a 2e 6e 6f 77 69 70 |BNEwipeb...nowip|
00001070 65 20 4c 44 41 23 31 0d 0a 53 54 41 77 69 70 65 |e LDA#1..STAwipe|
00001080 72 0d 0a 4c 44 41 78 70 6f 73 0d 0a 41 53 4c 20 |r..LDAxpos..ASL |
00001090 41 0d 0a 41 53 4c 20 41 0d 0a 41 53 4c 20 41 0d |A..ASL A..ASL A.|
000010a0 0a 41 53 4c 20 41 0d 0a 41 53 4c 20 41 0d 0a 41 |.ASL A..ASL A..A|
000010b0 53 4c 20 41 0d 0a 53 54 41 26 37 30 0d 0a 4c 44 |SL A..STA&70..LD|
000010c0 41 78 70 6f 73 0d 0a 4c 53 52 20 41 0d 0a 4c 53 |Axpos..LSR A..LS|
000010d0 52 20 41 0d 0a 43 4c 43 0d 0a 41 44 43 23 26 33 |R A..CLC..ADC#&3|
000010e0 35 0d 0a 53 54 41 26 37 31 0d 0a 4c 44 41 79 70 |5..STA&71..LDAyp|
000010f0 6f 73 0d 0a 43 4c 43 0d 0a 41 44 43 26 37 31 0d |os..CLC..ADC&71.|
00001100 0a 53 54 41 26 37 31 0d 0a 4c 44 41 79 70 6f 73 |.STA&71..LDAypos|
00001110 0d 0a 41 53 4c 20 41 0d 0a 41 53 4c 20 41 0d 0a |..ASL A..ASL A..|
00001120 43 4c 43 0d 0a 41 44 43 26 37 31 0d 0a 53 54 41 |CLC..ADC&71..STA|
00001130 26 37 31 0d 0a 4c 44 59 23 30 0d 0a 53 54 59 26 |&71..LDY#0..STY&|
00001140 37 32 0d 0a 4c 44 41 23 26 31 41 0d 0a 53 54 41 |72..LDA#&1A..STA|
00001150 26 37 33 0d 0a 4c 44 58 6d 6f 76 73 74 61 67 0d |&73..LDXmovstag.|
00001160 0a 4c 44 41 73 65 71 75 65 6e 2c 58 0d 0a 43 4c |.LDAsequen,X..CL|
00001170 43 0d 0a 41 44 43 66 69 6e 65 0d 0a 54 41 58 0d |C..ADCfine..TAX.|
00001180 0a 4c 44 41 26 37 30 0d 0a 43 4c 43 0d 0a 41 44 |.LDA&70..CLC..AD|
00001190 43 6c 6f 77 61 64 2c 58 0d 0a 53 54 41 26 37 30 |Clowad,X..STA&70|
000011a0 0d 0a 4c 44 41 26 37 31 0d 0a 41 44 43 68 69 67 |..LDA&71..ADChig|
000011b0 68 61 64 2c 58 0d 0a 53 54 41 26 37 31 0d 0a 4c |had,X..STA&71..L|
000011c0 44 41 6d 66 6c 61 67 0d 0a 42 4e 45 6d 6f 6e 73 |DAmflag..BNEmons|
000011d0 61 64 72 0d 0a 43 50 58 23 30 0d 0a 42 45 51 6e |adr..CPX#0..BEQn|
000011e0 6f 70 68 61 73 65 0d 0a 4c 44 41 6d 6f 76 73 74 |ophase..LDAmovst|
000011f0 61 67 0d 0a 43 4d 50 23 32 0d 0a 42 45 51 6e 6f |ag..CMP#2..BEQno|
00001200 70 68 61 73 65 0d 0a 4c 44 58 70 68 61 73 65 0d |phase..LDXphase.|
00001210 0a 49 4e 58 0d 0a 2e 61 64 64 70 68 20 4c 44 41 |.INX...addph LDA|
00001220 26 37 32 0d 0a 43 4c 43 0d 0a 41 44 43 23 26 38 |&72..CLC..ADC#&8|
00001230 30 0d 0a 53 54 41 26 37 32 0d 0a 4c 44 41 26 37 |0..STA&72..LDA&7|
00001240 33 0d 0a 41 44 43 23 30 0d 0a 53 54 41 26 37 33 |3..ADC#0..STA&73|
00001250 0d 0a 44 45 58 0d 0a 42 4e 45 61 64 64 70 68 0d |..DEX..BNEaddph.|
00001260 0a 4c 44 41 70 68 61 73 65 0d 0a 45 4f 52 23 31 |.LDAphase..EOR#1|
00001270 0d 0a 53 54 41 70 68 61 73 65 0d 0a 4a 4d 50 6e |..STAphase..JMPn|
00001280 6f 70 68 61 73 65 0d 0a 2e 6d 6f 6e 73 61 64 72 |ophase...monsadr|
00001290 20 4c 44 41 6d 6f 6e 73 74 61 74 0d 0a 45 4f 52 | LDAmonstat..EOR|
000012a0 23 31 0d 0a 53 54 41 6d 6f 6e 73 74 61 74 0d 0a |#1..STAmonstat..|
000012b0 41 53 4c 20 41 0d 0a 41 53 4c 20 41 0d 0a 41 53 |ASL A..ASL A..AS|
000012c0 4c 20 41 0d 0a 41 53 4c 20 41 0d 0a 41 53 4c 20 |L A..ASL A..ASL |
000012d0 41 0d 0a 43 4c 43 0d 0a 41 44 43 23 26 38 30 0d |A..CLC..ADC#&80.|
000012e0 0a 53 54 41 26 37 32 0d 0a 4c 44 41 23 26 31 42 |.STA&72..LDA#&1B|
000012f0 0d 0a 53 54 41 26 37 33 0d 0a 4c 44 41 23 31 0d |..STA&73..LDA#1.|
00001300 0a 53 54 41 77 69 70 65 72 6d 0d 0a 4c 44 41 6d |.STAwiperm..LDAm|
00001310 74 79 70 65 0d 0a 43 4d 50 23 32 0d 0a 42 4e 45 |type..CMP#2..BNE|
00001320 6e 6f 74 79 70 74 72 0d 0a 4c 44 41 26 37 32 0d |notyptr..LDA&72.|
00001330 0a 43 4c 43 0d 0a 41 44 43 23 26 38 30 0d 0a 53 |.CLC..ADC#&80..S|
00001340 54 41 26 37 32 0d 0a 4c 44 41 26 37 33 0d 0a 41 |TA&72..LDA&73..A|
00001350 44 43 23 30 0d 0a 53 54 41 26 37 33 0d 0a 2e 6e |DC#0..STA&73...n|
00001360 6f 74 79 70 74 72 20 4a 4d 50 6c 65 66 61 63 65 |otyptr JMPleface|
00001370 0d 0a 2e 6e 6f 70 68 61 73 65 20 4c 44 41 72 67 |...nophase LDArg|
00001380 68 74 73 0d 0a 42 45 51 6e 6f 74 72 67 68 74 0d |hts..BEQnotrght.|
00001390 0a 4c 44 41 26 37 30 0d 0a 43 4c 43 0d 0a 41 44 |.LDA&70..CLC..AD|
000013a0 43 23 33 32 0d 0a 53 54 41 26 37 30 0d 0a 4c 44 |C#32..STA&70..LD|
000013b0 41 26 37 31 0d 0a 41 44 43 23 30 0d 0a 53 54 41 |A&71..ADC#0..STA|
000013c0 26 37 31 0d 0a 2e 6e 6f 74 72 67 68 74 20 4c 44 |&71...notrght LD|
000013d0 41 66 61 63 65 0d 0a 42 4e 45 6c 65 66 61 63 65 |Aface..BNEleface|
000013e0 0d 0a 4c 44 41 26 37 32 0d 0a 43 4c 43 0d 0a 41 |..LDA&72..CLC..A|
000013f0 44 43 23 26 32 30 0d 0a 53 54 41 26 37 32 0d 0a |DC#&20..STA&72..|
00001400 2e 6c 65 66 61 63 65 20 4c 44 41 26 37 30 0d 0a |.leface LDA&70..|
00001410 53 54 41 26 37 38 0d 0a 4c 44 41 26 37 31 0d 0a |STA&78..LDA&71..|
00001420 53 54 41 26 37 39 0d 0a 2e 6c 61 64 69 73 70 20 |STA&79...ladisp |
00001430 4c 44 41 28 26 37 30 29 2c 59 0d 0a 53 54 41 28 |LDA(&70),Y..STA(|
00001440 77 69 72 65 70 29 2c 59 0d 0a 4f 52 41 28 26 37 |wirep),Y..ORA(&7|
00001450 32 29 2c 59 0d 0a 53 54 41 28 26 37 30 29 2c 59 |2),Y..STA(&70),Y|
00001460 0d 0a 49 4e 59 0d 0a 43 50 59 23 33 32 0d 0a 42 |..INY..CPY#32..B|
00001470 4e 45 6c 61 64 69 73 70 0d 0a 4c 44 41 26 37 32 |NEladisp..LDA&72|
00001480 0d 0a 43 4c 43 0d 0a 41 44 43 23 26 34 30 0d 0a |..CLC..ADC#&40..|
00001490 53 54 41 26 37 32 0d 0a 4c 44 41 26 37 33 0d 0a |STA&72..LDA&73..|
000014a0 41 44 43 23 30 0d 0a 53 54 41 26 37 33 0d 0a 4c |ADC#0..STA&73..L|
000014b0 44 41 26 37 30 0d 0a 43 4c 43 0d 0a 41 44 43 23 |DA&70..CLC..ADC#|
000014c0 26 38 30 0d 0a 53 54 41 26 37 30 0d 0a 4c 44 41 |&80..STA&70..LDA|
000014d0 26 37 31 0d 0a 41 44 43 23 32 0d 0a 53 54 41 26 |&71..ADC#2..STA&|
000014e0 37 31 0d 0a 4c 44 59 23 30 0d 0a 2e 6c 62 64 69 |71..LDY#0...lbdi|
000014f0 73 70 20 4c 44 41 28 26 37 30 29 2c 59 0d 0a 53 |sp LDA(&70),Y..S|
00001500 54 41 28 77 69 72 65 70 62 29 2c 59 0d 0a 4f 52 |TA(wirepb),Y..OR|
00001510 41 28 26 37 32 29 2c 59 0d 0a 53 54 41 28 26 37 |A(&72),Y..STA(&7|
00001520 30 29 2c 59 0d 0a 49 4e 59 0d 0a 43 50 59 23 33 |0),Y..INY..CPY#3|
00001530 32 0d 0a 42 4e 45 6c 62 64 69 73 70 0d 0a 43 4c |2..BNElbdisp..CL|
00001540 49 0d 0a 52 54 53 0d 0a 2e 77 61 69 74 20 4c 44 |I..RTS...wait LD|
00001550 41 63 6c 6f 63 6b 0d 0a 43 4d 50 26 38 30 0d 0a |Aclock..CMP&80..|
00001560 42 4e 45 77 61 69 74 0d 0a 4c 44 41 63 6c 6f 63 |BNEwait..LDAcloc|
00001570 6b 0d 0a 41 44 43 23 35 0d 0a 53 54 41 26 38 30 |k..ADC#5..STA&80|
00001580 0d 0a 52 54 53 0d 0a 2e 6a 75 6d 70 75 70 20 44 |..RTS...jumpup D|
00001590 45 43 75 70 76 65 6c 6f 0d 0a 4c 44 41 79 70 6f |ECupvelo..LDAypo|
000015a0 73 0d 0a 42 45 51 75 70 73 63 72 0d 0a 53 45 43 |s..BEQupscr..SEC|
000015b0 0d 0a 53 42 43 23 31 0d 0a 53 54 41 79 73 65 74 |..SBC#1..STAyset|
000015c0 0d 0a 4c 44 41 78 70 6f 73 0d 0a 53 54 41 78 73 |..LDAxpos..STAxs|
000015d0 65 74 0d 0a 4a 53 52 67 65 74 62 6c 6f 63 6b 0d |et..JSRgetblock.|
000015e0 0a 4a 53 52 64 6f 6f 72 63 68 0d 0a 42 43 53 75 |.JSRdoorch..BCSu|
000015f0 70 6f 6e 65 0d 0a 41 4e 44 23 26 33 30 0d 0a 42 |pone..AND#&30..B|
00001600 45 51 75 70 6f 6e 65 0d 0a 4c 44 41 23 30 0d 0a |EQupone..LDA#0..|
00001610 53 54 41 75 70 76 65 6c 6f 0d 0a 52 54 53 0d 0a |STAupvelo..RTS..|
00001620 2e 75 70 6f 6e 65 20 4c 44 41 23 36 0d 0a 53 54 |.upone LDA#6..ST|
00001630 41 66 69 6e 65 0d 0a 44 45 43 79 70 6f 73 0d 0a |Afine..DECypos..|
00001640 52 54 53 0d 0a 2e 75 70 73 63 72 20 44 45 43 79 |RTS...upscr DECy|
00001650 73 63 72 0d 0a 4c 44 41 23 39 0d 0a 53 54 41 79 |scr..LDA#9..STAy|
00001660 70 6f 73 0d 0a 4a 4d 50 73 63 72 65 65 6e 0d 0a |pos..JMPscreen..|
00001670 2e 73 63 72 65 65 6e 20 4c 44 41 23 30 0d 0a 53 |.screen LDA#0..S|
00001680 54 41 63 6c 65 61 72 75 70 0d 0a 53 54 41 6c 61 |TAclearup..STAla|
00001690 73 74 61 74 0d 0a 53 54 41 69 6e 76 66 6c 61 67 |stat..STAinvflag|
000016a0 0d 0a 4a 53 52 73 63 72 6f 66 66 0d 0a 4c 44 41 |..JSRscroff..LDA|
000016b0 78 70 6f 73 0d 0a 53 54 41 78 6f 6c 64 0d 0a 4c |xpos..STAxold..L|
000016c0 44 41 79 70 6f 73 0d 0a 53 54 41 79 6f 6c 64 0d |DAypos..STAyold.|
000016d0 0a 4a 53 52 70 6f 69 6e 74 0d 0a 4c 44 41 23 26 |.JSRpoint..LDA#&|
000016e0 46 46 0d 0a 53 54 41 79 73 65 74 0d 0a 2e 79 6c |FF..STAyset...yl|
000016f0 6f 70 20 4c 44 41 23 26 46 46 0d 0a 53 54 41 78 |op LDA#&FF..STAx|
00001700 73 65 74 0d 0a 49 4e 43 79 73 65 74 0d 0a 2e 78 |set..INCyset...x|
00001710 6c 6f 70 20 49 4e 43 78 73 65 74 0d 0a 4a 53 52 |lop INCxset..JSR|
00001720 64 61 72 6b 0d 0a 4c 44 41 78 73 65 74 0d 0a 43 |dark..LDAxset..C|
00001730 4d 50 23 39 0d 0a 42 45 51 6e 65 78 74 79 0d 0a |MP#9..BEQnexty..|
00001740 4a 4d 50 78 6c 6f 70 0d 0a 2e 6e 65 78 74 79 20 |JMPxlop...nexty |
00001750 4c 44 41 79 73 65 74 0d 0a 43 4d 50 23 39 0d 0a |LDAyset..CMP#9..|
00001760 42 4e 45 79 6c 6f 70 0d 0a 4a 53 52 73 62 6f 61 |BNEylop..JSRsboa|
00001770 72 64 0d 0a 4a 53 52 6e 61 6d 73 63 72 0d 0a 2e |rd..JSRnamscr...|
00001780 73 63 72 6f 6e 20 4c 44 41 26 44 30 31 31 0d 0a |scron LDA&D011..|
00001790 4f 52 41 23 26 31 30 0d 0a 53 54 41 26 44 30 31 |ORA#&10..STA&D01|
000017a0 31 0d 0a 4c 44 41 63 6c 6f 63 6b 0d 0a 43 4c 43 |1..LDAclock..CLC|
000017b0 0d 0a 41 44 43 23 34 0d 0a 53 54 41 26 38 30 0d |..ADC#4..STA&80.|
000017c0 0a 4c 44 41 23 30 0d 0a 53 54 41 77 69 70 65 72 |.LDA#0..STAwiper|
000017d0 0d 0a 53 54 41 77 69 70 65 72 6d 0d 0a 4c 44 41 |..STAwiperm..LDA|
000017e0 23 31 0d 0a 53 54 41 63 68 61 6e 67 65 64 0d 0a |#1..STAchanged..|
000017f0 4a 4d 50 6d 6f 6e 73 65 74 0d 0a 2e 6c 61 64 64 |JMPmonset...ladd|
00001800 65 72 62 20 4c 44 41 23 33 0d 0a 4a 53 52 6b 65 |erb LDA#3..JSRke|
00001810 79 62 79 74 65 0d 0a 42 43 53 66 61 6c 6c 73 65 |ybyte..BCSfallse|
00001820 74 0d 0a 4c 44 41 23 32 0d 0a 4a 53 52 6b 65 79 |t..LDA#2..JSRkey|
00001830 62 79 74 65 0d 0a 42 43 43 73 74 61 62 6c 65 0d |byte..BCCstable.|
00001840 0a 4c 44 41 23 31 0d 0a 53 54 41 75 70 76 65 6c |.LDA#1..STAupvel|
00001850 6f 0d 0a 4a 53 52 6a 75 6d 70 75 70 0d 0a 4a 4d |o..JSRjumpup..JM|
00001860 50 6f 6c 64 73 63 72 0d 0a 2e 73 74 61 62 6c 65 |Poldscr...stable|
00001870 20 4a 4d 50 6e 6f 66 61 6c 6c 0d 0a 2e 66 61 6c | JMPnofall...fal|
00001880 6c 73 65 74 20 4a 4d 50 6c 61 64 64 6f 77 6e 0d |lset JMPladdown.|
00001890 0a 2e 62 6c 6f 63 6b 6f 6e 20 4a 53 52 6f 62 6a |..blockon JSRobj|
000018a0 63 68 65 63 6b 0d 0a 4a 53 52 67 65 74 62 6c 6f |check..JSRgetblo|
000018b0 63 6b 0d 0a 4c 44 41 78 73 65 74 0d 0a 41 53 4c |ck..LDAxset..ASL|
000018c0 20 41 0d 0a 41 53 4c 20 41 0d 0a 41 53 4c 20 41 | A..ASL A..ASL A|
000018d0 0d 0a 41 53 4c 20 41 0d 0a 41 53 4c 20 41 0d 0a |..ASL A..ASL A..|
000018e0 41 53 4c 20 41 0d 0a 53 54 41 26 37 30 0d 0a 4c |ASL A..STA&70..L|
000018f0 44 41 78 73 65 74 0d 0a 4c 53 52 20 41 0d 0a 4c |DAxset..LSR A..L|
00001900 53 52 20 41 0d 0a 43 4c 43 0d 0a 41 44 43 23 26 |SR A..CLC..ADC#&|
00001910 33 35 0d 0a 53 54 41 26 37 31 0d 0a 4c 44 41 79 |35..STA&71..LDAy|
00001920 73 65 74 0d 0a 43 4c 43 0d 0a 41 44 43 26 37 31 |set..CLC..ADC&71|
00001930 0d 0a 53 54 41 26 37 31 0d 0a 4c 44 41 79 73 65 |..STA&71..LDAyse|
00001940 74 0d 0a 41 53 4c 20 41 0d 0a 41 53 4c 20 41 0d |t..ASL A..ASL A.|
00001950 0a 43 4c 43 0d 0a 41 44 43 26 37 31 0d 0a 53 54 |.CLC..ADC&71..ST|
00001960 41 26 37 31 0d 0a 4c 44 41 26 37 32 0d 0a 4c 53 |A&71..LDA&72..LS|
00001970 52 20 41 0d 0a 4c 53 52 20 41 0d 0a 43 4c 43 0d |R A..LSR A..CLC.|
00001980 0a 41 44 43 23 26 32 30 0d 0a 53 54 41 26 37 33 |.ADC#&20..STA&73|
00001990 0d 0a 4c 44 41 26 37 32 0d 0a 43 4d 50 23 33 30 |..LDA&72..CMP#30|
000019a0 0d 0a 42 45 51 64 6f 6f 72 63 6f 6c 0d 0a 4c 53 |..BEQdoorcol..LS|
000019b0 52 20 41 0d 0a 52 4f 52 20 41 0d 0a 52 4f 52 20 |R A..ROR A..ROR |
000019c0 41 0d 0a 41 4e 44 23 26 43 30 0d 0a 53 54 41 26 |A..AND#&C0..STA&|
000019d0 37 32 0d 0a 4c 44 59 23 30 0d 0a 2e 74 72 61 6e |72..LDY#0...tran|
000019e0 73 74 6f 70 20 4c 44 41 28 26 37 30 29 2c 59 0d |stop LDA(&70),Y.|
000019f0 0a 41 4e 44 23 26 43 30 0d 0a 43 4c 43 0d 0a 41 |.AND#&C0..CLC..A|
00001a00 44 43 28 26 37 32 29 2c 59 0d 0a 53 54 41 28 26 |DC(&72),Y..STA(&|
00001a10 37 30 29 2c 59 0d 0a 49 4e 59 0d 0a 43 50 59 23 |70),Y..INY..CPY#|
00001a20 26 34 30 0d 0a 42 4e 45 74 72 61 6e 73 74 6f 70 |&40..BNEtranstop|
00001a30 0d 0a 4c 44 59 23 30 0d 0a 4c 44 41 26 37 32 0d |..LDY#0..LDA&72.|
00001a40 0a 43 4c 43 0d 0a 41 44 43 23 26 34 30 0d 0a 53 |.CLC..ADC#&40..S|
00001a50 54 41 26 37 32 0d 0a 4c 44 41 26 37 30 0d 0a 43 |TA&72..LDA&70..C|
00001a60 4c 43 0d 0a 41 44 43 23 26 38 30 0d 0a 53 54 41 |LC..ADC#&80..STA|
00001a70 26 37 30 0d 0a 4c 44 41 26 37 31 0d 0a 41 44 43 |&70..LDA&71..ADC|
00001a80 23 32 0d 0a 53 54 41 26 37 31 0d 0a 2e 74 72 61 |#2..STA&71...tra|
00001a90 6e 73 62 6f 74 20 4c 44 41 28 26 37 30 29 2c 59 |nsbot LDA(&70),Y|
00001aa0 0d 0a 41 4e 44 23 26 43 30 0d 0a 43 4c 43 0d 0a |..AND#&C0..CLC..|
00001ab0 41 44 43 28 26 37 32 29 2c 59 0d 0a 53 54 41 28 |ADC(&72),Y..STA(|
00001ac0 26 37 30 29 2c 59 0d 0a 49 4e 59 0d 0a 43 50 59 |&70),Y..INY..CPY|
00001ad0 23 26 34 30 0d 0a 42 4e 45 74 72 61 6e 73 62 6f |#&40..BNEtransbo|
00001ae0 74 0d 0a 52 54 53 0d 0a 2e 64 6f 6f 72 63 6f 6c |t..RTS...doorcol|
00001af0 20 4a 4d 50 6c 6f 63 6b 74 79 70 65 0d 0a 2e 67 | JMPlocktype...g|
00001b00 65 74 62 6c 6f 63 6b 20 4c 44 41 23 26 33 30 0d |etblock LDA#&30.|
00001b10 0a 43 4c 43 0d 0a 41 44 43 78 73 63 72 0d 0a 53 |.CLC..ADCxscr..S|
00001b20 54 41 26 37 31 0d 0a 4c 44 41 79 73 63 72 0d 0a |TA&71..LDAyscr..|
00001b30 41 53 4c 20 41 0d 0a 41 53 4c 20 41 0d 0a 41 53 |ASL A..ASL A..AS|
00001b40 4c 20 41 0d 0a 41 53 4c 20 41 0d 0a 43 4c 43 0d |L A..ASL A..CLC.|
00001b50 0a 41 44 43 26 37 31 0d 0a 53 54 41 73 63 72 6e |.ADC&71..STAscrn|
00001b60 6f 0d 0a 53 54 41 26 37 31 0d 0a 4c 44 41 79 73 |o..STA&71..LDAys|
00001b70 65 74 0d 0a 53 54 41 26 37 30 0d 0a 41 53 4c 20 |et..STA&70..ASL |
00001b80 41 0d 0a 41 53 4c 20 41 0d 0a 41 53 4c 20 41 0d |A..ASL A..ASL A.|
00001b90 0a 50 48 41 0d 0a 43 4c 43 0d 0a 41 44 43 26 37 |.PHA..CLC..ADC&7|
00001ba0 30 0d 0a 53 54 41 26 37 30 0d 0a 50 4c 41 0d 0a |0..STA&70..PLA..|
00001bb0 41 53 4c 20 41 0d 0a 43 4c 43 0d 0a 41 44 43 26 |ASL A..CLC..ADC&|
00001bc0 37 30 0d 0a 53 54 41 26 37 30 0d 0a 4c 44 59 78 |70..STA&70..LDYx|
00001bd0 73 65 74 0d 0a 4c 44 41 78 64 61 74 61 2c 59 0d |set..LDAxdata,Y.|
00001be0 0a 54 41 59 0d 0a 4c 44 41 28 26 37 30 29 2c 59 |.TAY..LDA(&70),Y|
00001bf0 0d 0a 52 4f 4c 20 41 0d 0a 52 4f 4c 20 41 0d 0a |..ROL A..ROL A..|
00001c00 52 4f 4c 20 41 0d 0a 41 4e 44 23 33 0d 0a 53 54 |ROL A..AND#3..ST|
00001c10 41 26 37 32 0d 0a 49 4e 59 0d 0a 4c 44 41 28 26 |A&72..INY..LDA(&|
00001c20 37 30 29 2c 59 0d 0a 4c 53 52 20 41 0d 0a 4c 53 |70),Y..LSR A..LS|
00001c30 52 20 41 0d 0a 4c 53 52 20 41 0d 0a 4c 53 52 20 |R A..LSR A..LSR |
00001c40 41 0d 0a 41 4e 44 23 31 32 0d 0a 43 4c 43 0d 0a |A..AND#12..CLC..|
00001c50 41 44 43 26 37 32 0d 0a 53 54 41 26 37 32 0d 0a |ADC&72..STA&72..|
00001c60 4c 44 41 78 73 65 74 0d 0a 4c 53 52 20 41 0d 0a |LDAxset..LSR A..|
00001c70 54 41 59 0d 0a 4c 44 41 68 62 64 61 74 2c 59 0d |TAY..LDAhbdat,Y.|
00001c80 0a 54 41 59 0d 0a 4c 44 41 28 26 37 30 29 2c 59 |.TAY..LDA(&70),Y|
00001c90 0d 0a 53 54 41 26 37 33 0d 0a 4c 44 41 78 73 65 |..STA&73..LDAxse|
00001ca0 74 0d 0a 41 4e 44 23 31 0d 0a 42 4e 45 62 69 74 |t..AND#1..BNEbit|
00001cb0 32 0d 0a 4c 44 41 26 37 33 0d 0a 41 53 4c 20 41 |2..LDA&73..ASL A|
00001cc0 0d 0a 52 4f 4c 20 41 0d 0a 52 4f 4c 20 41 0d 0a |..ROL A..ROL A..|
00001cd0 4a 4d 50 66 62 67 6f 74 0d 0a 2e 62 69 74 32 20 |JMPfbgot...bit2 |
00001ce0 4c 44 41 26 37 33 0d 0a 41 53 4c 20 41 0d 0a 52 |LDA&73..ASL A..R|
00001cf0 4f 4c 20 41 0d 0a 2e 66 62 67 6f 74 20 41 4e 44 |OL A...fbgot AND|
00001d00 23 31 0d 0a 41 53 4c 20 41 0d 0a 41 53 4c 20 41 |#1..ASL A..ASL A|
00001d10 0d 0a 41 53 4c 20 41 0d 0a 41 53 4c 20 41 0d 0a |..ASL A..ASL A..|
00001d20 43 4c 43 0d 0a 41 44 43 26 37 32 0d 0a 41 53 4c |CLC..ADC&72..ASL|
00001d30 20 41 0d 0a 53 54 41 26 37 32 0d 0a 52 54 53 0d | A..STA&72..RTS.|
00001d40 0a 2e 62 6c 61 73 63 72 20 4a 53 52 73 63 72 6f |..blascr JSRscro|
00001d50 66 66 0d 0a 4c 44 59 23 30 0d 0a 53 54 59 26 37 |ff..LDY#0..STY&7|
00001d60 30 0d 0a 4c 44 41 23 26 33 30 0d 0a 53 54 41 26 |0..LDA#&30..STA&|
00001d70 37 31 0d 0a 2e 62 6c 61 6e 6c 6f 70 20 4c 44 41 |71...blanlop LDA|
00001d80 28 26 37 30 29 2c 59 0d 0a 41 4e 44 23 26 43 30 |(&70),Y..AND#&C0|
00001d90 0d 0a 53 54 41 28 26 37 30 29 2c 59 0d 0a 49 4e |..STA(&70),Y..IN|
00001da0 59 0d 0a 42 4e 45 62 6c 61 6e 6c 6f 70 0d 0a 49 |Y..BNEblanlop..I|
00001db0 4e 43 26 37 31 0d 0a 4c 44 41 26 37 31 0d 0a 43 |NC&71..LDA&71..C|
00001dc0 4d 50 23 26 38 30 0d 0a 42 4e 45 62 6c 61 6e 6c |MP#&80..BNEblanl|
00001dd0 6f 70 0d 0a 4a 4d 50 73 63 72 6f 6e 0d 0a 2e 70 |op..JMPscron...p|
00001de0 75 74 63 68 20 41 53 4c 20 41 0d 0a 41 53 4c 20 |utch ASL A..ASL |
00001df0 41 0d 0a 41 53 4c 20 41 0d 0a 54 41 58 0d 0a 4c |A..ASL A..TAX..L|
00001e00 44 41 23 30 0d 0a 53 54 41 26 37 30 0d 0a 4c 44 |DA#0..STA&70..LD|
00001e10 41 23 26 33 30 0d 0a 53 54 41 26 37 31 0d 0a 4c |A#&30..STA&71..L|
00001e20 44 59 78 63 68 0d 0a 2e 78 6c 6f 70 63 20 42 45 |DYxch...xlopc BE|
00001e30 51 6e 6f 78 63 68 0d 0a 4c 44 41 26 37 30 0d 0a |Qnoxch..LDA&70..|
00001e40 43 4c 43 0d 0a 41 44 43 23 26 32 30 0d 0a 53 54 |CLC..ADC#&20..ST|
00001e50 41 26 37 30 0d 0a 4c 44 41 26 37 31 0d 0a 41 44 |A&70..LDA&71..AD|
00001e60 43 23 30 0d 0a 53 54 41 26 37 31 0d 0a 44 45 59 |C#0..STA&71..DEY|
00001e70 0d 0a 4a 4d 50 78 6c 6f 70 63 0d 0a 2e 6e 6f 78 |..JMPxlopc...nox|
00001e80 63 68 20 4c 44 59 79 63 68 0d 0a 2e 79 6c 6f 70 |ch LDYych...ylop|
00001e90 63 20 42 45 51 6e 6f 79 63 68 0d 0a 4c 44 41 26 |c BEQnoych..LDA&|
00001ea0 37 30 0d 0a 43 4c 43 0d 0a 41 44 43 23 26 38 30 |70..CLC..ADC#&80|
00001eb0 0d 0a 53 54 41 26 37 30 0d 0a 4c 44 41 26 37 31 |..STA&70..LDA&71|
00001ec0 0d 0a 41 44 43 23 32 0d 0a 53 54 41 26 37 31 0d |..ADC#2..STA&71.|
00001ed0 0a 44 45 59 0d 0a 4a 4d 50 79 6c 6f 70 63 0d 0a |.DEY..JMPylopc..|
00001ee0 2e 6e 6f 79 63 68 20 4c 44 59 23 30 0d 0a 2e 73 |.noych LDY#0...s|
00001ef0 6c 69 6e 65 20 4c 44 41 26 43 30 30 2c 58 0d 0a |line LDA&C00,X..|
00001f00 2e 6c 69 6e 65 6c 6f 70 20 50 48 41 0d 0a 41 53 |.linelop PHA..AS|
00001f10 4c 20 41 0d 0a 52 4f 4c 20 41 0d 0a 52 4f 4c 20 |L A..ROL A..ROL |
00001f20 41 0d 0a 41 4e 44 23 33 0d 0a 42 45 51 62 6c 61 |A..AND#3..BEQbla|
00001f30 6e 63 68 0d 0a 53 54 41 26 38 30 0d 0a 4c 44 41 |nch..STA&80..LDA|
00001f40 23 30 0d 0a 2e 63 6f 6c 63 68 20 43 4c 43 0d 0a |#0...colch CLC..|
00001f50 41 44 43 63 6f 6c 0d 0a 44 45 43 26 38 30 0d 0a |ADCcol..DEC&80..|
00001f60 42 4e 45 63 6f 6c 63 68 0d 0a 2e 62 6c 61 6e 63 |BNEcolch...blanc|
00001f70 68 20 53 54 41 26 38 30 0d 0a 4c 44 41 28 26 37 |h STA&80..LDA(&7|
00001f80 30 29 2c 59 0d 0a 41 4e 44 23 26 43 30 0d 0a 4f |0),Y..AND#&C0..O|
00001f90 52 41 26 38 30 0d 0a 45 4f 52 69 6e 76 66 6c 61 |RA&80..EORinvfla|
00001fa0 67 0d 0a 53 54 41 28 26 37 30 29 2c 59 0d 0a 54 |g..STA(&70),Y..T|
00001fb0 59 41 0d 0a 43 4c 43 0d 0a 41 44 43 23 38 0d 0a |YA..CLC..ADC#8..|
00001fc0 54 41 59 0d 0a 43 4d 50 23 26 32 30 0d 0a 42 43 |TAY..CMP#&20..BC|
00001fd0 53 6e 65 77 6c 69 6e 0d 0a 50 4c 41 0d 0a 41 53 |Snewlin..PLA..AS|
00001fe0 4c 20 41 0d 0a 41 53 4c 20 41 0d 0a 4a 4d 50 6c |L A..ASL A..JMPl|
00001ff0 69 6e 65 6c 6f 70 0d 0a 2e 6e 65 77 6c 69 6e 20 |inelop...newlin |
00002000 41 4e 44 23 37 0d 0a 54 41 59 0d 0a 50 4c 41 0d |AND#7..TAY..PLA.|
00002010 0a 49 4e 59 0d 0a 49 4e 58 0d 0a 43 50 59 23 38 |.INY..INX..CPY#8|
00002020 0d 0a 42 4e 45 73 6c 69 6e 65 0d 0a 52 54 53 0d |..BNEsline..RTS.|
00002030 0a 0d 0a 2e 73 74 72 69 6e 67 20 4c 44 59 23 30 |....string LDY#0|
00002040 0d 0a 4c 44 41 28 26 37 32 29 2c 59 0d 0a 43 4d |..LDA(&72),Y..CM|
00002050 50 23 26 46 46 0d 0a 42 45 51 73 74 72 65 6e 64 |P#&FF..BEQstrend|
00002060 0d 0a 4a 53 52 70 75 74 63 68 0d 0a 49 4e 43 78 |..JSRputch..INCx|
00002070 63 68 0d 0a 4c 44 41 26 37 32 0d 0a 43 4c 43 0d |ch..LDA&72..CLC.|
00002080 0a 41 44 43 23 31 0d 0a 53 54 41 26 37 32 0d 0a |.ADC#1..STA&72..|
00002090 4c 44 41 26 37 33 0d 0a 41 44 43 23 30 0d 0a 53 |LDA&73..ADC#0..S|
000020a0 54 41 26 37 33 0d 0a 4a 4d 50 73 74 72 69 6e 67 |TA&73..JMPstring|
000020b0 0d 0a 2e 71 75 69 74 63 68 20 4c 44 41 23 37 0d |...quitch LDA#7.|
000020c0 0a 4a 53 52 6b 65 79 62 79 74 65 0d 0a 42 43 53 |.JSRkeybyte..BCS|
000020d0 71 75 69 74 6f 6b 0d 0a 2e 73 74 72 65 6e 64 20 |quitok...strend |
000020e0 52 54 53 0d 0a 2e 71 75 69 74 6f 6b 20 50 4c 41 |RTS...quitok PLA|
000020f0 0d 0a 50 4c 41 0d 0a 4c 44 41 23 38 0d 0a 4a 53 |..PLA..LDA#8..JS|
00002100 52 6b 65 79 62 79 74 65 0d 0a 42 43 43 7a 61 70 |Rkeybyte..BCCzap|
00002110 0d 0a 4a 4d 50 70 72 6f 67 0d 0a 2e 7a 61 70 20 |..JMPprog...zap |
00002120 4c 44 41 78 6f 6c 64 0d 0a 53 54 41 78 70 6f 73 |LDAxold..STAxpos|
00002130 0d 0a 4c 44 41 79 6f 6c 64 0d 0a 53 54 41 79 70 |..LDAyold..STAyp|
00002140 6f 73 0d 0a 4c 44 41 73 6f 75 6e 64 0d 0a 42 45 |os..LDAsound..BE|
00002150 51 6e 6f 7a 61 70 73 0d 0a 4c 44 41 23 37 0d 0a |Qnozaps..LDA#7..|
00002160 4c 44 58 23 28 7a 61 70 6e 20 4d 4f 44 20 32 35 |LDX#(zapn MOD 25|
00002170 36 29 0d 0a 4c 44 59 23 28 7a 61 70 6e 20 44 49 |6)..LDY#(zapn DI|
00002180 56 20 32 35 36 29 0d 0a 4a 53 52 6f 73 77 6f 72 |V 256)..JSRoswor|
00002190 64 0d 0a 2e 6e 6f 7a 61 70 73 20 4c 44 41 23 31 |d...nozaps LDA#1|
000021a0 0d 0a 53 54 41 70 6f 77 63 68 61 6e 67 65 0d 0a |..STApowchange..|
000021b0 4c 44 41 70 6f 77 65 72 0d 0a 53 45 43 0d 0a 53 |LDApower..SEC..S|
000021c0 42 43 23 26 32 38 0d 0a 53 54 41 70 6f 77 65 72 |BC#&28..STApower|
000021d0 0d 0a 42 45 51 79 6f 75 64 69 65 0d 0a 42 43 43 |..BEQyoudie..BCC|
000021e0 79 6f 75 64 69 65 0d 0a 4a 4d 50 6e 65 77 73 63 |youdie..JMPnewsc|
000021f0 72 0d 0a 2e 79 6f 75 64 69 65 20 4a 4d 50 6b 69 |r...youdie JMPki|
00002200 6c 6c 75 0d 0a 2e 67 61 6d 65 6f 76 65 72 20 4c |llu...gameover L|
00002210 44 41 23 35 0d 0a 53 54 41 78 63 68 0d 0a 4c 44 |DA#5..STAxch..LD|
00002220 41 23 31 36 0d 0a 53 54 41 79 63 68 0d 0a 4c 44 |A#16..STAych..LD|
00002230 41 23 31 0d 0a 53 54 41 63 6f 6c 0d 0a 4c 44 41 |A#1..STAcol..LDA|
00002240 23 28 67 61 6d 64 65 61 64 20 4d 4f 44 20 32 35 |#(gamdead MOD 25|
00002250 36 29 0d 0a 53 54 41 26 37 32 0d 0a 4c 44 41 23 |6)..STA&72..LDA#|
00002260 28 67 61 6d 64 65 61 64 20 44 49 56 20 32 35 36 |(gamdead DIV 256|
00002270 29 0d 0a 53 54 41 26 37 33 0d 0a 4a 53 52 73 74 |)..STA&73..JSRst|
00002280 72 69 6e 67 0d 0a 4c 44 41 23 30 0d 0a 50 48 41 |ring..LDA#0..PHA|
00002290 0d 0a 2e 62 65 6c 6c 6f 70 20 4c 44 41 63 6c 6f |...bellop LDAclo|
000022a0 63 6b 0d 0a 43 4c 43 0d 0a 41 44 43 23 31 30 30 |ck..CLC..ADC#100|
000022b0 0d 0a 53 54 41 26 38 30 0d 0a 2e 62 65 6c 77 61 |..STA&80...belwa|
000022c0 69 74 20 4c 44 41 63 6c 6f 63 6b 0d 0a 43 4d 50 |it LDAclock..CMP|
000022d0 26 38 30 0d 0a 42 4e 45 62 65 6c 77 61 69 74 0d |&80..BNEbelwait.|
000022e0 0a 4c 44 41 73 6f 75 6e 64 0d 0a 42 45 51 6e 6f |.LDAsound..BEQno|
000022f0 62 65 6c 6c 0d 0a 4c 44 41 23 37 0d 0a 4c 44 58 |bell..LDA#7..LDX|
00002300 23 28 6f 76 65 72 20 4d 4f 44 20 32 35 36 29 0d |#(over MOD 256).|
00002310 0a 4c 44 59 23 28 6f 76 65 72 20 44 49 56 20 32 |.LDY#(over DIV 2|
00002320 35 36 29 0d 0a 4a 53 52 6f 73 77 6f 72 64 0d 0a |56)..JSRosword..|
00002330 2e 6e 6f 62 65 6c 6c 20 50 4c 41 0d 0a 43 4c 43 |.nobell PLA..CLC|
00002340 0d 0a 41 44 43 23 31 0d 0a 50 48 41 0d 0a 43 4d |..ADC#1..PHA..CM|
00002350 50 23 34 0d 0a 42 4e 45 62 65 6c 6c 6f 70 0d 0a |P#4..BNEbellop..|
00002360 50 4c 41 0d 0a 52 54 53 0d 0a 2e 67 61 6d 64 65 |PLA..RTS...gamde|
00002370 61 64 20 45 51 55 42 37 0d 0a 45 51 55 42 31 0d |ad EQUB7..EQUB1.|
00002380 0a 45 51 55 42 31 32 0d 0a 45 51 55 42 35 0d 0a |.EQUB12..EQUB5..|
00002390 45 51 55 42 30 0d 0a 45 51 55 42 32 32 0d 0a 45 |EQUB0..EQUB22..E|
000023a0 51 55 42 31 39 0d 0a 45 51 55 42 35 0d 0a 45 51 |QUB19..EQUB5..EQ|
000023b0 55 42 31 35 0d 0a 45 51 55 42 32 35 35 0d 0a 2e |UB15..EQUB255...|
000023c0 6f 76 65 72 20 45 51 55 57 31 0d 0a 45 51 55 57 |over EQUW1..EQUW|
000023d0 2d 31 35 0d 0a 45 51 55 57 30 0d 0a 45 51 55 57 |-15..EQUW0..EQUW|
000023e0 35 0d 0a 2e 73 62 6f 61 72 64 20 4c 44 41 70 6f |5...sboard LDApo|
000023f0 77 63 68 61 6e 67 65 0d 0a 42 45 51 6e 6f 70 6f |wchange..BEQnopo|
00002400 77 65 72 0d 0a 4c 44 58 23 30 0d 0a 2e 70 6f 77 |wer..LDX#0...pow|
00002410 6c 6f 70 20 4c 44 41 26 37 43 37 30 2c 58 0d 0a |lop LDA&7C70,X..|
00002420 41 4e 44 23 26 43 30 0d 0a 4f 52 41 23 34 0d 0a |AND#&C0..ORA#4..|
00002430 53 54 41 26 37 43 37 30 2c 58 0d 0a 0d 0a 49 4e |STA&7C70,X....IN|
00002440 58 0d 0a 43 50 58 70 6f 77 65 72 0d 0a 42 4e 45 |X..CPXpower..BNE|
00002450 70 6f 77 6c 6f 70 0d 0a 2e 70 6f 77 6e 6f 6c 20 |powlop...pownol |
00002460 4c 44 41 26 37 43 37 30 2c 58 0d 0a 41 4e 44 23 |LDA&7C70,X..AND#|
00002470 26 43 30 0d 0a 53 54 41 26 37 43 37 30 2c 58 0d |&C0..STA&7C70,X.|
00002480 0a 49 4e 58 0d 0a 42 4e 45 70 6f 77 6e 6f 6c 0d |.INX..BNEpownol.|
00002490 0a 2e 6e 6f 70 6f 77 65 72 20 4c 44 41 6f 62 63 |..nopower LDAobc|
000024a0 68 0d 0a 42 45 51 66 69 6e 6f 62 73 63 0d 0a 4c |h..BEQfinobsc..L|
000024b0 44 41 23 38 0d 0a 53 54 41 78 63 68 0d 0a 4c 44 |DA#8..STAxch..LD|
000024c0 41 23 32 36 0d 0a 53 54 41 79 63 68 0d 0a 4c 44 |A#26..STAych..LD|
000024d0 41 6f 62 6a 65 63 74 73 0d 0a 43 4d 50 23 26 32 |Aobjects..CMP#&2|
000024e0 30 0d 0a 42 43 53 62 6c 61 6e 6b 6f 62 61 0d 0a |0..BCSblankoba..|
000024f0 54 41 59 0d 0a 4a 53 52 64 72 61 77 6f 70 0d 0a |TAY..JSRdrawop..|
00002500 4a 4d 50 73 65 63 6f 6e 64 6f 0d 0a 2e 62 6c 61 |JMPsecondo...bla|
00002510 6e 6b 6f 62 61 20 4a 53 52 62 6c 61 6e 6b 6f 62 |nkoba JSRblankob|
00002520 0d 0a 4a 4d 50 73 65 63 6f 6e 64 6f 0d 0a 2e 62 |..JMPsecondo...b|
00002530 6c 61 6e 6b 6f 62 20 4c 44 41 23 30 0d 0a 4a 53 |lankob LDA#0..JS|
00002540 52 70 75 74 63 68 0d 0a 49 4e 43 78 63 68 0d 0a |Rputch..INCxch..|
00002550 4c 44 41 23 30 0d 0a 4a 53 52 70 75 74 63 68 0d |LDA#0..JSRputch.|
00002560 0a 49 4e 43 79 63 68 0d 0a 4c 44 41 23 30 0d 0a |.INCych..LDA#0..|
00002570 4a 53 52 70 75 74 63 68 0d 0a 44 45 43 78 63 68 |JSRputch..DECxch|
00002580 0d 0a 4c 44 41 23 30 0d 0a 4a 4d 50 70 75 74 63 |..LDA#0..JMPputc|
00002590 68 0d 0a 2e 73 65 63 6f 6e 64 6f 20 4c 44 41 23 |h...secondo LDA#|
000025a0 31 30 0d 0a 53 54 41 78 63 68 0d 0a 4c 44 41 23 |10..STAxch..LDA#|
000025b0 32 36 0d 0a 53 54 41 79 63 68 0d 0a 4c 44 41 6f |26..STAych..LDAo|
000025c0 62 6a 65 63 74 73 2b 31 0d 0a 43 4d 50 23 26 32 |bjects+1..CMP#&2|
000025d0 30 0d 0a 42 43 53 62 6c 61 6e 6b 6f 62 62 0d 0a |0..BCSblankobb..|
000025e0 54 41 59 0d 0a 4a 53 52 64 72 61 77 6f 70 0d 0a |TAY..JSRdrawop..|
000025f0 4a 4d 50 66 69 6e 6f 62 73 63 0d 0a 2e 62 6c 61 |JMPfinobsc...bla|
00002600 6e 6b 6f 62 62 20 4a 53 52 62 6c 61 6e 6b 6f 62 |nkobb JSRblankob|
00002610 0d 0a 2e 66 69 6e 6f 62 73 63 20 4c 44 41 73 63 |...finobsc LDAsc|
00002620 72 63 68 0d 0a 42 45 51 6e 6f 73 63 72 0d 0a 4a |rch..BEQnoscr..J|
00002630 53 52 73 63 6f 72 62 0d 0a 2e 6e 6f 73 63 72 20 |SRscorb...noscr |
00002640 4c 44 41 6f 62 63 68 0d 0a 42 45 51 6e 6f 6f 62 |LDAobch..BEQnoob|
00002650 63 68 0d 0a 4c 44 41 63 6c 6f 63 6b 0d 0a 43 4c |ch..LDAclock..CL|
00002660 43 0d 0a 41 44 43 23 35 0d 0a 53 54 41 26 38 30 |C..ADC#5..STA&80|
00002670 0d 0a 2e 6e 6f 6f 62 63 68 20 4c 44 41 23 30 0d |...noobch LDA#0.|
00002680 0a 53 54 41 6f 62 63 68 0d 0a 53 54 41 70 6f 77 |.STAobch..STApow|
00002690 63 68 61 6e 67 65 0d 0a 53 54 41 73 63 72 63 68 |change..STAscrch|
000026a0 0d 0a 52 54 53 0d 0a 2e 64 72 61 77 6f 70 20 4c |..RTS...drawop L|
000026b0 44 41 78 63 68 0d 0a 4c 53 52 20 41 0d 0a 53 54 |DAxch..LSR A..ST|
000026c0 41 78 73 65 74 0d 0a 4c 44 41 79 63 68 0d 0a 53 |Axset..LDAych..S|
000026d0 45 43 0d 0a 53 42 43 23 32 0d 0a 4c 53 52 20 41 |EC..SBC#2..LSR A|
000026e0 0d 0a 53 54 41 79 73 65 74 0d 0a 4a 53 52 64 72 |..STAyset..JSRdr|
000026f0 61 77 6f 62 6a 0d 0a 2e 6f 62 6a 65 63 74 68 20 |awobj...objecth |
00002700 4c 44 59 23 30 0d 0a 2e 6f 62 6c 6f 70 20 4c 44 |LDY#0...oblop LD|
00002710 41 26 46 41 30 2c 59 0d 0a 41 4e 44 23 31 35 0d |A&FA0,Y..AND#15.|
00002720 0a 53 54 41 26 46 32 30 2c 59 0d 0a 4c 44 41 26 |.STA&F20,Y..LDA&|
00002730 46 43 30 2c 59 0d 0a 41 4e 44 23 31 35 0d 0a 53 |FC0,Y..AND#15..S|
00002740 54 41 26 46 34 30 2c 59 0d 0a 4c 44 41 26 46 45 |TA&F40,Y..LDA&FE|
00002750 30 2c 59 0d 0a 4c 53 52 20 41 0d 0a 4c 53 52 20 |0,Y..LSR A..LSR |
00002760 41 0d 0a 4c 53 52 20 41 0d 0a 4c 53 52 20 41 0d |A..LSR A..LSR A.|
00002770 0a 41 4e 44 23 31 35 0d 0a 53 54 41 26 46 36 30 |.AND#15..STA&F60|
00002780 2c 59 0d 0a 4c 44 41 26 46 45 30 2c 59 0d 0a 41 |,Y..LDA&FE0,Y..A|
00002790 4e 44 23 31 35 0d 0a 53 54 41 26 46 38 30 2c 59 |ND#15..STA&F80,Y|
000027a0 0d 0a 49 4e 59 0d 0a 43 50 59 23 33 32 0d 0a 42 |..INY..CPY#32..B|
000027b0 4e 45 6f 62 6c 6f 70 0d 0a 52 54 53 0d 0a 2e 6f |NEoblop..RTS...o|
000027c0 62 6a 63 68 65 63 6b 20 4c 44 59 23 30 0d 0a 2e |bjcheck LDY#0...|
000027d0 6f 62 63 6c 6f 70 20 4c 44 41 26 46 32 30 2c 59 |obclop LDA&F20,Y|
000027e0 0d 0a 43 4d 50 78 73 65 74 0d 0a 42 4e 45 6e 6f |..CMPxset..BNEno|
000027f0 74 74 68 61 74 0d 0a 4c 44 41 26 46 34 30 2c 59 |tthat..LDA&F40,Y|
00002800 0d 0a 43 4d 50 79 73 65 74 0d 0a 42 4e 45 6e 6f |..CMPyset..BNEno|
00002810 74 74 68 61 74 0d 0a 4c 44 41 26 46 36 30 2c 59 |tthat..LDA&F60,Y|
00002820 0d 0a 43 4d 50 78 73 63 72 0d 0a 42 4e 45 6e 6f |..CMPxscr..BNEno|
00002830 74 74 68 61 74 0d 0a 4c 44 41 26 46 38 30 2c 59 |tthat..LDA&F80,Y|
00002840 0d 0a 43 4d 50 79 73 63 72 0d 0a 42 45 51 20 64 |..CMPyscr..BEQ d|
00002850 72 61 77 6f 62 6a 0d 0a 2e 6e 6f 74 74 68 61 74 |rawobj...notthat|
00002860 20 49 4e 59 0d 0a 43 50 59 23 33 32 0d 0a 42 4e | INY..CPY#32..BN|
00002870 45 6f 62 63 6c 6f 70 0d 0a 52 54 53 0d 0a 2e 64 |Eobclop..RTS...d|
00002880 72 61 77 6f 62 6a 20 50 4c 41 0d 0a 50 4c 41 0d |rawobj PLA..PLA.|
00002890 0a 4c 44 41 78 73 65 74 0d 0a 41 53 4c 20 41 0d |.LDAxset..ASL A.|
000028a0 0a 53 54 41 78 63 68 0d 0a 4c 44 41 79 73 65 74 |.STAxch..LDAyset|
000028b0 0d 0a 43 4c 43 0d 0a 41 44 43 23 31 0d 0a 41 53 |..CLC..ADC#1..AS|
000028c0 4c 20 41 0d 0a 53 54 41 79 63 68 0d 0a 4c 44 41 |L A..STAych..LDA|
000028d0 26 46 30 30 2c 59 0d 0a 53 54 41 63 6f 6c 0d 0a |&F00,Y..STAcol..|
000028e0 54 59 41 0d 0a 43 4c 43 0d 0a 41 44 43 23 26 45 |TYA..CLC..ADC#&E|
000028f0 30 0d 0a 53 54 41 26 37 46 0d 0a 4c 44 41 23 30 |0..STA&7F..LDA#0|
00002900 0d 0a 53 54 41 26 37 32 0d 0a 4c 44 41 23 26 41 |..STA&72..LDA#&A|
00002910 0d 0a 53 54 41 26 37 33 0d 0a 4a 53 52 6f 62 6a |..STA&73..JSRobj|
00002920 64 69 73 70 0d 0a 49 4e 43 78 63 68 0d 0a 49 4e |disp..INCxch..IN|
00002930 43 26 37 33 0d 0a 4a 53 52 6f 62 6a 64 69 73 70 |C&73..JSRobjdisp|
00002940 0d 0a 49 4e 43 79 63 68 0d 0a 4c 44 41 23 26 45 |..INCych..LDA#&E|
00002950 0d 0a 53 54 41 26 37 33 0d 0a 4a 53 52 6f 62 6a |..STA&73..JSRobj|
00002960 64 69 73 70 0d 0a 44 45 43 78 63 68 0d 0a 44 45 |disp..DECxch..DE|
00002970 43 26 37 33 0d 0a 4a 53 52 6f 62 6a 64 69 73 70 |C&73..JSRobjdisp|
00002980 0d 0a 4c 44 59 23 38 0d 0a 4c 44 41 23 30 0d 0a |..LDY#8..LDA#0..|
00002990 2e 63 6c 65 61 72 73 70 6f 62 20 53 54 41 26 42 |.clearspob STA&B|
000029a0 46 46 2c 59 0d 0a 44 45 59 0d 0a 42 4e 45 63 6c |FF,Y..DEY..BNEcl|
000029b0 65 61 72 73 70 6f 62 0d 0a 52 54 53 0d 0a 2e 6f |earspob..RTS...o|
000029c0 62 6a 64 69 73 70 20 4c 44 59 26 37 46 0d 0a 4c |bjdisp LDY&7F..L|
000029d0 44 58 23 38 0d 0a 2e 6f 62 6a 64 6c 6f 70 20 4c |DX#8...objdlop L|
000029e0 44 41 28 26 37 32 29 2c 59 0d 0a 53 54 41 26 42 |DA(&72),Y..STA&B|
000029f0 46 46 2c 58 0d 0a 54 59 41 0d 0a 53 45 43 0d 0a |FF,X..TYA..SEC..|
00002a00 53 42 43 23 33 32 0d 0a 54 41 59 0d 0a 44 45 58 |SBC#32..TAY..DEX|
00002a10 0d 0a 42 4e 45 6f 62 6a 64 6c 6f 70 0d 0a 54 58 |..BNEobjdlop..TX|
00002a20 41 0d 0a 4a 4d 50 70 75 74 63 68 0d 0a 2e 67 65 |A..JMPputch...ge|
00002a30 74 6f 70 75 74 20 4c 44 41 23 34 0d 0a 4a 53 52 |toput LDA#4..JSR|
00002a40 6b 65 79 62 79 74 65 0d 0a 42 43 53 70 69 63 6b |keybyte..BCSpick|
00002a50 75 70 0d 0a 4c 44 41 23 30 0d 0a 53 54 41 67 65 |up..LDA#0..STAge|
00002a60 74 73 74 61 74 0d 0a 2e 6b 65 79 68 61 6e 67 20 |tstat...keyhang |
00002a70 52 54 53 0d 0a 2e 70 69 63 6b 75 70 20 4c 44 41 |RTS...pickup LDA|
00002a80 67 65 74 73 74 61 74 0d 0a 42 4e 45 6b 65 79 68 |getstat..BNEkeyh|
00002a90 61 6e 67 0d 0a 4c 44 41 73 6f 75 6e 64 0d 0a 42 |ang..LDAsound..B|
00002aa0 45 51 6e 6f 67 70 0d 0a 4c 44 41 23 37 0d 0a 4c |EQnogp..LDA#7..L|
00002ab0 44 58 23 28 73 77 69 74 6e 20 4d 4f 44 20 32 35 |DX#(switn MOD 25|
00002ac0 36 29 0d 0a 4c 44 59 23 28 73 77 69 74 6e 20 44 |6)..LDY#(switn D|
00002ad0 49 56 20 32 35 36 29 0d 0a 4a 53 52 6f 73 77 6f |IV 256)..JSRoswo|
00002ae0 72 64 0d 0a 2e 6e 6f 67 70 20 4c 44 41 6f 62 6a |rd...nogp LDAobj|
00002af0 65 63 74 73 2b 31 0d 0a 43 4d 50 23 26 32 30 0d |ects+1..CMP#&20.|
00002b00 0a 42 43 53 6e 6f 70 75 74 64 6f 77 6e 0d 0a 54 |.BCSnoputdown..T|
00002b10 41 59 0d 0a 4c 44 41 78 73 63 72 0d 0a 53 54 41 |AY..LDAxscr..STA|
00002b20 26 46 36 30 2c 59 0d 0a 4c 44 41 79 73 63 72 0d |&F60,Y..LDAyscr.|
00002b30 0a 53 54 41 26 46 38 30 2c 59 0d 0a 4c 44 41 78 |.STA&F80,Y..LDAx|
00002b40 70 6f 73 0d 0a 53 54 41 26 46 32 30 2c 59 0d 0a |pos..STA&F20,Y..|
00002b50 4c 44 41 79 70 6f 73 0d 0a 53 54 41 26 46 34 30 |LDAypos..STA&F40|
00002b60 2c 59 0d 0a 53 54 59 26 37 30 0d 0a 4a 53 52 70 |,Y..STY&70..JSRp|
00002b70 75 7a 7a 0d 0a 2e 6e 6f 70 75 74 64 6f 77 6e 20 |uzz...noputdown |
00002b80 4c 44 41 6f 62 6a 65 63 74 73 0d 0a 53 54 41 6f |LDAobjects..STAo|
00002b90 62 6a 65 63 74 73 2b 31 0d 0a 4c 44 59 23 30 0d |bjects+1..LDY#0.|
00002ba0 0a 2e 6f 62 67 6c 6f 70 20 4c 44 41 26 46 32 30 |..obglop LDA&F20|
00002bb0 2c 59 0d 0a 43 50 59 26 37 30 0d 0a 42 45 51 6e |,Y..CPY&70..BEQn|
00002bc0 6f 74 67 6f 74 0d 0a 43 4d 50 78 70 6f 73 0d 0a |otgot..CMPxpos..|
00002bd0 42 4e 45 6e 6f 74 67 6f 74 0d 0a 4c 44 41 26 46 |BNEnotgot..LDA&F|
00002be0 34 30 2c 59 0d 0a 43 4d 50 79 70 6f 73 0d 0a 42 |40,Y..CMPypos..B|
00002bf0 4e 45 6e 6f 74 67 6f 74 0d 0a 4c 44 41 26 46 36 |NEnotgot..LDA&F6|
00002c00 30 2c 59 0d 0a 43 4d 50 78 73 63 72 0d 0a 42 4e |0,Y..CMPxscr..BN|
00002c10 45 6e 6f 74 67 6f 74 0d 0a 4c 44 41 26 46 38 30 |Enotgot..LDA&F80|
00002c20 2c 59 0d 0a 43 4d 50 79 73 63 72 0d 0a 42 45 51 |,Y..CMPyscr..BEQ|
00002c30 67 65 74 74 6f 62 6a 0d 0a 2e 6e 6f 74 67 6f 74 |gettobj...notgot|
00002c40 20 49 4e 59 0d 0a 43 50 59 23 33 32 0d 0a 42 4e | INY..CPY#32..BN|
00002c50 45 6f 62 67 6c 6f 70 0d 0a 53 54 59 6f 62 6a 65 |Eobglop..STYobje|
00002c60 63 74 73 0d 0a 4a 4d 50 6e 6f 67 65 74 6f 62 0d |cts..JMPnogetob.|
00002c70 0a 2e 67 65 74 74 6f 62 6a 20 43 50 59 23 32 38 |..gettobj CPY#28|
00002c80 0d 0a 42 43 43 6e 6f 65 6e 65 72 0d 0a 4c 44 41 |..BCCnoener..LDA|
00002c90 23 26 46 46 0d 0a 53 54 41 26 46 32 30 2c 59 0d |#&FF..STA&F20,Y.|
00002ca0 0a 53 54 41 70 6f 77 65 72 0d 0a 53 54 41 70 6f |.STApower..STApo|
00002cb0 77 63 68 61 6e 67 65 0d 0a 53 54 41 73 63 72 63 |wchange..STAscrc|
00002cc0 68 0d 0a 53 45 44 0d 0a 4c 44 41 73 63 6f 72 65 |h..SED..LDAscore|
00002cd0 0d 0a 43 4c 43 0d 0a 41 44 43 23 35 0d 0a 53 54 |..CLC..ADC#5..ST|
00002ce0 41 73 63 6f 72 65 0d 0a 4c 44 41 73 63 6f 72 65 |Ascore..LDAscore|
00002cf0 2b 31 0d 0a 41 44 43 23 30 0d 0a 53 54 41 73 63 |+1..ADC#0..STAsc|
00002d00 6f 72 65 2b 31 0d 0a 43 4c 44 0d 0a 4c 44 41 23 |ore+1..CLD..LDA#|
00002d10 37 0d 0a 4c 44 58 23 28 65 6e 72 75 70 20 4d 4f |7..LDX#(enrup MO|
00002d20 44 20 32 35 36 29 0d 0a 4c 44 59 23 28 65 6e 72 |D 256)..LDY#(enr|
00002d30 75 70 20 44 49 56 20 32 35 36 29 0d 0a 4a 53 52 |up DIV 256)..JSR|
00002d40 6f 73 77 6f 72 64 0d 0a 4c 44 59 23 33 32 0d 0a |osword..LDY#32..|
00002d50 53 54 59 6f 62 6a 65 63 74 73 0d 0a 4a 4d 50 6e |STYobjects..JMPn|
00002d60 6f 67 65 74 6f 62 0d 0a 2e 6e 6f 65 6e 65 72 20 |ogetob...noener |
00002d70 53 54 59 6f 62 6a 65 63 74 73 0d 0a 4c 44 41 23 |STYobjects..LDA#|
00002d80 26 46 46 0d 0a 53 54 41 26 46 32 30 2c 59 0d 0a |&FF..STA&F20,Y..|
00002d90 2e 6e 6f 67 65 74 6f 62 20 4c 44 41 78 70 6f 73 |.nogetob LDAxpos|
00002da0 0d 0a 53 54 41 78 73 65 74 0d 0a 4c 44 41 79 70 |..STAxset..LDAyp|
00002db0 6f 73 0d 0a 53 54 41 79 73 65 74 0d 0a 4a 53 52 |os..STAyset..JSR|
00002dc0 62 6c 6f 63 6b 6f 6e 0d 0a 4c 44 41 23 30 0d 0a |blockon..LDA#0..|
00002dd0 53 54 41 77 69 70 65 72 0d 0a 4c 44 41 23 31 0d |STAwiper..LDA#1.|
00002de0 0a 53 54 41 63 68 61 6e 67 65 64 0d 0a 53 54 41 |.STAchanged..STA|
00002df0 6f 62 63 68 0d 0a 53 54 41 67 65 74 73 74 61 74 |obch..STAgetstat|
00002e00 0d 0a 52 54 53 0d 0a 2e 74 69 74 6c 65 20 4a 53 |..RTS...title JS|
00002e10 52 62 6c 61 73 63 72 0d 0a 4a 53 52 6f 62 6a 65 |Rblascr..JSRobje|
00002e20 63 74 68 0d 0a 2e 74 69 74 6c 6f 70 20 49 4e 43 |cth...titlop INC|
00002e30 74 69 74 73 74 61 74 0d 0a 4c 44 41 74 69 74 73 |titstat..LDAtits|
00002e40 74 61 74 0d 0a 41 4e 44 23 37 0d 0a 54 41 59 0d |tat..AND#7..TAY.|
00002e50 0a 4c 44 41 74 69 74 73 63 72 73 2c 59 0d 0a 4c |.LDAtitscrs,Y..L|
00002e60 53 52 20 41 0d 0a 4c 53 52 20 41 0d 0a 4c 53 52 |SR A..LSR A..LSR|
00002e70 20 41 0d 0a 4c 53 52 20 41 0d 0a 53 54 41 78 73 | A..LSR A..STAxs|
00002e80 63 72 0d 0a 4c 44 41 74 69 74 73 63 72 73 2c 59 |cr..LDAtitscrs,Y|
00002e90 0d 0a 41 4e 44 23 26 30 46 0d 0a 53 54 41 79 73 |..AND#&0F..STAys|
00002ea0 63 72 0d 0a 4a 53 52 73 63 72 65 65 6e 0d 0a 4c |cr..JSRscreen..L|
00002eb0 44 41 23 26 33 30 0d 0a 53 54 41 69 6e 76 66 6c |DA#&30..STAinvfl|
00002ec0 61 67 0d 0a 4c 44 41 23 35 0d 0a 53 54 41 63 6f |ag..LDA#5..STAco|
00002ed0 6c 0d 0a 4c 44 41 23 34 0d 0a 53 54 41 78 63 68 |l..LDA#4..STAxch|
00002ee0 0d 0a 4c 44 41 23 35 0d 0a 53 54 41 79 63 68 0d |..LDA#5..STAych.|
00002ef0 0a 4c 44 41 23 28 6e 61 6d 65 20 4d 4f 44 20 32 |.LDA#(name MOD 2|
00002f00 35 36 29 0d 0a 53 54 41 26 37 32 0d 0a 4c 44 41 |56)..STA&72..LDA|
00002f10 23 28 6e 61 6d 65 20 44 49 56 20 32 35 36 29 0d |#(name DIV 256).|
00002f20 0a 53 54 41 26 37 33 0d 0a 4a 53 52 73 74 72 69 |.STA&73..JSRstri|
00002f30 6e 67 0d 0a 4c 44 41 23 33 0d 0a 53 54 41 78 63 |ng..LDA#3..STAxc|
00002f40 68 0d 0a 4c 44 41 23 31 36 0d 0a 53 54 41 79 63 |h..LDA#16..STAyc|
00002f50 68 0d 0a 4c 44 41 23 28 63 72 65 64 61 20 4d 4f |h..LDA#(creda MO|
00002f60 44 20 32 35 36 29 0d 0a 53 54 41 26 37 32 0d 0a |D 256)..STA&72..|
00002f70 4c 44 41 23 28 63 72 65 64 61 20 44 49 56 20 32 |LDA#(creda DIV 2|
00002f80 35 36 29 0d 0a 53 54 41 26 37 33 0d 0a 4a 53 52 |56)..STA&73..JSR|
00002f90 73 74 72 69 6e 67 0d 0a 4c 44 41 23 34 0d 0a 53 |string..LDA#4..S|
00002fa0 54 41 78 63 68 0d 0a 4c 44 41 23 31 38 0d 0a 53 |TAxch..LDA#18..S|
00002fb0 54 41 79 63 68 0d 0a 4c 44 41 23 28 63 72 65 64 |TAych..LDA#(cred|
00002fc0 62 20 4d 4f 44 20 32 35 36 29 0d 0a 53 54 41 26 |b MOD 256)..STA&|
00002fd0 37 32 0d 0a 4a 53 52 73 74 72 69 6e 67 0d 0a 4c |72..JSRstring..L|
00002fe0 44 41 23 34 0d 0a 53 54 41 78 63 68 0d 0a 4c 44 |DA#4..STAxch..LD|
00002ff0 41 23 32 30 0d 0a 53 54 41 79 63 68 0d 0a 4c 44 |A#20..STAych..LD|
00003000 41 23 28 63 72 65 64 63 20 4d 4f 44 20 32 35 36 |A#(credc MOD 256|
00003010 29 0d 0a 53 54 41 26 37 32 0d 0a 4c 44 41 23 28 |)..STA&72..LDA#(|
00003020 63 72 65 64 63 20 44 49 56 20 32 35 36 29 0d 0a |credc DIV 256)..|
00003030 53 54 41 26 37 33 0d 0a 4a 53 52 73 74 72 69 6e |STA&73..JSRstrin|
00003040 67 0d 0a 4c 44 41 23 38 0d 0a 53 54 41 78 63 68 |g..LDA#8..STAxch|
00003050 0d 0a 4c 44 41 23 32 32 0d 0a 53 54 41 79 63 68 |..LDA#22..STAych|
00003060 0d 0a 4c 44 41 23 28 63 72 65 64 64 20 4d 4f 44 |..LDA#(credd MOD|
00003070 20 32 35 36 29 0d 0a 53 54 41 26 37 32 0d 0a 4a | 256)..STA&72..J|
00003080 53 52 73 74 72 69 6e 67 0d 0a 4c 44 41 23 30 0d |SRstring..LDA#0.|
00003090 0a 53 54 41 78 63 68 0d 0a 4c 44 41 23 33 30 0d |.STAxch..LDA#30.|
000030a0 0a 53 54 41 79 63 68 0d 0a 4c 44 41 23 28 73 70 |.STAych..LDA#(sp|
000030b0 61 63 65 20 4d 4f 44 20 32 35 36 29 0d 0a 53 54 |ace MOD 256)..ST|
000030c0 41 26 37 32 0d 0a 4c 44 41 23 28 73 70 61 63 65 |A&72..LDA#(space|
000030d0 20 44 49 56 20 32 35 36 29 0d 0a 53 54 41 26 37 | DIV 256)..STA&7|
000030e0 33 0d 0a 4a 53 52 73 74 72 69 6e 67 0d 0a 4c 44 |3..JSRstring..LD|
000030f0 41 63 6c 6f 63 6b 0d 0a 53 45 43 0d 0a 53 42 43 |Aclock..SEC..SBC|
00003100 23 31 0d 0a 53 54 41 26 38 30 0d 0a 2e 73 6f 75 |#1..STA&80...sou|
00003110 6e 64 70 72 20 4c 44 41 23 36 0d 0a 53 54 41 78 |ndpr LDA#6..STAx|
00003120 63 68 0d 0a 4c 44 41 23 32 36 0d 0a 53 54 41 79 |ch..LDA#26..STAy|
00003130 63 68 0d 0a 4c 44 41 23 28 73 6e 64 6f 66 66 20 |ch..LDA#(sndoff |
00003140 4d 4f 44 20 32 35 36 29 0d 0a 53 54 41 26 37 32 |MOD 256)..STA&72|
00003150 0d 0a 4c 44 41 23 28 73 6e 64 6f 66 66 20 44 49 |..LDA#(sndoff DI|
00003160 56 20 32 35 36 29 0d 0a 53 54 41 26 37 33 0d 0a |V 256)..STA&73..|
00003170 4c 44 41 73 6f 75 6e 64 0d 0a 42 45 51 73 6f 75 |LDAsound..BEQsou|
00003180 6e 64 73 65 74 0d 0a 4c 44 41 23 28 73 6e 64 6f |ndset..LDA#(sndo|
00003190 6e 20 4d 4f 44 20 32 35 36 29 0d 0a 53 54 41 26 |n MOD 256)..STA&|
000031a0 37 32 0d 0a 2e 73 6f 75 6e 64 73 65 74 20 4a 53 |72...soundset JS|
000031b0 52 73 74 72 69 6e 67 0d 0a 2e 73 73 74 6f 70 20 |Rstring...sstop |
000031c0 4c 44 41 23 39 0d 0a 4a 53 52 6b 65 79 62 79 74 |LDA#9..JSRkeybyt|
000031d0 65 0d 0a 42 43 53 73 73 74 6f 70 0d 0a 2e 73 70 |e..BCSsstop...sp|
000031e0 61 63 77 61 69 74 20 4c 44 41 63 6c 6f 63 6b 0d |acwait LDAclock.|
000031f0 0a 43 4d 50 26 38 30 0d 0a 42 45 51 6e 65 78 74 |.CMP&80..BEQnext|
00003200 73 63 72 0d 0a 4c 44 41 23 39 0d 0a 4a 53 52 6b |scr..LDA#9..JSRk|
00003210 65 79 62 79 74 65 0d 0a 42 43 53 73 65 6f 72 0d |eybyte..BCSseor.|
00003220 0a 4c 44 41 23 34 0d 0a 4a 53 52 6b 65 79 62 79 |.LDA#4..JSRkeyby|
00003230 74 65 0d 0a 42 43 43 73 70 61 63 77 61 69 74 0d |te..BCCspacwait.|
00003240 0a 52 54 53 0d 0a 2e 6e 65 78 74 73 63 72 20 49 |.RTS...nextscr I|
00003250 4e 43 74 69 74 63 79 63 0d 0a 44 45 43 26 38 30 |NCtitcyc..DEC&80|
00003260 0d 0a 4c 44 41 74 69 74 63 79 63 0d 0a 41 4e 44 |..LDAtitcyc..AND|
00003270 23 33 0d 0a 42 4e 45 73 70 61 63 77 61 69 74 0d |#3..BNEspacwait.|
00003280 0a 4a 4d 50 74 69 74 6c 6f 70 0d 0a 2e 73 65 6f |.JMPtitlop...seo|
00003290 72 20 4c 44 41 73 6f 75 6e 64 0d 0a 45 4f 52 23 |r LDAsound..EOR#|
000032a0 31 0d 0a 53 54 41 73 6f 75 6e 64 0d 0a 4a 4d 50 |1..STAsound..JMP|
000032b0 73 6f 75 6e 64 70 72 0d 0a 2e 73 62 61 72 20 45 |soundpr...sbar E|
000032c0 51 55 42 31 38 0d 0a 45 51 55 42 31 0d 0a 45 51 |QUB18..EQUB1..EQ|
000032d0 55 42 34 0d 0a 45 51 55 42 32 35 0d 0a 45 51 55 |UB4..EQUB25..EQU|
000032e0 42 34 0d 0a 45 51 55 57 30 0d 0a 45 51 55 57 32 |B4..EQUW0..EQUW2|
000032f0 35 32 0d 0a 45 51 55 42 32 35 0d 0a 45 51 55 42 |52..EQUB25..EQUB|
00003300 34 0d 0a 45 51 55 57 35 37 36 0d 0a 45 51 55 57 |4..EQUW576..EQUW|
00003310 32 35 32 0d 0a 45 51 55 42 32 35 0d 0a 45 51 55 |252..EQUB25..EQU|
00003320 42 38 35 0d 0a 45 51 55 57 32 38 38 0d 0a 45 51 |B85..EQUW288..EQ|
00003330 55 57 39 36 0d 0a 45 51 55 42 32 35 0d 0a 45 51 |UW96..EQUB25..EQ|
00003340 55 42 34 0d 0a 45 51 55 57 37 30 34 0d 0a 45 51 |UB4..EQUW704..EQ|
00003350 55 57 32 35 32 0d 0a 45 51 55 42 32 35 0d 0a 45 |UW252..EQUB25..E|
00003360 51 55 42 34 0d 0a 45 51 55 57 31 32 38 30 0d 0a |QUB4..EQUW1280..|
00003370 45 51 55 57 32 35 32 0d 0a 45 51 55 42 32 35 0d |EQUW252..EQUB25.|
00003380 0a 45 51 55 42 38 35 0d 0a 45 51 55 57 39 39 32 |.EQUB85..EQUW992|
00003390 0d 0a 45 51 55 57 39 36 0d 0a 45 51 55 42 32 35 |..EQUW96..EQUB25|
000033a0 0d 0a 45 51 55 42 34 0d 0a 45 51 55 57 33 38 34 |..EQUB4..EQUW384|
000033b0 0d 0a 45 51 55 57 39 36 0d 0a 45 51 55 42 32 35 |..EQUW96..EQUB25|
000033c0 0d 0a 45 51 55 42 34 0d 0a 45 51 55 57 38 39 36 |..EQUB4..EQUW896|
000033d0 0d 0a 45 51 55 57 39 36 0d 0a 45 51 55 42 32 35 |..EQUW96..EQUB25|
000033e0 0d 0a 45 51 55 42 38 35 0d 0a 45 51 55 57 36 34 |..EQUB85..EQUW64|
000033f0 30 0d 0a 45 51 55 57 32 35 32 0d 0a 45 51 55 42 |0..EQUW252..EQUB|
00003400 31 38 0d 0a 45 51 55 42 33 0d 0a 45 51 55 42 34 |18..EQUB3..EQUB4|
00003410 0d 0a 45 51 55 42 32 35 0d 0a 45 51 55 42 34 0d |..EQUB25..EQUB4.|
00003420 0a 45 51 55 57 39 36 0d 0a 45 51 55 57 32 32 34 |.EQUW96..EQUW224|
00003430 0d 0a 45 51 55 42 32 35 0d 0a 45 51 55 42 34 0d |..EQUB25..EQUB4.|
00003440 0a 45 51 55 57 34 38 30 0d 0a 45 51 55 57 32 32 |.EQUW480..EQUW22|
00003450 34 0d 0a 45 51 55 42 32 35 0d 0a 45 51 55 42 38 |4..EQUB25..EQUB8|
00003460 35 0d 0a 45 51 55 57 32 38 38 0d 0a 45 51 55 57 |5..EQUW288..EQUW|
00003470 31 32 38 0d 0a 45 51 55 42 32 35 0d 0a 45 51 55 |128..EQUB25..EQU|
00003480 42 34 0d 0a 45 51 55 57 38 30 30 0d 0a 45 51 55 |B4..EQUW800..EQU|
00003490 57 32 32 34 0d 0a 45 51 55 42 32 35 0d 0a 45 51 |W224..EQUB25..EQ|
000034a0 55 42 34 0d 0a 45 51 55 57 31 31 38 34 0d 0a 45 |UB4..EQUW1184..E|
000034b0 51 55 57 32 32 34 0d 0a 45 51 55 42 32 35 0d 0a |QUW224..EQUB25..|
000034c0 45 51 55 42 38 35 0d 0a 45 51 55 57 39 39 32 0d |EQUB85..EQUW992.|
000034d0 0a 45 51 55 57 31 32 38 0d 0a 45 51 55 42 31 38 |.EQUW128..EQUB18|
000034e0 0d 0a 45 51 55 42 31 0d 0a 45 51 55 42 31 0d 0a |..EQUB1..EQUB1..|
000034f0 45 51 55 42 32 35 0d 0a 45 51 55 42 34 0d 0a 45 |EQUB25..EQUB4..E|
00003500 51 55 57 31 32 38 0d 0a 45 51 55 57 39 32 0d 0a |QUW128..EQUW92..|
00003510 45 51 55 42 32 35 0d 0a 45 51 55 42 34 0d 0a 45 |EQUB25..EQUB4..E|
00003520 51 55 57 34 34 38 0d 0a 45 51 55 57 39 32 0d 0a |QUW448..EQUW92..|
00003530 45 51 55 42 32 35 0d 0a 45 51 55 42 38 35 0d 0a |EQUB25..EQUB85..|
00003540 45 51 55 57 31 32 38 0d 0a 45 51 55 57 30 0d 0a |EQUW128..EQUW0..|
00003550 45 51 55 42 32 35 0d 0a 45 51 55 42 38 35 0d 0a |EQUB25..EQUB85..|
00003560 45 51 55 57 34 34 38 0d 0a 45 51 55 57 30 0d 0a |EQUW448..EQUW0..|
00003570 45 51 55 42 32 35 0d 0a 45 51 55 42 34 0d 0a 45 |EQUB25..EQUB4..E|
00003580 51 55 57 37 30 34 0d 0a 45 51 55 57 39 32 0d 0a |QUW704..EQUW92..|
00003590 45 51 55 42 32 35 0d 0a 45 51 55 42 34 0d 0a 45 |EQUB25..EQUB4..E|
000035a0 51 55 57 31 32 38 30 0d 0a 45 51 55 57 39 32 0d |QUW1280..EQUW92.|
000035b0 0a 45 51 55 42 32 35 0d 0a 45 51 55 42 38 35 0d |.EQUB25..EQUB85.|
000035c0 0a 45 51 55 57 37 30 34 0d 0a 45 51 55 57 30 0d |.EQUW704..EQUW0.|
000035d0 0a 45 51 55 42 32 35 0d 0a 45 51 55 42 38 35 0d |.EQUB25..EQUB85.|
000035e0 0a 45 51 55 57 31 32 38 30 0d 0a 45 51 55 57 30 |.EQUW1280..EQUW0|
000035f0 0d 0a 45 51 55 42 26 46 46 0d 0a 0d 0a 50 25 3d |..EQUB&FF....P%=|
00003600 26 34 30 30 0d 0a 4f 25 3d 26 35 34 30 30 0d 0a |&400..O%=&5400..|
00003610 0d 0a 2e 63 72 65 64 63 20 45 51 55 42 34 0d 0a |...credc EQUB4..|
00003620 45 51 55 42 32 32 0d 0a 45 51 55 42 31 32 0d 0a |EQUB22..EQUB12..|
00003630 45 51 55 42 32 33 0d 0a 45 51 55 42 31 33 0d 0a |EQUB23..EQUB13..|
00003640 45 51 55 42 32 33 0d 0a 45 51 55 42 33 0d 0a 45 |EQUB23..EQUB3..E|
00003650 51 55 42 30 0d 0a 45 51 55 42 36 0d 0a 45 51 55 |QUB0..EQUB6..EQU|
00003660 42 32 32 0d 0a 45 51 55 42 31 35 0d 0a 45 51 55 |B22..EQUB15..EQU|
00003670 42 34 0d 0a 45 51 55 42 32 35 35 0d 0a 2e 63 72 |B4..EQUB255...cr|
00003680 65 64 64 20 45 51 55 42 32 33 0d 0a 45 51 55 42 |edd EQUB23..EQUB|
00003690 33 31 0d 0a 45 51 55 42 33 31 0d 0a 45 51 55 42 |31..EQUB31..EQUB|
000036a0 32 38 0d 0a 45 51 55 42 32 35 35 0d 0a 2e 73 70 |28..EQUB255...sp|
000036b0 61 63 65 20 45 51 55 42 31 34 0d 0a 45 51 55 42 |ace EQUB14..EQUB|
000036c0 31 35 0d 0a 45 51 55 42 35 0d 0a 45 51 55 42 31 |15..EQUB5..EQUB1|
000036d0 36 0d 0a 45 51 55 42 31 36 0d 0a 45 51 55 42 30 |6..EQUB16..EQUB0|
000036e0 0d 0a 45 51 55 42 31 36 0d 0a 45 51 55 42 31 34 |..EQUB16..EQUB14|
000036f0 0d 0a 45 51 55 42 31 0d 0a 45 51 55 42 33 0d 0a |..EQUB1..EQUB3..|
00003700 45 51 55 42 35 0d 0a 45 51 55 42 30 0d 0a 45 51 |EQUB5..EQUB0..EQ|
00003710 55 42 31 37 0d 0a 45 51 55 42 32 32 0d 0a 45 51 |UB17..EQUB22..EQ|
00003720 55 42 30 0d 0a 45 51 55 42 31 36 0d 0a 45 51 55 |UB0..EQUB16..EQU|
00003730 42 31 37 0d 0a 45 51 55 42 31 0d 0a 45 51 55 42 |B17..EQUB1..EQUB|
00003740 31 35 0d 0a 45 51 55 42 31 37 0d 0a 45 51 55 42 |15..EQUB17..EQUB|
00003750 32 35 35 0d 0a 2e 6e 61 6d 65 20 45 51 55 42 31 |255...name EQUB1|
00003760 36 0d 0a 45 51 55 42 38 0d 0a 45 51 55 42 32 33 |6..EQUB8..EQUB23|
00003770 0d 0a 45 51 55 42 31 34 0d 0a 45 51 55 42 30 0d |..EQUB14..EQUB0.|
00003780 0a 45 51 55 42 32 30 0d 0a 45 51 55 42 31 35 0d |.EQUB20..EQUB15.|
00003790 0a 45 51 55 42 35 0d 0a 45 51 55 42 33 0d 0a 45 |.EQUB5..EQUB3..E|
000037a0 51 55 42 31 30 0d 0a 45 51 55 42 35 0d 0a 45 51 |QUB10..EQUB5..EQ|
000037b0 55 42 34 0d 0a 45 51 55 42 32 35 35 0d 0a 2e 70 |UB4..EQUB255...p|
000037c0 6f 69 6e 74 20 4c 44 41 79 73 63 72 0d 0a 41 53 |oint LDAyscr..AS|
000037d0 4c 20 41 0d 0a 41 53 4c 20 41 0d 0a 41 53 4c 20 |L A..ASL A..ASL |
000037e0 41 0d 0a 41 53 4c 20 41 0d 0a 43 4c 43 0d 0a 41 |A..ASL A..CLC..A|
000037f0 44 43 78 73 63 72 0d 0a 41 44 43 23 26 33 30 0d |DCxscr..ADC#&30.|
00003800 0a 53 54 41 70 6f 69 79 6e 2b 32 0d 0a 54 41 58 |.STApoiyn+2..TAX|
00003810 0d 0a 2e 70 6f 69 79 6e 20 4c 44 41 26 33 30 46 |...poiyn LDA&30F|
00003820 45 0d 0a 41 4e 44 23 26 38 30 0d 0a 42 4e 45 76 |E..AND#&80..BNEv|
00003830 69 73 0d 0a 53 54 58 70 6f 69 73 2b 32 0d 0a 53 |is..STXpois+2..S|
00003840 54 58 6f 72 70 73 2b 32 0d 0a 4c 44 41 23 26 38 |TXorps+2..LDA#&8|
00003850 30 0d 0a 2e 6f 72 70 73 20 4f 52 41 26 33 30 46 |0...orps ORA&30F|
00003860 45 0d 0a 2e 70 6f 69 73 20 53 54 41 26 33 30 46 |E...pois STA&30F|
00003870 45 0d 0a 53 45 44 0d 0a 4c 44 41 73 63 6f 72 65 |E..SED..LDAscore|
00003880 0d 0a 43 4c 43 0d 0a 41 44 43 23 31 0d 0a 53 54 |..CLC..ADC#1..ST|
00003890 41 73 63 6f 72 65 0d 0a 4c 44 41 73 63 6f 72 65 |Ascore..LDAscore|
000038a0 2b 31 0d 0a 41 44 43 23 30 0d 0a 53 54 41 73 63 |+1..ADC#0..STAsc|
000038b0 6f 72 65 2b 31 0d 0a 43 4c 44 0d 0a 49 4e 43 73 |ore+1..CLD..INCs|
000038c0 63 72 63 68 0d 0a 2e 76 69 73 20 52 54 53 0d 0a |crch...vis RTS..|
000038d0 2e 73 63 6f 72 62 20 4c 44 41 73 63 6f 72 65 0d |.scorb LDAscore.|
000038e0 0a 41 4e 44 23 31 35 0d 0a 43 4c 43 0d 0a 41 44 |.AND#15..CLC..AD|
000038f0 43 23 32 32 0d 0a 53 54 41 73 63 72 74 78 74 2b |C#22..STAscrtxt+|
00003900 32 0d 0a 4c 44 41 73 63 6f 72 65 0d 0a 4c 53 52 |2..LDAscore..LSR|
00003910 20 41 0d 0a 4c 53 52 20 41 0d 0a 4c 53 52 20 41 | A..LSR A..LSR A|
00003920 0d 0a 4c 53 52 20 41 0d 0a 43 4c 43 0d 0a 41 44 |..LSR A..CLC..AD|
00003930 43 23 32 32 0d 0a 53 54 41 73 63 72 74 78 74 2b |C#22..STAscrtxt+|
00003940 31 0d 0a 4c 44 41 73 63 6f 72 65 2b 31 0d 0a 41 |1..LDAscore+1..A|
00003950 4e 44 23 31 35 0d 0a 43 4c 43 0d 0a 41 44 43 23 |ND#15..CLC..ADC#|
00003960 32 32 0d 0a 53 54 41 73 63 72 74 78 74 0d 0a 4c |22..STAscrtxt..L|
00003970 44 41 23 33 0d 0a 53 54 41 78 63 68 0d 0a 4c 44 |DA#3..STAxch..LD|
00003980 41 23 33 30 0d 0a 53 54 41 79 63 68 0d 0a 4c 44 |A#30..STAych..LD|
00003990 41 23 31 37 0d 0a 53 54 41 63 6f 6c 0d 0a 4c 44 |A#17..STAcol..LD|
000039a0 41 23 28 73 63 72 74 78 74 20 4d 4f 44 20 32 35 |A#(scrtxt MOD 25|
000039b0 36 29 0d 0a 53 54 41 26 37 32 0d 0a 4c 44 41 23 |6)..STA&72..LDA#|
000039c0 28 73 63 72 74 78 74 20 44 49 56 20 32 35 36 29 |(scrtxt DIV 256)|
000039d0 0d 0a 53 54 41 26 37 33 0d 0a 4a 4d 50 73 74 72 |..STA&73..JMPstr|
000039e0 69 6e 67 0d 0a 2e 64 6f 6f 72 63 68 20 50 48 41 |ing...doorch PHA|
000039f0 0d 0a 43 4d 50 23 33 30 0d 0a 42 4e 45 6e 6f 64 |..CMP#30..BNEnod|
00003a00 6f 72 0d 0a 4c 44 41 23 36 0d 0a 4a 53 52 6b 65 |or..LDA#6..JSRke|
00003a10 79 62 79 74 65 0d 0a 42 43 43 6e 6f 64 6f 72 0d |ybyte..BCCnodor.|
00003a20 0a 4c 44 41 79 73 63 72 0d 0a 41 53 4c 20 41 0d |.LDAyscr..ASL A.|
00003a30 0a 41 53 4c 20 41 0d 0a 41 53 4c 20 41 0d 0a 41 |.ASL A..ASL A..A|
00003a40 53 4c 20 41 0d 0a 43 4c 43 0d 0a 41 44 43 78 73 |SL A..CLC..ADCxs|
00003a50 63 72 0d 0a 41 44 43 23 26 33 30 0d 0a 4a 53 52 |cr..ADC#&30..JSR|
00003a60 61 64 6f 66 63 6f 6c 0d 0a 53 45 43 0d 0a 53 42 |adofcol..SEC..SB|
00003a70 43 23 31 0d 0a 43 4d 50 6f 62 6a 65 63 74 73 0d |C#1..CMPobjects.|
00003a80 0a 42 45 51 64 6f 6f 72 0d 0a 43 4d 50 6f 62 6a |.BEQdoor..CMPobj|
00003a90 65 63 74 73 2b 31 0d 0a 42 4e 45 6e 6f 64 6f 72 |ects+1..BNEnodor|
00003aa0 0d 0a 2e 64 6f 6f 72 20 50 4c 41 0d 0a 53 45 43 |...door PLA..SEC|
00003ab0 0d 0a 52 54 53 0d 0a 2e 6e 6f 64 6f 72 20 50 4c |..RTS...nodor PL|
00003ac0 41 0d 0a 43 4c 43 0d 0a 52 54 53 0d 0a 2e 6c 6f |A..CLC..RTS...lo|
00003ad0 63 6b 74 79 70 65 20 4c 53 52 20 41 0d 0a 52 4f |cktype LSR A..RO|
00003ae0 52 20 41 0d 0a 52 4f 52 20 41 0d 0a 41 4e 44 23 |R A..ROR A..AND#|
00003af0 26 43 30 0d 0a 53 54 41 26 37 32 0d 0a 4c 44 59 |&C0..STA&72..LDY|
00003b00 23 30 0d 0a 2e 74 72 61 6e 73 74 6f 70 20 4c 44 |#0...transtop LD|
00003b10 41 28 26 37 30 29 2c 59 0d 0a 41 4e 44 23 26 43 |A(&70),Y..AND#&C|
00003b20 30 0d 0a 4a 53 52 63 6f 6c 62 79 74 0d 0a 53 54 |0..JSRcolbyt..ST|
00003b30 41 28 26 37 30 29 2c 59 0d 0a 49 4e 59 0d 0a 43 |A(&70),Y..INY..C|
00003b40 50 59 23 26 34 30 0d 0a 42 4e 45 74 72 61 6e 73 |PY#&40..BNEtrans|
00003b50 74 6f 70 0d 0a 4c 44 59 23 30 0d 0a 4c 44 41 26 |top..LDY#0..LDA&|
00003b60 37 32 0d 0a 43 4c 43 0d 0a 41 44 43 23 26 34 30 |72..CLC..ADC#&40|
00003b70 0d 0a 53 54 41 26 37 32 0d 0a 4c 44 41 26 37 30 |..STA&72..LDA&70|
00003b80 0d 0a 43 4c 43 0d 0a 41 44 43 23 26 38 30 0d 0a |..CLC..ADC#&80..|
00003b90 53 54 41 26 37 30 0d 0a 4c 44 41 26 37 31 0d 0a |STA&70..LDA&71..|
00003ba0 41 44 43 23 32 0d 0a 53 54 41 26 37 31 0d 0a 2e |ADC#2..STA&71...|
00003bb0 74 72 61 6e 73 62 6f 74 20 4c 44 41 28 26 37 30 |transbot LDA(&70|
00003bc0 29 2c 59 0d 0a 41 4e 44 23 26 43 30 0d 0a 4a 53 |),Y..AND#&C0..JS|
00003bd0 52 63 6f 6c 62 79 74 0d 0a 53 54 41 28 26 37 30 |Rcolbyt..STA(&70|
00003be0 29 2c 59 0d 0a 49 4e 59 0d 0a 43 50 59 23 26 34 |),Y..INY..CPY#&4|
00003bf0 30 0d 0a 42 4e 45 74 72 61 6e 73 62 6f 74 0d 0a |0..BNEtransbot..|
00003c00 52 54 53 0d 0a 2e 63 6f 6c 62 79 74 20 50 48 41 |RTS...colbyt PHA|
00003c10 0d 0a 4c 44 41 73 63 72 6e 6f 0d 0a 4a 53 52 61 |..LDAscrno..JSRa|
00003c20 64 6f 66 63 6f 6c 0d 0a 54 41 58 0d 0a 4c 44 41 |dofcol..TAX..LDA|
00003c30 64 6f 6f 72 63 2c 58 0d 0a 54 41 58 0d 0a 50 4c |doorc,X..TAX..PL|
00003c40 41 0d 0a 2e 63 6f 6c 62 6c 6f 70 20 43 4c 43 0d |A...colblop CLC.|
00003c50 0a 41 44 43 28 26 37 32 29 2c 59 0d 0a 44 45 58 |.ADC(&72),Y..DEX|
00003c60 0d 0a 42 4e 45 63 6f 6c 62 6c 6f 70 0d 0a 52 54 |..BNEcolblop..RT|
00003c70 53 0d 0a 2e 61 64 6f 66 63 6f 6c 20 53 54 41 72 |S...adofcol STAr|
00003c80 65 61 64 63 6c 6c 2b 32 0d 0a 53 54 41 72 65 61 |eadcll+2..STArea|
00003c90 64 63 6c 68 2b 32 0d 0a 2e 72 65 61 64 63 6c 6c |dclh+2...readcll|
00003ca0 20 4c 44 41 26 31 30 46 45 0d 0a 4c 53 52 20 41 | LDA&10FE..LSR A|
00003cb0 0d 0a 4c 53 52 20 41 0d 0a 4c 53 52 20 41 0d 0a |..LSR A..LSR A..|
00003cc0 4c 53 52 20 41 0d 0a 41 4e 44 23 34 0d 0a 53 54 |LSR A..AND#4..ST|
00003cd0 41 73 6d 61 64 2b 31 0d 0a 2e 72 65 61 64 63 6c |Asmad+1...readcl|
00003ce0 68 20 4c 44 41 26 31 30 46 46 0d 0a 41 53 4c 20 |h LDA&10FF..ASL |
00003cf0 41 0d 0a 52 4f 4c 20 41 0d 0a 52 4f 4c 20 41 0d |A..ROL A..ROL A.|
00003d00 0a 41 4e 44 23 33 0d 0a 43 4c 43 0d 0a 2e 73 6d |.AND#3..CLC...sm|
00003d10 61 64 20 41 44 43 23 30 0d 0a 52 54 53 0d 0a 2e |ad ADC#0..RTS...|
00003d20 70 75 7a 7a 20 4c 44 41 26 46 41 30 2c 59 0d 0a |puzz LDA&FA0,Y..|
00003d30 4c 53 52 20 41 0d 0a 4c 53 52 20 41 0d 0a 4c 53 |LSR A..LSR A..LS|
00003d40 52 20 41 0d 0a 4c 53 52 20 41 0d 0a 43 4d 50 78 |R A..LSR A..CMPx|
00003d50 73 63 72 0d 0a 42 4e 45 6e 6f 70 75 7a 7a 0d 0a |scr..BNEnopuzz..|
00003d60 4c 44 41 26 46 43 30 2c 59 0d 0a 4c 53 52 20 41 |LDA&FC0,Y..LSR A|
00003d70 0d 0a 4c 53 52 20 41 0d 0a 4c 53 52 20 41 0d 0a |..LSR A..LSR A..|
00003d80 4c 53 52 20 41 0d 0a 43 4d 50 79 73 63 72 0d 0a |LSR A..CMPyscr..|
00003d90 42 45 51 70 73 6f 6c 76 0d 0a 2e 6e 6f 70 75 7a |BEQpsolv...nopuz|
00003da0 7a 20 52 54 53 0d 0a 2e 70 73 6f 6c 76 20 4c 44 |z RTS...psolv LD|
00003db0 41 73 6f 75 6e 64 0d 0a 42 45 51 70 75 7a 73 6e |Asound..BEQpuzsn|
00003dc0 64 0d 0a 4c 44 41 23 37 0d 0a 4c 44 58 23 28 70 |d..LDA#7..LDX#(p|
00003dd0 75 7a 6e 20 4d 4f 44 20 32 35 36 29 0d 0a 4c 44 |uzn MOD 256)..LD|
00003de0 59 23 28 70 75 7a 6e 20 44 49 56 20 32 35 36 29 |Y#(puzn DIV 256)|
00003df0 0d 0a 4a 53 52 6f 73 77 6f 72 64 0d 0a 2e 70 75 |..JSRosword...pu|
00003e00 7a 73 6e 64 20 4c 44 59 26 37 30 0d 0a 4c 44 41 |zsnd LDY&70..LDA|
00003e10 26 37 30 30 2c 59 0d 0a 43 4d 50 23 33 32 0d 0a |&700,Y..CMP#32..|
00003e20 42 43 53 70 75 73 77 61 70 0d 0a 54 41 58 0d 0a |BCSpuswap..TAX..|
00003e30 4c 44 41 26 46 32 30 2c 59 0d 0a 53 54 41 26 46 |LDA&F20,Y..STA&F|
00003e40 32 30 2c 58 0d 0a 4c 44 41 26 46 34 30 2c 59 0d |20,X..LDA&F40,Y.|
00003e50 0a 53 54 41 26 46 34 30 2c 58 0d 0a 4c 44 41 26 |.STA&F40,X..LDA&|
00003e60 46 36 30 2c 59 0d 0a 53 54 41 26 46 36 30 2c 58 |F60,Y..STA&F60,X|
00003e70 0d 0a 4c 44 41 26 46 38 30 2c 59 0d 0a 53 54 41 |..LDA&F80,Y..STA|
00003e80 26 46 38 30 2c 58 0d 0a 2e 70 75 73 77 61 70 20 |&F80,X...puswap |
00003e90 4c 44 41 23 26 37 38 0d 0a 53 54 41 26 46 32 30 |LDA#&78..STA&F20|
00003ea0 2c 59 0d 0a 4c 44 41 26 37 32 30 2c 59 0d 0a 43 |,Y..LDA&720,Y..C|
00003eb0 4d 50 23 33 32 0d 0a 42 43 53 70 75 6d 6f 76 6f |MP#32..BCSpumovo|
00003ec0 0d 0a 54 41 58 0d 0a 4c 44 41 26 37 34 30 2c 59 |..TAX..LDA&740,Y|
00003ed0 0d 0a 41 4e 44 23 31 35 0d 0a 53 54 41 26 46 34 |..AND#15..STA&F4|
00003ee0 30 2c 58 0d 0a 4c 44 41 26 37 34 30 2c 59 0d 0a |0,X..LDA&740,Y..|
00003ef0 4c 53 52 20 41 0d 0a 4c 53 52 20 41 0d 0a 4c 53 |LSR A..LSR A..LS|
00003f00 52 20 41 0d 0a 4c 53 52 20 41 0d 0a 53 54 41 26 |R A..LSR A..STA&|
00003f10 46 32 30 2c 58 0d 0a 2e 70 75 6d 6f 76 6f 20 4c |F20,X...pumovo L|
00003f20 44 41 26 37 36 30 2c 59 0d 0a 43 4d 50 23 26 46 |DA&760,Y..CMP#&F|
00003f30 46 0d 0a 42 4e 45 70 75 7a 62 6c 6f 63 0d 0a 2e |F..BNEpuzbloc...|
00003f40 62 6c 6f 70 63 62 20 4c 44 41 23 31 0d 0a 53 54 |blopcb LDA#1..ST|
00003f50 41 73 63 72 63 68 0d 0a 53 45 44 0d 0a 4c 44 41 |Ascrch..SED..LDA|
00003f60 73 63 6f 72 65 0d 0a 43 4c 43 0d 0a 41 44 43 23 |score..CLC..ADC#|
00003f70 26 32 30 0d 0a 53 54 41 73 63 6f 72 65 0d 0a 4c |&20..STAscore..L|
00003f80 44 41 73 63 6f 72 65 2b 31 0d 0a 41 44 43 23 30 |DAscore+1..ADC#0|
00003f90 0d 0a 53 54 41 73 63 6f 72 65 2b 31 0d 0a 43 4c |..STAscore+1..CL|
00003fa0 44 0d 0a 4a 4d 50 63 6f 6d 70 6c 65 74 65 0d 0a |D..JMPcomplete..|
00003fb0 2e 70 75 7a 6e 20 45 51 55 57 31 0d 0a 45 51 55 |.puzn EQUW1..EQU|
00003fc0 57 33 0d 0a 45 51 55 57 35 32 0d 0a 45 51 55 57 |W3..EQUW52..EQUW|
00003fd0 32 30 0d 0a 2e 70 75 7a 62 6c 6f 63 20 4c 44 58 |20...puzbloc LDX|
00003fe0 78 73 63 72 0d 0a 53 54 58 78 63 68 0d 0a 4c 44 |xscr..STXxch..LD|
00003ff0 58 79 73 63 72 0d 0a 53 54 58 79 63 68 0d 0a 41 |Xyscr..STXych..A|
00004000 4e 44 23 31 35 0d 0a 53 54 41 79 73 63 72 0d 0a |ND#15..STAyscr..|
00004010 4c 44 41 26 37 36 30 2c 59 0d 0a 4c 53 52 20 41 |LDA&760,Y..LSR A|
00004020 0d 0a 4c 53 52 20 41 0d 0a 4c 53 52 20 41 0d 0a |..LSR A..LSR A..|
00004030 4c 53 52 20 41 0d 0a 53 54 41 78 73 63 72 0d 0a |LSR A..STAxscr..|
00004040 2e 62 6c 6f 6c 6f 70 20 4c 44 41 26 37 38 30 2c |.blolop LDA&780,|
00004050 59 0d 0a 41 4e 44 23 31 35 0d 0a 53 54 41 79 73 |Y..AND#15..STAys|
00004060 65 74 0d 0a 4c 44 41 26 37 38 30 2c 59 0d 0a 4c |et..LDA&780,Y..L|
00004070 53 52 20 41 0d 0a 4c 53 52 20 41 0d 0a 4c 53 52 |SR A..LSR A..LSR|
00004080 20 41 0d 0a 4c 53 52 20 41 0d 0a 53 54 41 78 73 | A..LSR A..STAxs|
00004090 65 74 0d 0a 50 48 41 0d 0a 54 59 41 0d 0a 50 48 |et..PHA..TYA..PH|
000040a0 41 0d 0a 4a 53 52 67 65 74 62 6c 6f 63 6b 0d 0a |A..JSRgetblock..|
000040b0 50 4c 41 0d 0a 54 41 58 0d 0a 50 4c 41 0d 0a 50 |PLA..TAX..PLA..P|
000040c0 48 41 0d 0a 54 41 59 0d 0a 4c 44 41 78 64 61 74 |HA..TAY..LDAxdat|
000040d0 61 2c 59 0d 0a 54 41 59 0d 0a 4c 44 41 26 37 41 |a,Y..TAY..LDA&7A|
000040e0 30 2c 58 0d 0a 41 4e 44 23 33 0d 0a 4c 53 52 20 |0,X..AND#3..LSR |
000040f0 41 0d 0a 52 4f 52 20 41 0d 0a 52 4f 52 20 41 0d |A..ROR A..ROR A.|
00004100 0a 53 54 41 63 6f 6c 0d 0a 4c 44 41 28 26 37 30 |.STAcol..LDA(&70|
00004110 29 2c 59 0d 0a 41 4e 44 23 26 33 46 0d 0a 4f 52 |),Y..AND#&3F..OR|
00004120 41 63 6f 6c 0d 0a 53 54 41 28 26 37 30 29 2c 59 |Acol..STA(&70),Y|
00004130 0d 0a 49 4e 59 0d 0a 4c 44 41 26 37 41 30 2c 58 |..INY..LDA&7A0,X|
00004140 0d 0a 41 4e 44 23 31 32 0d 0a 41 53 4c 20 41 0d |..AND#12..ASL A.|
00004150 0a 41 53 4c 20 41 0d 0a 41 53 4c 20 41 0d 0a 41 |.ASL A..ASL A..A|
00004160 53 4c 20 41 0d 0a 53 54 41 63 6f 6c 0d 0a 4c 44 |SL A..STAcol..LD|
00004170 41 28 26 37 30 29 2c 59 0d 0a 41 4e 44 23 26 33 |A(&70),Y..AND#&3|
00004180 46 0d 0a 4f 52 41 63 6f 6c 0d 0a 53 54 41 28 26 |F..ORAcol..STA(&|
00004190 37 30 29 2c 59 0d 0a 50 4c 41 0d 0a 4c 53 52 20 |70),Y..PLA..LSR |
000041a0 41 0d 0a 54 41 59 0d 0a 4c 44 41 68 62 64 61 74 |A..TAY..LDAhbdat|
000041b0 2c 59 0d 0a 54 41 59 0d 0a 4c 44 41 26 37 41 30 |,Y..TAY..LDA&7A0|
000041c0 2c 58 0d 0a 41 4e 44 23 31 36 0d 0a 41 53 4c 20 |,X..AND#16..ASL |
000041d0 41 0d 0a 41 53 4c 20 41 0d 0a 53 54 41 63 6f 6c |A..ASL A..STAcol|
000041e0 0d 0a 4c 44 41 78 73 65 74 0d 0a 41 4e 44 23 31 |..LDAxset..AND#1|
000041f0 0d 0a 42 45 51 73 65 63 70 75 7a 0d 0a 4c 44 41 |..BEQsecpuz..LDA|
00004200 28 26 37 30 29 2c 59 0d 0a 41 4e 44 23 26 37 46 |(&70),Y..AND#&7F|
00004210 0d 0a 43 4c 43 0d 0a 41 44 43 63 6f 6c 0d 0a 41 |..CLC..ADCcol..A|
00004220 44 43 63 6f 6c 0d 0a 53 54 41 28 26 37 30 29 2c |DCcol..STA(&70),|
00004230 59 0d 0a 4a 4d 50 66 69 72 70 75 7a 0d 0a 2e 73 |Y..JMPfirpuz...s|
00004240 65 63 70 75 7a 20 4c 44 41 28 26 37 30 29 2c 59 |ecpuz LDA(&70),Y|
00004250 0d 0a 41 4e 44 23 26 42 46 0d 0a 43 4c 43 0d 0a |..AND#&BF..CLC..|
00004260 41 44 43 63 6f 6c 0d 0a 53 54 41 28 26 37 30 29 |ADCcol..STA(&70)|
00004270 2c 59 0d 0a 2e 66 69 72 70 75 7a 20 54 58 41 0d |,Y...firpuz TXA.|
00004280 0a 43 4c 43 0d 0a 41 44 43 23 26 34 30 0d 0a 54 |.CLC..ADC#&40..T|
00004290 41 59 0d 0a 43 4d 50 23 26 38 30 0d 0a 42 43 53 |AY..CMP#&80..BCS|
000042a0 65 6e 64 62 6c 6f 63 0d 0a 4a 4d 50 62 6c 6f 6c |endbloc..JMPblol|
000042b0 6f 70 0d 0a 2e 65 6e 64 62 6c 6f 63 20 4c 44 41 |op...endbloc LDA|
000042c0 78 63 68 0d 0a 53 54 41 78 73 63 72 0d 0a 4c 44 |xch..STAxscr..LD|
000042d0 41 79 63 68 0d 0a 53 54 41 79 73 63 72 0d 0a 4a |Aych..STAyscr..J|
000042e0 4d 50 62 6c 6f 70 63 62 0d 0a 2e 6e 61 6d 73 63 |MPblopcb...namsc|
000042f0 72 20 4c 44 59 23 30 0d 0a 54 59 41 0d 0a 2e 73 |r LDY#0..TYA...s|
00004300 63 72 6e 61 6d 20 53 54 41 6e 61 6d 74 2c 59 0d |crnam STAnamt,Y.|
00004310 0a 49 4e 59 0d 0a 43 50 59 23 31 36 0d 0a 42 4e |.INY..CPY#16..BN|
00004320 45 73 63 72 6e 61 6d 0d 0a 4c 44 41 79 73 63 72 |Escrnam..LDAyscr|
00004330 0d 0a 41 53 4c 20 41 0d 0a 41 53 4c 20 41 0d 0a |..ASL A..ASL A..|
00004340 41 53 4c 20 41 0d 0a 41 53 4c 20 41 0d 0a 43 4c |ASL A..ASL A..CL|
00004350 43 0d 0a 41 44 43 78 73 63 72 0d 0a 54 41 59 0d |C..ADCxscr..TAY.|
00004360 0a 4c 44 41 26 36 42 30 2c 59 0d 0a 54 41 58 0d |.LDA&6B0,Y..TAX.|
00004370 0a 4c 44 41 26 39 30 30 2c 58 0d 0a 53 54 41 78 |.LDA&900,X..STAx|
00004380 63 68 0d 0a 4c 53 52 20 41 0d 0a 53 54 41 63 6f |ch..LSR A..STAco|
00004390 6c 0d 0a 4c 44 41 23 38 0d 0a 53 45 43 0d 0a 53 |l..LDA#8..SEC..S|
000043a0 42 43 63 6f 6c 0d 0a 54 41 59 0d 0a 2e 77 72 6e |BCcol..TAY...wrn|
000043b0 61 6d 20 4c 44 41 26 39 30 31 2c 58 0d 0a 53 54 |am LDA&901,X..ST|
000043c0 41 6e 61 6d 74 2c 59 0d 0a 49 4e 59 0d 0a 49 4e |Anamt,Y..INY..IN|
000043d0 58 0d 0a 44 45 43 78 63 68 0d 0a 42 4e 45 77 72 |X..DECxch..BNEwr|
000043e0 6e 61 6d 0d 0a 4c 44 41 23 32 30 0d 0a 53 54 41 |nam..LDA#20..STA|
000043f0 63 6f 6c 0d 0a 4c 44 58 23 32 0d 0a 53 54 58 78 |col..LDX#2..STXx|
00004400 63 68 0d 0a 44 45 58 0d 0a 53 54 58 79 63 68 0d |ch..DEX..STXych.|
00004410 0a 4c 44 41 23 28 6e 61 6d 74 20 4d 4f 44 20 32 |.LDA#(namt MOD 2|
00004420 35 36 29 0d 0a 53 54 41 26 37 32 0d 0a 4c 44 41 |56)..STA&72..LDA|
00004430 23 28 6e 61 6d 74 20 44 49 56 20 32 35 36 29 0d |#(namt DIV 256).|
00004440 0a 53 54 41 26 37 33 0d 0a 4a 4d 50 73 74 72 69 |.STA&73..JMPstri|
00004450 6e 67 0d 0a 0d 0a 50 25 3d 26 31 30 30 0d 0a 4f |ng....P%=&100..O|
00004460 25 3d 26 36 38 30 30 0d 0a 0d 0a 2e 74 69 74 73 |%=&6800.....tits|
00004470 63 72 73 20 45 51 55 42 26 33 34 0d 0a 45 51 55 |crs EQUB&34..EQU|
00004480 42 26 35 32 0d 0a 45 51 55 42 26 34 32 0d 0a 45 |B&52..EQUB&42..E|
00004490 51 55 42 26 45 32 0d 0a 45 51 55 42 26 35 31 0d |QUB&E2..EQUB&51.|
000044a0 0a 45 51 55 42 26 39 33 0d 0a 45 51 55 42 26 39 |.EQUB&93..EQUB&9|
000044b0 30 0d 0a 45 51 55 42 26 45 31 0d 0a 2e 6d 6f 6e |0..EQUB&E1...mon|
000044c0 70 64 20 45 51 55 42 26 30 32 0d 0a 45 51 55 42 |pd EQUB&02..EQUB|
000044d0 26 30 34 0d 0a 45 51 55 42 26 30 36 0d 0a 45 51 |&04..EQUB&06..EQ|
000044e0 55 42 26 30 38 0d 0a 2e 6a 75 6d 70 6e 20 45 51 |UB&08...jumpn EQ|
000044f0 55 57 31 0d 0a 45 51 55 57 31 0d 0a 45 51 55 57 |UW1..EQUW1..EQUW|
00004500 35 32 0d 0a 45 51 55 57 35 0d 0a 2e 7a 61 70 6e |52..EQUW5...zapn|
00004510 20 45 51 55 57 31 0d 0a 45 51 55 57 32 0d 0a 45 | EQUW1..EQUW2..E|
00004520 51 55 57 35 32 0d 0a 45 51 55 57 31 30 0d 0a 2e |QUW52..EQUW10...|
00004530 73 77 69 74 6e 20 45 51 55 57 31 0d 0a 45 51 55 |switn EQUW1..EQU|
00004540 57 33 0d 0a 45 51 55 57 35 32 0d 0a 45 51 55 57 |W3..EQUW52..EQUW|
00004550 32 0d 0a 2e 73 63 6f 72 74 20 45 51 55 42 31 36 |2...scort EQUB16|
00004560 0d 0a 45 51 55 42 33 0d 0a 45 51 55 42 32 32 0d |..EQUB3..EQUB22.|
00004570 0a 45 51 55 42 31 35 0d 0a 45 51 55 42 35 0d 0a |.EQUB15..EQUB5..|
00004580 45 51 55 42 32 35 35 0d 0a 2e 70 6f 77 74 20 45 |EQUB255...powt E|
00004590 51 55 42 31 34 0d 0a 45 51 55 42 32 32 0d 0a 45 |QUB14..EQUB22..E|
000045a0 51 55 42 32 30 0d 0a 45 51 55 42 35 0d 0a 45 51 |QUB20..EQUB5..EQ|
000045b0 55 42 31 35 0d 0a 45 51 55 42 32 35 35 0d 0a 2e |UB15..EQUB255...|
000045c0 6f 62 73 74 78 74 20 45 51 55 42 32 32 0d 0a 45 |obstxt EQUB22..E|
000045d0 51 55 42 32 0d 0a 45 51 55 42 39 0d 0a 45 51 55 |QUB2..EQUB9..EQU|
000045e0 42 31 36 0d 0a 45 51 55 42 32 35 35 0d 0a 2e 73 |B16..EQUB255...s|
000045f0 65 71 75 65 6e 20 45 51 55 42 30 0d 0a 45 51 55 |equen EQUB0..EQU|
00004600 42 31 34 0d 0a 45 51 55 42 32 38 0d 0a 2e 6c 6f |B14..EQUB28...lo|
00004610 77 61 64 20 45 51 55 42 30 0d 0a 45 51 55 42 26 |wad EQUB0..EQUB&|
00004620 33 30 0d 0a 45 51 55 42 26 44 30 0d 0a 45 51 55 |30..EQUB&D0..EQU|
00004630 42 26 42 30 0d 0a 45 51 55 42 26 35 30 0d 0a 45 |B&B0..EQUB&50..E|
00004640 51 55 42 26 38 30 0d 0a 45 51 55 42 26 38 30 0d |QUB&80..EQUB&80.|
00004650 0a 2e 68 69 67 68 61 64 20 45 51 55 42 30 0d 0a |..highad EQUB0..|
00004660 45 51 55 42 30 0d 0a 45 51 55 42 26 46 46 0d 0a |EQUB0..EQUB&FF..|
00004670 45 51 55 42 32 0d 0a 45 51 55 42 32 0d 0a 45 51 |EQUB2..EQUB2..EQ|
00004680 55 42 26 46 44 0d 0a 45 51 55 42 32 0d 0a 45 51 |UB&FD..EQUB2..EQ|
00004690 55 42 30 0d 0a 45 51 55 42 26 32 30 0d 0a 45 51 |UB0..EQUB&20..EQ|
000046a0 55 42 26 45 30 0d 0a 45 51 55 42 26 41 30 0d 0a |UB&E0..EQUB&A0..|
000046b0 45 51 55 42 26 36 30 0d 0a 45 51 55 42 26 38 30 |EQUB&60..EQUB&80|
000046c0 0d 0a 45 51 55 42 26 38 30 0d 0a 45 51 55 42 30 |..EQUB&80..EQUB0|
000046d0 0d 0a 45 51 55 42 30 0d 0a 45 51 55 42 26 46 46 |..EQUB0..EQUB&FF|
000046e0 0d 0a 45 51 55 42 32 0d 0a 45 51 55 42 32 0d 0a |..EQUB2..EQUB2..|
000046f0 45 51 55 42 26 46 44 0d 0a 45 51 55 42 32 0d 0a |EQUB&FD..EQUB2..|
00004700 45 51 55 42 30 0d 0a 45 51 55 42 26 31 30 0d 0a |EQUB0..EQUB&10..|
00004710 45 51 55 42 26 46 30 0d 0a 45 51 55 42 26 39 30 |EQUB&F0..EQUB&90|
00004720 0d 0a 45 51 55 42 26 37 30 0d 0a 45 51 55 42 30 |..EQUB&70..EQUB0|
00004730 0d 0a 45 51 55 42 30 0d 0a 45 51 55 42 30 0d 0a |..EQUB0..EQUB0..|
00004740 45 51 55 42 30 0d 0a 45 51 55 42 26 46 46 0d 0a |EQUB0..EQUB&FF..|
00004750 45 51 55 42 32 0d 0a 45 51 55 42 32 0d 0a 45 51 |EQUB2..EQUB2..EQ|
00004760 55 42 30 0d 0a 45 51 55 42 30 0d 0a 2e 78 64 61 |UB0..EQUB0...xda|
00004770 74 61 20 45 51 55 42 30 0d 0a 45 51 55 42 32 0d |ta EQUB0..EQUB2.|
00004780 0a 45 51 55 42 35 0d 0a 45 51 55 42 37 0d 0a 45 |.EQUB5..EQUB7..E|
00004790 51 55 42 31 30 0d 0a 45 51 55 42 31 32 0d 0a 45 |QUB10..EQUB12..E|
000047a0 51 55 42 31 35 0d 0a 45 51 55 42 31 37 0d 0a 45 |QUB15..EQUB17..E|
000047b0 51 55 42 32 30 0d 0a 45 51 55 42 32 32 0d 0a 2e |QUB20..EQUB22...|
000047c0 68 62 64 61 74 20 45 51 55 42 34 0d 0a 45 51 55 |hbdat EQUB4..EQU|
000047d0 42 39 0d 0a 45 51 55 42 31 34 0d 0a 45 51 55 42 |B9..EQUB14..EQUB|
000047e0 31 39 0d 0a 45 51 55 42 32 34 0d 0a 2e 64 6f 6f |19..EQUB24...doo|
000047f0 72 63 20 45 51 55 42 30 0d 0a 45 51 55 42 31 0d |rc EQUB0..EQUB1.|
00004800 0a 45 51 55 42 34 0d 0a 45 51 55 42 35 0d 0a 45 |.EQUB4..EQUB5..E|
00004810 51 55 42 31 36 0d 0a 45 51 55 42 31 37 0d 0a 45 |QUB16..EQUB17..E|
00004820 51 55 42 32 30 0d 0a 45 51 55 42 32 31 0d 0a 2e |QUB20..EQUB21...|
00004830 6e 61 6d 74 20 45 51 55 53 22 2d 2d 2d 2d 2d 2d |namt EQUS"------|
00004840 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 22 0d 0a 45 51 55 |----------"..EQU|
00004850 42 32 35 35 0d 0a 2e 63 72 65 64 61 20 45 51 55 |B255...creda EQU|
00004860 42 31 34 0d 0a 45 51 55 42 31 35 0d 0a 45 51 55 |B14..EQUB15..EQU|
00004870 42 32 32 0d 0a 45 51 55 42 37 0d 0a 45 51 55 42 |B22..EQUB7..EQUB|
00004880 31 35 0d 0a 45 51 55 42 31 0d 0a 45 51 55 42 31 |15..EQUB1..EQUB1|
00004890 32 0d 0a 45 51 55 42 31 32 0d 0a 45 51 55 42 35 |2..EQUB12..EQUB5|
000048a0 0d 0a 45 51 55 42 34 0d 0a 45 51 55 42 30 0d 0a |..EQUB4..EQUB0..|
000048b0 45 51 55 42 31 0d 0a 45 51 55 42 31 33 0d 0a 45 |EQUB1..EQUB13..E|
000048c0 51 55 42 34 0d 0a 45 51 55 42 32 35 35 0d 0a 2e |QUB4..EQUB255...|
000048d0 63 72 65 64 62 20 45 51 55 42 34 0d 0a 45 51 55 |credb EQUB4..EQU|
000048e0 42 35 0d 0a 45 51 55 42 31 36 0d 0a 45 51 55 42 |B5..EQUB16..EQUB|
000048f0 32 33 0d 0a 45 51 55 42 37 0d 0a 45 51 55 42 31 |23..EQUB7..EQUB1|
00004900 33 0d 0a 45 51 55 42 35 0d 0a 45 51 55 42 34 0d |3..EQUB5..EQUB4.|
00004910 0a 45 51 55 42 30 0d 0a 45 51 55 42 32 0d 0a 45 |.EQUB0..EQUB2..E|
00004920 51 55 42 32 31 0d 0a 45 51 55 42 32 35 35 0d 0a |QUB21..EQUB255..|
00004930 2e 73 6e 64 6f 6e 20 45 51 55 42 31 36 0d 0a 45 |.sndon EQUB16..E|
00004940 51 55 42 32 32 0d 0a 45 51 55 42 31 38 0d 0a 45 |QUB22..EQUB18..E|
00004950 51 55 42 31 33 0d 0a 45 51 55 42 34 0d 0a 45 51 |QUB13..EQUB4..EQ|
00004960 55 42 30 0d 0a 45 51 55 42 32 32 0d 0a 45 51 55 |UB0..EQUB22..EQU|
00004970 42 31 33 0d 0a 45 51 55 42 30 0d 0a 45 51 55 42 |B13..EQUB0..EQUB|
00004980 32 35 35 0d 0a 2e 73 6e 64 6f 66 66 20 45 51 55 |255...sndoff EQU|
00004990 42 31 36 0d 0a 45 51 55 42 32 32 0d 0a 45 51 55 |B16..EQUB22..EQU|
000049a0 42 31 38 0d 0a 45 51 55 42 31 33 0d 0a 45 51 55 |B18..EQUB13..EQU|
000049b0 42 34 0d 0a 45 51 55 42 30 0d 0a 45 51 55 42 32 |B4..EQUB0..EQUB2|
000049c0 32 0d 0a 45 51 55 42 36 0d 0a 45 51 55 42 36 0d |2..EQUB6..EQUB6.|
000049d0 0a 45 51 55 42 32 35 35 0d 0a 2e 65 6e 72 75 70 |.EQUB255...enrup|
000049e0 20 45 51 55 57 31 0d 0a 45 51 55 57 31 0d 0a 45 | EQUW1..EQUW1..E|
000049f0 51 55 57 35 32 0d 0a 45 51 55 57 32 30 0d 0a 0d |QUW52..EQUW20...|
00004a00 0a 50 25 3d 26 31 43 38 30 0d 0a 4f 25 3d 26 36 |.P%=&1C80..O%=&6|
00004a10 34 38 30 0d 0a 0d 0a 2e 63 6f 6d 70 6c 65 74 65 |480.....complete|
00004a20 20 43 50 59 23 26 31 34 0d 0a 42 45 51 63 6f 6e | CPY#&14..BEQcon|
00004a30 67 75 0d 0a 4a 4d 50 73 63 72 65 65 6e 0d 0a 2e |gu..JMPscreen...|
00004a40 63 6f 6e 67 75 20 4a 53 52 73 62 6f 61 72 64 0d |congu JSRsboard.|
00004a50 0a 4c 44 41 23 28 63 6d 70 74 78 74 20 4d 4f 44 |.LDA#(cmptxt MOD|
00004a60 20 32 35 36 29 0d 0a 53 54 41 26 37 32 0d 0a 4c | 256)..STA&72..L|
00004a70 44 41 23 28 63 6d 70 74 78 74 20 44 49 56 20 32 |DA#(cmptxt DIV 2|
00004a80 35 36 29 0d 0a 53 54 41 26 37 33 0d 0a 4c 44 41 |56)..STA&73..LDA|
00004a90 23 32 0d 0a 53 54 41 78 63 68 0d 0a 4c 44 41 23 |#2..STAxch..LDA#|
00004aa0 37 0d 0a 53 54 41 79 63 68 0d 0a 4a 53 52 73 74 |7..STAych..JSRst|
00004ab0 72 69 6e 67 0d 0a 4c 44 41 23 28 63 6d 70 74 78 |ring..LDA#(cmptx|
00004ac0 74 62 20 4d 4f 44 20 32 35 36 29 0d 0a 53 54 41 |tb MOD 256)..STA|
00004ad0 26 37 32 0d 0a 4c 44 41 23 28 63 6d 70 74 78 74 |&72..LDA#(cmptxt|
00004ae0 62 20 44 49 56 20 32 35 36 29 0d 0a 53 54 41 26 |b DIV 256)..STA&|
00004af0 37 33 0d 0a 4c 44 41 23 33 0d 0a 53 54 41 78 63 |73..LDA#3..STAxc|
00004b00 68 0d 0a 4c 44 41 23 31 34 0d 0a 53 54 41 79 63 |h..LDA#14..STAyc|
00004b10 68 0d 0a 4a 53 52 73 74 72 69 6e 67 0d 0a 2e 74 |h..JSRstring...t|
00004b20 68 65 65 6e 64 20 4a 4d 50 74 68 65 65 6e 64 0d |heend JMPtheend.|
00004b30 0a 2e 6d 61 69 6e 63 6c 65 61 72 20 4c 44 41 6d |..mainclear LDAm|
00004b40 74 79 70 65 0d 0a 42 45 51 6e 6f 63 6c 65 61 72 |type..BEQnoclear|
00004b50 6d 0d 0a 4c 44 41 78 70 6f 73 0d 0a 43 4d 50 78 |m..LDAxpos..CMPx|
00004b60 6d 6f 6f 0d 0a 42 4e 45 6d 63 69 0d 0a 4c 44 41 |moo..BNEmci..LDA|
00004b70 79 70 6f 73 0d 0a 43 4d 50 79 6d 6f 6f 0d 0a 42 |ypos..CMPymoo..B|
00004b80 45 51 6d 63 69 69 0d 0a 2e 6d 63 69 20 4c 44 41 |EQmcii...mci LDA|
00004b90 63 6c 65 61 72 75 70 0d 0a 42 45 51 6e 6f 63 6c |clearup..BEQnocl|
00004ba0 65 61 72 6d 0d 0a 2e 6d 63 69 69 20 4c 44 41 23 |earm...mcii LDA#|
00004bb0 31 0d 0a 53 54 41 63 68 61 6e 67 65 64 0d 0a 4a |1..STAchanged..J|
00004bc0 53 52 64 65 6c 79 6f 75 0d 0a 4c 44 58 78 70 6f |SRdelyou..LDXxpo|
00004bd0 73 0d 0a 4c 44 59 79 70 6f 73 0d 0a 4a 53 52 6d |s..LDYypos..JSRm|
00004be0 63 64 0d 0a 4c 44 41 23 30 0d 0a 53 54 41 77 69 |cd..LDA#0..STAwi|
00004bf0 70 65 72 0d 0a 53 54 41 77 69 70 65 72 6d 0d 0a |per..STAwiperm..|
00004c00 4c 44 58 78 6d 6f 6e 74 0d 0a 4c 44 59 79 6d 6f |LDXxmont..LDYymo|
00004c10 6e 74 0d 0a 4a 4d 50 6d 63 64 0d 0a 2e 6e 6f 63 |nt..JMPmcd...noc|
00004c20 6c 65 61 72 6d 20 52 54 53 0d 0a 2e 64 69 73 70 |learm RTS...disp|
00004c30 6d 6f 6e 20 4c 44 41 6d 74 79 70 65 0d 0a 42 45 |mon LDAmtype..BE|
00004c40 51 6e 6f 6d 6f 6e 73 72 0d 0a 4c 44 41 26 37 38 |Qnomonsr..LDA&78|
00004c50 0d 0a 50 48 41 0d 0a 4c 44 41 26 37 39 0d 0a 50 |..PHA..LDA&79..P|
00004c60 48 41 0d 0a 4c 44 41 66 69 6e 65 0d 0a 50 48 41 |HA..LDAfine..PHA|
00004c70 0d 0a 4c 44 41 78 70 6f 73 0d 0a 50 48 41 0d 0a |..LDAxpos..PHA..|
00004c80 4c 44 41 79 70 6f 73 0d 0a 50 48 41 0d 0a 4c 44 |LDAypos..PHA..LD|
00004c90 41 77 69 70 65 72 0d 0a 50 48 41 0d 0a 4c 44 41 |Awiper..PHA..LDA|
00004ca0 77 69 70 65 72 6d 0d 0a 53 54 41 77 69 70 65 72 |wiperm..STAwiper|
00004cb0 0d 0a 4c 44 41 78 6d 6f 6e 74 0d 0a 53 54 41 78 |..LDAxmont..STAx|
00004cc0 70 6f 73 0d 0a 4c 44 41 79 6d 6f 6e 74 0d 0a 53 |pos..LDAymont..S|
00004cd0 54 41 79 70 6f 73 0d 0a 4c 44 41 6d 66 69 6e 65 |TAypos..LDAmfine|
00004ce0 0d 0a 53 54 41 66 69 6e 65 0d 0a 4c 44 41 26 37 |..STAfine..LDA&7|
00004cf0 41 0d 0a 53 54 41 26 37 38 0d 0a 4c 44 41 26 37 |A..STA&78..LDA&7|
00004d00 42 0d 0a 53 54 41 26 37 39 0d 0a 4c 44 41 23 26 |B..STA&79..LDA#&|
00004d10 32 46 0d 0a 53 54 41 77 69 72 65 70 2b 31 0d 0a |2F..STAwirep+1..|
00004d20 53 54 41 77 69 72 65 70 62 2b 31 0d 0a 4c 44 41 |STAwirepb+1..LDA|
00004d30 23 26 43 30 0d 0a 53 54 41 77 69 72 65 70 0d 0a |#&C0..STAwirep..|
00004d40 4c 44 41 23 26 45 30 0d 0a 53 54 41 77 69 72 65 |LDA#&E0..STAwire|
00004d50 70 62 0d 0a 4c 44 41 23 31 0d 0a 53 54 41 6d 66 |pb..LDA#1..STAmf|
00004d60 6c 61 67 0d 0a 4a 53 52 64 69 73 70 73 68 72 0d |lag..JSRdispshr.|
00004d70 0a 4c 44 41 26 37 38 0d 0a 53 54 41 26 37 41 0d |.LDA&78..STA&7A.|
00004d80 0a 4c 44 41 26 37 39 0d 0a 53 54 41 26 37 42 0d |.LDA&79..STA&7B.|
00004d90 0a 50 4c 41 0d 0a 53 54 41 77 69 70 65 72 0d 0a |.PLA..STAwiper..|
00004da0 50 4c 41 0d 0a 53 54 41 79 70 6f 73 0d 0a 50 4c |PLA..STAypos..PL|
00004db0 41 0d 0a 53 54 41 78 70 6f 73 0d 0a 50 4c 41 0d |A..STAxpos..PLA.|
00004dc0 0a 53 54 41 66 69 6e 65 0d 0a 50 4c 41 0d 0a 53 |.STAfine..PLA..S|
00004dd0 54 41 26 37 39 0d 0a 50 4c 41 0d 0a 53 54 41 26 |TA&79..PLA..STA&|
00004de0 37 38 0d 0a 4c 44 41 23 30 0d 0a 53 54 41 6d 66 |78..LDA#0..STAmf|
00004df0 6c 61 67 0d 0a 2e 6e 6f 6d 6f 6e 73 72 20 52 54 |lag...nomonsr RT|
00004e00 53 0d 0a 2e 6d 6f 6e 73 65 74 20 4c 44 41 79 73 |S...monset LDAys|
00004e10 63 72 0d 0a 41 53 4c 20 41 0d 0a 41 53 4c 20 41 |cr..ASL A..ASL A|
00004e20 0d 0a 41 53 4c 20 41 0d 0a 41 53 4c 20 41 0d 0a |..ASL A..ASL A..|
00004e30 43 4c 43 0d 0a 41 44 43 78 73 63 72 0d 0a 41 44 |CLC..ADCxscr..AD|
00004e40 43 23 26 33 30 0d 0a 53 54 41 26 37 31 0d 0a 4c |C#&30..STA&71..L|
00004e50 44 59 23 30 0d 0a 53 54 59 26 37 30 0d 0a 49 4e |DY#0..STY&70..IN|
00004e60 59 0d 0a 53 54 59 6d 66 69 6e 65 0d 0a 4c 44 59 |Y..STYmfine..LDY|
00004e70 23 26 46 42 0d 0a 4c 44 41 28 26 37 30 29 2c 59 |#&FB..LDA(&70),Y|
00004e80 0d 0a 41 53 4c 20 41 0d 0a 52 4f 4c 20 41 0d 0a |..ASL A..ROL A..|
00004e90 52 4f 4c 20 41 0d 0a 41 4e 44 23 33 0d 0a 54 41 |ROL A..AND#3..TA|
00004ea0 58 0d 0a 4c 44 41 6d 6f 6e 70 64 2c 58 0d 0a 53 |X..LDAmonpd,X..S|
00004eb0 54 41 78 6d 6f 6e 74 0d 0a 49 4e 59 0d 0a 4c 44 |TAxmont..INY..LD|
00004ec0 41 28 26 37 30 29 2c 59 0d 0a 41 53 4c 20 41 0d |A(&70),Y..ASL A.|
00004ed0 0a 52 4f 4c 20 41 0d 0a 52 4f 4c 20 41 0d 0a 41 |.ROL A..ROL A..A|
00004ee0 4e 44 23 33 0d 0a 54 41 58 0d 0a 4c 44 41 6d 6f |ND#3..TAX..LDAmo|
00004ef0 6e 70 64 2c 58 0d 0a 53 54 41 79 6d 6f 6e 74 0d |npd,X..STAymont.|
00004f00 0a 49 4e 59 0d 0a 4c 44 41 28 26 37 30 29 2c 59 |.INY..LDA(&70),Y|
00004f10 0d 0a 41 53 4c 20 41 0d 0a 52 4f 4c 20 41 0d 0a |..ASL A..ROL A..|
00004f20 52 4f 4c 20 41 0d 0a 41 4e 44 23 33 0d 0a 53 54 |ROL A..AND#3..ST|
00004f30 41 6d 74 79 70 65 0d 0a 4c 44 41 23 26 46 46 0d |Amtype..LDA#&FF.|
00004f40 0a 53 54 41 6d 64 69 72 0d 0a 2e 6c 61 73 65 78 |.STAmdir...lasex|
00004f50 69 74 20 52 54 53 0d 0a 2e 6d 6f 6e 70 72 6f 20 |it RTS...monpro |
00004f60 4c 44 41 78 6d 6f 6e 74 0d 0a 53 54 41 78 6d 6f |LDAxmont..STAxmo|
00004f70 6f 0d 0a 4c 44 41 79 6d 6f 6e 74 0d 0a 53 54 41 |o..LDAymont..STA|
00004f80 79 6d 6f 6f 0d 0a 4c 44 41 23 30 0d 0a 53 54 41 |ymoo..LDA#0..STA|
00004f90 63 6c 65 61 72 75 70 0d 0a 4c 44 41 6d 74 79 70 |clearup..LDAmtyp|
00004fa0 65 0d 0a 42 45 51 6c 61 73 65 78 69 74 0d 0a 43 |e..BEQlasexit..C|
00004fb0 4d 50 23 33 0d 0a 42 4e 45 6e 6f 6d 6f 6e 73 74 |MP#3..BNEnomonst|
00004fc0 6c 0d 0a 4c 44 41 23 30 0d 0a 53 54 41 6d 66 69 |l..LDA#0..STAmfi|
00004fd0 6e 65 0d 0a 53 54 41 6d 6f 6e 73 74 61 74 0d 0a |ne..STAmonstat..|
00004fe0 2e 6e 6f 6d 6f 6e 73 74 6c 20 4c 44 41 78 70 6f |.nomonstl LDAxpo|
00004ff0 73 0d 0a 43 4d 50 78 6d 6f 6e 74 0d 0a 42 4e 45 |s..CMPxmont..BNE|
00005000 6d 6f 6e 74 63 68 0d 0a 4c 44 41 79 70 6f 73 0d |montch..LDAypos.|
00005010 0a 43 4d 50 79 6d 6f 6e 74 0d 0a 42 4e 45 6d 6f |.CMPymont..BNEmo|
00005020 6e 74 63 68 0d 0a 4c 44 41 23 31 0d 0a 53 54 41 |ntch..LDA#1..STA|
00005030 63 6c 65 61 72 75 70 0d 0a 53 54 41 70 6f 77 63 |clearup..STApowc|
00005040 68 61 6e 67 65 0d 0a 4c 44 41 66 6e 73 74 0d 0a |hange..LDAfnst..|
00005050 42 45 51 6d 6f 6e 74 63 68 0d 0a 4c 44 41 70 6f |BEQmontch..LDApo|
00005060 77 65 72 0d 0a 53 45 43 0d 0a 53 42 43 23 38 0d |wer..SEC..SBC#8.|
00005070 0a 53 54 41 70 6f 77 65 72 0d 0a 42 43 53 6d 6f |.STApower..BCSmo|
00005080 6e 74 63 68 65 0d 0a 50 4c 41 0d 0a 50 4c 41 0d |ntche..PLA..PLA.|
00005090 0a 4a 4d 50 6b 69 6c 6c 75 0d 0a 2e 6d 6f 6e 74 |.JMPkillu...mont|
000050a0 63 68 65 20 4c 44 41 6d 74 79 70 65 0d 0a 43 4d |che LDAmtype..CM|
000050b0 50 23 33 0d 0a 42 4e 45 6d 6f 6e 74 63 68 0d 0a |P#3..BNEmontch..|
000050c0 50 4c 41 0d 0a 50 4c 41 0d 0a 4a 4d 50 7a 61 70 |PLA..PLA..JMPzap|
000050d0 0d 0a 2e 6d 6f 6e 74 63 68 20 4a 53 52 6d 6f 76 |...montch JSRmov|
000050e0 65 6d 73 74 0d 0a 4c 44 41 78 70 6f 73 0d 0a 43 |emst..LDAxpos..C|
000050f0 4d 50 78 6d 6f 6e 74 0d 0a 42 4e 45 6c 61 73 65 |MPxmont..BNElase|
00005100 78 69 74 0d 0a 4c 44 41 79 70 6f 73 0d 0a 43 4d |xit..LDAypos..CM|
00005110 50 79 6d 6f 6e 74 0d 0a 42 4e 45 6c 61 73 65 78 |Pymont..BNElasex|
00005120 69 74 0d 0a 4c 44 41 23 31 0d 0a 53 54 41 63 6c |it..LDA#1..STAcl|
00005130 65 61 72 75 70 0d 0a 53 54 41 70 6f 77 63 68 61 |earup..STApowcha|
00005140 6e 67 65 0d 0a 4c 44 41 70 6f 77 65 72 0d 0a 53 |nge..LDApower..S|
00005150 45 43 0d 0a 53 42 43 23 38 0d 0a 53 54 41 70 6f |EC..SBC#8..STApo|
00005160 77 65 72 0d 0a 42 43 53 6c 61 73 65 78 69 74 0d |wer..BCSlasexit.|
00005170 0a 50 4c 41 0d 0a 50 4c 41 0d 0a 4a 4d 50 6b 69 |.PLA..PLA..JMPki|
00005180 6c 6c 75 0d 0a 2e 6c 61 73 65 72 20 4c 44 41 23 |llu...laser LDA#|
00005190 36 0d 0a 4a 53 52 6b 65 79 62 79 74 65 0d 0a 42 |6..JSRkeybyte..B|
000051a0 43 43 6c 61 73 65 78 69 74 0d 0a 4c 44 41 6c 61 |CClasexit..LDAla|
000051b0 73 74 61 74 0d 0a 42 4e 45 6c 61 73 65 78 69 74 |stat..BNElasexit|
000051c0 0d 0a 4c 44 41 73 6f 75 6e 64 0d 0a 42 45 51 6e |..LDAsound..BEQn|
000051d0 6f 6c 61 73 73 64 0d 0a 4c 44 41 23 37 0d 0a 4c |olassd..LDA#7..L|
000051e0 44 58 23 28 73 77 69 74 6e 20 4d 4f 44 32 35 36 |DX#(switn MOD256|
000051f0 29 0d 0a 4c 44 59 23 28 73 77 69 74 6e 20 44 49 |)..LDY#(switn DI|
00005200 56 32 35 36 29 0d 0a 4a 53 52 6f 73 77 6f 72 64 |V256)..JSRosword|
00005210 0d 0a 2e 6e 6f 6c 61 73 73 64 20 4c 44 41 70 6f |...nolassd LDApo|
00005220 77 65 72 0d 0a 53 54 41 70 6f 77 63 68 61 6e 67 |wer..STApowchang|
00005230 65 0d 0a 53 45 43 0d 0a 53 42 43 23 34 0d 0a 53 |e..SEC..SBC#4..S|
00005240 54 41 70 6f 77 65 72 0d 0a 42 43 53 6c 61 73 6f |TApower..BCSlaso|
00005250 6b 61 79 0d 0a 2e 6c 61 73 64 69 65 20 50 4c 41 |kay...lasdie PLA|
00005260 0d 0a 50 4c 41 0d 0a 2e 6b 69 6c 6c 75 20 4a 53 |..PLA...killu JS|
00005270 52 67 61 6d 65 6f 76 65 72 0d 0a 4a 4d 50 70 72 |Rgameover..JMPpr|
00005280 6f 67 0d 0a 2e 6c 61 73 6f 6b 61 79 20 4c 44 41 |og...lasokay LDA|
00005290 78 6d 6f 6e 74 0d 0a 43 4d 50 78 70 6f 73 0d 0a |xmont..CMPxpos..|
000052a0 42 4e 45 6e 6f 74 6f 6e 74 0d 0a 4c 44 41 79 6d |BNEnotont..LDAym|
000052b0 6f 6e 74 0d 0a 43 4d 50 79 70 6f 73 0d 0a 42 4e |ont..CMPypos..BN|
000052c0 45 6e 6f 74 6f 6e 74 0d 0a 4c 44 41 23 30 0d 0a |Enotont..LDA#0..|
000052d0 53 54 41 6d 74 79 70 65 0d 0a 52 54 53 0d 0a 2e |STAmtype..RTS...|
000052e0 6e 6f 74 6f 6e 74 20 53 45 49 0d 0a 4c 44 41 78 |notont SEI..LDAx|
000052f0 70 6f 73 0d 0a 41 53 4c 20 41 0d 0a 41 53 4c 20 |pos..ASL A..ASL |
00005300 41 0d 0a 41 53 4c 20 41 0d 0a 41 53 4c 20 41 0d |A..ASL A..ASL A.|
00005310 0a 41 53 4c 20 41 0d 0a 41 53 4c 20 41 0d 0a 43 |.ASL A..ASL A..C|
00005320 4c 43 0d 0a 41 44 43 23 26 38 30 0d 0a 53 54 41 |LC..ADC#&80..STA|
00005330 6c 61 73 61 64 0d 0a 4c 44 41 23 30 0d 0a 41 44 |lasad..LDA#0..AD|
00005340 43 23 26 33 37 0d 0a 53 54 41 26 37 31 0d 0a 4c |C#&37..STA&71..L|
00005350 44 41 78 70 6f 73 0d 0a 4c 53 52 20 41 0d 0a 4c |DAxpos..LSR A..L|
00005360 53 52 20 41 0d 0a 43 4c 43 0d 0a 41 44 43 26 37 |SR A..CLC..ADC&7|
00005370 31 0d 0a 41 44 43 79 70 6f 73 0d 0a 53 54 41 26 |1..ADCypos..STA&|
00005380 37 31 0d 0a 4c 44 41 79 70 6f 73 0d 0a 41 53 4c |71..LDAypos..ASL|
00005390 20 41 0d 0a 41 53 4c 20 41 0d 0a 43 4c 43 0d 0a | A..ASL A..CLC..|
000053a0 41 44 43 26 37 31 0d 0a 53 54 41 6c 61 73 61 64 |ADC&71..STAlasad|
000053b0 2b 31 0d 0a 4c 44 41 66 61 63 65 0d 0a 53 54 41 |+1..LDAface..STA|
000053c0 6c 61 73 64 69 72 0d 0a 42 45 51 6c 65 66 69 72 |lasdir..BEQlefir|
000053d0 65 0d 0a 4c 44 41 6c 61 73 61 64 0d 0a 43 4c 43 |e..LDAlasad..CLC|
000053e0 0d 0a 41 44 43 23 26 34 30 0d 0a 53 54 41 6c 61 |..ADC#&40..STAla|
000053f0 73 61 64 0d 0a 4c 44 41 23 39 0d 0a 53 45 43 0d |sad..LDA#9..SEC.|
00005400 0a 53 42 43 78 70 6f 73 0d 0a 4c 44 58 78 70 6f |.SBCxpos..LDXxpo|
00005410 73 0d 0a 43 50 58 23 31 0d 0a 42 45 51 63 6f 72 |s..CPX#1..BEQcor|
00005420 72 69 67 66 0d 0a 43 50 58 23 35 0d 0a 42 45 51 |rigf..CPX#5..BEQ|
00005430 63 6f 72 72 69 67 66 0d 0a 42 4e 45 66 69 6e 66 |corrigf..BNEfinf|
00005440 69 72 65 0d 0a 2e 63 6f 72 72 69 67 66 20 49 4e |ire...corrigf IN|
00005450 43 6c 61 73 61 64 2b 31 0d 0a 4a 4d 50 66 69 6e |Clasad+1..JMPfin|
00005460 66 69 72 65 0d 0a 2e 6c 65 66 69 72 65 20 44 45 |fire...lefire DE|
00005470 43 6c 61 73 61 64 2b 31 0d 0a 4c 44 41 78 70 6f |Clasad+1..LDAxpo|
00005480 73 0d 0a 2e 66 69 6e 66 69 72 65 20 41 53 4c 20 |s...finfire ASL |
00005490 41 0d 0a 41 53 4c 20 41 0d 0a 41 53 4c 20 41 0d |A..ASL A..ASL A.|
000054a0 0a 43 4d 50 23 26 32 30 0d 0a 42 43 43 73 68 72 |.CMP#&20..BCCshr|
000054b0 61 6e 67 65 0d 0a 4c 44 41 23 26 31 46 0d 0a 2e |ange..LDA#&1F...|
000054c0 73 68 72 61 6e 67 65 20 53 54 41 6c 61 73 74 61 |shrange STAlasta|
000054d0 74 0d 0a 4c 44 41 23 30 0d 0a 53 54 41 6c 61 73 |t..LDA#0..STAlas|
000054e0 74 65 70 0d 0a 4c 44 41 23 31 0d 0a 4c 44 58 66 |tep..LDA#1..LDXf|
000054f0 61 63 65 0d 0a 42 4e 45 6c 65 61 6c 74 0d 0a 4c |ace..BNElealt..L|
00005500 44 41 23 26 46 46 0d 0a 2e 6c 65 61 6c 74 20 43 |DA#&FF...lealt C|
00005510 4c 43 0d 0a 41 44 43 78 70 6f 73 0d 0a 53 54 41 |LC..ADCxpos..STA|
00005520 78 66 0d 0a 53 54 41 78 73 65 74 0d 0a 4c 44 41 |xf..STAxset..LDA|
00005530 79 70 6f 73 0d 0a 53 54 41 79 73 65 74 0d 0a 53 |ypos..STAyset..S|
00005540 54 41 79 66 0d 0a 4a 53 52 67 65 74 62 6c 6f 63 |TAyf..JSRgetbloc|
00005550 6b 0d 0a 43 4d 50 23 26 31 30 0d 0a 42 43 43 6e |k..CMP#&10..BCCn|
00005560 6f 6f 62 73 74 72 0d 0a 4c 44 41 23 30 0d 0a 53 |oobstr..LDA#0..S|
00005570 54 41 6c 61 73 74 61 74 0d 0a 2e 6e 6f 6f 62 73 |TAlastat...noobs|
00005580 74 72 20 43 4c 49 0d 0a 4a 4d 50 77 61 69 74 0d |tr CLI..JMPwait.|
00005590 0a 2e 64 69 73 70 79 6f 75 20 4c 44 41 23 26 32 |..dispyou LDA#&2|
000055a0 46 0d 0a 53 54 41 77 69 72 65 70 2b 31 0d 0a 53 |F..STAwirep+1..S|
000055b0 54 41 77 69 72 65 70 62 2b 31 0d 0a 4c 44 41 23 |TAwirepb+1..LDA#|
000055c0 26 38 30 0d 0a 53 54 41 77 69 72 65 70 0d 0a 4c |&80..STAwirep..L|
000055d0 44 41 23 26 41 30 0d 0a 53 54 41 77 69 72 65 70 |DA#&A0..STAwirep|
000055e0 62 0d 0a 4a 4d 50 64 69 73 70 73 68 72 0d 0a 2e |b..JMPdispshr...|
000055f0 64 65 61 64 65 64 63 68 20 4c 44 41 64 65 61 64 |deadedch LDAdead|
00005600 65 64 0d 0a 42 45 51 6e 6f 74 64 65 61 64 64 0d |ed..BEQnotdeadd.|
00005610 0a 4c 44 41 6d 74 79 70 65 0d 0a 43 4d 50 23 33 |.LDAmtype..CMP#3|
00005620 0d 0a 42 45 51 6e 6f 64 69 73 70 0d 0a 4c 44 41 |..BEQnodisp..LDA|
00005630 23 30 0d 0a 53 54 41 6d 74 79 70 65 0d 0a 2e 6e |#0..STAmtype...n|
00005640 6f 64 69 73 70 20 4c 44 41 26 37 41 0d 0a 43 4c |odisp LDA&7A..CL|
00005650 43 0d 0a 41 44 43 23 26 38 30 0d 0a 53 54 41 26 |C..ADC#&80..STA&|
00005660 37 30 0d 0a 4c 44 41 26 37 42 0d 0a 41 44 43 23 |70..LDA&7B..ADC#|
00005670 32 0d 0a 53 54 41 26 37 31 0d 0a 4c 44 59 23 33 |2..STA&71..LDY#3|
00005680 31 0d 0a 2e 64 65 61 64 61 20 4c 44 41 26 32 46 |1...deada LDA&2F|
00005690 43 30 2c 59 0d 0a 53 54 41 28 26 37 41 29 2c 59 |C0,Y..STA(&7A),Y|
000056a0 0d 0a 4c 44 41 26 32 46 45 30 2c 59 0d 0a 53 54 |..LDA&2FE0,Y..ST|
000056b0 41 28 26 37 30 29 2c 59 0d 0a 44 45 59 0d 0a 42 |A(&70),Y..DEY..B|
000056c0 4e 45 64 65 61 64 61 0d 0a 4c 44 41 70 6f 77 65 |NEdeada..LDApowe|
000056d0 72 0d 0a 53 54 41 70 6f 77 63 68 61 6e 67 65 0d |r..STApowchange.|
000056e0 0a 43 4c 43 0d 0a 41 44 43 23 34 0d 0a 42 43 43 |.CLC..ADC#4..BCC|
000056f0 6f 76 65 72 70 6f 77 6d 0d 0a 4c 44 41 23 32 35 |overpowm..LDA#25|
00005700 34 0d 0a 2e 6f 76 65 72 70 6f 77 6d 20 53 54 41 |4...overpowm STA|
00005710 70 6f 77 65 72 0d 0a 4c 44 41 23 30 0d 0a 53 54 |power..LDA#0..ST|
00005720 41 64 65 61 64 65 64 0d 0a 2e 6e 6f 74 64 65 61 |Adeaded...notdea|
00005730 64 64 20 52 54 53 0d 0a 2e 69 72 71 20 49 4e 43 |dd RTS...irq INC|
00005740 63 6c 6f 63 6b 0d 0a 4c 44 41 26 38 30 0d 0a 43 |clock..LDA&80..C|
00005750 4c 43 0d 0a 41 44 43 23 31 0d 0a 43 4d 50 63 6c |LC..ADC#1..CMPcl|
00005760 6f 63 6b 0d 0a 42 4e 45 6e 6f 68 65 6c 70 63 0d |ock..BNEnohelpc.|
00005770 0a 49 4e 43 26 38 30 0d 0a 2e 6e 6f 68 65 6c 70 |.INC&80...nohelp|
00005780 63 20 4c 44 41 6c 61 73 74 61 74 0d 0a 42 45 51 |c LDAlastat..BEQ|
00005790 6e 6f 6c 61 73 0d 0a 4c 44 41 6d 74 79 70 65 0d |nolas..LDAmtype.|
000057a0 0a 42 45 51 6e 6f 68 69 74 6d 0d 0a 4c 44 41 78 |.BEQnohitm..LDAx|
000057b0 6d 6f 6e 74 0d 0a 43 4d 50 78 66 0d 0a 42 4e 45 |mont..CMPxf..BNE|
000057c0 6e 6f 68 69 74 6d 0d 0a 4c 44 41 79 6d 6f 6e 74 |nohitm..LDAymont|
000057d0 0d 0a 43 4d 50 79 66 0d 0a 42 4e 45 6e 6f 68 69 |..CMPyf..BNEnohi|
000057e0 74 6d 0d 0a 4c 44 41 23 31 0d 0a 53 54 41 6c 61 |tm..LDA#1..STAla|
000057f0 73 74 61 74 0d 0a 53 54 41 64 65 61 64 65 64 0d |stat..STAdeaded.|
00005800 0a 2e 6e 6f 68 69 74 6d 20 4a 53 52 73 61 76 65 |..nohitm JSRsave|
00005810 76 61 72 0d 0a 44 45 43 6c 61 73 74 61 74 0d 0a |var..DEClastat..|
00005820 4c 44 41 6c 61 73 74 65 70 0d 0a 43 4c 43 0d 0a |LDAlastep..CLC..|
00005830 41 44 43 23 38 0d 0a 53 54 41 6c 61 73 74 65 70 |ADC#8..STAlastep|
00005840 0d 0a 4c 44 41 6c 61 73 64 69 72 0d 0a 42 45 51 |..LDAlasdir..BEQ|
00005850 6c 61 73 6c 65 66 74 0d 0a 42 4e 45 6c 61 73 72 |lasleft..BNElasr|
00005860 69 67 68 74 0d 0a 2e 6e 6f 6c 61 73 20 4a 4d 50 |ight...nolas JMP|
00005870 52 4f 4d 69 72 71 0d 0a 2e 6c 61 73 72 69 67 68 |ROMirq...lasrigh|
00005880 74 20 4c 44 59 6c 61 73 74 65 70 0d 0a 4a 53 52 |t LDYlastep..JSR|
00005890 6c 61 73 65 6f 72 70 0d 0a 43 50 59 23 26 32 38 |laseorp..CPY#&28|
000058a0 0d 0a 42 43 43 72 69 64 65 6c 0d 0a 54 59 41 0d |..BCCridel..TYA.|
000058b0 0a 53 45 43 0d 0a 53 42 43 23 26 32 30 0d 0a 4a |.SEC..SBC#&20..J|
000058c0 53 52 6c 61 73 65 6f 72 79 0d 0a 2e 72 69 64 65 |SRlaseory...ride|
000058d0 6c 20 4c 44 41 6c 61 73 74 61 74 0d 0a 42 4e 45 |l LDAlastat..BNE|
000058e0 72 69 63 6f 6e 74 0d 0a 4c 44 41 6c 61 73 74 65 |ricont..LDAlaste|
000058f0 70 0d 0a 53 45 43 0d 0a 53 42 43 23 26 31 38 0d |p..SEC..SBC#&18.|
00005900 0a 42 43 53 6e 6f 72 6d 6e 0d 0a 4c 44 41 23 30 |.BCSnormn..LDA#0|
00005910 0d 0a 2e 6e 6f 72 6d 6e 20 54 41 59 0d 0a 2e 72 |...normn TAY...r|
00005920 69 73 74 6f 70 20 4a 53 52 6c 61 73 65 6f 72 70 |istop JSRlaseorp|
00005930 0d 0a 43 50 59 6c 61 73 74 65 70 0d 0a 42 45 51 |..CPYlastep..BEQ|
00005940 72 69 63 6f 6e 74 62 0d 0a 54 59 41 0d 0a 43 4c |ricontb..TYA..CL|
00005950 43 0d 0a 41 44 43 23 38 0d 0a 54 41 59 0d 0a 4a |C..ADC#8..TAY..J|
00005960 4d 50 72 69 73 74 6f 70 0d 0a 2e 72 69 63 6f 6e |MPristop...ricon|
00005970 74 62 20 4a 53 52 64 65 6c 79 6f 75 0d 0a 2e 72 |tb JSRdelyou...r|
00005980 69 63 6f 6e 74 20 4c 44 41 6c 61 73 74 65 70 0d |icont LDAlastep.|
00005990 0a 41 4e 44 23 26 33 46 0d 0a 42 4e 45 72 77 61 |.AND#&3F..BNErwa|
000059a0 6c 6c 0d 0a 49 4e 43 78 66 0d 0a 4c 44 41 78 66 |ll..INCxf..LDAxf|
000059b0 0d 0a 53 54 41 78 73 65 74 0d 0a 4c 44 41 79 66 |..STAxset..LDAyf|
000059c0 0d 0a 53 54 41 79 73 65 74 0d 0a 4a 53 52 67 65 |..STAyset..JSRge|
000059d0 74 62 6c 6f 63 6b 0d 0a 43 4d 50 23 26 31 30 0d |tblock..CMP#&10.|
000059e0 0a 42 43 43 72 77 61 6c 6c 0d 0a 4c 44 41 23 31 |.BCCrwall..LDA#1|
000059f0 0d 0a 53 54 41 6c 61 73 74 61 74 0d 0a 2e 72 77 |..STAlastat...rw|
00005a00 61 6c 6c 20 4a 4d 50 6c 6f 61 64 76 61 72 0d 0a |all JMPloadvar..|
00005a10 2e 6c 61 73 6c 65 66 74 20 4c 44 41 23 30 0d 0a |.lasleft LDA#0..|
00005a20 53 45 43 0d 0a 53 42 43 6c 61 73 74 65 70 0d 0a |SEC..SBClastep..|
00005a30 4a 53 52 6c 61 73 65 6f 72 79 0d 0a 43 50 59 23 |JSRlaseory..CPY#|
00005a40 26 45 30 0d 0a 42 43 53 6c 65 64 65 6c 0d 0a 54 |&E0..BCSledel..T|
00005a50 59 41 0d 0a 43 4c 43 0d 0a 41 44 43 23 26 32 30 |YA..CLC..ADC#&20|
00005a60 0d 0a 4a 53 52 6c 61 73 65 6f 72 79 0d 0a 2e 6c |..JSRlaseory...l|
00005a70 65 64 65 6c 20 4c 44 41 6c 61 73 74 61 74 0d 0a |edel LDAlastat..|
00005a80 42 4e 45 6c 65 63 6f 6e 74 0d 0a 4c 44 41 23 30 |BNElecont..LDA#0|
00005a90 0d 0a 53 45 43 0d 0a 53 42 43 6c 61 73 74 65 70 |..SEC..SBClastep|
00005aa0 0d 0a 53 54 41 6c 61 73 74 65 70 0d 0a 43 4c 43 |..STAlastep..CLC|
00005ab0 0d 0a 41 44 43 23 26 31 38 0d 0a 42 43 43 6e 6f |..ADC#&18..BCCno|
00005ac0 72 6c 6e 0d 0a 4c 44 41 23 26 46 38 0d 0a 2e 6e |rln..LDA#&F8...n|
00005ad0 6f 72 6c 6e 20 54 41 59 0d 0a 2e 6c 65 73 74 6f |orln TAY...lesto|
00005ae0 70 20 4a 53 52 6c 61 73 65 6f 72 70 0d 0a 43 50 |p JSRlaseorp..CP|
00005af0 59 6c 61 73 74 65 70 0d 0a 42 45 51 6c 65 63 6f |Ylastep..BEQleco|
00005b00 6e 74 62 0d 0a 54 59 41 0d 0a 53 45 43 0d 0a 53 |ntb..TYA..SEC..S|
00005b10 42 43 23 38 0d 0a 54 41 59 0d 0a 4a 4d 50 6c 65 |BC#8..TAY..JMPle|
00005b20 73 74 6f 70 0d 0a 2e 6c 65 63 6f 6e 74 62 20 4a |stop...lecontb J|
00005b30 53 52 64 65 6c 79 6f 75 0d 0a 2e 6c 65 63 6f 6e |SRdelyou...lecon|
00005b40 74 20 4c 44 41 6c 61 73 74 65 70 0d 0a 41 4e 44 |t LDAlastep..AND|
00005b50 23 26 33 46 0d 0a 42 4e 45 6c 77 61 6c 6c 0d 0a |#&3F..BNElwall..|
00005b60 44 45 43 78 66 0d 0a 4c 44 41 78 66 0d 0a 53 54 |DECxf..LDAxf..ST|
00005b70 41 78 73 65 74 0d 0a 4c 44 41 79 66 0d 0a 53 54 |Axset..LDAyf..ST|
00005b80 41 79 73 65 74 0d 0a 4a 53 52 67 65 74 62 6c 6f |Ayset..JSRgetblo|
00005b90 63 6b 0d 0a 43 4d 50 23 26 31 30 0d 0a 42 43 43 |ck..CMP#&10..BCC|
00005ba0 6c 77 61 6c 6c 0d 0a 4c 44 41 23 31 0d 0a 53 54 |lwall..LDA#1..ST|
00005bb0 41 6c 61 73 74 61 74 0d 0a 2e 6c 77 61 6c 6c 20 |Alastat...lwall |
00005bc0 4a 4d 50 6c 6f 61 64 76 61 72 0d 0a 2e 6c 61 73 |JMPloadvar...las|
00005bd0 65 6f 72 79 20 54 41 59 0d 0a 2e 6c 61 73 65 6f |eory TAY...laseo|
00005be0 72 70 20 4c 44 41 28 6c 61 73 61 64 29 2c 59 0d |rp LDA(lasad),Y.|
00005bf0 0a 45 4f 52 23 26 33 46 0d 0a 53 54 41 28 6c 61 |.EOR#&3F..STA(la|
00005c00 73 61 64 29 2c 59 0d 0a 52 54 53 0d 0a 2e 73 63 |sad),Y..RTS...sc|
00005c10 72 6f 66 66 20 4c 44 41 23 30 0d 0a 53 54 41 6c |roff LDA#0..STAl|
00005c20 61 73 74 61 74 0d 0a 4c 44 41 26 44 30 31 31 0d |astat..LDA&D011.|
00005c30 0a 41 4e 44 23 26 45 46 0d 0a 53 54 41 26 44 30 |.AND#&EF..STA&D0|
00005c40 31 31 0d 0a 52 54 53 0d 0a 0d 0a 50 25 3d 26 32 |11..RTS....P%=&2|
00005c50 33 30 30 0d 0a 4f 25 3d 26 41 30 30 0d 0a 0d 0a |300..O%=&A00....|
00005c60 2e 73 61 76 65 76 61 72 20 4c 44 41 26 37 30 0d |.savevar LDA&70.|
00005c70 0a 53 54 41 26 38 38 0d 0a 4c 44 41 26 37 31 0d |.STA&88..LDA&71.|
00005c80 0a 53 54 41 26 38 39 0d 0a 4c 44 41 26 37 32 0d |.STA&89..LDA&72.|
00005c90 0a 53 54 41 26 38 41 0d 0a 4c 44 41 26 37 33 0d |.STA&8A..LDA&73.|
00005ca0 0a 53 54 41 26 38 42 0d 0a 4c 44 41 78 73 65 74 |.STA&8B..LDAxset|
00005cb0 0d 0a 53 54 41 26 38 43 0d 0a 4c 44 41 79 73 65 |..STA&8C..LDAyse|
00005cc0 74 0d 0a 53 54 41 26 38 44 0d 0a 53 54 58 26 38 |t..STA&8D..STX&8|
00005cd0 46 0d 0a 53 54 59 26 38 37 0d 0a 52 54 53 0d 0a |F..STY&87..RTS..|
00005ce0 2e 6c 6f 61 64 76 61 72 20 4c 44 41 26 38 38 0d |.loadvar LDA&88.|
00005cf0 0a 53 54 41 26 37 30 0d 0a 4c 44 41 26 38 39 0d |.STA&70..LDA&89.|
00005d00 0a 53 54 41 26 37 31 0d 0a 4c 44 41 26 38 41 0d |.STA&71..LDA&8A.|
00005d10 0a 53 54 41 26 37 32 0d 0a 4c 44 41 26 38 42 0d |.STA&72..LDA&8B.|
00005d20 0a 53 54 41 26 37 33 0d 0a 4c 44 41 26 38 43 0d |.STA&73..LDA&8C.|
00005d30 0a 53 54 41 78 73 65 74 0d 0a 4c 44 41 26 38 44 |.STAxset..LDA&8D|
00005d40 0d 0a 53 54 41 79 73 65 74 0d 0a 4c 44 58 26 38 |..STAyset..LDX&8|
00005d50 46 0d 0a 4c 44 59 26 38 37 0d 0a 4a 4d 50 52 4f |F..LDY&87..JMPRO|
00005d60 4d 69 72 71 0d 0a 2e 78 6d 6f 6d 20 4c 44 58 78 |Mirq...xmom LDXx|
00005d70 6d 6f 6e 74 0d 0a 43 50 58 78 70 6f 73 0d 0a 42 |mont..CPXxpos..B|
00005d80 45 51 6f 6e 79 6f 75 0d 0a 42 43 43 72 69 74 65 |EQonyou..BCCrite|
00005d90 6d 74 0d 0a 44 45 58 0d 0a 4a 53 52 6c 72 78 6d |mt..DEX..JSRlrxm|
00005da0 73 68 0d 0a 42 43 53 6f 6e 79 6f 75 0d 0a 44 45 |sh..BCSonyou..DE|
00005db0 43 78 6d 6f 6e 74 0d 0a 4c 44 41 23 31 0d 0a 2e |Cxmont..LDA#1...|
00005dc0 78 6d 65 6e 64 20 53 54 41 6d 66 69 6e 65 0d 0a |xmend STAmfine..|
00005dd0 52 54 53 0d 0a 2e 72 69 74 65 6d 74 20 49 4e 58 |RTS...ritemt INX|
00005de0 0d 0a 4a 53 52 6c 72 78 6d 73 68 0d 0a 42 43 53 |..JSRlrxmsh..BCS|
00005df0 6f 6e 79 6f 75 0d 0a 49 4e 43 78 6d 6f 6e 74 0d |onyou..INCxmont.|
00005e00 0a 4c 44 41 23 32 0d 0a 42 4e 45 78 6d 65 6e 64 |.LDA#2..BNExmend|
00005e10 0d 0a 2e 6f 6e 79 6f 75 20 4c 44 41 23 30 0d 0a |...onyou LDA#0..|
00005e20 42 45 51 78 6d 65 6e 64 0d 0a 2e 6c 72 78 6d 73 |BEQxmend...lrxms|
00005e30 68 20 53 54 58 78 73 65 74 0d 0a 4c 44 41 79 6d |h STXxset..LDAym|
00005e40 6f 6e 74 0d 0a 53 54 41 79 73 65 74 0d 0a 4a 53 |ont..STAyset..JS|
00005e50 52 67 65 74 62 6c 6f 63 6b 0d 0a 43 4d 50 23 26 |Rgetblock..CMP#&|
00005e60 31 30 0d 0a 52 54 53 0d 0a 2e 63 6d 70 74 78 74 |10..RTS...cmptxt|
00005e70 20 45 51 55 42 33 0d 0a 45 51 55 42 32 32 0d 0a | EQUB3..EQUB22..|
00005e80 45 51 55 42 31 33 0d 0a 45 51 55 42 37 0d 0a 45 |EQUB13..EQUB7..E|
00005e90 51 55 42 31 35 0d 0a 45 51 55 42 31 0d 0a 45 51 |QUB15..EQUB1..EQ|
00005ea0 55 42 31 37 0d 0a 45 51 55 42 31 38 0d 0a 45 51 |UB17..EQUB18..EQ|
00005eb0 55 42 31 31 0d 0a 45 51 55 42 31 0d 0a 45 51 55 |UB11..EQUB1..EQU|
00005ec0 42 31 37 0d 0a 45 51 55 42 32 33 0d 0a 45 51 55 |B17..EQUB23..EQU|
00005ed0 42 32 32 0d 0a 45 51 55 42 31 33 0d 0a 45 51 55 |B22..EQUB13..EQU|
00005ee0 42 31 36 0d 0a 45 51 55 42 26 46 46 0d 0a 0d 0a |B16..EQUB&FF....|
00005ef0 50 25 3d 26 32 44 38 30 0d 0a 4f 25 3d 26 41 38 |P%=&2D80..O%=&A8|
00005f00 30 0d 0a 0d 0a 2e 6d 6f 76 65 6d 73 74 20 4c 44 |0.....movemst LD|
00005f10 41 6d 74 79 70 65 0d 0a 43 4d 50 23 32 0d 0a 42 |Amtype..CMP#2..B|
00005f20 45 51 79 70 61 74 72 6f 6c 0d 0a 43 4d 50 23 31 |EQypatrol..CMP#1|
00005f30 0d 0a 42 4e 45 6d 6f 76 65 6d 71 75 74 0d 0a 2e |..BNEmovemqut...|
00005f40 78 70 61 74 72 6f 6c 20 4c 44 41 78 6d 6f 6e 74 |xpatrol LDAxmont|
00005f50 0d 0a 42 45 51 72 65 76 64 69 72 0d 0a 43 4d 50 |..BEQrevdir..CMP|
00005f60 23 39 0d 0a 42 45 51 72 65 76 64 69 72 0d 0a 41 |#9..BEQrevdir..A|
00005f70 44 43 6d 64 69 72 0d 0a 53 54 41 78 73 65 74 0d |DCmdir..STAxset.|
00005f80 0a 4c 44 41 79 6d 6f 6e 74 0d 0a 53 54 41 79 73 |.LDAymont..STAys|
00005f90 65 74 0d 0a 4a 53 52 67 65 74 62 6c 6f 63 6b 0d |et..JSRgetblock.|
00005fa0 0a 43 4d 50 23 26 31 30 0d 0a 42 43 53 72 65 76 |.CMP#&10..BCSrev|
00005fb0 64 69 72 0d 0a 49 4e 43 79 73 65 74 0d 0a 4a 53 |dir..INCyset..JS|
00005fc0 52 67 65 74 62 6c 6f 63 6b 0d 0a 43 4d 50 23 26 |Rgetblock..CMP#&|
00005fd0 31 30 0d 0a 42 43 43 72 65 76 64 69 72 0d 0a 4c |10..BCCrevdir..L|
00005fe0 44 41 78 73 65 74 0d 0a 53 54 41 78 6d 6f 6e 74 |DAxset..STAxmont|
00005ff0 0d 0a 2e 6d 6f 76 65 6d 71 75 74 20 52 54 53 0d |...movemqut RTS.|
00006000 0a 2e 72 65 76 64 69 72 20 4c 44 41 6d 64 69 72 |..revdir LDAmdir|
00006010 0d 0a 45 4f 52 23 26 46 45 0d 0a 53 54 41 6d 64 |..EOR#&FE..STAmd|
00006020 69 72 0d 0a 43 4c 43 0d 0a 41 44 43 78 6d 6f 6e |ir..CLC..ADCxmon|
00006030 74 0d 0a 53 54 41 78 6d 6f 6e 74 0d 0a 4c 44 41 |t..STAxmont..LDA|
00006040 6d 66 69 6e 65 0d 0a 45 4f 52 23 33 0d 0a 53 54 |mfine..EOR#3..ST|
00006050 41 6d 66 69 6e 65 0d 0a 52 54 53 0d 0a 2e 79 70 |Amfine..RTS...yp|
00006060 61 74 72 6f 6c 20 4c 44 58 79 6d 6f 6e 74 0d 0a |atrol LDXymont..|
00006070 43 50 58 79 70 6f 73 0d 0a 42 45 51 78 61 64 6a |CPXypos..BEQxadj|
00006080 62 0d 0a 42 43 43 64 6f 77 6e 6d 74 0d 0a 44 45 |b..BCCdownmt..DE|
00006090 58 0d 0a 4a 53 52 79 70 73 68 72 0d 0a 44 45 43 |X..JSRypshr..DEC|
000060a0 79 6d 6f 6e 74 0d 0a 4c 44 41 23 36 0d 0a 53 54 |ymont..LDA#6..ST|
000060b0 41 6d 66 69 6e 65 0d 0a 52 54 53 0d 0a 2e 79 70 |Amfine..RTS...yp|
000060c0 73 68 72 20 53 54 58 79 73 65 74 0d 0a 4c 44 41 |shr STXyset..LDA|
000060d0 78 6d 6f 6e 74 0d 0a 53 54 41 78 73 65 74 0d 0a |xmont..STAxset..|
000060e0 4a 53 52 67 65 74 62 6c 6f 63 6b 0d 0a 43 4d 50 |JSRgetblock..CMP|
000060f0 23 26 31 30 0d 0a 42 43 53 78 61 64 6a 0d 0a 52 |#&10..BCSxadj..R|
00006100 54 53 0d 0a 2e 64 6f 77 6e 6d 74 20 49 4e 58 0d |TS...downmt INX.|
00006110 0a 4a 53 52 79 70 73 68 72 0d 0a 49 4e 43 79 6d |.JSRypshr..INCym|
00006120 6f 6e 74 0d 0a 4c 44 41 23 35 0d 0a 53 54 41 6d |ont..LDA#5..STAm|
00006130 66 69 6e 65 0d 0a 52 54 53 0d 0a 2e 78 61 64 6a |fine..RTS...xadj|
00006140 20 50 4c 41 0d 0a 50 4c 41 0d 0a 2e 78 61 64 6a | PLA..PLA...xadj|
00006150 62 20 4a 4d 50 78 6d 6f 6d 0d 0a 2e 63 6d 70 74 |b JMPxmom...cmpt|
00006160 78 74 62 20 45 51 55 42 37 0d 0a 45 51 55 42 31 |xtb EQUB7..EQUB1|
00006170 0d 0a 45 51 55 42 31 32 0d 0a 45 51 55 42 35 0d |..EQUB12..EQUB5.|
00006180 0a 45 51 55 42 30 0d 0a 45 51 55 42 33 0d 0a 45 |.EQUB0..EQUB3..E|
00006190 51 55 42 32 32 0d 0a 45 51 55 42 31 32 0d 0a 45 |QUB22..EQUB12..E|
000061a0 51 55 42 31 34 0d 0a 45 51 55 42 31 31 0d 0a 45 |QUB14..EQUB11..E|
000061b0 51 55 42 35 0d 0a 45 51 55 42 31 37 0d 0a 45 51 |QUB5..EQUB17..EQ|
000061c0 55 42 35 0d 0a 45 51 55 42 26 46 46 0d 0a 0d 0a |UB5..EQUB&FF....|
000061d0 5c 20 4d 4f 53 20 53 79 73 74 65 6d 0d 0a 0d 0a |\ MOS System....|
000061e0 50 25 3d 26 38 30 30 30 0d 0a 4f 25 3d 26 33 46 |P%=&8000..O%=&3F|
000061f0 30 30 0d 0a 0d 0a 2e 6b 65 79 62 79 74 65 20 43 |00.....keybyte C|
00006200 4d 50 23 38 0d 0a 42 45 51 73 68 69 66 74 6b 0d |MP#8..BEQshiftk.|
00006210 0a 54 41 58 0d 0a 4c 44 41 26 44 43 30 30 0d 0a |.TAX..LDA&DC00..|
00006220 41 4e 44 6a 6f 79 73 74 2c 58 0d 0a 42 45 51 73 |ANDjoyst,X..BEQs|
00006230 65 6b 65 79 0d 0a 4c 44 41 26 43 35 0d 0a 43 4d |ekey..LDA&C5..CM|
00006240 50 6b 65 79 70 2c 58 0d 0a 42 45 51 73 65 6b 65 |Pkeyp,X..BEQseke|
00006250 79 0d 0a 43 4c 43 0d 0a 52 54 53 0d 0a 2e 73 65 |y..CLC..RTS...se|
00006260 6b 65 79 20 53 45 43 0d 0a 52 54 53 0d 0a 2e 73 |key SEC..RTS...s|
00006270 68 69 66 74 6b 20 4c 44 41 26 32 38 44 0d 0a 41 |hiftk LDA&28D..A|
00006280 4e 44 23 31 0d 0a 42 4e 45 73 65 6b 65 79 0d 0a |ND#1..BNEsekey..|
00006290 43 4c 43 0d 0a 52 54 53 0d 0a 2e 6a 6f 79 73 74 |CLC..RTS...joyst|
000062a0 20 45 51 55 42 34 0d 0a 45 51 55 42 38 0d 0a 45 | EQUB4..EQUB8..E|
000062b0 51 55 42 31 0d 0a 45 51 55 42 32 0d 0a 45 51 55 |QUB1..EQUB2..EQU|
000062c0 42 26 46 46 0d 0a 45 51 55 42 31 36 0d 0a 45 51 |B&FF..EQUB16..EQ|
000062d0 55 42 26 46 46 0d 0a 45 51 55 42 26 46 46 0d 0a |UB&FF..EQUB&FF..|
000062e0 45 51 55 42 26 46 46 0d 0a 45 51 55 42 26 46 46 |EQUB&FF..EQUB&FF|
000062f0 0d 0a 2e 6b 65 79 70 20 45 51 55 42 31 32 0d 0a |...keyp EQUB12..|
00006300 45 51 55 42 32 33 0d 0a 45 51 55 42 33 37 0d 0a |EQUB23..EQUB37..|
00006310 45 51 55 42 33 36 0d 0a 45 51 55 42 36 30 0d 0a |EQUB36..EQUB60..|
00006320 45 51 55 42 30 0d 0a 45 51 55 42 34 31 0d 0a 45 |EQUB0..EQUB41..E|
00006330 51 55 42 35 37 0d 0a 45 51 55 42 26 46 46 0d 0a |QUB57..EQUB&FF..|
00006340 45 51 55 42 31 33 0d 0a 2e 6f 73 77 6f 72 64 20 |EQUB13...osword |
00006350 52 54 53 0d 0a 2e 6f 73 77 72 63 68 20 52 54 53 |RTS...oswrch RTS|
00006360 20 5c 20 54 65 6d 70 6f 72 61 72 79 0d 0a 2e 52 | \ Temporary...R|
00006370 4f 4d 69 72 71 20 4a 4d 50 26 45 41 33 31 63 99 |OMirq JMP&EA31c.|
00006380 98 99 99 88 35 22 42 b7 bb bc ab 14 62 46 11 11 |....5"B.....bF..|
00006390 42 84 ba aa 58 25 22 11 21 95 aa aa 7a 13 11 10 |B...X%".!...z...|
000063a0 41 84 bb 8a 48 22 01 21 52 99 48 01 11 11 31 96 |A...H".!R.H...1.|
000063b0 bb bb ab ba aa 37 11 01 11 a4 8b 28 11 92 9b 29 |.....7.....(...)|
000063c0 51 aa 17 01 61 66 01 11 01 01 20 44 01 10 42 77 |Q...af.... D..Bw|
000063d0 ba bb bb bb bb bb ab 99 26 12 20 82 bb bb bb ab |........&. .....|
000063e0 5a 22 22 42 66 97 9a 89 55 23 32 73 b9 bb bc 8b |Z""Bf...U#2s....|
000063f0 12 72 77 33 12 21 52 b9 bb 7a 37 22 11 21 73 aa |.rw3.!R..z7".!s.|
00006400 ba 9b 25 11 31 63 99 9a 79 33 11 11 31 66 68 13 |..%.1c..y3..1fh.|
00006410 11 01 10 21 64 99 aa ba cb bb 69 13 11 01 11 a4 |...!d.....i.....|
00006420 8b 28 11 93 8b 28 62 aa 17 01 41 33 01 10 11 11 |.(...(b...A3....|
00006430 10 44 14 01 10 11 11 31 75 99 ba bb bb bb bb bb |.D.....1u.......|
00006440 ab 77 13 01 10 51 ba aa ba ab 9a 66 23 22 22 43 |.w...Q.....f#""C|
00006450 56 35 22 42 96 a9 ba bb ab 4a 01 31 73 77 35 11 |V5"B.....J.1sw5.|
00006460 21 94 bb aa 8a 44 12 11 21 55 98 a9 59 22 01 11 |!....D..!U..Y"..|
00006470 21 33 96 a9 77 14 11 11 22 84 58 25 11 11 20 32 |!3..w...".X%.. 2|
00006480 22 44 a7 bb bb bb ab 58 25 11 11 a5 7b 27 11 95 |"D.....X%...{'..|
00006490 6a 16 82 bb 17 11 51 55 11 41 64 33 20 88 27 30 |j.....QU.Ad3 .'0|
000064a0 22 10 42 84 aa bb bb bb bb bb bb 9a 69 22 01 10 |".B.........i"..|
000064b0 41 b9 bb ba ab 9a 88 35 23 22 32 33 33 33 74 a9 |A......5#"2333t.|
000064c0 ba bb bb 9c 39 01 10 41 77 68 12 11 62 aa ba ab |....9..Awh..b...|
000064d0 77 13 11 11 33 85 88 89 55 12 11 11 22 84 a8 99 |w...3...U..."...|
000064e0 37 12 11 11 52 78 47 11 20 52 24 33 85 ba bb bb |7...RxG. R$3....|
000064f0 bb 8a 48 12 11 b5 7b 27 11 95 5a 15 82 bb 28 12 |..H...{'..Z...(.|
00006500 72 77 01 61 86 33 20 99 28 40 44 11 73 a7 ab bb |rw.a.3 .(@D.s...|
00006510 bb bb bb bb bb 79 37 11 10 a6 bb cb bb ab aa 79 |.....y7........y|
00006520 67 55 44 54 65 66 b9 bb bb cc bb 6b 16 01 10 33 |gUDTef.....k...3|
00006530 97 47 24 32 66 a9 ba bb 59 25 11 11 22 32 a7 99 |.G$2f...Y%.."2..|
00006540 26 11 01 31 73 aa 7a 24 12 11 21 73 87 25 11 11 |&..1s.z$..!s.%..|
00006550 41 68 33 43 96 b9 bb aa aa 9a 37 22 01 11 b5 6b |Ah3C......7"...k|
00006560 16 11 a4 0d 0a 13 92 aa 16 11 a4 99 02 71 97 33 |.............q.3|
00006570 20 88 28 10 22 11 63 a9 ba bb bb bc cb bc bb 8a | .(.".c.........|
00006580 25 12 94 bb cb bb ab bb 9a 99 88 66 87 98 99 ba |%..........f....|
00006590 bb bb cc bb 4a 14 10 01 10 22 84 79 37 22 33 96 |....J....".y7"3.|
000065a0 b9 bb 7a 37 11 11 11 21 97 99 58 22 02 11 41 99 |..z7...!..X"..A.|
000065b0 aa 37 23 11 10 52 85 58 33 12 31 87 66 34 84 a8 |.7#..R.X3.1.f4..|
000065c0 bb aa aa aa 69 33 11 01 22 b7 6b 16 11 a4 39 13 |....i3..".k...9.|
000065d0 93 aa 16 11 a5 88 11 71 87 22 10 77 27 10 22 95 |.......q.".w'.".|
000065e0 ba bb bb bb bb cb cc aa 59 12 11 61 aa bb bb bb |........Y..a....|
000065f0 bb bb cb bb bb bb bb bb cb bb bb bb aa 15 01 41 |...............A|
00006600 24 12 11 42 98 89 24 11 42 94 bb ab 8a 24 11 11 |$..B..$.B....$..|
00006610 11 74 aa aa 58 25 11 11 11 33 97 7a 47 11 21 42 |.t..X%...3.zG.!B|
00006620 a8 88 24 12 52 88 58 32 73 99 ba bb bb ab 88 35 |..$.R.X2s......5|
00006630 13 33 b9 5b 15 11 a5 29 12 a4 bb 15 11 a5 55 01 |.3.[...)......U.|
00006640 71 87 22 22 03 21 32 77 ba bb cb bc bb cb bc ab |q."".!2w........|
00006650 77 13 30 88 ba bb bb bb bb cb cc bb cc bc cc cc |w.0.............|
00006660 bb bb ac 77 13 01 61 38 13 11 21 96 a9 37 22 21 |...w..a8..!..7"!|
00006670 62 aa ab 9a 37 22 11 11 52 99 ab 7a 47 22 11 11 |b...7"..R..zG"..|
00006680 22 74 9a 69 33 11 11 21 95 99 27 12 31 66 79 23 |"t.i3..!..'.1fy#|
00006690 42 77 b9 ba bb ab aa 48 24 11 01 33 b9 4a 14 11 |Bw.....H$..3.J..|
000066a0 a5 29 12 b5 bb 15 11 74 33 51 65 11 11 01 10 32 |.).....t3Qe....2|
000066b0 63 99 bb bb bb bc aa ca bc 7a 44 11 10 33 a8 bb |c........zD..3..|
000066c0 bb cc bb cb cc cb cc cc cc cc bc bb 8b 33 01 11 |.............3..|
000066d0 41 89 58 22 11 52 95 9a 44 12 21 55 b9 bb 9a 55 |A.X".R..D.!U...U|
000066e0 12 11 21 44 a8 ab 9a 66 13 11 11 21 95 a9 88 24 |..!D...f...!...$|
000066f0 11 11 32 66 79 27 22 22 74 14 11 22 74 a9 ba bb |..2fy'""t.."t...|
00006700 bb 9b 79 44 12 11 33 b9 0d 0a 13 11 a6 28 12 b6 |..yD..3......(..|
00006710 aa 14 11 52 22 10 11 11 52 98 a9 bb bb bc bb bb |...R"...R.......|
00006720 bb aa 8a 24 11 11 a6 bb bb bb bb cb cc cc cd cc |...$............|
00006730 bb cc bc ab 6a 22 11 30 97 79 44 12 31 73 aa 77 |....j".0.yD.1s.w|
00006740 13 11 33 a6 ba ba 88 23 12 11 22 95 ab aa 99 35 |..3....#.."....5|
00006750 13 11 11 63 96 99 37 12 11 21 44 77 47 23 22 42 |...c..7..!DwG#"B|
00006760 13 11 11 42 97 a9 bb bb ab 9a 77 14 11 01 44 b9 |...B......w...D.|
00006770 39 13 11 a6 28 12 b6 aa 13 11 74 33 10 22 84 99 |9...(.....t3."..|
00006780 a9 bb bb bc bb bc bb 9a 59 12 72 bb bb bb cb cc |........Y.r.....|
00006790 cc cc cc cc bb cc bc 9b 25 11 20 44 12 73 97 99 |........%. D.s..|
000067a0 37 12 21 85 99 59 25 11 52 85 ba aa 58 25 11 11 |7.!..Y%.R...X%..|
000067b0 32 a8 aa bb 8a 48 22 11 21 42 88 9a 35 23 11 11 |2....H".!B..5#..|
000067c0 32 63 58 33 12 01 10 10 32 53 a7 bb bb bb aa 58 |2cX3....2S.....X|
000067d0 25 01 33 b9 29 12 11 a7 28 12 b6 88 02 10 74 22 |%.3.)...(.....t"|
000067e0 11 12 10 42 66 aa aa aa bb bb bc bb bb 99 46 14 |...Bf.........F.|
000067f0 51 a9 ba bb ca cc cc cb cc cc cc cc 9b 69 12 20 |Q............i. |
00006800 77 24 52 95 aa 59 23 12 53 88 8a 38 11 22 62 a9 |w$R..Y#.S..8."b.|
00006810 bb 8a 58 22 11 21 95 a9 bb ab 7a 33 11 11 21 66 |..X".!....z3..!f|
00006820 aa 68 36 12 11 21 42 88 66 13 01 10 10 11 21 94 |.h6..!B.f.....!.|
00006830 aa bb bb aa 8a 58 12 22 b8 29 12 22 a8 27 12 a6 |.....X.".).".'..|
00006840 77 12 01 43 11 22 35 11 10 21 75 99 aa bb bb bb |w..C."5..!u.....|
00006850 bb bc bb ab 77 13 01 10 83 a8 bb bb cb cc cc cc |....w...........|
00006860 cc cc bc 38 23 01 20 77 59 32 63 99 aa 68 36 22 |...8#. wY2c..h6"|
00006870 44 a7 7a 33 12 21 64 aa ab 9a 47 22 11 31 83 aa |D.z3.!d...G".1..|
00006880 bb bb 99 35 12 11 22 96 aa 9a 25 11 11 11 83 aa |...5.."...%.....|
00006890 37 01 10 31 77 aa aa bb ab aa 38 11 11 a5 28 02 |7..1w.....8...(.|
000068a0 11 b7 16 21 b7 66 01 10 22 11 20 32 11 33 69 11 |...!.f..". 2.3i.|
000068b0 11 42 74 a9 bb bb bb bb bb bb bb ab 58 22 01 52 |.Bt.........X".R|
000068c0 85 aa bb bb cc cc cc cc cc 9b 25 12 10 66 7a 34 |..........%..fz4|
000068d0 33 77 a9 9a 69 23 33 84 98 55 12 21 42 88 aa aa |3w..i#3..U.!B...|
000068e0 79 33 12 21 52 88 bb bb aa 58 23 12 22 63 a9 aa |y3.!R....X#."c..|
000068f0 47 11 11 11 52 99 69 13 01 21 55 a9 aa bb bb bb |G...R.i..!U.....|
00006900 6a 33 01 11 73 16 01 11 a7 17 21 b8 77 01 10 43 |j3..s.....!.w..C|
00006910 22 51 65 11 33 69 11 74 97 aa bb bb bb ab bb bb |"Qe.3i.t........|
00006920 ab 8a 35 11 10 31 66 97 a9 bb cb bb bb 99 36 01 |..5..1f.......6.|
00006930 10 66 aa 6a 46 33 84 ba ab 48 22 32 63 88 47 24 |.f.jF3...H"2c.G$|
00006940 21 33 a7 ba ab 88 25 11 21 33 a6 ba bb aa 47 24 |!3....%.!3....G$|
00006950 11 21 74 97 8a 55 23 12 11 33 a7 49 14 11 10 11 |.!t..U#..3.I....|
00006960 64 96 aa cb bc ab 88 25 12 01 21 11 01 11 a7 17 |d......%..!.....|
00006970 21 b8 88 11 31 a8 55 01 71 97 44 22 68 10 22 55 |!...1.U.q.D"h."U|
00006980 a9 9a ba bb ab bb bb bb aa 48 24 11 10 33 64 86 |.........H$..3d.|
00006990 99 ba 9b 99 55 23 20 88 ba 9b 79 33 53 a7 ba 7a |....U# ...y3S..z|
000069a0 44 22 32 77 79 47 22 22 84 a8 bb aa 48 12 11 22 |D"2wyG""....H.."|
000069b0 73 b7 bb aa 69 36 22 11 42 74 aa 88 35 23 11 22 |s...i6".Bt..5#."|
000069c0 84 7a 37 11 10 11 42 64 aa bb bb ab aa 48 24 11 |.z7...Bd.....H$.|
000069d0 11 11 11 a5 16 11 b8 88 12 41 aa 77 01 61 96 55 |.........A.w.a.U|
000069e0 11 45 11 21 54 88 aa aa ba bb ab bb bb bb 79 25 |.E.!T.........y%|
000069f0 12 10 21 33 43 34 23 11 10 01 20 77 aa ba ab 88 |..!3C4#... w....|
00006a00 24 52 85 aa 88 25 22 22 84 88 36 22 32 73 ba bb |$R...%""..6"2s..|
00006a10 9b 36 23 11 32 73 aa ba aa 8a 44 12 21 32 96 aa |.6#.2s....D.!2..|
00006a20 89 58 12 11 21 85 88 55 13 11 21 44 98 a9 a9 aa |.X..!..U..!D....|
00006a30 9a 79 35 22 11 11 52 13 11 b7 88 12 41 ba 66 01 |.y5"..R.....A.f.|
00006a40 30 83 33 11 10 11 53 75 aa aa bb bb bb bb ab ba |0.3...Su........|
00006a50 ab 99 25 11 01 10 11 22 12 11 10 21 12 11 01 10 |..%...."...!....|
00006a60 44 87 a8 ba aa 37 31 53 b9 aa 47 24 22 63 96 68 |D....71S..G$"c.h|
00006a70 33 22 42 b9 bb ab 59 25 22 22 42 77 aa aa 9a 77 |3"B...Y%""Bw...w|
00006a80 24 11 21 83 aa 9a 79 14 11 11 52 75 88 25 11 01 |$.!...y...Ru.%..|
00006a90 10 11 33 74 97 aa bb ab aa 68 33 11 31 02 10 b6 |..3t.....h3.1...|
00006aa0 88 12 41 ba 66 01 10 51 22 10 33 86 98 bb aa bb |..A.f..Q".3.....|
00006ab0 bb cb bb ab aa 9a 66 13 01 51 95 78 66 35 13 01 |......f..Q.xf5..|
00006ac0 11 22 52 85 aa 6a 21 22 84 aa 9a 49 22 22 52 98 |."R..j!"...I""R.|
00006ad0 99 35 23 63 99 bb 9b 79 33 22 22 22 85 aa aa aa |.5#c...y3"""....|
00006ae0 59 12 11 31 66 99 a9 58 22 11 11 21 55 78 23 12 |Y..1f..X"..!Ux#.|
00006af0 10 11 11 21 32 96 aa ab ba ab 88 24 01 83 55 11 |...!2......$..U.|
00006b00 31 a9 44 11 21 52 88 ba bb bb bb bb ab ba bb 9b |1.D.!R..........|
00006b10 57 35 22 82 a8 aa 99 68 26 11 11 11 21 52 88 69 |W5"....h&...!R.i|
00006b20 21 22 53 99 ab 7a 44 22 32 96 aa 58 35 42 66 a9 |!"S..zD"2..X5Bf.|
00006b30 ba ab 66 23 22 22 53 a8 aa aa 7a 23 12 21 33 87 |..f#""S...z#.!3.|
00006b40 a8 89 55 12 11 11 33 86 46 24 20 22 11 11 21 63 |..U...3.F$ "..!c|
00006b50 99 aa ba ab aa 46 12 01 01 51 33 11 21 87 22 10 |.....F...Q3.!.".|
00006b60 21 22 53 95 aa bb bb bb bb bb ab ba aa 8a 35 13 |!"S...........5.|
00006b70 11 71 a7 9b aa 9a 79 24 11 11 01 10 22 23 51 55 |.q....y$...."#QU|
00006b80 44 55 b9 ab 99 47 34 52 99 ab 7a 33 22 63 ba bb |DU...G4R..z3"c..|
00006b90 aa 58 35 22 11 52 85 aa ab 48 34 11 11 42 64 a8 |.X5".R...H4..Bd.|
00006ba0 aa 37 12 11 11 52 87 78 12 20 32 11 12 11 21 44 |.7...R.x. 2...!D|
00006bb0 96 a9 ba bb 8a 35 13 11 01 10 11 10 22 11 11 21 |.....5......"..!|
00006bc0 64 88 a9 aa bb bb cb bb bb bb ab ba 99 36 12 01 |d............6..|
00006bd0 51 95 9b 99 9a 99 58 22 11 11 11 72 87 57 44 a7 |Q.....X"...r.WD.|
00006be0 aa aa 69 46 32 66 ba 9b 37 22 32 b7 bb aa 79 57 |..iF2f..7"2...yW|
00006bf0 22 12 21 52 99 bb 7a 57 12 11 21 32 96 aa 69 23 |".!R..zW..!2..i#|
00006c00 12 11 21 85 98 25 11 11 11 11 43 24 11 22 74 a7 |..!..%....C$."t.|
00006c10 ba bb 9a 58 35 22 01 10 10 10 32 53 97 aa ba ab |...X5"....2S....|
00006c20 aa bb cb cc bb bb ab aa 77 24 01 ff ff ff ff ff |........w$......|
00006c30 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff |................|
*
00007ce0 ff ff ff ff |....|
00007ce4 
com/Result.m0
com/Result.m1
com/Result.m2
com/Result.m4
com/Result.m5
.