Arcade/Game2

Home » Personal collection » Acorn ADFS disks » Greaseweazled » adfs_IJJOBS21.adf » Arcade/Game2

Arcade/Game2

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 » Greaseweazled » adfs_IJJOBS21.adf
Filename:	Arcade/Game2
Read OK:	✔
File size:	2D7D bytes
Load address:	FFFFFB47
Exec address:	4837D67

Duplicates

There are 2 duplicate copies of this file in the archive:

Personal collection » Acorn ADFS disks » Archimedes » IJJOBS21.ADF » Arcade/Game2
Personal collection » Acorn ADFS disks » Greaseweazled » adfs_IJJOBS21.adf » Arcade/Game2
Personal collection » Acorn hard disk » misc » dcfprogs » Arcade/Game2

File contents

   10PROCass
   20A$="DEL.150,9999"+CHR$13+"GOTO40"+CHR$6+CHR$13:VDU21:FOR char=1 TO LEN(A$):OSCLI"FX138,0,"+STR$(ASC(MID$(A$,char,1))):NEXT
   30END
   40HIMEM=&1F00:*LOAD BLOCDAT 2000
   50*LOAD SPRITES.SPRDAT 6200
   60FORp=0TO2STEP2:P%=&1F80
   70[OPT p
   80LDY#0:STY&70:STY&72:LDA#&58:STA&71:LDA#&10:STA&73:.movecode LDA(&70),Y:STA(&72),Y:INY:CPY#128:BEQhalfpage:CPY#0:BNEmovecode:INC&71:INC&73:JMPmovecode:.halfpage LDA&73:CMP#&1F:BNEmovecode
   90LDA#&6C:STA&71:LDA#&30:STA&73:LDY#0
  100.decomp LDA(&70),Y:STA&80:.bits LDA&80:LSR A:ROR A:ROR A:AND#&C0:STA(&72),Y:INC&72:LDA&72:BNEnoext:INC&73:LDA&73:CMP#&80:BNEnoext:JMP&1000
  110.noext LSR&80:LSR&80:LDA&72:AND#3:BNEbits:INC&70:LDA&70:BNEdecomp:INC&71:JMPdecomp
  120]:NEXT
  130FORd=&3000TO&57FF:?d=0:NEXT
  140*SAVE Ship.Ship3 1F80 8000
  150END
  160:
  170DEFPROCass
  180FORpass=4TO6STEP2:osbyte=&FFF4:osword=&FFF1:oswrch=&FFEE:P%=&1000:O%=&5800
  190[OPT pass
  200.prog JSRtitle:JSRblascr:JSRscroff:LDA#4:STAxch:LDA#1:STAych:LDA#17:STAcol:LDA#(name MOD 256):STA&72:LDA#(name DIV 256):STA&73:JSRstring
  210LDY#0:LDA#3:STA&70:LDA#&30:STA&71
  220.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
  230LDY#1:STApowchange:LDY#255:STYpower:INY:.scobarlop LDAsbar,Y:CMP#&FF:BEQstext:JSRoswrch:INY:JMPscobarlop
  240.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
  250.game LDA#0:STAxscr:STAyscr:LDA#2:STAxpos:STAypos
  260.newscr JSRscreen:.oldscr JSRquitch:JSRsboard:LDA#0:STAmovstag:LDAchanged:BNEmoveslop:LDAfine:BEQnofine:.moveslop JSRdispyou:JSRwait:INCmovstag:LDAmovstag:CMP#3:BNEmoveslop:LDA#0:STAmovstag:STAchanged:STAfine:JSRdispyou:JSRwait
  270.finend LDAupvelo:BEQfallh:JSRjumpup:JMPnofall
  280.nofine JSRwait:JSRwait:JSRwait:JSRwait:JMPfinend
  290.fallh LDAxpos:STAxset:LDAypos:STAyset:JSRgetblock:CMP#14:BEQladder:.laddown LDAypos:CMP#9:BEQdownscr:INCyset:JSRgetblock:CMP#8:BEQwatt:AND#&30:BEQfalldown:BNEnofall
  300.downscr LDA#0:STAypos:INCyscr:JMPnewscr:.watt JMPzap:.ladder JMP ladderb
  310.falldown LDA#5:STAfine:INCypos:.nofall JSRmoveyou:JMPoldscr
  320.moveyou LDA#&81:LDX#&B6:LDY#&FF:JSRosbyte:BCCnjump:JSRjump:.njump LDA#&81:LDX#&9E:LDY#&FF:JSRosbyte:BCCnleft:JSRleft:.nleft LDA#&81:LDX#&BD:LDY#&FF:JSRosbyte:BCCnright:JMPright:.nright RTS:.leftscrt JMPleftscr
  330.left LDA#0:STAface:STArghts:LDAxpos:BEQleftscrt:SEC:SBC#1:STAxset:LDAypos:STAyset:JSRgetblock:AND#&30:CMP#&10:BEQnomove:CMP#&20:BEQnomove:CMP#&30:BNEnoupl:DECypos:DECxpos:LDA#3:STAfine:RTS
  340.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:AND#&30:CMP#&10:BEQnomover:CMP#&20:BEQnomover:CMP#&30:BNEnoupr
  350DECypos:INCxpos:LDA#4:STAfine:RTS:.noupr INCxpos:LDA#2:STAfine:RTS
  360.nomover LDA#1:STArghts:STAchanged:JMPnomove
  370.leftscr LDA#9:STAxpos:DECxscr:JSRscreen:RTS:.rightscr LDA#0:STAxpos:INCxscr:JMPscreen
  380.jump LDAypos:CMP#9:BEQnomovet:CLC:ADC#1:STAyset:LDAxpos:STAxset:JSRgetblock:AND#&30:BEQnomovet:LDA#3:STAupvelo:LDAsound:BEQnosnd:LDA#7:LDX#(jumpn MOD 256):LDY#(jumpn DIV 256):JSRosword:.nosnd RTS:.nomovet JMPnomove
  390.dispyou LDAwiper:BEQnowipe:LDY#0:.wiplop LDA&FC0,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&FE0,Y:STA(&78),Y:INY:CPY#32:BNEwipeb
  400.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
  410STY&72:LDA#&1A:STA&73:LDXmovstag:LDAsequen,X:CLC:ADCfine:TAX:LDA&70:CLC:ADClowad,X:STA&70:LDA&71:ADChighad,X:STA&71:CPX#0:BEQnophase:LDXphase:INX
  420.addph LDA&72:CLC:ADC#&80:STA&72:LDA&73:ADC#0:STA&73:DEX:BNEaddph:LDAphase:EOR#1:STAphase
  430.nophase LDArghts:BEQnotrght:LDA&70:CLC:ADC#32:STA&70:LDA&71:ADC#0:STA&71
  440.notrght LDAface:BNEleface:LDA&72:CLC:ADC#&20:STA&72
  450.leface LDA&70:STA&78:LDA&71:STA&79
  460.ladisp LDA(&70),Y:STA&FC0,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
  470.lbdisp LDA(&70),Y:STA&FE0,Y:ORA(&72),Y:STA(&70),Y:INY:CPY#32:BNElbdisp:RTS
  480:
  490.wait LDA#1:LDX#&70:LDY#0:JSRosword:LDA&70:CMP&80:BNEwait:LDA#1:LDX#&70:LDY#0:JSRosword:LDA&70:CLC:ADC#4:STA&80:RTS
  500:
  510.jumpup DECupvelo:LDAypos:BEQupscr:SEC:SBC#1:STAyset:LDAxpos:STAxset:JSRgetblock:AND#&30:BEQupone:LDA#0:STAupvelo:RTS:.upone LDA#6:STAfine:DECypos:RTS:.upscr DECyscr:LDA#9:STAypos:JMPscreen
  520:
  530.block JMP blockon
  540.screen LDAxpos:STAxold:LDAypos:STAyold:JSRscroff:LDA#&FF:STAyset:.ylop LDA#&FF:STAxset:INCyset:.xlop INCxset:JSR blockon
  550LDAxset:CMP#9:BEQnexty:JMPxlop
  560.nexty LDAyset:CMP#9:BEQscron:JMPylop
  570.scron LDY#0
  580.scronlop LDA#19:JSRoswrch:TYA:JSRoswrch:TYA:AND#7:JSRoswrch:LDA#0:JSRoswrch:JSRoswrch:JSRoswrch:JSRoswrch:INY:CPY#16:BNEscronlop:LDA#1:LDX#&70:LDY#0:JSRosword:LDA&70:CLC:ADC#4:STA&80:LDA#0:STAwiper:LDA#1:STAchanged:RTS
  590.scroff LDY#0:.scrofflop LDA#19:JSRoswrch:TYA:JSRoswrch:LDA#0:JSRoswrch:JSRoswrch:JSRoswrch:JSRoswrch:JSRoswrch:INY:CPY#16:BNEscrofflop:RTS
  600:
  610.ladderb LDA#&81:LDX#&97:LDY#&FF:JSRosbyte:BCSfallset:LDA#&81:LDX#&B6:LDY#&FF:JSRosbyte:BCCstable:LDA#1:STAupvelo:JSRjumpup:JMPoldscr:.stable JMPnofall:.fallset JMPladdown
  620:
  630.blockon JSR getblock: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
  640LDA&72:LSR A:LSR A:CLC:ADC#&20:STA&73:LDA&72:LSR A:ROR A:ROR A:AND#&C0:STA&72:LDY#0
  650.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
  660.transbot LDA(&70),Y:AND#&C0:CLC:ADC(&72),Y:STA(&70),Y:INY:CPY#&40:BNEtransbot:RTS
  670:
  680.getblock LDA#&30:CLC:ADCxscr:STA&71:LDAyscr:ASL A:ASL A:ASL A:ASL A:CLC:ADC&71:STAscrno
  690LDAscrno:STA&71:LDAyset:STA&70:ASL A:ASL A:ASL A:PHA:CLC:ADC&70:STA&70:PLA:ASL A:CLC:ADC&70
  700STA&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
  710CLC: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
  720.bit2 LDA&73:ASL A:ROL A
  730.fbgot AND#1:ASL A:ASL A:ASL A:ASL A:CLC:ADC&72:ASL A:STA&72:RTS
  740:
  750.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
  760:
  770.putch ASL A:ASL A:ASL A:TAX:LDA#0:STA&70:LDA#&30:STA&71:LDYxch
  780.xlopc BEQnoxch:LDA&70:CLC:ADC#&20:STA&70:LDA&71:ADC#0:STA&71:DEY:JMPxlopc
  790.noxch LDYych:.ylopc BEQnoych:LDA&70:CLC:ADC#&80:STA&70:LDA&71:ADC#2:STA&71:DEY:JMPylopc
  800.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:STA(&70),Y:TYA:CLC:ADC#8:TAY:CMP#&20:BCSnewlin
  810PLA:ASL A:ASL A:JMPlinelop:.newlin AND#7:TAY:PLA:INY:INX:CPY#8:BNEsline:RTS
  820:
  830.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:.strend RTS
  840:
  850.quitch LDA#&81:LDX#&8F:LDY#&FF:JSRosbyte:BCSquitok:RTS:.quitok PLA:PLA:LDA#&81:LDX#&FF:LDY#&FF:JSRosbyte:BCCzap:JMPprog
  860.zap LDAxold:STAxpos:LDAyold:STAypos:LDAsound:BEQnozaps:LDA#7:LDX#(zapn MOD 256):LDY#(zapn DIV 256):JSRosword
  870LDA#1:STApowchange:LDApower:SEC:SBC#&40:STApower:BEQyoudie:BCCyoudie
  880.nozaps JMPnewscr
  890.youdie JSRgameover:JMPprog
  900.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
  910.bellop LDA#1:LDX#&70:LDY#0:JSRosword:LDA&70:CLC:ADC#100:STA&80:.belwait LDA#1:LDX#&70:LDY#0:JSRosword:LDA&70:CMP&80:BNEbelwait:LDAsound:BEQnobell:LDA#7:LDX#(over MOD 256):LDY#(over DIV 256):JSRosword
  920.nobell PLA:CLC:ADC#1:PHA:CMP#4:BNEbellop:PLA:RTS
  930.gamdead EQUB7:EQUB1:EQUB12:EQUB5:EQUB0:EQUB22:EQUB19:EQUB5:EQUB15:EQUB255
  940.over EQUW1:EQUW-15:EQUW0:EQUW5
  950:
  960.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
  970.nopower RTS
  980:
  990.title JSRblascr:LDA#&15:STAcol:LDA#4:STAxch:LDA#5:STAych:LDA#(name MOD 256):STA&72:LDA#(name DIV 256):STA&73:JSRstring:LDA#1:STAcol:LDA#3:STAxch:LDA#16:STAych:LDA#(creda MOD 256):STA&72:LDA#(creda DIV 256):STA&73:JSRstring
 1000LDA#4:STAxch:LDA#18:STAych:LDA#(credb MOD 256):STA&72:LDA#(credb DIV 256):STA&73:JSRstring:LDA#4:STAxch:LDA#20:STAych:LDA#(credc MOD 256):STA&72:LDA#(credc DIV 256):STA&73:JSRstring
 1010LDA#8:STAxch:LDA#22:STAych:LDA#(credd MOD 256):STA&72:LDA#(credd DIV 256):STA&73:JSRstring:LDA#0:STAxch:LDA#30:STAych:LDA#(space MOD 256):STA&72:LDA#(space DIV 256):STA&73:JSRstring
 1020.soundpr LDA#6:STAxch:LDA#26:STAych:LDA#4:STAcol:LDA#(sndoff MOD 256):STA&72:LDA#(sndoff DIV 256):STA&73:LDAsound:BEQsoundset:LDA#(sndon MOD 256):STA&72:LDA#(sndon DIV 256):STA&73
 1030.soundset JSRstring:.sstop LDA#&81:LDX#&AE:LDY#&FF:JSRosbyte:BCSsstop
 1040.spacwait LDA#&81:LDX#&AE:LDY#&FF:JSRosbyte:BCSseor:LDA#&81:LDX#&9D:LDY#&FF:JSRosbyte:BCCspacwait:RTS
 1050.seor LDAsound:EOR#1:STAsound:JMPsoundpr
 1060.creda EQUB14:EQUB15:EQUB22:EQUB7:EQUB15:EQUB1:EQUB12:EQUB12:EQUB5:EQUB4:EQUB0:EQUB1:EQUB13:EQUB4:EQUB255
 1070.credb EQUB4:EQUB5:EQUB16:EQUB23:EQUB7:EQUB13:EQUB5:EQUB4:EQUB0:EQUB2:EQUB21:EQUB255
 1080.credc EQUB4:EQUB22:EQUB12:EQUB23:EQUB13:EQUB23:EQUB3:EQUB0:EQUB6:EQUB22:EQUB15:EQUB4:EQUB255
 1090.credd EQUB23:EQUB31:EQUB31:EQUB28:EQUB255
 1100.space EQUB14:EQUB15:EQUB5:EQUB16:EQUB16:EQUB0:EQUB16:EQUB14:EQUB1:EQUB3:EQUB5:EQUB0:EQUB17:EQUB22:EQUB0:EQUB16:EQUB17:EQUB1:EQUB15:EQUB17:EQUB255
 1110.name EQUB16:EQUB8:EQUB23:EQUB14:EQUB0:EQUB20:EQUB15:EQUB5:EQUB3:EQUB10:EQUB5:EQUB4:EQUB255
 1120.sndon EQUB16:EQUB22:EQUB18:EQUB13:EQUB4:EQUB0:EQUB22:EQUB13:EQUB0:EQUB255
 1130.sndoff EQUB16:EQUB22:EQUB18:EQUB13:EQUB4:EQUB0:EQUB22:EQUB6:EQUB6:EQUB0:EQUB255
 1140:
 1150.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
 1160EQUB25:EQUB4:EQUW384:EQUW96:EQUB25:EQUB4:EQUW896:EQUW96:EQUB25:EQUB85:EQUW640:EQUW252
 1170EQUB18: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
 1180EQUB18:EQUB1:EQUB1:EQUB25:EQUB4:EQUW128:EQUW92:EQUB25:EQUB4:EQUW448:EQUW92:EQUB25:EQUB85:EQUW128:EQUW0:EQUB25:EQUB85:EQUW448:EQUW0
 1190EQUB25:EQUB4:EQUW704:EQUW92:EQUB25:EQUB4:EQUW1280:EQUW92:EQUB25:EQUB85:EQUW704:EQUW0:EQUB25:EQUB85:EQUW1280:EQUW0
 1200EQUB&FF
 1210.scort EQUB16:EQUB3:EQUB22:EQUB15:EQUB5:EQUB255:.powt EQUB14:EQUB22:EQUB20:EQUB5:EQUB15:EQUB255:.obstxt EQUB10:EQUB5:EQUB21:EQUB16:EQUB255
 1220:
 1230.jumpn EQUW1:EQUW1:EQUW52:EQUW5
 1240.zapn EQUW1:EQUW2:EQUW52:EQUW10
 1250:
 1260.sequen EQUB0:EQUB14:EQUB28
 1270.lowad EQUB0:EQUB&30:EQUB&D0:EQUB&B0:EQUB&50:EQUB&80:EQUB&80
 1280.highad EQUB0:EQUB0:EQUB&FF:EQUB2:EQUB2:EQUB&FD:EQUB2
 1290:
 1300EQUB0:EQUB&20:EQUB&E0:EQUB&A0:EQUB&60:EQUB&80:EQUB&80
 1310EQUB0:EQUB0:EQUB&FF:EQUB2:EQUB2:EQUB&FD:EQUB2
 1320:
 1330EQUB0:EQUB&10:EQUB&F0:EQUB&90:EQUB&70:EQUB0:EQUB0
 1340EQUB0:EQUB0:EQUB&FF:EQUB2:EQUB2:EQUB0:EQUB0
 1350:
 1360.xch EQUB0:.ych EQUB0:.col EQUB0
 1370.xdata EQUB0:EQUB2:EQUB5:EQUB7:EQUB10:EQUB12:EQUB15:EQUB17:EQUB20:EQUB22
 1380.hbdat EQUB4:EQUB9:EQUB14:EQUB19:EQUB24
 1390.xset EQUB0:.yset EQUB0:.xscr EQUB0:.yscr EQUB0:.xpos EQUB0:.ypos EQUB0
 1400.scrno EQUB0:.upvelo EQUB0:.xold EQUB0:.yold EQUB0:.fine EQUB0:.sound EQUB1
 1410.face EQUB1:.phase EQUB0:.rghts EQUB0:.wiper EQUB0:.movstag EQUB0:.changed EQUB0:.power EQUB0:.powchange EQUB0
 1420]:NEXT
 1430ENDPROC


�ass
^A$="DEL.150,9999"+�13+"GOTO40"+�6+�13:�21:� char=1 � �(A$):�"FX138,0,"+�(�(�A$,char,1))):�
�
(�=&1F00:*LOAD BLOCDAT 2000
2*LOAD SPRITES.SPRDAT 6200
<�p=0�2�2:P%=&1F80
F
[OPT p
P�LDY#0:STY&70:STY&72:LDA#&58:STA&71:LDA#&10:STA&73:.movecode LDA(&70),Y:STA(&72),Y:INY:CPY#128:BEQhalfpage:CPY#0:BNEmovecode:INC&71:INC&73:JMPmovecode:.halfpage LDA&73:CMP#&1F:BNEmovecode
Z'LDA#&6C:STA&71:LDA#&30:STA&73:LDY#0
d�.decomp LDA(&70),Y:STA&80:.bits LDA&80:LSR A:ROR A:ROR A:�#&C0:STA(&72),Y:INC&72:LDA&72:BNEnoext:INC&73:LDA&73:CMP#&80:BNEnoext:JMP&1000
nT.noext LSR&80:LSR&80:LDA&72:�#3:BNEbits:INC&70:LDA&70:BNEdecomp:INC&71:JMPdecomp
x]:�
��d=&3000�&57FF:?d=0:�
�*SAVE Ship.Ship3 1F80 8000
��
�:
�	��ass
�H�pass=4�6�2:osbyte=&FFF4:osword=&FFF1:oswrch=&FFEE:P%=&1000:O%=&5800
�
[OPT pass
Ȉ.prog JSRtitle:JSRblascr:JSRscroff:LDA#4:STAxch:LDA#1:STAych:LDA#17:STAcol:LDA#(name � 256):STA&72:LDA#(name � 256):STA&73:JSRstring
�%LDY#0:LDA#3:STA&70:LDA#&30:STA&71
�c.lines LDA(&70),Y:�A#12:STA(&70),Y:LDA&70:CLC:ADC#8:STA&70:LDA&71:ADC#0:STA&71:CMP#&6C:BNElines
�lLDY#1:STApowchange:LDY#255:STYpower:INY:.scobarlop LDAsbar,Y:CMP#&FF:BEQstext:JSRoswrch:INY:JMPscobarlop
�.stext LDA#1:STAcol:LDA#2:STAxch:LDA#24:STAych:LDA#(scort � 256):STA&72:LDA#(scort � 256):STA&73:JSRstring:LDA#13:STAxch:INC&72:JSRstring:LDA#8:STAxch:LDA#28:STAych:INC&72:JSRstring
�5.game LDA#0:STAxscr:STAyscr:LDA#2:STAxpos:STAypos
�.newscr JSRscreen:.oldscr JSRquitch:JSRsboard:LDA#0:STAmovstag:LDAchanged:BNEmoveslop:LDAfine:BEQnofine:.moveslop JSRdispyou:JSRwait:INCmovstag:LDAmovstag:CMP#3:BNEmoveslop:LDA#0:STAmovstag:STAchanged:STAfine:JSRdispyou:JSRwait
2.finend LDAupvelo:BEQfallh:JSRjumpup:JMPnofall
5.nofine JSRwait:JSRwait:JSRwait:JSRwait:JMPfinend
"�.fallh LDAxpos:STAxset:LDAypos:STAyset:JSRgetblock:CMP#14:BEQladder:.laddown LDAypos:CMP#9:BEQdownscr:INCyset:JSRgetblock:CMP#8:BEQwatt:�#&30:BEQfalldown:BNEnofall
,M.downscr LDA#0:STAypos:INCyscr:JMPnewscr:.watt JMPzap:.ladder JMP ladderb
6@.falldown LDA#5:STAfine:INCypos:.nofall JSRmoveyou:JMPoldscr
@�.moveyou LDA#&81:LDX#&B6:LDY#&FF:JSRosbyte:BCCnjump:JSRjump:.njump LDA#&81:LDX#&9E:LDY#&FF:JSRosbyte:BCCnleft:JSRleft:.nleft LDA#&81:LDX#&BD:LDY#&FF:JSRosbyte:BCCnright:JMPright:.nright RTS:.leftscrt JMPleftscr
J�.left LDA#0:STAface:STArghts:LDAxpos:BEQleftscrt:SEC:SBC#1:STAxset:LDAypos:STAyset:JSRgetblock:�#&30:CMP#&10:BEQnomove:CMP#&20:BEQnomove:CMP#&30:BNEnoupl:DECypos:DECxpos:LDA#3:STAfine:RTS
T�.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:�#&30:CMP#&10:BEQnomover:CMP#&20:BEQnomover:CMP#&30:BNEnoupr
^FDECypos:INCxpos:LDA#4:STAfine:RTS:.noupr INCxpos:LDA#2:STAfine:RTS
h0.nomover LDA#1:STArghts:STAchanged:JMPnomove
rZ.leftscr LDA#9:STAxpos:DECxscr:JSRscreen:RTS:.rightscr LDA#0:STAxpos:INCxscr:JMPscreen
|�.jump LDAypos:CMP#9:BEQnomovet:CLC:ADC#1:STAyset:LDAxpos:STAxset:JSRgetblock:�#&30:BEQnomovet:LDA#3:STAupvelo:LDAsound:BEQnosnd:LDA#7:LDX#(jumpn � 256):LDY#(jumpn � 256):JSRosword:.nosnd RTS:.nomovet JMPnomove
��.dispyou LDAwiper:BEQnowipe:LDY#0:.wiplop LDA&FC0,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&FE0,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:CPX#0:BEQnophase:LDXphase:INX
�[.addph LDA&72:CLC:ADC#&80:STA&72:LDA&73:ADC#0:STA&73:DEX:BNEaddph:LDAphase:�#1:STAphase
�M.nophase LDArghts:BEQnotrght:LDA&70:CLC:ADC#32:STA&70:LDA&71:ADC#0:STA&71
�8.notrght LDAface:BNEleface:LDA&72:CLC:ADC#&20:STA&72
�'.leface LDA&70:STA&78:LDA&71:STA&79
̬.ladisp LDA(&70),Y:STA&FC0,Y:�A(&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
�N.lbdisp LDA(&70),Y:STA&FE0,Y:�A(&72),Y:STA(&70),Y:INY:CPY#32:BNElbdisp:RTS
�:
�w.wait LDA#1:LDX#&70:LDY#0:JSRosword:LDA&70:CMP&80:BNEwait:LDA#1:LDX#&70:LDY#0:JSRosword:LDA&70:CLC:ADC#4:STA&80:RTS
�:
��.jumpup DECupvelo:LDAypos:BEQupscr:SEC:SBC#1:STAyset:LDAxpos:STAxset:JSRgetblock:�#&30:BEQupone:LDA#0:STAupvelo:RTS:.upone LDA#6:STAfine:DECypos:RTS:.upscr DECyscr:LDA#9:STAypos:JMPscreen
:
.block JMP blockon
}.screen LDAxpos:STAxold:LDAypos:STAyold:JSRscroff:LDA#&FF:STAyset:.ylop LDA#&FF:STAxset:INCyset:.xlop INCxset:JSR blockon
&"LDAxset:CMP#9:BEQnexty:JMPxlop
0).nexty LDAyset:CMP#9:BEQscron:JMPylop
:.scron LDY#0
D�.scronlop LDA#19:JSRoswrch:TYA:JSRoswrch:TYA:�#7:JSRoswrch:LDA#0:JSRoswrch:JSRoswrch:JSRoswrch:JSRoswrch:INY:CPY#16:BNEscronlop:LDA#1:LDX#&70:LDY#0:JSRosword:LDA&70:CLC:ADC#4:STA&80:LDA#0:STAwiper:LDA#1:STAchanged:RTS
N�.scroff LDY#0:.scrofflop LDA#19:JSRoswrch:TYA:JSRoswrch:LDA#0:JSRoswrch:JSRoswrch:JSRoswrch:JSRoswrch:JSRoswrch:INY:CPY#16:BNEscrofflop:RTS
X:
b�.ladderb LDA#&81:LDX#&97:LDY#&FF:JSRosbyte:BCSfallset:LDA#&81:LDX#&B6:LDY#&FF:JSRosbyte:BCCstable:LDA#1:STAupvelo:JSRjumpup:JMPoldscr:.stable JMPnofall:.fallset JMPladdown
l:
v�.blockon JSR getblock: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
�ULDA&72:LSR A:LSR A:CLC:ADC#&20:STA&73:LDA&72:LSR A:ROR A:ROR A:�#&C0:STA&72:LDY#0
��.transtop LDA(&70),Y:�#&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
�T.transbot LDA(&70),Y:�#&C0:CLC:ADC(&72),Y:STA(&70),Y:INY:CPY#&40:BNEtransbot:RTS
�:
�\.getblock LDA#&30:CLC:ADCxscr:STA&71:LDAyscr:ASL A:ASL A:ASL A:ASL A:CLC:ADC&71:STAscrno
�_LDAscrno:STA&71:LDAyset:STA&70:ASL A:ASL A:ASL A:PHA:CLC:ADC&70:STA&70:PLA:ASL A:CLC:ADC&70
�uSTA&70:LDYxset:LDAxdata,Y:TAY:LDA(&70),Y:ROL A:ROL A:ROL A:�#3:STA&72:INY:LDA(&70),Y:LSR A:LSR A:LSR A:LSR A:�#12
�~CLC:ADC&72:STA&72:LDAxset:LSR A:TAY:LDAhbdat,Y:TAY:LDA(&70),Y:STA&73:LDAxset:�#1:BNEbit2:LDA&73:ASL A:ROL A:ROL A:JMPfbgot
�.bit2 LDA&73:ASL A:ROL A
�B.fbgot �#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:�#&C0:STA(&70),Y:INY:BNEblanlop:INC&71:LDA&71:CMP#&80:BNEblanlop:JMPscron
�:
C.putch ASL A:ASL A:ASL A:TAX:LDA#0:STA&70:LDA#&30:STA&71:LDYxch
N.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:�#3:BEQblanch:STA&80:LDA#0:.colch CLC:ADCcol:DEC&80:BNEcolch:.blanch STA&80:LDA(&70),Y:�#&C0:�A&80:STA(&70),Y:TYA:CLC:ADC#8:TAY:CMP#&20:BCSnewlin
*MPLA:ASL A:ASL A:JMPlinelop:.newlin �#7:TAY:PLA:INY:INX:CPY#8:BNEsline:RTS
4:
>�.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:.strend RTS
H:
R|.quitch LDA#&81:LDX#&8F:LDY#&FF:JSRosbyte:BCSquitok:RTS:.quitok PLA:PLA:LDA#&81:LDX#&FF:LDY#&FF:JSRosbyte:BCCzap:JMPprog
\m.zap LDAxold:STAxpos:LDAyold:STAypos:LDAsound:BEQnozaps:LDA#7:LDX#(zapn � 256):LDY#(zapn � 256):JSRosword
fHLDA#1:STApowchange:LDApower:SEC:SBC#&40:STApower:BEQyoudie:BCCyoudie
p.nozaps JMPnewscr
z.youdie JSRgameover:JMPprog
�.gameover LDA#5:STAxch:LDA#16:STAych:LDA#1:STAcol:LDA#(gamdead � 256):STA&72:LDA#(gamdead � 256):STA&73:JSRstring:LDA#0:PHA
��.bellop LDA#1:LDX#&70:LDY#0:JSRosword:LDA&70:CLC:ADC#100:STA&80:.belwait LDA#1:LDX#&70:LDY#0:JSRosword:LDA&70:CMP&80:BNEbelwait:LDAsound:BEQnobell:LDA#7:LDX#(over � 256):LDY#(over � 256):JSRosword
�5.nobell PLA:CLC:ADC#1:PHA:CMP#4:BNEbellop:PLA:RTS
�N.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:�#&C0:�A#4:STA&7C70,X:INX:CPXpower:BNEpowlop:.pownol LDA&7C70,X:�#&C0:STA&7C70,X:INX:BNEpownol
�.nopower RTS
�:
��.title JSRblascr:LDA#&15:STAcol:LDA#4:STAxch:LDA#5:STAych:LDA#(name � 256):STA&72:LDA#(name � 256):STA&73:JSRstring:LDA#1:STAcol:LDA#3:STAxch:LDA#16:STAych:LDA#(creda � 256):STA&72:LDA#(creda � 256):STA&73:JSRstring
�LDA#4:STAxch:LDA#18:STAych:LDA#(credb � 256):STA&72:LDA#(credb � 256):STA&73:JSRstring:LDA#4:STAxch:LDA#20:STAych:LDA#(credc � 256):STA&72:LDA#(credc � 256):STA&73:JSRstring
�LDA#8:STAxch:LDA#22:STAych:LDA#(credd � 256):STA&72:LDA#(credd � 256):STA&73:JSRstring:LDA#0:STAxch:LDA#30:STAych:LDA#(space � 256):STA&72:LDA#(space � 256):STA&73:JSRstring
��.soundpr LDA#6:STAxch:LDA#26:STAych:LDA#4:STAcol:LDA#(sndoff � 256):STA&72:LDA#(sndoff � 256):STA&73:LDAsound:BEQsoundset:LDA#(sndon � 256):STA&72:LDA#(sndon � 256):STA&73
I.soundset JSRstring:.sstop LDA#&81:LDX#&AE:LDY#&FF:JSRosbyte:BCSsstop
i.spacwait LDA#&81:LDX#&AE:LDY#&FF:JSRosbyte:BCSseor:LDA#&81:LDX#&9D:LDY#&FF:JSRosbyte:BCCspacwait:RTS
*.seor LDAsound:�#1:STAsound:JMPsoundpr
$m.creda EQUB14:EQUB15:EQUB22:EQUB7:EQUB15:EQUB1:EQUB12:EQUB12:EQUB5:EQUB4:EQUB0:EQUB1:EQUB13:EQUB4:EQUB255
.X.credb EQUB4:EQUB5:EQUB16:EQUB23:EQUB7:EQUB13:EQUB5:EQUB4:EQUB0:EQUB2:EQUB21:EQUB255
8a.credc EQUB4:EQUB22:EQUB12:EQUB23:EQUB13:EQUB23:EQUB3:EQUB0:EQUB6:EQUB22:EQUB15:EQUB4:EQUB255
B..credd EQUB23:EQUB31:EQUB31:EQUB28:EQUB255
L�.space EQUB14:EQUB15:EQUB5:EQUB16:EQUB16:EQUB0:EQUB16:EQUB14:EQUB1:EQUB3:EQUB5:EQUB0:EQUB17:EQUB22:EQUB0:EQUB16:EQUB17:EQUB1:EQUB15:EQUB17:EQUB255
V_.name EQUB16:EQUB8:EQUB23:EQUB14:EQUB0:EQUB20:EQUB15:EQUB5:EQUB3:EQUB10:EQUB5:EQUB4:EQUB255
`N.sndon EQUB16:EQUB22:EQUB18:EQUB13:EQUB4:EQUB0:EQUB22:EQUB13:EQUB0:EQUB255
jT.sndoff EQUB16:EQUB22:EQUB18:EQUB13:EQUB4:EQUB0:EQUB22:EQUB6:EQUB6:EQUB0:EQUB255
t:
~�.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
�YEQUB25: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
�uEQUB25:EQUB4:EQUW704:EQUW92:EQUB25:EQUB4:EQUW1280:EQUW92:EQUB25:EQUB85:EQUW704:EQUW0:EQUB25:EQUB85:EQUW1280:EQUW0
�EQUB&FF
��.scort EQUB16:EQUB3:EQUB22:EQUB15:EQUB5:EQUB255:.powt EQUB14:EQUB22:EQUB20:EQUB5:EQUB15:EQUB255:.obstxt EQUB10:EQUB5:EQUB21:EQUB16:EQUB255
�:
�#.jumpn EQUW1:EQUW1:EQUW52:EQUW5
�#.zapn EQUW1:EQUW2:EQUW52:EQUW10
�:
�.sequen EQUB0:EQUB14:EQUB28
�@.lowad EQUB0:EQUB&30:EQUB&D0:EQUB&B0:EQUB&50:EQUB&80:EQUB&80
9.highad EQUB0:EQUB0:EQUB&FF:EQUB2:EQUB2:EQUB&FD:EQUB2

:
9EQUB0:EQUB&20:EQUB&E0:EQUB&A0:EQUB&60:EQUB&80:EQUB&80
1EQUB0:EQUB0:EQUB&FF:EQUB2:EQUB2:EQUB&FD:EQUB2
(:
25EQUB0:EQUB&10:EQUB&F0:EQUB&90:EQUB&70:EQUB0:EQUB0
</EQUB0:EQUB0:EQUB&FF:EQUB2:EQUB2:EQUB0:EQUB0
F:
P$.xch EQUB0:.ych EQUB0:.col EQUB0
ZL.xdata EQUB0:EQUB2:EQUB5:EQUB7:EQUB10:EQUB12:EQUB15:EQUB17:EQUB20:EQUB22
d+.hbdat EQUB4:EQUB9:EQUB14:EQUB19:EQUB24
nK.xset EQUB0:.yset EQUB0:.xscr EQUB0:.yscr EQUB0:.xpos EQUB0:.ypos EQUB0
xO.scrno EQUB0:.upvelo EQUB0:.xold EQUB0:.yold EQUB0:.fine EQUB0:.sound EQUB1
�r.face EQUB1:.phase EQUB0:.rghts EQUB0:.wiper EQUB0:.movstag EQUB0:.changed EQUB0:.power EQUB0:.powchange EQUB0
�]:�
��
�

00000000  0d 00 0a 08 f2 61 73 73  0d 00 14 5e 41 24 3d 22  |.....ass...^A$="|
00000010  44 45 4c 2e 31 35 30 2c  39 39 39 39 22 2b bd 31  |DEL.150,9999"+.1|
00000020  33 2b 22 47 4f 54 4f 34  30 22 2b bd 36 2b bd 31  |3+"GOTO40"+.6+.1|
00000030  33 3a ef 32 31 3a e3 20  63 68 61 72 3d 31 20 b8  |3:.21:. char=1 .|
00000040  20 a9 28 41 24 29 3a ff  22 46 58 31 33 38 2c 30  | .(A$):."FX138,0|
00000050  2c 22 2b c3 28 97 28 c1  41 24 2c 63 68 61 72 2c  |,"+.(.(.A$,char,|
00000060  31 29 29 29 3a ed 0d 00  1e 05 e0 0d 00 28 1e d3  |1))):........(..|
00000070  3d 26 31 46 30 30 3a 2a  4c 4f 41 44 20 42 4c 4f  |=&1F00:*LOAD BLO|
00000080  43 44 41 54 20 32 30 30  30 0d 00 32 1d 2a 4c 4f  |CDAT 2000..2.*LO|
00000090  41 44 20 53 50 52 49 54  45 53 2e 53 50 52 44 41  |AD SPRITES.SPRDA|
000000a0  54 20 36 32 30 30 0d 00  3c 15 e3 70 3d 30 b8 32  |T 6200..<..p=0.2|
000000b0  88 32 3a 50 25 3d 26 31  46 38 30 0d 00 46 0a 5b  |.2:P%=&1F80..F.[|
000000c0  4f 50 54 20 70 0d 00 50  be 4c 44 59 23 30 3a 53  |OPT p..P.LDY#0:S|
000000d0  54 59 26 37 30 3a 53 54  59 26 37 32 3a 4c 44 41  |TY&70:STY&72:LDA|
000000e0  23 26 35 38 3a 53 54 41  26 37 31 3a 4c 44 41 23  |#&58:STA&71:LDA#|
000000f0  26 31 30 3a 53 54 41 26  37 33 3a 2e 6d 6f 76 65  |&10:STA&73:.move|
00000100  63 6f 64 65 20 4c 44 41  28 26 37 30 29 2c 59 3a  |code LDA(&70),Y:|
00000110  53 54 41 28 26 37 32 29  2c 59 3a 49 4e 59 3a 43  |STA(&72),Y:INY:C|
00000120  50 59 23 31 32 38 3a 42  45 51 68 61 6c 66 70 61  |PY#128:BEQhalfpa|
00000130  67 65 3a 43 50 59 23 30  3a 42 4e 45 6d 6f 76 65  |ge:CPY#0:BNEmove|
00000140  63 6f 64 65 3a 49 4e 43  26 37 31 3a 49 4e 43 26  |code:INC&71:INC&|
00000150  37 33 3a 4a 4d 50 6d 6f  76 65 63 6f 64 65 3a 2e  |73:JMPmovecode:.|
00000160  68 61 6c 66 70 61 67 65  20 4c 44 41 26 37 33 3a  |halfpage LDA&73:|
00000170  43 4d 50 23 26 31 46 3a  42 4e 45 6d 6f 76 65 63  |CMP#&1F:BNEmovec|
00000180  6f 64 65 0d 00 5a 27 4c  44 41 23 26 36 43 3a 53  |ode..Z'LDA#&6C:S|
00000190  54 41 26 37 31 3a 4c 44  41 23 26 33 30 3a 53 54  |TA&71:LDA#&30:ST|
000001a0  41 26 37 33 3a 4c 44 59  23 30 0d 00 64 8c 2e 64  |A&73:LDY#0..d..d|
000001b0  65 63 6f 6d 70 20 4c 44  41 28 26 37 30 29 2c 59  |ecomp LDA(&70),Y|
000001c0  3a 53 54 41 26 38 30 3a  2e 62 69 74 73 20 4c 44  |:STA&80:.bits LD|
000001d0  41 26 38 30 3a 4c 53 52  20 41 3a 52 4f 52 20 41  |A&80:LSR A:ROR A|
000001e0  3a 52 4f 52 20 41 3a 80  23 26 43 30 3a 53 54 41  |:ROR A:.#&C0:STA|
000001f0  28 26 37 32 29 2c 59 3a  49 4e 43 26 37 32 3a 4c  |(&72),Y:INC&72:L|
00000200  44 41 26 37 32 3a 42 4e  45 6e 6f 65 78 74 3a 49  |DA&72:BNEnoext:I|
00000210  4e 43 26 37 33 3a 4c 44  41 26 37 33 3a 43 4d 50  |NC&73:LDA&73:CMP|
00000220  23 26 38 30 3a 42 4e 45  6e 6f 65 78 74 3a 4a 4d  |#&80:BNEnoext:JM|
00000230  50 26 31 30 30 30 0d 00  6e 54 2e 6e 6f 65 78 74  |P&1000..nT.noext|
00000240  20 4c 53 52 26 38 30 3a  4c 53 52 26 38 30 3a 4c  | LSR&80:LSR&80:L|
00000250  44 41 26 37 32 3a 80 23  33 3a 42 4e 45 62 69 74  |DA&72:.#3:BNEbit|
00000260  73 3a 49 4e 43 26 37 30  3a 4c 44 41 26 37 30 3a  |s:INC&70:LDA&70:|
00000270  42 4e 45 64 65 63 6f 6d  70 3a 49 4e 43 26 37 31  |BNEdecomp:INC&71|
00000280  3a 4a 4d 50 64 65 63 6f  6d 70 0d 00 78 07 5d 3a  |:JMPdecomp..x.]:|
00000290  ed 0d 00 82 19 e3 64 3d  26 33 30 30 30 b8 26 35  |......d=&3000.&5|
000002a0  37 46 46 3a 3f 64 3d 30  3a ed 0d 00 8c 1e 2a 53  |7FF:?d=0:.....*S|
000002b0  41 56 45 20 53 68 69 70  2e 53 68 69 70 33 20 31  |AVE Ship.Ship3 1|
000002c0  46 38 30 20 38 30 30 30  0d 00 96 05 e0 0d 00 a0  |F80 8000........|
000002d0  05 3a 0d 00 aa 09 dd f2  61 73 73 0d 00 b4 48 e3  |.:......ass...H.|
000002e0  70 61 73 73 3d 34 b8 36  88 32 3a 6f 73 62 79 74  |pass=4.6.2:osbyt|
000002f0  65 3d 26 46 46 46 34 3a  6f 73 77 6f 72 64 3d 26  |e=&FFF4:osword=&|
00000300  46 46 46 31 3a 6f 73 77  72 63 68 3d 26 46 46 45  |FFF1:oswrch=&FFE|
00000310  45 3a 50 25 3d 26 31 30  30 30 3a 4f 25 3d 26 35  |E:P%=&1000:O%=&5|
00000320  38 30 30 0d 00 be 0d 5b  4f 50 54 20 70 61 73 73  |800....[OPT pass|
00000330  0d 00 c8 88 2e 70 72 6f  67 20 4a 53 52 74 69 74  |.....prog JSRtit|
00000340  6c 65 3a 4a 53 52 62 6c  61 73 63 72 3a 4a 53 52  |le:JSRblascr:JSR|
00000350  73 63 72 6f 66 66 3a 4c  44 41 23 34 3a 53 54 41  |scroff:LDA#4:STA|
00000360  78 63 68 3a 4c 44 41 23  31 3a 53 54 41 79 63 68  |xch:LDA#1:STAych|
00000370  3a 4c 44 41 23 31 37 3a  53 54 41 63 6f 6c 3a 4c  |:LDA#17:STAcol:L|
00000380  44 41 23 28 6e 61 6d 65  20 83 20 32 35 36 29 3a  |DA#(name . 256):|
00000390  53 54 41 26 37 32 3a 4c  44 41 23 28 6e 61 6d 65  |STA&72:LDA#(name|
000003a0  20 81 20 32 35 36 29 3a  53 54 41 26 37 33 3a 4a  | . 256):STA&73:J|
000003b0  53 52 73 74 72 69 6e 67  0d 00 d2 25 4c 44 59 23  |SRstring...%LDY#|
000003c0  30 3a 4c 44 41 23 33 3a  53 54 41 26 37 30 3a 4c  |0:LDA#3:STA&70:L|
000003d0  44 41 23 26 33 30 3a 53  54 41 26 37 31 0d 00 dc  |DA#&30:STA&71...|
000003e0  63 2e 6c 69 6e 65 73 20  4c 44 41 28 26 37 30 29  |c.lines LDA(&70)|
000003f0  2c 59 3a 84 41 23 31 32  3a 53 54 41 28 26 37 30  |,Y:.A#12:STA(&70|
00000400  29 2c 59 3a 4c 44 41 26  37 30 3a 43 4c 43 3a 41  |),Y:LDA&70:CLC:A|
00000410  44 43 23 38 3a 53 54 41  26 37 30 3a 4c 44 41 26  |DC#8:STA&70:LDA&|
00000420  37 31 3a 41 44 43 23 30  3a 53 54 41 26 37 31 3a  |71:ADC#0:STA&71:|
00000430  43 4d 50 23 26 36 43 3a  42 4e 45 6c 69 6e 65 73  |CMP#&6C:BNElines|
00000440  0d 00 e6 6c 4c 44 59 23  31 3a 53 54 41 70 6f 77  |...lLDY#1:STApow|
00000450  63 68 61 6e 67 65 3a 4c  44 59 23 32 35 35 3a 53  |change:LDY#255:S|
00000460  54 59 70 6f 77 65 72 3a  49 4e 59 3a 2e 73 63 6f  |TYpower:INY:.sco|
00000470  62 61 72 6c 6f 70 20 4c  44 41 73 62 61 72 2c 59  |barlop LDAsbar,Y|
00000480  3a 43 4d 50 23 26 46 46  3a 42 45 51 73 74 65 78  |:CMP#&FF:BEQstex|
00000490  74 3a 4a 53 52 6f 73 77  72 63 68 3a 49 4e 59 3a  |t:JSRoswrch:INY:|
000004a0  4a 4d 50 73 63 6f 62 61  72 6c 6f 70 0d 00 f0 b9  |JMPscobarlop....|
000004b0  2e 73 74 65 78 74 20 4c  44 41 23 31 3a 53 54 41  |.stext LDA#1:STA|
000004c0  63 6f 6c 3a 4c 44 41 23  32 3a 53 54 41 78 63 68  |col:LDA#2:STAxch|
000004d0  3a 4c 44 41 23 32 34 3a  53 54 41 79 63 68 3a 4c  |:LDA#24:STAych:L|
000004e0  44 41 23 28 73 63 6f 72  74 20 83 20 32 35 36 29  |DA#(scort . 256)|
000004f0  3a 53 54 41 26 37 32 3a  4c 44 41 23 28 73 63 6f  |:STA&72:LDA#(sco|
00000500  72 74 20 81 20 32 35 36  29 3a 53 54 41 26 37 33  |rt . 256):STA&73|
00000510  3a 4a 53 52 73 74 72 69  6e 67 3a 4c 44 41 23 31  |:JSRstring:LDA#1|
00000520  33 3a 53 54 41 78 63 68  3a 49 4e 43 26 37 32 3a  |3:STAxch:INC&72:|
00000530  4a 53 52 73 74 72 69 6e  67 3a 4c 44 41 23 38 3a  |JSRstring:LDA#8:|
00000540  53 54 41 78 63 68 3a 4c  44 41 23 32 38 3a 53 54  |STAxch:LDA#28:ST|
00000550  41 79 63 68 3a 49 4e 43  26 37 32 3a 4a 53 52 73  |Aych:INC&72:JSRs|
00000560  74 72 69 6e 67 0d 00 fa  35 2e 67 61 6d 65 20 4c  |tring...5.game L|
00000570  44 41 23 30 3a 53 54 41  78 73 63 72 3a 53 54 41  |DA#0:STAxscr:STA|
00000580  79 73 63 72 3a 4c 44 41  23 32 3a 53 54 41 78 70  |yscr:LDA#2:STAxp|
00000590  6f 73 3a 53 54 41 79 70  6f 73 0d 01 04 e7 2e 6e  |os:STAypos.....n|
000005a0  65 77 73 63 72 20 4a 53  52 73 63 72 65 65 6e 3a  |ewscr JSRscreen:|
000005b0  2e 6f 6c 64 73 63 72 20  4a 53 52 71 75 69 74 63  |.oldscr JSRquitc|
000005c0  68 3a 4a 53 52 73 62 6f  61 72 64 3a 4c 44 41 23  |h:JSRsboard:LDA#|
000005d0  30 3a 53 54 41 6d 6f 76  73 74 61 67 3a 4c 44 41  |0:STAmovstag:LDA|
000005e0  63 68 61 6e 67 65 64 3a  42 4e 45 6d 6f 76 65 73  |changed:BNEmoves|
000005f0  6c 6f 70 3a 4c 44 41 66  69 6e 65 3a 42 45 51 6e  |lop:LDAfine:BEQn|
00000600  6f 66 69 6e 65 3a 2e 6d  6f 76 65 73 6c 6f 70 20  |ofine:.moveslop |
00000610  4a 53 52 64 69 73 70 79  6f 75 3a 4a 53 52 77 61  |JSRdispyou:JSRwa|
00000620  69 74 3a 49 4e 43 6d 6f  76 73 74 61 67 3a 4c 44  |it:INCmovstag:LD|
00000630  41 6d 6f 76 73 74 61 67  3a 43 4d 50 23 33 3a 42  |Amovstag:CMP#3:B|
00000640  4e 45 6d 6f 76 65 73 6c  6f 70 3a 4c 44 41 23 30  |NEmoveslop:LDA#0|
00000650  3a 53 54 41 6d 6f 76 73  74 61 67 3a 53 54 41 63  |:STAmovstag:STAc|
00000660  68 61 6e 67 65 64 3a 53  54 41 66 69 6e 65 3a 4a  |hanged:STAfine:J|
00000670  53 52 64 69 73 70 79 6f  75 3a 4a 53 52 77 61 69  |SRdispyou:JSRwai|
00000680  74 0d 01 0e 32 2e 66 69  6e 65 6e 64 20 4c 44 41  |t...2.finend LDA|
00000690  75 70 76 65 6c 6f 3a 42  45 51 66 61 6c 6c 68 3a  |upvelo:BEQfallh:|
000006a0  4a 53 52 6a 75 6d 70 75  70 3a 4a 4d 50 6e 6f 66  |JSRjumpup:JMPnof|
000006b0  61 6c 6c 0d 01 18 35 2e  6e 6f 66 69 6e 65 20 4a  |all...5.nofine J|
000006c0  53 52 77 61 69 74 3a 4a  53 52 77 61 69 74 3a 4a  |SRwait:JSRwait:J|
*
000006e0  4d 50 66 69 6e 65 6e 64  0d 01 22 a7 2e 66 61 6c  |MPfinend.."..fal|
000006f0  6c 68 20 4c 44 41 78 70  6f 73 3a 53 54 41 78 73  |lh LDAxpos:STAxs|
00000700  65 74 3a 4c 44 41 79 70  6f 73 3a 53 54 41 79 73  |et:LDAypos:STAys|
00000710  65 74 3a 4a 53 52 67 65  74 62 6c 6f 63 6b 3a 43  |et:JSRgetblock:C|
00000720  4d 50 23 31 34 3a 42 45  51 6c 61 64 64 65 72 3a  |MP#14:BEQladder:|
00000730  2e 6c 61 64 64 6f 77 6e  20 4c 44 41 79 70 6f 73  |.laddown LDAypos|
00000740  3a 43 4d 50 23 39 3a 42  45 51 64 6f 77 6e 73 63  |:CMP#9:BEQdownsc|
00000750  72 3a 49 4e 43 79 73 65  74 3a 4a 53 52 67 65 74  |r:INCyset:JSRget|
00000760  62 6c 6f 63 6b 3a 43 4d  50 23 38 3a 42 45 51 77  |block:CMP#8:BEQw|
00000770  61 74 74 3a 80 23 26 33  30 3a 42 45 51 66 61 6c  |att:.#&30:BEQfal|
00000780  6c 64 6f 77 6e 3a 42 4e  45 6e 6f 66 61 6c 6c 0d  |ldown:BNEnofall.|
00000790  01 2c 4d 2e 64 6f 77 6e  73 63 72 20 4c 44 41 23  |.,M.downscr LDA#|
000007a0  30 3a 53 54 41 79 70 6f  73 3a 49 4e 43 79 73 63  |0:STAypos:INCysc|
000007b0  72 3a 4a 4d 50 6e 65 77  73 63 72 3a 2e 77 61 74  |r:JMPnewscr:.wat|
000007c0  74 20 4a 4d 50 7a 61 70  3a 2e 6c 61 64 64 65 72  |t JMPzap:.ladder|
000007d0  20 4a 4d 50 20 6c 61 64  64 65 72 62 0d 01 36 40  | JMP ladderb..6@|
000007e0  2e 66 61 6c 6c 64 6f 77  6e 20 4c 44 41 23 35 3a  |.falldown LDA#5:|
000007f0  53 54 41 66 69 6e 65 3a  49 4e 43 79 70 6f 73 3a  |STAfine:INCypos:|
00000800  2e 6e 6f 66 61 6c 6c 20  4a 53 52 6d 6f 76 65 79  |.nofall JSRmovey|
00000810  6f 75 3a 4a 4d 50 6f 6c  64 73 63 72 0d 01 40 d6  |ou:JMPoldscr..@.|
00000820  2e 6d 6f 76 65 79 6f 75  20 4c 44 41 23 26 38 31  |.moveyou LDA#&81|
00000830  3a 4c 44 58 23 26 42 36  3a 4c 44 59 23 26 46 46  |:LDX#&B6:LDY#&FF|
00000840  3a 4a 53 52 6f 73 62 79  74 65 3a 42 43 43 6e 6a  |:JSRosbyte:BCCnj|
00000850  75 6d 70 3a 4a 53 52 6a  75 6d 70 3a 2e 6e 6a 75  |ump:JSRjump:.nju|
00000860  6d 70 20 4c 44 41 23 26  38 31 3a 4c 44 58 23 26  |mp LDA#&81:LDX#&|
00000870  39 45 3a 4c 44 59 23 26  46 46 3a 4a 53 52 6f 73  |9E:LDY#&FF:JSRos|
00000880  62 79 74 65 3a 42 43 43  6e 6c 65 66 74 3a 4a 53  |byte:BCCnleft:JS|
00000890  52 6c 65 66 74 3a 2e 6e  6c 65 66 74 20 4c 44 41  |Rleft:.nleft LDA|
000008a0  23 26 38 31 3a 4c 44 58  23 26 42 44 3a 4c 44 59  |#&81:LDX#&BD:LDY|
000008b0  23 26 46 46 3a 4a 53 52  6f 73 62 79 74 65 3a 42  |#&FF:JSRosbyte:B|
000008c0  43 43 6e 72 69 67 68 74  3a 4a 4d 50 72 69 67 68  |CCnright:JMPrigh|
000008d0  74 3a 2e 6e 72 69 67 68  74 20 52 54 53 3a 2e 6c  |t:.nright RTS:.l|
000008e0  65 66 74 73 63 72 74 20  4a 4d 50 6c 65 66 74 73  |eftscrt JMPlefts|
000008f0  63 72 0d 01 4a bf 2e 6c  65 66 74 20 4c 44 41 23  |cr..J..left LDA#|
00000900  30 3a 53 54 41 66 61 63  65 3a 53 54 41 72 67 68  |0:STAface:STArgh|
00000910  74 73 3a 4c 44 41 78 70  6f 73 3a 42 45 51 6c 65  |ts:LDAxpos:BEQle|
00000920  66 74 73 63 72 74 3a 53  45 43 3a 53 42 43 23 31  |ftscrt:SEC:SBC#1|
00000930  3a 53 54 41 78 73 65 74  3a 4c 44 41 79 70 6f 73  |:STAxset:LDAypos|
00000940  3a 53 54 41 79 73 65 74  3a 4a 53 52 67 65 74 62  |:STAyset:JSRgetb|
00000950  6c 6f 63 6b 3a 80 23 26  33 30 3a 43 4d 50 23 26  |lock:.#&30:CMP#&|
00000960  31 30 3a 42 45 51 6e 6f  6d 6f 76 65 3a 43 4d 50  |10:BEQnomove:CMP|
00000970  23 26 32 30 3a 42 45 51  6e 6f 6d 6f 76 65 3a 43  |#&20:BEQnomove:C|
00000980  4d 50 23 26 33 30 3a 42  4e 45 6e 6f 75 70 6c 3a  |MP#&30:BNEnoupl:|
00000990  44 45 43 79 70 6f 73 3a  44 45 43 78 70 6f 73 3a  |DECypos:DECxpos:|
000009a0  4c 44 41 23 33 3a 53 54  41 66 69 6e 65 3a 52 54  |LDA#3:STAfine:RT|
000009b0  53 0d 01 54 d5 2e 6e 6f  75 70 6c 20 44 45 43 78  |S..T..noupl DECx|
000009c0  70 6f 73 3a 4c 44 41 23  31 3a 53 54 41 66 69 6e  |pos:LDA#1:STAfin|
000009d0  65 3a 2e 6e 6f 6d 6f 76  65 20 52 54 53 3a 2e 72  |e:.nomove RTS:.r|
000009e0  69 67 68 74 20 4c 44 41  23 30 3a 53 54 41 72 67  |ight LDA#0:STArg|
000009f0  68 74 73 3a 4c 44 41 23  31 3a 53 54 41 66 61 63  |hts:LDA#1:STAfac|
00000a00  65 3a 4c 44 41 78 70 6f  73 3a 43 4d 50 23 39 3a  |e:LDAxpos:CMP#9:|
00000a10  42 45 51 72 69 67 68 74  73 63 72 3a 43 4c 43 3a  |BEQrightscr:CLC:|
00000a20  41 44 43 23 31 3a 53 54  41 78 73 65 74 3a 4c 44  |ADC#1:STAxset:LD|
00000a30  41 79 70 6f 73 3a 53 54  41 79 73 65 74 3a 4a 53  |Aypos:STAyset:JS|
00000a40  52 67 65 74 62 6c 6f 63  6b 3a 80 23 26 33 30 3a  |Rgetblock:.#&30:|
00000a50  43 4d 50 23 26 31 30 3a  42 45 51 6e 6f 6d 6f 76  |CMP#&10:BEQnomov|
00000a60  65 72 3a 43 4d 50 23 26  32 30 3a 42 45 51 6e 6f  |er:CMP#&20:BEQno|
00000a70  6d 6f 76 65 72 3a 43 4d  50 23 26 33 30 3a 42 4e  |mover:CMP#&30:BN|
00000a80  45 6e 6f 75 70 72 0d 01  5e 46 44 45 43 79 70 6f  |Enoupr..^FDECypo|
00000a90  73 3a 49 4e 43 78 70 6f  73 3a 4c 44 41 23 34 3a  |s:INCxpos:LDA#4:|
00000aa0  53 54 41 66 69 6e 65 3a  52 54 53 3a 2e 6e 6f 75  |STAfine:RTS:.nou|
00000ab0  70 72 20 49 4e 43 78 70  6f 73 3a 4c 44 41 23 32  |pr INCxpos:LDA#2|
00000ac0  3a 53 54 41 66 69 6e 65  3a 52 54 53 0d 01 68 30  |:STAfine:RTS..h0|
00000ad0  2e 6e 6f 6d 6f 76 65 72  20 4c 44 41 23 31 3a 53  |.nomover LDA#1:S|
00000ae0  54 41 72 67 68 74 73 3a  53 54 41 63 68 61 6e 67  |TArghts:STAchang|
00000af0  65 64 3a 4a 4d 50 6e 6f  6d 6f 76 65 0d 01 72 5a  |ed:JMPnomove..rZ|
00000b00  2e 6c 65 66 74 73 63 72  20 4c 44 41 23 39 3a 53  |.leftscr LDA#9:S|
00000b10  54 41 78 70 6f 73 3a 44  45 43 78 73 63 72 3a 4a  |TAxpos:DECxscr:J|
00000b20  53 52 73 63 72 65 65 6e  3a 52 54 53 3a 2e 72 69  |SRscreen:RTS:.ri|
00000b30  67 68 74 73 63 72 20 4c  44 41 23 30 3a 53 54 41  |ghtscr LDA#0:STA|
00000b40  78 70 6f 73 3a 49 4e 43  78 73 63 72 3a 4a 4d 50  |xpos:INCxscr:JMP|
00000b50  73 63 72 65 65 6e 0d 01  7c d5 2e 6a 75 6d 70 20  |screen..|..jump |
00000b60  4c 44 41 79 70 6f 73 3a  43 4d 50 23 39 3a 42 45  |LDAypos:CMP#9:BE|
00000b70  51 6e 6f 6d 6f 76 65 74  3a 43 4c 43 3a 41 44 43  |Qnomovet:CLC:ADC|
00000b80  23 31 3a 53 54 41 79 73  65 74 3a 4c 44 41 78 70  |#1:STAyset:LDAxp|
00000b90  6f 73 3a 53 54 41 78 73  65 74 3a 4a 53 52 67 65  |os:STAxset:JSRge|
00000ba0  74 62 6c 6f 63 6b 3a 80  23 26 33 30 3a 42 45 51  |tblock:.#&30:BEQ|
00000bb0  6e 6f 6d 6f 76 65 74 3a  4c 44 41 23 33 3a 53 54  |nomovet:LDA#3:ST|
00000bc0  41 75 70 76 65 6c 6f 3a  4c 44 41 73 6f 75 6e 64  |Aupvelo:LDAsound|
00000bd0  3a 42 45 51 6e 6f 73 6e  64 3a 4c 44 41 23 37 3a  |:BEQnosnd:LDA#7:|
00000be0  4c 44 58 23 28 6a 75 6d  70 6e 20 83 20 32 35 36  |LDX#(jumpn . 256|
00000bf0  29 3a 4c 44 59 23 28 6a  75 6d 70 6e 20 81 20 32  |):LDY#(jumpn . 2|
00000c00  35 36 29 3a 4a 53 52 6f  73 77 6f 72 64 3a 2e 6e  |56):JSRosword:.n|
00000c10  6f 73 6e 64 20 52 54 53  3a 2e 6e 6f 6d 6f 76 65  |osnd RTS:.nomove|
00000c20  74 20 4a 4d 50 6e 6f 6d  6f 76 65 0d 01 86 bb 2e  |t JMPnomove.....|
00000c30  64 69 73 70 79 6f 75 20  4c 44 41 77 69 70 65 72  |dispyou LDAwiper|
00000c40  3a 42 45 51 6e 6f 77 69  70 65 3a 4c 44 59 23 30  |:BEQnowipe:LDY#0|
00000c50  3a 2e 77 69 70 6c 6f 70  20 4c 44 41 26 46 43 30  |:.wiplop LDA&FC0|
00000c60  2c 59 3a 53 54 41 28 26  37 38 29 2c 59 3a 49 4e  |,Y:STA(&78),Y:IN|
00000c70  59 3a 43 50 59 23 33 32  3a 42 4e 45 77 69 70 6c  |Y:CPY#32:BNEwipl|
00000c80  6f 70 3a 4c 44 41 26 37  38 3a 43 4c 43 3a 41 44  |op:LDA&78:CLC:AD|
00000c90  43 23 26 38 30 3a 53 54  41 26 37 38 3a 4c 44 41  |C#&80:STA&78:LDA|
00000ca0  26 37 39 3a 41 44 43 23  32 3a 53 54 41 26 37 39  |&79:ADC#2:STA&79|
00000cb0  3a 4c 44 59 23 30 3a 2e  77 69 70 65 62 20 4c 44  |:LDY#0:.wipeb LD|
00000cc0  41 26 46 45 30 2c 59 3a  53 54 41 28 26 37 38 29  |A&FE0,Y:STA(&78)|
00000cd0  2c 59 3a 49 4e 59 3a 43  50 59 23 33 32 3a 42 4e  |,Y:INY:CPY#32:BN|
00000ce0  45 77 69 70 65 62 0d 01  90 ba 2e 6e 6f 77 69 70  |Ewipeb.....nowip|
00000cf0  65 20 4c 44 41 23 31 3a  53 54 41 77 69 70 65 72  |e LDA#1:STAwiper|
00000d00  3a 4c 44 41 78 70 6f 73  3a 41 53 4c 20 41 3a 41  |:LDAxpos:ASL A:A|
00000d10  53 4c 20 41 3a 41 53 4c  20 41 3a 41 53 4c 20 41  |SL A:ASL A:ASL A|
00000d20  3a 41 53 4c 20 41 3a 41  53 4c 20 41 3a 53 54 41  |:ASL A:ASL A:STA|
00000d30  26 37 30 3a 4c 44 41 78  70 6f 73 3a 4c 53 52 20  |&70:LDAxpos:LSR |
00000d40  41 3a 4c 53 52 20 41 3a  43 4c 43 3a 41 44 43 23  |A:LSR A:CLC:ADC#|
00000d50  26 33 35 3a 53 54 41 26  37 31 3a 4c 44 41 79 70  |&35:STA&71:LDAyp|
00000d60  6f 73 3a 43 4c 43 3a 41  44 43 26 37 31 3a 53 54  |os:CLC:ADC&71:ST|
00000d70  41 26 37 31 3a 4c 44 41  79 70 6f 73 3a 41 53 4c  |A&71:LDAypos:ASL|
00000d80  20 41 3a 41 53 4c 20 41  3a 43 4c 43 3a 41 44 43  | A:ASL A:CLC:ADC|
00000d90  26 37 31 3a 53 54 41 26  37 31 3a 4c 44 59 23 30  |&71:STA&71:LDY#0|
00000da0  0d 01 9a 95 53 54 59 26  37 32 3a 4c 44 41 23 26  |....STY&72:LDA#&|
00000db0  31 41 3a 53 54 41 26 37  33 3a 4c 44 58 6d 6f 76  |1A:STA&73:LDXmov|
00000dc0  73 74 61 67 3a 4c 44 41  73 65 71 75 65 6e 2c 58  |stag:LDAsequen,X|
00000dd0  3a 43 4c 43 3a 41 44 43  66 69 6e 65 3a 54 41 58  |:CLC:ADCfine:TAX|
00000de0  3a 4c 44 41 26 37 30 3a  43 4c 43 3a 41 44 43 6c  |:LDA&70:CLC:ADCl|
00000df0  6f 77 61 64 2c 58 3a 53  54 41 26 37 30 3a 4c 44  |owad,X:STA&70:LD|
00000e00  41 26 37 31 3a 41 44 43  68 69 67 68 61 64 2c 58  |A&71:ADChighad,X|
00000e10  3a 53 54 41 26 37 31 3a  43 50 58 23 30 3a 42 45  |:STA&71:CPX#0:BE|
00000e20  51 6e 6f 70 68 61 73 65  3a 4c 44 58 70 68 61 73  |Qnophase:LDXphas|
00000e30  65 3a 49 4e 58 0d 01 a4  5b 2e 61 64 64 70 68 20  |e:INX...[.addph |
00000e40  4c 44 41 26 37 32 3a 43  4c 43 3a 41 44 43 23 26  |LDA&72:CLC:ADC#&|
00000e50  38 30 3a 53 54 41 26 37  32 3a 4c 44 41 26 37 33  |80:STA&72:LDA&73|
00000e60  3a 41 44 43 23 30 3a 53  54 41 26 37 33 3a 44 45  |:ADC#0:STA&73:DE|
00000e70  58 3a 42 4e 45 61 64 64  70 68 3a 4c 44 41 70 68  |X:BNEaddph:LDAph|
00000e80  61 73 65 3a 82 23 31 3a  53 54 41 70 68 61 73 65  |ase:.#1:STAphase|
00000e90  0d 01 ae 4d 2e 6e 6f 70  68 61 73 65 20 4c 44 41  |...M.nophase LDA|
00000ea0  72 67 68 74 73 3a 42 45  51 6e 6f 74 72 67 68 74  |rghts:BEQnotrght|
00000eb0  3a 4c 44 41 26 37 30 3a  43 4c 43 3a 41 44 43 23  |:LDA&70:CLC:ADC#|
00000ec0  33 32 3a 53 54 41 26 37  30 3a 4c 44 41 26 37 31  |32:STA&70:LDA&71|
00000ed0  3a 41 44 43 23 30 3a 53  54 41 26 37 31 0d 01 b8  |:ADC#0:STA&71...|
00000ee0  38 2e 6e 6f 74 72 67 68  74 20 4c 44 41 66 61 63  |8.notrght LDAfac|
00000ef0  65 3a 42 4e 45 6c 65 66  61 63 65 3a 4c 44 41 26  |e:BNEleface:LDA&|
00000f00  37 32 3a 43 4c 43 3a 41  44 43 23 26 32 30 3a 53  |72:CLC:ADC#&20:S|
00000f10  54 41 26 37 32 0d 01 c2  27 2e 6c 65 66 61 63 65  |TA&72...'.leface|
00000f20  20 4c 44 41 26 37 30 3a  53 54 41 26 37 38 3a 4c  | LDA&70:STA&78:L|
00000f30  44 41 26 37 31 3a 53 54  41 26 37 39 0d 01 cc ac  |DA&71:STA&79....|
00000f40  2e 6c 61 64 69 73 70 20  4c 44 41 28 26 37 30 29  |.ladisp LDA(&70)|
00000f50  2c 59 3a 53 54 41 26 46  43 30 2c 59 3a 84 41 28  |,Y:STA&FC0,Y:.A(|
00000f60  26 37 32 29 2c 59 3a 53  54 41 28 26 37 30 29 2c  |&72),Y:STA(&70),|
00000f70  59 3a 49 4e 59 3a 43 50  59 23 33 32 3a 42 4e 45  |Y:INY:CPY#32:BNE|
00000f80  6c 61 64 69 73 70 3a 4c  44 41 26 37 32 3a 43 4c  |ladisp:LDA&72:CL|
00000f90  43 3a 41 44 43 23 26 34  30 3a 53 54 41 26 37 32  |C:ADC#&40:STA&72|
00000fa0  3a 4c 44 41 26 37 33 3a  41 44 43 23 30 3a 53 54  |:LDA&73:ADC#0:ST|
00000fb0  41 26 37 33 3a 4c 44 41  26 37 30 3a 43 4c 43 3a  |A&73:LDA&70:CLC:|
00000fc0  41 44 43 23 26 38 30 3a  53 54 41 26 37 30 3a 4c  |ADC#&80:STA&70:L|
00000fd0  44 41 26 37 31 3a 41 44  43 23 32 3a 53 54 41 26  |DA&71:ADC#2:STA&|
00000fe0  37 31 3a 4c 44 59 23 30  0d 01 d6 4e 2e 6c 62 64  |71:LDY#0...N.lbd|
00000ff0  69 73 70 20 4c 44 41 28  26 37 30 29 2c 59 3a 53  |isp LDA(&70),Y:S|
00001000  54 41 26 46 45 30 2c 59  3a 84 41 28 26 37 32 29  |TA&FE0,Y:.A(&72)|
00001010  2c 59 3a 53 54 41 28 26  37 30 29 2c 59 3a 49 4e  |,Y:STA(&70),Y:IN|
00001020  59 3a 43 50 59 23 33 32  3a 42 4e 45 6c 62 64 69  |Y:CPY#32:BNElbdi|
00001030  73 70 3a 52 54 53 0d 01  e0 05 3a 0d 01 ea 77 2e  |sp:RTS....:...w.|
00001040  77 61 69 74 20 4c 44 41  23 31 3a 4c 44 58 23 26  |wait LDA#1:LDX#&|
00001050  37 30 3a 4c 44 59 23 30  3a 4a 53 52 6f 73 77 6f  |70:LDY#0:JSRoswo|
00001060  72 64 3a 4c 44 41 26 37  30 3a 43 4d 50 26 38 30  |rd:LDA&70:CMP&80|
00001070  3a 42 4e 45 77 61 69 74  3a 4c 44 41 23 31 3a 4c  |:BNEwait:LDA#1:L|
00001080  44 58 23 26 37 30 3a 4c  44 59 23 30 3a 4a 53 52  |DX#&70:LDY#0:JSR|
00001090  6f 73 77 6f 72 64 3a 4c  44 41 26 37 30 3a 43 4c  |osword:LDA&70:CL|
000010a0  43 3a 41 44 43 23 34 3a  53 54 41 26 38 30 3a 52  |C:ADC#4:STA&80:R|
000010b0  54 53 0d 01 f4 05 3a 0d  01 fe bf 2e 6a 75 6d 70  |TS....:.....jump|
000010c0  75 70 20 44 45 43 75 70  76 65 6c 6f 3a 4c 44 41  |up DECupvelo:LDA|
000010d0  79 70 6f 73 3a 42 45 51  75 70 73 63 72 3a 53 45  |ypos:BEQupscr:SE|
000010e0  43 3a 53 42 43 23 31 3a  53 54 41 79 73 65 74 3a  |C:SBC#1:STAyset:|
000010f0  4c 44 41 78 70 6f 73 3a  53 54 41 78 73 65 74 3a  |LDAxpos:STAxset:|
00001100  4a 53 52 67 65 74 62 6c  6f 63 6b 3a 80 23 26 33  |JSRgetblock:.#&3|
00001110  30 3a 42 45 51 75 70 6f  6e 65 3a 4c 44 41 23 30  |0:BEQupone:LDA#0|
00001120  3a 53 54 41 75 70 76 65  6c 6f 3a 52 54 53 3a 2e  |:STAupvelo:RTS:.|
00001130  75 70 6f 6e 65 20 4c 44  41 23 36 3a 53 54 41 66  |upone LDA#6:STAf|
00001140  69 6e 65 3a 44 45 43 79  70 6f 73 3a 52 54 53 3a  |ine:DECypos:RTS:|
00001150  2e 75 70 73 63 72 20 44  45 43 79 73 63 72 3a 4c  |.upscr DECyscr:L|
00001160  44 41 23 39 3a 53 54 41  79 70 6f 73 3a 4a 4d 50  |DA#9:STAypos:JMP|
00001170  73 63 72 65 65 6e 0d 02  08 05 3a 0d 02 12 16 2e  |screen....:.....|
00001180  62 6c 6f 63 6b 20 4a 4d  50 20 62 6c 6f 63 6b 6f  |block JMP blocko|
00001190  6e 0d 02 1c 7d 2e 73 63  72 65 65 6e 20 4c 44 41  |n...}.screen LDA|
000011a0  78 70 6f 73 3a 53 54 41  78 6f 6c 64 3a 4c 44 41  |xpos:STAxold:LDA|
000011b0  79 70 6f 73 3a 53 54 41  79 6f 6c 64 3a 4a 53 52  |ypos:STAyold:JSR|
000011c0  73 63 72 6f 66 66 3a 4c  44 41 23 26 46 46 3a 53  |scroff:LDA#&FF:S|
000011d0  54 41 79 73 65 74 3a 2e  79 6c 6f 70 20 4c 44 41  |TAyset:.ylop LDA|
000011e0  23 26 46 46 3a 53 54 41  78 73 65 74 3a 49 4e 43  |#&FF:STAxset:INC|
000011f0  79 73 65 74 3a 2e 78 6c  6f 70 20 49 4e 43 78 73  |yset:.xlop INCxs|
00001200  65 74 3a 4a 53 52 20 62  6c 6f 63 6b 6f 6e 0d 02  |et:JSR blockon..|
00001210  26 22 4c 44 41 78 73 65  74 3a 43 4d 50 23 39 3a  |&"LDAxset:CMP#9:|
00001220  42 45 51 6e 65 78 74 79  3a 4a 4d 50 78 6c 6f 70  |BEQnexty:JMPxlop|
00001230  0d 02 30 29 2e 6e 65 78  74 79 20 4c 44 41 79 73  |..0).nexty LDAys|
00001240  65 74 3a 43 4d 50 23 39  3a 42 45 51 73 63 72 6f  |et:CMP#9:BEQscro|
00001250  6e 3a 4a 4d 50 79 6c 6f  70 0d 02 3a 10 2e 73 63  |n:JMPylop..:..sc|
00001260  72 6f 6e 20 4c 44 59 23  30 0d 02 44 dd 2e 73 63  |ron LDY#0..D..sc|
00001270  72 6f 6e 6c 6f 70 20 4c  44 41 23 31 39 3a 4a 53  |ronlop LDA#19:JS|
00001280  52 6f 73 77 72 63 68 3a  54 59 41 3a 4a 53 52 6f  |Roswrch:TYA:JSRo|
00001290  73 77 72 63 68 3a 54 59  41 3a 80 23 37 3a 4a 53  |swrch:TYA:.#7:JS|
000012a0  52 6f 73 77 72 63 68 3a  4c 44 41 23 30 3a 4a 53  |Roswrch:LDA#0:JS|
000012b0  52 6f 73 77 72 63 68 3a  4a 53 52 6f 73 77 72 63  |Roswrch:JSRoswrc|
000012c0  68 3a 4a 53 52 6f 73 77  72 63 68 3a 4a 53 52 6f  |h:JSRoswrch:JSRo|
000012d0  73 77 72 63 68 3a 49 4e  59 3a 43 50 59 23 31 36  |swrch:INY:CPY#16|
000012e0  3a 42 4e 45 73 63 72 6f  6e 6c 6f 70 3a 4c 44 41  |:BNEscronlop:LDA|
000012f0  23 31 3a 4c 44 58 23 26  37 30 3a 4c 44 59 23 30  |#1:LDX#&70:LDY#0|
00001300  3a 4a 53 52 6f 73 77 6f  72 64 3a 4c 44 41 26 37  |:JSRosword:LDA&7|
00001310  30 3a 43 4c 43 3a 41 44  43 23 34 3a 53 54 41 26  |0:CLC:ADC#4:STA&|
00001320  38 30 3a 4c 44 41 23 30  3a 53 54 41 77 69 70 65  |80:LDA#0:STAwipe|
00001330  72 3a 4c 44 41 23 31 3a  53 54 41 63 68 61 6e 67  |r:LDA#1:STAchang|
00001340  65 64 3a 52 54 53 0d 02  4e 8f 2e 73 63 72 6f 66  |ed:RTS..N..scrof|
00001350  66 20 4c 44 59 23 30 3a  2e 73 63 72 6f 66 66 6c  |f LDY#0:.scroffl|
00001360  6f 70 20 4c 44 41 23 31  39 3a 4a 53 52 6f 73 77  |op LDA#19:JSRosw|
00001370  72 63 68 3a 54 59 41 3a  4a 53 52 6f 73 77 72 63  |rch:TYA:JSRoswrc|
00001380  68 3a 4c 44 41 23 30 3a  4a 53 52 6f 73 77 72 63  |h:LDA#0:JSRoswrc|
00001390  68 3a 4a 53 52 6f 73 77  72 63 68 3a 4a 53 52 6f  |h:JSRoswrch:JSRo|
000013a0  73 77 72 63 68 3a 4a 53  52 6f 73 77 72 63 68 3a  |swrch:JSRoswrch:|
000013b0  4a 53 52 6f 73 77 72 63  68 3a 49 4e 59 3a 43 50  |JSRoswrch:INY:CP|
000013c0  59 23 31 36 3a 42 4e 45  73 63 72 6f 66 66 6c 6f  |Y#16:BNEscrofflo|
000013d0  70 3a 52 54 53 0d 02 58  05 3a 0d 02 62 af 2e 6c  |p:RTS..X.:..b..l|
000013e0  61 64 64 65 72 62 20 4c  44 41 23 26 38 31 3a 4c  |adderb LDA#&81:L|
000013f0  44 58 23 26 39 37 3a 4c  44 59 23 26 46 46 3a 4a  |DX#&97:LDY#&FF:J|
00001400  53 52 6f 73 62 79 74 65  3a 42 43 53 66 61 6c 6c  |SRosbyte:BCSfall|
00001410  73 65 74 3a 4c 44 41 23  26 38 31 3a 4c 44 58 23  |set:LDA#&81:LDX#|
00001420  26 42 36 3a 4c 44 59 23  26 46 46 3a 4a 53 52 6f  |&B6:LDY#&FF:JSRo|
00001430  73 62 79 74 65 3a 42 43  43 73 74 61 62 6c 65 3a  |sbyte:BCCstable:|
00001440  4c 44 41 23 31 3a 53 54  41 75 70 76 65 6c 6f 3a  |LDA#1:STAupvelo:|
00001450  4a 53 52 6a 75 6d 70 75  70 3a 4a 4d 50 6f 6c 64  |JSRjumpup:JMPold|
00001460  73 63 72 3a 2e 73 74 61  62 6c 65 20 4a 4d 50 6e  |scr:.stable JMPn|
00001470  6f 66 61 6c 6c 3a 2e 66  61 6c 6c 73 65 74 20 4a  |ofall:.fallset J|
00001480  4d 50 6c 61 64 64 6f 77  6e 0d 02 6c 05 3a 0d 02  |MPladdown..l.:..|
00001490  76 b3 2e 62 6c 6f 63 6b  6f 6e 20 4a 53 52 20 67  |v..blockon JSR g|
000014a0  65 74 62 6c 6f 63 6b 3a  4c 44 41 78 73 65 74 3a  |etblock:LDAxset:|
000014b0  41 53 4c 20 41 3a 41 53  4c 20 41 3a 41 53 4c 20  |ASL A:ASL A:ASL |
000014c0  41 3a 41 53 4c 20 41 3a  41 53 4c 20 41 3a 41 53  |A:ASL A:ASL A:AS|
000014d0  4c 20 41 3a 53 54 41 26  37 30 3a 4c 44 41 78 73  |L A:STA&70:LDAxs|
000014e0  65 74 3a 4c 53 52 20 41  3a 4c 53 52 20 41 3a 43  |et:LSR A:LSR A:C|
000014f0  4c 43 3a 41 44 43 23 26  33 35 3a 53 54 41 26 37  |LC:ADC#&35:STA&7|
00001500  31 3a 4c 44 41 79 73 65  74 3a 43 4c 43 3a 41 44  |1:LDAyset:CLC:AD|
00001510  43 26 37 31 3a 53 54 41  26 37 31 3a 4c 44 41 79  |C&71:STA&71:LDAy|
00001520  73 65 74 3a 41 53 4c 20  41 3a 41 53 4c 20 41 3a  |set:ASL A:ASL A:|
00001530  43 4c 43 3a 41 44 43 26  37 31 3a 53 54 41 26 37  |CLC:ADC&71:STA&7|
00001540  31 0d 02 80 55 4c 44 41  26 37 32 3a 4c 53 52 20  |1...ULDA&72:LSR |
00001550  41 3a 4c 53 52 20 41 3a  43 4c 43 3a 41 44 43 23  |A:LSR A:CLC:ADC#|
00001560  26 32 30 3a 53 54 41 26  37 33 3a 4c 44 41 26 37  |&20:STA&73:LDA&7|
00001570  32 3a 4c 53 52 20 41 3a  52 4f 52 20 41 3a 52 4f  |2:LSR A:ROR A:RO|
00001580  52 20 41 3a 80 23 26 43  30 3a 53 54 41 26 37 32  |R A:.#&C0:STA&72|
00001590  3a 4c 44 59 23 30 0d 02  8a 9e 2e 74 72 61 6e 73  |:LDY#0.....trans|
000015a0  74 6f 70 20 4c 44 41 28  26 37 30 29 2c 59 3a 80  |top LDA(&70),Y:.|
000015b0  23 26 43 30 3a 43 4c 43  3a 41 44 43 28 26 37 32  |#&C0:CLC:ADC(&72|
000015c0  29 2c 59 3a 53 54 41 28  26 37 30 29 2c 59 3a 49  |),Y:STA(&70),Y:I|
000015d0  4e 59 3a 43 50 59 23 26  34 30 3a 42 4e 45 74 72  |NY:CPY#&40:BNEtr|
000015e0  61 6e 73 74 6f 70 3a 4c  44 59 23 30 3a 4c 44 41  |anstop:LDY#0:LDA|
000015f0  26 37 32 3a 43 4c 43 3a  41 44 43 23 26 34 30 3a  |&72:CLC:ADC#&40:|
00001600  53 54 41 26 37 32 3a 4c  44 41 26 37 30 3a 43 4c  |STA&72:LDA&70:CL|
00001610  43 3a 41 44 43 23 26 38  30 3a 53 54 41 26 37 30  |C:ADC#&80:STA&70|
00001620  3a 4c 44 41 26 37 31 3a  41 44 43 23 32 3a 53 54  |:LDA&71:ADC#2:ST|
00001630  41 26 37 31 0d 02 94 54  2e 74 72 61 6e 73 62 6f  |A&71...T.transbo|
00001640  74 20 4c 44 41 28 26 37  30 29 2c 59 3a 80 23 26  |t LDA(&70),Y:.#&|
00001650  43 30 3a 43 4c 43 3a 41  44 43 28 26 37 32 29 2c  |C0:CLC:ADC(&72),|
00001660  59 3a 53 54 41 28 26 37  30 29 2c 59 3a 49 4e 59  |Y:STA(&70),Y:INY|
00001670  3a 43 50 59 23 26 34 30  3a 42 4e 45 74 72 61 6e  |:CPY#&40:BNEtran|
00001680  73 62 6f 74 3a 52 54 53  0d 02 9e 05 3a 0d 02 a8  |sbot:RTS....:...|
00001690  5c 2e 67 65 74 62 6c 6f  63 6b 20 4c 44 41 23 26  |\.getblock LDA#&|
000016a0  33 30 3a 43 4c 43 3a 41  44 43 78 73 63 72 3a 53  |30:CLC:ADCxscr:S|
000016b0  54 41 26 37 31 3a 4c 44  41 79 73 63 72 3a 41 53  |TA&71:LDAyscr:AS|
000016c0  4c 20 41 3a 41 53 4c 20  41 3a 41 53 4c 20 41 3a  |L A:ASL A:ASL A:|
000016d0  41 53 4c 20 41 3a 43 4c  43 3a 41 44 43 26 37 31  |ASL A:CLC:ADC&71|
000016e0  3a 53 54 41 73 63 72 6e  6f 0d 02 b2 5f 4c 44 41  |:STAscrno..._LDA|
000016f0  73 63 72 6e 6f 3a 53 54  41 26 37 31 3a 4c 44 41  |scrno:STA&71:LDA|
00001700  79 73 65 74 3a 53 54 41  26 37 30 3a 41 53 4c 20  |yset:STA&70:ASL |
00001710  41 3a 41 53 4c 20 41 3a  41 53 4c 20 41 3a 50 48  |A:ASL A:ASL A:PH|
00001720  41 3a 43 4c 43 3a 41 44  43 26 37 30 3a 53 54 41  |A:CLC:ADC&70:STA|
00001730  26 37 30 3a 50 4c 41 3a  41 53 4c 20 41 3a 43 4c  |&70:PLA:ASL A:CL|
00001740  43 3a 41 44 43 26 37 30  0d 02 bc 75 53 54 41 26  |C:ADC&70...uSTA&|
00001750  37 30 3a 4c 44 59 78 73  65 74 3a 4c 44 41 78 64  |70:LDYxset:LDAxd|
00001760  61 74 61 2c 59 3a 54 41  59 3a 4c 44 41 28 26 37  |ata,Y:TAY:LDA(&7|
00001770  30 29 2c 59 3a 52 4f 4c  20 41 3a 52 4f 4c 20 41  |0),Y:ROL A:ROL A|
00001780  3a 52 4f 4c 20 41 3a 80  23 33 3a 53 54 41 26 37  |:ROL A:.#3:STA&7|
00001790  32 3a 49 4e 59 3a 4c 44  41 28 26 37 30 29 2c 59  |2:INY:LDA(&70),Y|
000017a0  3a 4c 53 52 20 41 3a 4c  53 52 20 41 3a 4c 53 52  |:LSR A:LSR A:LSR|
000017b0  20 41 3a 4c 53 52 20 41  3a 80 23 31 32 0d 02 c6  | A:LSR A:.#12...|
000017c0  7e 43 4c 43 3a 41 44 43  26 37 32 3a 53 54 41 26  |~CLC:ADC&72:STA&|
000017d0  37 32 3a 4c 44 41 78 73  65 74 3a 4c 53 52 20 41  |72:LDAxset:LSR A|
000017e0  3a 54 41 59 3a 4c 44 41  68 62 64 61 74 2c 59 3a  |:TAY:LDAhbdat,Y:|
000017f0  54 41 59 3a 4c 44 41 28  26 37 30 29 2c 59 3a 53  |TAY:LDA(&70),Y:S|
00001800  54 41 26 37 33 3a 4c 44  41 78 73 65 74 3a 80 23  |TA&73:LDAxset:.#|
00001810  31 3a 42 4e 45 62 69 74  32 3a 4c 44 41 26 37 33  |1:BNEbit2:LDA&73|
00001820  3a 41 53 4c 20 41 3a 52  4f 4c 20 41 3a 52 4f 4c  |:ASL A:ROL A:ROL|
00001830  20 41 3a 4a 4d 50 66 62  67 6f 74 0d 02 d0 1c 2e  | A:JMPfbgot.....|
00001840  62 69 74 32 20 4c 44 41  26 37 33 3a 41 53 4c 20  |bit2 LDA&73:ASL |
00001850  41 3a 52 4f 4c 20 41 0d  02 da 42 2e 66 62 67 6f  |A:ROL A...B.fbgo|
00001860  74 20 80 23 31 3a 41 53  4c 20 41 3a 41 53 4c 20  |t .#1:ASL A:ASL |
00001870  41 3a 41 53 4c 20 41 3a  41 53 4c 20 41 3a 43 4c  |A:ASL A:ASL A:CL|
00001880  43 3a 41 44 43 26 37 32  3a 41 53 4c 20 41 3a 53  |C:ADC&72:ASL A:S|
00001890  54 41 26 37 32 3a 52 54  53 0d 02 e4 05 3a 0d 02  |TA&72:RTS....:..|
000018a0  ee 8f 2e 62 6c 61 73 63  72 20 4a 53 52 73 63 72  |...blascr JSRscr|
000018b0  6f 66 66 3a 4c 44 59 23  30 3a 53 54 59 26 37 30  |off:LDY#0:STY&70|
000018c0  3a 4c 44 41 23 26 33 30  3a 53 54 41 26 37 31 3a  |:LDA#&30:STA&71:|
000018d0  2e 62 6c 61 6e 6c 6f 70  20 4c 44 41 28 26 37 30  |.blanlop LDA(&70|
000018e0  29 2c 59 3a 80 23 26 43  30 3a 53 54 41 28 26 37  |),Y:.#&C0:STA(&7|
000018f0  30 29 2c 59 3a 49 4e 59  3a 42 4e 45 62 6c 61 6e  |0),Y:INY:BNEblan|
00001900  6c 6f 70 3a 49 4e 43 26  37 31 3a 4c 44 41 26 37  |lop:INC&71:LDA&7|
00001910  31 3a 43 4d 50 23 26 38  30 3a 42 4e 45 62 6c 61  |1:CMP#&80:BNEbla|
00001920  6e 6c 6f 70 3a 4a 4d 50  73 63 72 6f 6e 0d 02 f8  |nlop:JMPscron...|
00001930  05 3a 0d 03 02 43 2e 70  75 74 63 68 20 41 53 4c  |.:...C.putch ASL|
00001940  20 41 3a 41 53 4c 20 41  3a 41 53 4c 20 41 3a 54  | A:ASL A:ASL A:T|
00001950  41 58 3a 4c 44 41 23 30  3a 53 54 41 26 37 30 3a  |AX:LDA#0:STA&70:|
00001960  4c 44 41 23 26 33 30 3a  53 54 41 26 37 31 3a 4c  |LDA#&30:STA&71:L|
00001970  44 59 78 63 68 0d 03 0c  4e 2e 78 6c 6f 70 63 20  |DYxch...N.xlopc |
00001980  42 45 51 6e 6f 78 63 68  3a 4c 44 41 26 37 30 3a  |BEQnoxch:LDA&70:|
00001990  43 4c 43 3a 41 44 43 23  26 32 30 3a 53 54 41 26  |CLC:ADC#&20:STA&|
000019a0  37 30 3a 4c 44 41 26 37  31 3a 41 44 43 23 30 3a  |70:LDA&71:ADC#0:|
000019b0  53 54 41 26 37 31 3a 44  45 59 3a 4a 4d 50 78 6c  |STA&71:DEY:JMPxl|
000019c0  6f 70 63 0d 03 16 5c 2e  6e 6f 78 63 68 20 4c 44  |opc...\.noxch LD|
000019d0  59 79 63 68 3a 2e 79 6c  6f 70 63 20 42 45 51 6e  |Yych:.ylopc BEQn|
000019e0  6f 79 63 68 3a 4c 44 41  26 37 30 3a 43 4c 43 3a  |oych:LDA&70:CLC:|
000019f0  41 44 43 23 26 38 30 3a  53 54 41 26 37 30 3a 4c  |ADC#&80:STA&70:L|
00001a00  44 41 26 37 31 3a 41 44  43 23 32 3a 53 54 41 26  |DA&71:ADC#2:STA&|
00001a10  37 31 3a 44 45 59 3a 4a  4d 50 79 6c 6f 70 63 0d  |71:DEY:JMPylopc.|
00001a20  03 20 d2 2e 6e 6f 79 63  68 20 4c 44 59 23 30 3a  |. ..noych LDY#0:|
00001a30  2e 73 6c 69 6e 65 20 4c  44 41 26 43 30 30 2c 58  |.sline LDA&C00,X|
00001a40  3a 2e 6c 69 6e 65 6c 6f  70 20 50 48 41 3a 41 53  |:.linelop PHA:AS|
00001a50  4c 20 41 3a 52 4f 4c 20  41 3a 52 4f 4c 20 41 3a  |L A:ROL A:ROL A:|
00001a60  80 23 33 3a 42 45 51 62  6c 61 6e 63 68 3a 53 54  |.#3:BEQblanch:ST|
00001a70  41 26 38 30 3a 4c 44 41  23 30 3a 2e 63 6f 6c 63  |A&80:LDA#0:.colc|
00001a80  68 20 43 4c 43 3a 41 44  43 63 6f 6c 3a 44 45 43  |h CLC:ADCcol:DEC|
00001a90  26 38 30 3a 42 4e 45 63  6f 6c 63 68 3a 2e 62 6c  |&80:BNEcolch:.bl|
00001aa0  61 6e 63 68 20 53 54 41  26 38 30 3a 4c 44 41 28  |anch STA&80:LDA(|
00001ab0  26 37 30 29 2c 59 3a 80  23 26 43 30 3a 84 41 26  |&70),Y:.#&C0:.A&|
00001ac0  38 30 3a 53 54 41 28 26  37 30 29 2c 59 3a 54 59  |80:STA(&70),Y:TY|
00001ad0  41 3a 43 4c 43 3a 41 44  43 23 38 3a 54 41 59 3a  |A:CLC:ADC#8:TAY:|
00001ae0  43 4d 50 23 26 32 30 3a  42 43 53 6e 65 77 6c 69  |CMP#&20:BCSnewli|
00001af0  6e 0d 03 2a 4d 50 4c 41  3a 41 53 4c 20 41 3a 41  |n..*MPLA:ASL A:A|
00001b00  53 4c 20 41 3a 4a 4d 50  6c 69 6e 65 6c 6f 70 3a  |SL A:JMPlinelop:|
00001b10  2e 6e 65 77 6c 69 6e 20  80 23 37 3a 54 41 59 3a  |.newlin .#7:TAY:|
00001b20  50 4c 41 3a 49 4e 59 3a  49 4e 58 3a 43 50 59 23  |PLA:INY:INX:CPY#|
00001b30  38 3a 42 4e 45 73 6c 69  6e 65 3a 52 54 53 0d 03  |8:BNEsline:RTS..|
00001b40  34 05 3a 0d 03 3e 80 2e  73 74 72 69 6e 67 20 4c  |4.:..>..string L|
00001b50  44 59 23 30 3a 4c 44 41  28 26 37 32 29 2c 59 3a  |DY#0:LDA(&72),Y:|
00001b60  43 4d 50 23 26 46 46 3a  42 45 51 73 74 72 65 6e  |CMP#&FF:BEQstren|
00001b70  64 3a 4a 53 52 70 75 74  63 68 3a 49 4e 43 78 63  |d:JSRputch:INCxc|
00001b80  68 3a 4c 44 41 26 37 32  3a 43 4c 43 3a 41 44 43  |h:LDA&72:CLC:ADC|
00001b90  23 31 3a 53 54 41 26 37  32 3a 4c 44 41 26 37 33  |#1:STA&72:LDA&73|
00001ba0  3a 41 44 43 23 30 3a 53  54 41 26 37 33 3a 4a 4d  |:ADC#0:STA&73:JM|
00001bb0  50 73 74 72 69 6e 67 3a  2e 73 74 72 65 6e 64 20  |Pstring:.strend |
00001bc0  52 54 53 0d 03 48 05 3a  0d 03 52 7c 2e 71 75 69  |RTS..H.:..R|.qui|
00001bd0  74 63 68 20 4c 44 41 23  26 38 31 3a 4c 44 58 23  |tch LDA#&81:LDX#|
00001be0  26 38 46 3a 4c 44 59 23  26 46 46 3a 4a 53 52 6f  |&8F:LDY#&FF:JSRo|
00001bf0  73 62 79 74 65 3a 42 43  53 71 75 69 74 6f 6b 3a  |sbyte:BCSquitok:|
00001c00  52 54 53 3a 2e 71 75 69  74 6f 6b 20 50 4c 41 3a  |RTS:.quitok PLA:|
00001c10  50 4c 41 3a 4c 44 41 23  26 38 31 3a 4c 44 58 23  |PLA:LDA#&81:LDX#|
00001c20  26 46 46 3a 4c 44 59 23  26 46 46 3a 4a 53 52 6f  |&FF:LDY#&FF:JSRo|
00001c30  73 62 79 74 65 3a 42 43  43 7a 61 70 3a 4a 4d 50  |sbyte:BCCzap:JMP|
00001c40  70 72 6f 67 0d 03 5c 6d  2e 7a 61 70 20 4c 44 41  |prog..\m.zap LDA|
00001c50  78 6f 6c 64 3a 53 54 41  78 70 6f 73 3a 4c 44 41  |xold:STAxpos:LDA|
00001c60  79 6f 6c 64 3a 53 54 41  79 70 6f 73 3a 4c 44 41  |yold:STAypos:LDA|
00001c70  73 6f 75 6e 64 3a 42 45  51 6e 6f 7a 61 70 73 3a  |sound:BEQnozaps:|
00001c80  4c 44 41 23 37 3a 4c 44  58 23 28 7a 61 70 6e 20  |LDA#7:LDX#(zapn |
00001c90  83 20 32 35 36 29 3a 4c  44 59 23 28 7a 61 70 6e  |. 256):LDY#(zapn|
00001ca0  20 81 20 32 35 36 29 3a  4a 53 52 6f 73 77 6f 72  | . 256):JSRoswor|
00001cb0  64 0d 03 66 48 4c 44 41  23 31 3a 53 54 41 70 6f  |d..fHLDA#1:STApo|
00001cc0  77 63 68 61 6e 67 65 3a  4c 44 41 70 6f 77 65 72  |wchange:LDApower|
00001cd0  3a 53 45 43 3a 53 42 43  23 26 34 30 3a 53 54 41  |:SEC:SBC#&40:STA|
00001ce0  70 6f 77 65 72 3a 42 45  51 79 6f 75 64 69 65 3a  |power:BEQyoudie:|
00001cf0  42 43 43 79 6f 75 64 69  65 0d 03 70 15 2e 6e 6f  |BCCyoudie..p..no|
00001d00  7a 61 70 73 20 4a 4d 50  6e 65 77 73 63 72 0d 03  |zaps JMPnewscr..|
00001d10  7a 1f 2e 79 6f 75 64 69  65 20 4a 53 52 67 61 6d  |z..youdie JSRgam|
00001d20  65 6f 76 65 72 3a 4a 4d  50 70 72 6f 67 0d 03 84  |eover:JMPprog...|
00001d30  7f 2e 67 61 6d 65 6f 76  65 72 20 4c 44 41 23 35  |..gameover LDA#5|
00001d40  3a 53 54 41 78 63 68 3a  4c 44 41 23 31 36 3a 53  |:STAxch:LDA#16:S|
00001d50  54 41 79 63 68 3a 4c 44  41 23 31 3a 53 54 41 63  |TAych:LDA#1:STAc|
00001d60  6f 6c 3a 4c 44 41 23 28  67 61 6d 64 65 61 64 20  |ol:LDA#(gamdead |
00001d70  83 20 32 35 36 29 3a 53  54 41 26 37 32 3a 4c 44  |. 256):STA&72:LD|
00001d80  41 23 28 67 61 6d 64 65  61 64 20 81 20 32 35 36  |A#(gamdead . 256|
00001d90  29 3a 53 54 41 26 37 33  3a 4a 53 52 73 74 72 69  |):STA&73:JSRstri|
00001da0  6e 67 3a 4c 44 41 23 30  3a 50 48 41 0d 03 8e c8  |ng:LDA#0:PHA....|
00001db0  2e 62 65 6c 6c 6f 70 20  4c 44 41 23 31 3a 4c 44  |.bellop LDA#1:LD|
00001dc0  58 23 26 37 30 3a 4c 44  59 23 30 3a 4a 53 52 6f  |X#&70:LDY#0:JSRo|
00001dd0  73 77 6f 72 64 3a 4c 44  41 26 37 30 3a 43 4c 43  |sword:LDA&70:CLC|
00001de0  3a 41 44 43 23 31 30 30  3a 53 54 41 26 38 30 3a  |:ADC#100:STA&80:|
00001df0  2e 62 65 6c 77 61 69 74  20 4c 44 41 23 31 3a 4c  |.belwait LDA#1:L|
00001e00  44 58 23 26 37 30 3a 4c  44 59 23 30 3a 4a 53 52  |DX#&70:LDY#0:JSR|
00001e10  6f 73 77 6f 72 64 3a 4c  44 41 26 37 30 3a 43 4d  |osword:LDA&70:CM|
00001e20  50 26 38 30 3a 42 4e 45  62 65 6c 77 61 69 74 3a  |P&80:BNEbelwait:|
00001e30  4c 44 41 73 6f 75 6e 64  3a 42 45 51 6e 6f 62 65  |LDAsound:BEQnobe|
00001e40  6c 6c 3a 4c 44 41 23 37  3a 4c 44 58 23 28 6f 76  |ll:LDA#7:LDX#(ov|
00001e50  65 72 20 83 20 32 35 36  29 3a 4c 44 59 23 28 6f  |er . 256):LDY#(o|
00001e60  76 65 72 20 81 20 32 35  36 29 3a 4a 53 52 6f 73  |ver . 256):JSRos|
00001e70  77 6f 72 64 0d 03 98 35  2e 6e 6f 62 65 6c 6c 20  |word...5.nobell |
00001e80  50 4c 41 3a 43 4c 43 3a  41 44 43 23 31 3a 50 48  |PLA:CLC:ADC#1:PH|
00001e90  41 3a 43 4d 50 23 34 3a  42 4e 45 62 65 6c 6c 6f  |A:CMP#4:BNEbello|
00001ea0  70 3a 50 4c 41 3a 52 54  53 0d 03 a2 4e 2e 67 61  |p:PLA:RTS...N.ga|
00001eb0  6d 64 65 61 64 20 45 51  55 42 37 3a 45 51 55 42  |mdead EQUB7:EQUB|
00001ec0  31 3a 45 51 55 42 31 32  3a 45 51 55 42 35 3a 45  |1:EQUB12:EQUB5:E|
00001ed0  51 55 42 30 3a 45 51 55  42 32 32 3a 45 51 55 42  |QUB0:EQUB22:EQUB|
00001ee0  31 39 3a 45 51 55 42 35  3a 45 51 55 42 31 35 3a  |19:EQUB5:EQUB15:|
00001ef0  45 51 55 42 32 35 35 0d  03 ac 23 2e 6f 76 65 72  |EQUB255...#.over|
00001f00  20 45 51 55 57 31 3a 45  51 55 57 2d 31 35 3a 45  | EQUW1:EQUW-15:E|
00001f10  51 55 57 30 3a 45 51 55  57 35 0d 03 b6 05 3a 0d  |QUW0:EQUW5....:.|
00001f20  03 c0 9b 2e 73 62 6f 61  72 64 20 4c 44 41 70 6f  |....sboard LDApo|
00001f30  77 63 68 61 6e 67 65 3a  42 45 51 6e 6f 70 6f 77  |wchange:BEQnopow|
00001f40  65 72 3a 4c 44 58 23 30  3a 2e 70 6f 77 6c 6f 70  |er:LDX#0:.powlop|
00001f50  20 4c 44 41 26 37 43 37  30 2c 58 3a 80 23 26 43  | LDA&7C70,X:.#&C|
00001f60  30 3a 84 41 23 34 3a 53  54 41 26 37 43 37 30 2c  |0:.A#4:STA&7C70,|
00001f70  58 3a 49 4e 58 3a 43 50  58 70 6f 77 65 72 3a 42  |X:INX:CPXpower:B|
00001f80  4e 45 70 6f 77 6c 6f 70  3a 2e 70 6f 77 6e 6f 6c  |NEpowlop:.pownol|
00001f90  20 4c 44 41 26 37 43 37  30 2c 58 3a 80 23 26 43  | LDA&7C70,X:.#&C|
00001fa0  30 3a 53 54 41 26 37 43  37 30 2c 58 3a 49 4e 58  |0:STA&7C70,X:INX|
00001fb0  3a 42 4e 45 70 6f 77 6e  6f 6c 0d 03 ca 10 2e 6e  |:BNEpownol.....n|
00001fc0  6f 70 6f 77 65 72 20 52  54 53 0d 03 d4 05 3a 0d  |opower RTS....:.|
00001fd0  03 de db 2e 74 69 74 6c  65 20 4a 53 52 62 6c 61  |....title JSRbla|
00001fe0  73 63 72 3a 4c 44 41 23  26 31 35 3a 53 54 41 63  |scr:LDA#&15:STAc|
00001ff0  6f 6c 3a 4c 44 41 23 34  3a 53 54 41 78 63 68 3a  |ol:LDA#4:STAxch:|
00002000  4c 44 41 23 35 3a 53 54  41 79 63 68 3a 4c 44 41  |LDA#5:STAych:LDA|
00002010  23 28 6e 61 6d 65 20 83  20 32 35 36 29 3a 53 54  |#(name . 256):ST|
00002020  41 26 37 32 3a 4c 44 41  23 28 6e 61 6d 65 20 81  |A&72:LDA#(name .|
00002030  20 32 35 36 29 3a 53 54  41 26 37 33 3a 4a 53 52  | 256):STA&73:JSR|
00002040  73 74 72 69 6e 67 3a 4c  44 41 23 31 3a 53 54 41  |string:LDA#1:STA|
00002050  63 6f 6c 3a 4c 44 41 23  33 3a 53 54 41 78 63 68  |col:LDA#3:STAxch|
00002060  3a 4c 44 41 23 31 36 3a  53 54 41 79 63 68 3a 4c  |:LDA#16:STAych:L|
00002070  44 41 23 28 63 72 65 64  61 20 83 20 32 35 36 29  |DA#(creda . 256)|
00002080  3a 53 54 41 26 37 32 3a  4c 44 41 23 28 63 72 65  |:STA&72:LDA#(cre|
00002090  64 61 20 81 20 32 35 36  29 3a 53 54 41 26 37 33  |da . 256):STA&73|
000020a0  3a 4a 53 52 73 74 72 69  6e 67 0d 03 e8 b1 4c 44  |:JSRstring....LD|
000020b0  41 23 34 3a 53 54 41 78  63 68 3a 4c 44 41 23 31  |A#4:STAxch:LDA#1|
000020c0  38 3a 53 54 41 79 63 68  3a 4c 44 41 23 28 63 72  |8:STAych:LDA#(cr|
000020d0  65 64 62 20 83 20 32 35  36 29 3a 53 54 41 26 37  |edb . 256):STA&7|
000020e0  32 3a 4c 44 41 23 28 63  72 65 64 62 20 81 20 32  |2:LDA#(credb . 2|
000020f0  35 36 29 3a 53 54 41 26  37 33 3a 4a 53 52 73 74  |56):STA&73:JSRst|
00002100  72 69 6e 67 3a 4c 44 41  23 34 3a 53 54 41 78 63  |ring:LDA#4:STAxc|
00002110  68 3a 4c 44 41 23 32 30  3a 53 54 41 79 63 68 3a  |h:LDA#20:STAych:|
00002120  4c 44 41 23 28 63 72 65  64 63 20 83 20 32 35 36  |LDA#(credc . 256|
00002130  29 3a 53 54 41 26 37 32  3a 4c 44 41 23 28 63 72  |):STA&72:LDA#(cr|
00002140  65 64 63 20 81 20 32 35  36 29 3a 53 54 41 26 37  |edc . 256):STA&7|
00002150  33 3a 4a 53 52 73 74 72  69 6e 67 0d 03 f2 b1 4c  |3:JSRstring....L|
00002160  44 41 23 38 3a 53 54 41  78 63 68 3a 4c 44 41 23  |DA#8:STAxch:LDA#|
00002170  32 32 3a 53 54 41 79 63  68 3a 4c 44 41 23 28 63  |22:STAych:LDA#(c|
00002180  72 65 64 64 20 83 20 32  35 36 29 3a 53 54 41 26  |redd . 256):STA&|
00002190  37 32 3a 4c 44 41 23 28  63 72 65 64 64 20 81 20  |72:LDA#(credd . |
000021a0  32 35 36 29 3a 53 54 41  26 37 33 3a 4a 53 52 73  |256):STA&73:JSRs|
000021b0  74 72 69 6e 67 3a 4c 44  41 23 30 3a 53 54 41 78  |tring:LDA#0:STAx|
000021c0  63 68 3a 4c 44 41 23 33  30 3a 53 54 41 79 63 68  |ch:LDA#30:STAych|
000021d0  3a 4c 44 41 23 28 73 70  61 63 65 20 83 20 32 35  |:LDA#(space . 25|
000021e0  36 29 3a 53 54 41 26 37  32 3a 4c 44 41 23 28 73  |6):STA&72:LDA#(s|
000021f0  70 61 63 65 20 81 20 32  35 36 29 3a 53 54 41 26  |pace . 256):STA&|
00002200  37 33 3a 4a 53 52 73 74  72 69 6e 67 0d 03 fc af  |73:JSRstring....|
00002210  2e 73 6f 75 6e 64 70 72  20 4c 44 41 23 36 3a 53  |.soundpr LDA#6:S|
00002220  54 41 78 63 68 3a 4c 44  41 23 32 36 3a 53 54 41  |TAxch:LDA#26:STA|
00002230  79 63 68 3a 4c 44 41 23  34 3a 53 54 41 63 6f 6c  |ych:LDA#4:STAcol|
00002240  3a 4c 44 41 23 28 73 6e  64 6f 66 66 20 83 20 32  |:LDA#(sndoff . 2|
00002250  35 36 29 3a 53 54 41 26  37 32 3a 4c 44 41 23 28  |56):STA&72:LDA#(|
00002260  73 6e 64 6f 66 66 20 81  20 32 35 36 29 3a 53 54  |sndoff . 256):ST|
00002270  41 26 37 33 3a 4c 44 41  73 6f 75 6e 64 3a 42 45  |A&73:LDAsound:BE|
00002280  51 73 6f 75 6e 64 73 65  74 3a 4c 44 41 23 28 73  |Qsoundset:LDA#(s|
00002290  6e 64 6f 6e 20 83 20 32  35 36 29 3a 53 54 41 26  |ndon . 256):STA&|
000022a0  37 32 3a 4c 44 41 23 28  73 6e 64 6f 6e 20 81 20  |72:LDA#(sndon . |
000022b0  32 35 36 29 3a 53 54 41  26 37 33 0d 04 06 49 2e  |256):STA&73...I.|
000022c0  73 6f 75 6e 64 73 65 74  20 4a 53 52 73 74 72 69  |soundset JSRstri|
000022d0  6e 67 3a 2e 73 73 74 6f  70 20 4c 44 41 23 26 38  |ng:.sstop LDA#&8|
000022e0  31 3a 4c 44 58 23 26 41  45 3a 4c 44 59 23 26 46  |1:LDX#&AE:LDY#&F|
000022f0  46 3a 4a 53 52 6f 73 62  79 74 65 3a 42 43 53 73  |F:JSRosbyte:BCSs|
00002300  73 74 6f 70 0d 04 10 69  2e 73 70 61 63 77 61 69  |stop...i.spacwai|
00002310  74 20 4c 44 41 23 26 38  31 3a 4c 44 58 23 26 41  |t LDA#&81:LDX#&A|
00002320  45 3a 4c 44 59 23 26 46  46 3a 4a 53 52 6f 73 62  |E:LDY#&FF:JSRosb|
00002330  79 74 65 3a 42 43 53 73  65 6f 72 3a 4c 44 41 23  |yte:BCSseor:LDA#|
00002340  26 38 31 3a 4c 44 58 23  26 39 44 3a 4c 44 59 23  |&81:LDX#&9D:LDY#|
00002350  26 46 46 3a 4a 53 52 6f  73 62 79 74 65 3a 42 43  |&FF:JSRosbyte:BC|
00002360  43 73 70 61 63 77 61 69  74 3a 52 54 53 0d 04 1a  |Cspacwait:RTS...|
00002370  2a 2e 73 65 6f 72 20 4c  44 41 73 6f 75 6e 64 3a  |*.seor LDAsound:|
00002380  82 23 31 3a 53 54 41 73  6f 75 6e 64 3a 4a 4d 50  |.#1:STAsound:JMP|
00002390  73 6f 75 6e 64 70 72 0d  04 24 6d 2e 63 72 65 64  |soundpr..$m.cred|
000023a0  61 20 45 51 55 42 31 34  3a 45 51 55 42 31 35 3a  |a EQUB14:EQUB15:|
000023b0  45 51 55 42 32 32 3a 45  51 55 42 37 3a 45 51 55  |EQUB22:EQUB7:EQU|
000023c0  42 31 35 3a 45 51 55 42  31 3a 45 51 55 42 31 32  |B15:EQUB1:EQUB12|
000023d0  3a 45 51 55 42 31 32 3a  45 51 55 42 35 3a 45 51  |:EQUB12:EQUB5:EQ|
000023e0  55 42 34 3a 45 51 55 42  30 3a 45 51 55 42 31 3a  |UB4:EQUB0:EQUB1:|
000023f0  45 51 55 42 31 33 3a 45  51 55 42 34 3a 45 51 55  |EQUB13:EQUB4:EQU|
00002400  42 32 35 35 0d 04 2e 58  2e 63 72 65 64 62 20 45  |B255...X.credb E|
00002410  51 55 42 34 3a 45 51 55  42 35 3a 45 51 55 42 31  |QUB4:EQUB5:EQUB1|
00002420  36 3a 45 51 55 42 32 33  3a 45 51 55 42 37 3a 45  |6:EQUB23:EQUB7:E|
00002430  51 55 42 31 33 3a 45 51  55 42 35 3a 45 51 55 42  |QUB13:EQUB5:EQUB|
00002440  34 3a 45 51 55 42 30 3a  45 51 55 42 32 3a 45 51  |4:EQUB0:EQUB2:EQ|
00002450  55 42 32 31 3a 45 51 55  42 32 35 35 0d 04 38 61  |UB21:EQUB255..8a|
00002460  2e 63 72 65 64 63 20 45  51 55 42 34 3a 45 51 55  |.credc EQUB4:EQU|
00002470  42 32 32 3a 45 51 55 42  31 32 3a 45 51 55 42 32  |B22:EQUB12:EQUB2|
00002480  33 3a 45 51 55 42 31 33  3a 45 51 55 42 32 33 3a  |3:EQUB13:EQUB23:|
00002490  45 51 55 42 33 3a 45 51  55 42 30 3a 45 51 55 42  |EQUB3:EQUB0:EQUB|
000024a0  36 3a 45 51 55 42 32 32  3a 45 51 55 42 31 35 3a  |6:EQUB22:EQUB15:|
000024b0  45 51 55 42 34 3a 45 51  55 42 32 35 35 0d 04 42  |EQUB4:EQUB255..B|
000024c0  2e 2e 63 72 65 64 64 20  45 51 55 42 32 33 3a 45  |..credd EQUB23:E|
000024d0  51 55 42 33 31 3a 45 51  55 42 33 31 3a 45 51 55  |QUB31:EQUB31:EQU|
000024e0  42 32 38 3a 45 51 55 42  32 35 35 0d 04 4c 96 2e  |B28:EQUB255..L..|
000024f0  73 70 61 63 65 20 45 51  55 42 31 34 3a 45 51 55  |space EQUB14:EQU|
00002500  42 31 35 3a 45 51 55 42  35 3a 45 51 55 42 31 36  |B15:EQUB5:EQUB16|
00002510  3a 45 51 55 42 31 36 3a  45 51 55 42 30 3a 45 51  |:EQUB16:EQUB0:EQ|
00002520  55 42 31 36 3a 45 51 55  42 31 34 3a 45 51 55 42  |UB16:EQUB14:EQUB|
00002530  31 3a 45 51 55 42 33 3a  45 51 55 42 35 3a 45 51  |1:EQUB3:EQUB5:EQ|
00002540  55 42 30 3a 45 51 55 42  31 37 3a 45 51 55 42 32  |UB0:EQUB17:EQUB2|
00002550  32 3a 45 51 55 42 30 3a  45 51 55 42 31 36 3a 45  |2:EQUB0:EQUB16:E|
00002560  51 55 42 31 37 3a 45 51  55 42 31 3a 45 51 55 42  |QUB17:EQUB1:EQUB|
00002570  31 35 3a 45 51 55 42 31  37 3a 45 51 55 42 32 35  |15:EQUB17:EQUB25|
00002580  35 0d 04 56 5f 2e 6e 61  6d 65 20 45 51 55 42 31  |5..V_.name EQUB1|
00002590  36 3a 45 51 55 42 38 3a  45 51 55 42 32 33 3a 45  |6:EQUB8:EQUB23:E|
000025a0  51 55 42 31 34 3a 45 51  55 42 30 3a 45 51 55 42  |QUB14:EQUB0:EQUB|
000025b0  32 30 3a 45 51 55 42 31  35 3a 45 51 55 42 35 3a  |20:EQUB15:EQUB5:|
000025c0  45 51 55 42 33 3a 45 51  55 42 31 30 3a 45 51 55  |EQUB3:EQUB10:EQU|
000025d0  42 35 3a 45 51 55 42 34  3a 45 51 55 42 32 35 35  |B5:EQUB4:EQUB255|
000025e0  0d 04 60 4e 2e 73 6e 64  6f 6e 20 45 51 55 42 31  |..`N.sndon EQUB1|
000025f0  36 3a 45 51 55 42 32 32  3a 45 51 55 42 31 38 3a  |6:EQUB22:EQUB18:|
00002600  45 51 55 42 31 33 3a 45  51 55 42 34 3a 45 51 55  |EQUB13:EQUB4:EQU|
00002610  42 30 3a 45 51 55 42 32  32 3a 45 51 55 42 31 33  |B0:EQUB22:EQUB13|
00002620  3a 45 51 55 42 30 3a 45  51 55 42 32 35 35 0d 04  |:EQUB0:EQUB255..|
00002630  6a 54 2e 73 6e 64 6f 66  66 20 45 51 55 42 31 36  |jT.sndoff EQUB16|
00002640  3a 45 51 55 42 32 32 3a  45 51 55 42 31 38 3a 45  |:EQUB22:EQUB18:E|
00002650  51 55 42 31 33 3a 45 51  55 42 34 3a 45 51 55 42  |QUB13:EQUB4:EQUB|
00002660  30 3a 45 51 55 42 32 32  3a 45 51 55 42 36 3a 45  |0:EQUB22:EQUB6:E|
00002670  51 55 42 36 3a 45 51 55  42 30 3a 45 51 55 42 32  |QUB6:EQUB0:EQUB2|
00002680  35 35 0d 04 74 05 3a 0d  04 7e c9 2e 73 62 61 72  |55..t.:..~..sbar|
00002690  20 45 51 55 42 31 38 3a  45 51 55 42 31 3a 45 51  | EQUB18:EQUB1:EQ|
000026a0  55 42 34 3a 45 51 55 42  32 35 3a 45 51 55 42 34  |UB4:EQUB25:EQUB4|
000026b0  3a 45 51 55 57 30 3a 45  51 55 57 32 35 32 3a 45  |:EQUW0:EQUW252:E|
000026c0  51 55 42 32 35 3a 45 51  55 42 34 3a 45 51 55 57  |QUB25:EQUB4:EQUW|
000026d0  35 37 36 3a 45 51 55 57  32 35 32 3a 45 51 55 42  |576:EQUW252:EQUB|
000026e0  32 35 3a 45 51 55 42 38  35 3a 45 51 55 57 32 38  |25:EQUB85:EQUW28|
000026f0  38 3a 45 51 55 57 39 36  3a 45 51 55 42 32 35 3a  |8:EQUW96:EQUB25:|
00002700  45 51 55 42 34 3a 45 51  55 57 37 30 34 3a 45 51  |EQUB4:EQUW704:EQ|
00002710  55 57 32 35 32 3a 45 51  55 42 32 35 3a 45 51 55  |UW252:EQUB25:EQU|
00002720  42 34 3a 45 51 55 57 31  32 38 30 3a 45 51 55 57  |B4:EQUW1280:EQUW|
00002730  32 35 32 3a 45 51 55 42  32 35 3a 45 51 55 42 38  |252:EQUB25:EQUB8|
00002740  35 3a 45 51 55 57 39 39  32 3a 45 51 55 57 39 36  |5:EQUW992:EQUW96|
00002750  0d 04 88 59 45 51 55 42  32 35 3a 45 51 55 42 34  |...YEQUB25:EQUB4|
00002760  3a 45 51 55 57 33 38 34  3a 45 51 55 57 39 36 3a  |:EQUW384:EQUW96:|
00002770  45 51 55 42 32 35 3a 45  51 55 42 34 3a 45 51 55  |EQUB25:EQUB4:EQU|
00002780  57 38 39 36 3a 45 51 55  57 39 36 3a 45 51 55 42  |W896:EQUW96:EQUB|
00002790  32 35 3a 45 51 55 42 38  35 3a 45 51 55 57 36 34  |25:EQUB85:EQUW64|
000027a0  30 3a 45 51 55 57 32 35  32 0d 04 92 c6 45 51 55  |0:EQUW252....EQU|
000027b0  42 31 38 3a 45 51 55 42  33 3a 45 51 55 42 34 3a  |B18:EQUB3:EQUB4:|
000027c0  45 51 55 42 32 35 3a 45  51 55 42 34 3a 45 51 55  |EQUB25:EQUB4:EQU|
000027d0  57 39 36 3a 45 51 55 57  32 32 34 3a 45 51 55 42  |W96:EQUW224:EQUB|
000027e0  32 35 3a 45 51 55 42 34  3a 45 51 55 57 34 38 30  |25:EQUB4:EQUW480|
000027f0  3a 45 51 55 57 32 32 34  3a 45 51 55 42 32 35 3a  |:EQUW224:EQUB25:|
00002800  45 51 55 42 38 35 3a 45  51 55 57 32 38 38 3a 45  |EQUB85:EQUW288:E|
00002810  51 55 57 31 32 38 3a 45  51 55 42 32 35 3a 45 51  |QUW128:EQUB25:EQ|
00002820  55 42 34 3a 45 51 55 57  38 30 30 3a 45 51 55 57  |UB4:EQUW800:EQUW|
00002830  32 32 34 3a 45 51 55 42  32 35 3a 45 51 55 42 34  |224:EQUB25:EQUB4|
00002840  3a 45 51 55 57 31 31 38  34 3a 45 51 55 57 32 32  |:EQUW1184:EQUW22|
00002850  34 3a 45 51 55 42 32 35  3a 45 51 55 42 38 35 3a  |4:EQUB25:EQUB85:|
00002860  45 51 55 57 39 39 32 3a  45 51 55 57 31 32 38 0d  |EQUW992:EQUW128.|
00002870  04 9c 86 45 51 55 42 31  38 3a 45 51 55 42 31 3a  |...EQUB18:EQUB1:|
00002880  45 51 55 42 31 3a 45 51  55 42 32 35 3a 45 51 55  |EQUB1:EQUB25:EQU|
00002890  42 34 3a 45 51 55 57 31  32 38 3a 45 51 55 57 39  |B4:EQUW128:EQUW9|
000028a0  32 3a 45 51 55 42 32 35  3a 45 51 55 42 34 3a 45  |2:EQUB25:EQUB4:E|
000028b0  51 55 57 34 34 38 3a 45  51 55 57 39 32 3a 45 51  |QUW448:EQUW92:EQ|
000028c0  55 42 32 35 3a 45 51 55  42 38 35 3a 45 51 55 57  |UB25:EQUB85:EQUW|
000028d0  31 32 38 3a 45 51 55 57  30 3a 45 51 55 42 32 35  |128:EQUW0:EQUB25|
000028e0  3a 45 51 55 42 38 35 3a  45 51 55 57 34 34 38 3a  |:EQUB85:EQUW448:|
000028f0  45 51 55 57 30 0d 04 a6  75 45 51 55 42 32 35 3a  |EQUW0...uEQUB25:|
00002900  45 51 55 42 34 3a 45 51  55 57 37 30 34 3a 45 51  |EQUB4:EQUW704:EQ|
00002910  55 57 39 32 3a 45 51 55  42 32 35 3a 45 51 55 42  |UW92:EQUB25:EQUB|
00002920  34 3a 45 51 55 57 31 32  38 30 3a 45 51 55 57 39  |4:EQUW1280:EQUW9|
00002930  32 3a 45 51 55 42 32 35  3a 45 51 55 42 38 35 3a  |2:EQUB25:EQUB85:|
00002940  45 51 55 57 37 30 34 3a  45 51 55 57 30 3a 45 51  |EQUW704:EQUW0:EQ|
00002950  55 42 32 35 3a 45 51 55  42 38 35 3a 45 51 55 57  |UB25:EQUB85:EQUW|
00002960  31 32 38 30 3a 45 51 55  57 30 0d 04 b0 0b 45 51  |1280:EQUW0....EQ|
00002970  55 42 26 46 46 0d 04 ba  8e 2e 73 63 6f 72 74 20  |UB&FF.....scort |
00002980  45 51 55 42 31 36 3a 45  51 55 42 33 3a 45 51 55  |EQUB16:EQUB3:EQU|
00002990  42 32 32 3a 45 51 55 42  31 35 3a 45 51 55 42 35  |B22:EQUB15:EQUB5|
000029a0  3a 45 51 55 42 32 35 35  3a 2e 70 6f 77 74 20 45  |:EQUB255:.powt E|
000029b0  51 55 42 31 34 3a 45 51  55 42 32 32 3a 45 51 55  |QUB14:EQUB22:EQU|
000029c0  42 32 30 3a 45 51 55 42  35 3a 45 51 55 42 31 35  |B20:EQUB5:EQUB15|
000029d0  3a 45 51 55 42 32 35 35  3a 2e 6f 62 73 74 78 74  |:EQUB255:.obstxt|
000029e0  20 45 51 55 42 31 30 3a  45 51 55 42 35 3a 45 51  | EQUB10:EQUB5:EQ|
000029f0  55 42 32 31 3a 45 51 55  42 31 36 3a 45 51 55 42  |UB21:EQUB16:EQUB|
00002a00  32 35 35 0d 04 c4 05 3a  0d 04 ce 23 2e 6a 75 6d  |255....:...#.jum|
00002a10  70 6e 20 45 51 55 57 31  3a 45 51 55 57 31 3a 45  |pn EQUW1:EQUW1:E|
00002a20  51 55 57 35 32 3a 45 51  55 57 35 0d 04 d8 23 2e  |QUW52:EQUW5...#.|
00002a30  7a 61 70 6e 20 45 51 55  57 31 3a 45 51 55 57 32  |zapn EQUW1:EQUW2|
00002a40  3a 45 51 55 57 35 32 3a  45 51 55 57 31 30 0d 04  |:EQUW52:EQUW10..|
00002a50  e2 05 3a 0d 04 ec 1f 2e  73 65 71 75 65 6e 20 45  |..:.....sequen E|
00002a60  51 55 42 30 3a 45 51 55  42 31 34 3a 45 51 55 42  |QUB0:EQUB14:EQUB|
00002a70  32 38 0d 04 f6 40 2e 6c  6f 77 61 64 20 45 51 55  |28...@.lowad EQU|
00002a80  42 30 3a 45 51 55 42 26  33 30 3a 45 51 55 42 26  |B0:EQUB&30:EQUB&|
00002a90  44 30 3a 45 51 55 42 26  42 30 3a 45 51 55 42 26  |D0:EQUB&B0:EQUB&|
00002aa0  35 30 3a 45 51 55 42 26  38 30 3a 45 51 55 42 26  |50:EQUB&80:EQUB&|
00002ab0  38 30 0d 05 00 39 2e 68  69 67 68 61 64 20 45 51  |80...9.highad EQ|
00002ac0  55 42 30 3a 45 51 55 42  30 3a 45 51 55 42 26 46  |UB0:EQUB0:EQUB&F|
00002ad0  46 3a 45 51 55 42 32 3a  45 51 55 42 32 3a 45 51  |F:EQUB2:EQUB2:EQ|
00002ae0  55 42 26 46 44 3a 45 51  55 42 32 0d 05 0a 05 3a  |UB&FD:EQUB2....:|
00002af0  0d 05 14 39 45 51 55 42  30 3a 45 51 55 42 26 32  |...9EQUB0:EQUB&2|
00002b00  30 3a 45 51 55 42 26 45  30 3a 45 51 55 42 26 41  |0:EQUB&E0:EQUB&A|
00002b10  30 3a 45 51 55 42 26 36  30 3a 45 51 55 42 26 38  |0:EQUB&60:EQUB&8|
00002b20  30 3a 45 51 55 42 26 38  30 0d 05 1e 31 45 51 55  |0:EQUB&80...1EQU|
00002b30  42 30 3a 45 51 55 42 30  3a 45 51 55 42 26 46 46  |B0:EQUB0:EQUB&FF|
00002b40  3a 45 51 55 42 32 3a 45  51 55 42 32 3a 45 51 55  |:EQUB2:EQUB2:EQU|
00002b50  42 26 46 44 3a 45 51 55  42 32 0d 05 28 05 3a 0d  |B&FD:EQUB2..(.:.|
00002b60  05 32 35 45 51 55 42 30  3a 45 51 55 42 26 31 30  |.25EQUB0:EQUB&10|
00002b70  3a 45 51 55 42 26 46 30  3a 45 51 55 42 26 39 30  |:EQUB&F0:EQUB&90|
00002b80  3a 45 51 55 42 26 37 30  3a 45 51 55 42 30 3a 45  |:EQUB&70:EQUB0:E|
00002b90  51 55 42 30 0d 05 3c 2f  45 51 55 42 30 3a 45 51  |QUB0..</EQUB0:EQ|
00002ba0  55 42 30 3a 45 51 55 42  26 46 46 3a 45 51 55 42  |UB0:EQUB&FF:EQUB|
00002bb0  32 3a 45 51 55 42 32 3a  45 51 55 42 30 3a 45 51  |2:EQUB2:EQUB0:EQ|
00002bc0  55 42 30 0d 05 46 05 3a  0d 05 50 24 2e 78 63 68  |UB0..F.:..P$.xch|
00002bd0  20 45 51 55 42 30 3a 2e  79 63 68 20 45 51 55 42  | EQUB0:.ych EQUB|
00002be0  30 3a 2e 63 6f 6c 20 45  51 55 42 30 0d 05 5a 4c  |0:.col EQUB0..ZL|
00002bf0  2e 78 64 61 74 61 20 45  51 55 42 30 3a 45 51 55  |.xdata EQUB0:EQU|
00002c00  42 32 3a 45 51 55 42 35  3a 45 51 55 42 37 3a 45  |B2:EQUB5:EQUB7:E|
00002c10  51 55 42 31 30 3a 45 51  55 42 31 32 3a 45 51 55  |QUB10:EQUB12:EQU|
00002c20  42 31 35 3a 45 51 55 42  31 37 3a 45 51 55 42 32  |B15:EQUB17:EQUB2|
00002c30  30 3a 45 51 55 42 32 32  0d 05 64 2b 2e 68 62 64  |0:EQUB22..d+.hbd|
00002c40  61 74 20 45 51 55 42 34  3a 45 51 55 42 39 3a 45  |at EQUB4:EQUB9:E|
00002c50  51 55 42 31 34 3a 45 51  55 42 31 39 3a 45 51 55  |QUB14:EQUB19:EQU|
00002c60  42 32 34 0d 05 6e 4b 2e  78 73 65 74 20 45 51 55  |B24..nK.xset EQU|
00002c70  42 30 3a 2e 79 73 65 74  20 45 51 55 42 30 3a 2e  |B0:.yset EQUB0:.|
00002c80  78 73 63 72 20 45 51 55  42 30 3a 2e 79 73 63 72  |xscr EQUB0:.yscr|
00002c90  20 45 51 55 42 30 3a 2e  78 70 6f 73 20 45 51 55  | EQUB0:.xpos EQU|
00002ca0  42 30 3a 2e 79 70 6f 73  20 45 51 55 42 30 0d 05  |B0:.ypos EQUB0..|
00002cb0  78 4f 2e 73 63 72 6e 6f  20 45 51 55 42 30 3a 2e  |xO.scrno EQUB0:.|
00002cc0  75 70 76 65 6c 6f 20 45  51 55 42 30 3a 2e 78 6f  |upvelo EQUB0:.xo|
00002cd0  6c 64 20 45 51 55 42 30  3a 2e 79 6f 6c 64 20 45  |ld EQUB0:.yold E|
00002ce0  51 55 42 30 3a 2e 66 69  6e 65 20 45 51 55 42 30  |QUB0:.fine EQUB0|
00002cf0  3a 2e 73 6f 75 6e 64 20  45 51 55 42 31 0d 05 82  |:.sound EQUB1...|
00002d00  72 2e 66 61 63 65 20 45  51 55 42 31 3a 2e 70 68  |r.face EQUB1:.ph|
00002d10  61 73 65 20 45 51 55 42  30 3a 2e 72 67 68 74 73  |ase EQUB0:.rghts|
00002d20  20 45 51 55 42 30 3a 2e  77 69 70 65 72 20 45 51  | EQUB0:.wiper EQ|
00002d30  55 42 30 3a 2e 6d 6f 76  73 74 61 67 20 45 51 55  |UB0:.movstag EQU|
00002d40  42 30 3a 2e 63 68 61 6e  67 65 64 20 45 51 55 42  |B0:.changed EQUB|
00002d50  30 3a 2e 70 6f 77 65 72  20 45 51 55 42 30 3a 2e  |0:.power EQUB0:.|
00002d60  70 6f 77 63 68 61 6e 67  65 20 45 51 55 42 30 0d  |powchange EQUB0.|
00002d70  05 8c 07 5d 3a ed 0d 05  96 05 e1 0d ff           |...]:........|
00002d7d

Arcade/Game2.m0

Arcade/Game2.m1

Arcade/Game2.m2

Arcade/Game2.m4

Arcade/Game2.m5

Our privacy policy is here.
Last updated: 10 Jun 2024, 13:20 UTC
Website designed by .