Home » Personal collection » Acorn ADFS disks » Electron » Shipwrecked_2.ADF » Game2C
Game2C
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 » Electron » Shipwrecked_2.ADF |
Filename: | Game2C |
Read OK: | ✔ |
File size: | 14E5 bytes |
Load address: | FFFF0E00 |
Exec address: | FFFF8023 |
File contents
1000P%=&400:O%=&5400:[OPT pass 1010.credc EQUB4:EQUB22:EQUB12:EQUB23:EQUB13:EQUB23:EQUB3:EQUB0:EQUB6:EQUB22:EQUB15:EQUB4:EQUB255:.credd EQUB23:EQUB31:EQUB31:EQUB29:EQUB255 1020.space EQUB14:EQUB15:EQUB5:EQUB16:EQUB16:EQUB0:EQUB16:EQUB14:EQUB1:EQUB3:EQUB5:EQUB0:EQUB17:EQUB22:EQUB0:EQUB16:EQUB17:EQUB1:EQUB15:EQUB17:EQUB255 1030.string LDY#0:LDA(&72),Y:CMP#&FF:BEQvis:JSRputch:INCxch:LDA&72:CLC:ADC#1:STA&72:LDA&73:ADC#0:STA&73:JMPstring 1040.doorch PHA:CMP#30:BNEnodor:LDX#&C8:JSRkeybyte:BCCnodor:LDAgys:ASL A:ASL A:ASL A:ASL A:CLC:ADCgxs:ADC#&20:JSRadofcol:SEC:SBC#1:CMPobjects:BEQdoor:CMPobjects+1:BNEnodor:.door PLA:SEC:.vis RTS:.nodor PLA:CLC:RTS 1050.locktype LSR A:ROR A:ROR A:AND#&C0:STA&72:LDY#0 1060.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:JSRscrolw 1070.transbot LDA(&70),Y:AND#&C0:JSRcolbyt:STA(&70),Y:INY:CPY#&40:BNEtransbot:RTS:.colbyt PHA:LDAscrno:JSRadofcol:TAX:LDAdoorc,X:TAX:LDA(&72),Y:AND#&3F:STA&74:PLA:.colblop CLC:ADC&74:DEX:BNEcolblop:RTS 1080.adofcol STAreadcll+2:STAreadclh+2:.readcll LDA&10FE:LSR A:LSR A:LSR A:LSR A:AND#4:STAsmad+1 1090.readclh LDA&10FF:ASL A:ROL A:ROL A:AND#3:CLC:.smad ADC#0:RTS 1100.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 1110.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 1120LSR A:LSR A:LSR A:LSR A:STA&F20,X:.pumovo LDA&760,Y:CMP#&FF:BNEpuzbloc:.blopcb JMPcomplete:.puzn EQUW1:EQUW3:EQUW52:EQUW20 1130.puzbloc LDXxscr:STXxch:LDXyscr:STXych:AND#15:STAyscr:TYA:PHA: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+3:PLA:TAX:PLA:PHA:TAY 1131LDAxdata,Y:TAY 1140LDA&7A0,X:AND#3:LSR A:ROR A:ROR A:STAcol:LDA(&70),Y:AND#&3F:ORAcol 1150STA(&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 1160STA(&70),Y 1170JMPfirpuz:.secpuz LDA(&70),Y:AND#&BF:CLC:ADCcol:STA(&70),Y 1180.firpuz TXA:CLC:ADC#&40:TAY:CMP#&80:BCSendbloc:JMPblolop:.endbloc LDAxch:STAxscr:LDAych:STAyscr:PLA:TAY:JMPblopcb 1190.zerogr LDA#1:STAzerostat:JMPladder 1200.zeropro LDA#0:STAzerobyte:STAzerobyte+1:LDAzerostat:BEQendproz:LDXfine:LDAkey1,X:STAzerobyte:LDAkey2,X:STAzerobyte+1:LDA#0:STAzerostat:.endproz RTS 1210.scroff LDA#0:STAlastat:LDA#16:STAscrofd:.scrofflop LDA#&C:LDX#(scrofd MOD256):LDY#(scrofd DIV256):JSRosword:DECscrofd:LDAscrofd:BNEscrofflop:.noscrol RTS 1220.doscroll LDAcenx:STAxos:LDAceny:STAyos:LDAxpos:SEC:SBC#5:STAcenx:LDAypos:SEC:SBC#7:STAceny 1230LDXfine:BEQnoscrol:LDAscroll:PHA:CLC:ADCscra,X:STAscroll:LDAscroll+1:PHA:ADCscrb,X:JSRscrolw:STAscroll+1 1240LDAhorid,X:CMP#&80:BEQvertsc:JSRhoridisp:LDXfine:.vertsc LDAverti,X:CMP#&80:BEQenddosc:JSRvertdisp:.enddosc LDAmovstag:CMP#3:BEQposhi:PLA:STAscroll+1:PLA:STAscroll:JMPrecen:.poshi PLA:PLA:LDAscroll+1:JSRsheila 1250.recen LDAxos:STAcenx:LDAyos:STAceny:RTS 1260.horidisp STAyset:LDXmovstag:LDAhors,X:STAstopv:LDAhors-1,X:.horilop STAxset:PHA:JSRblockon:PLA:CLC:ADC#1:CMPstopv:BNEhorilop:RTS 1270.vertdisp STAxset:LDXmovstag:LDAvers,X:STAstopv:LDAvers-1,X:.vertlop STAyset:PHA:JSRblockon:PLA:CLC:ADC#1:CMPstopv:BNEvertlop 1280.horid RTS:EQUB&80:EQUB&80:EQUW0:EQUB15:EQUB0:EQUB15:.verti EQUB15:EQUB0:EQUB9:EQUB0:EQUB9:EQUB&80:EQUB&80:EQUB0:.scra EQUB9 1290EQUB&C0:EQUB&40:EQUB&C0:EQUB&40:EQUB0:EQUB0:EQUB&C0:.scrb EQUB&40:EQUB&4F:EQUB0:EQUB&4A:EQUB&4B:EQUB5:EQUB&4B:EQUB4:EQUB5 1295.calcbbc LSR A:STAbbcsh+1:LDAscroll:ROR A:STAbbcsh:LSRbbcsh+1:RORbbcsh:LSRbbcsh+1:RORbbcsh:RTS 1300]:IF P%>&700 THEN PRINT"Code Overflow to:";~P%:END 1310PRINTTAB(15,3)~P%; 1320P%=&100:O%=&6800:[OPT pass 1330.titscrs EQUB&34:EQUB&52:EQUB&42:EQUB&E2:EQUB&51:EQUB&93:EQUB&90:EQUB&E1 1340.monpd EQUB&02:EQUB&04:EQUB&06:EQUB&08 1350.jumpn EQUW1:EQUW1:EQUW52:EQUW5:.zapn EQUW1:EQUW2:EQUW52:EQUW10:.switn EQUW1:EQUW3:EQUW52:EQUW2 1360.scort EQUB16:EQUB3:EQUB22:EQUB15:EQUB5:EQUB255:.powt EQUB14:EQUB22:EQUB20:EQUB5:EQUB15:EQUB255:.obstxt EQUB22:EQUB2:EQUB9:EQUB16:EQUB255 1370.sequen EQUB0:EQUB18:EQUB36:.lowad EQUB0:EQUB&30:EQUB&D0:EQUB&B0:EQUB&50:EQUB&80:EQUB&80:EQUB&B0:EQUB&50:.highad EQUB0:EQUB0:EQUB&FF:EQUB2:EQUB2:EQUB&FD:EQUB2:EQUB&FD:EQUB&FD 1380EQUB0:EQUB&20:EQUB&E0:EQUB&A0:EQUB&60:EQUB&80:EQUB&80:EQUB&A0:EQUB&60:EQUB0:EQUB0:EQUB&FF:EQUB2:EQUB2:EQUB&FD:EQUB2:EQUB&FD:EQUB&FD 1390EQUB0:EQUB&10:EQUB&F0:EQUB&90:EQUB&70:EQUB0:EQUB0:EQUB&90:EQUB&70:EQUB0:EQUB0:EQUB&FF:EQUB2:EQUB2:EQUB0:EQUB0:EQUB&FD:EQUB&FD 1400.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 1410.creda EQUB14:EQUB15:EQUB22:EQUB7:EQUB15:EQUB1:EQUB12:EQUB12:EQUB5:EQUB4:EQUB0:EQUB1:EQUB13:EQUB4:EQUB255 1420.credb EQUB4:EQUB5:EQUB16:EQUB23:EQUB7:EQUB13:EQUB5:EQUB4:EQUB0:EQUB2:EQUB21:EQUB255 1430.sndon EQUB16:EQUB22:EQUB18:EQUB13:EQUB4:EQUB0:EQUB22:EQUB13:EQUB0:EQUB255 1440.sndoff EQUB16:EQUB22:EQUB18:EQUB13:EQUB4:EQUB0:EQUB22:EQUB6:EQUB6:EQUB255 1450.enrup EQUW1:EQUW1:EQUW52:EQUW20 1460]:ENDPROC
�P%=&400:O%=&5400:[OPT pass �.credc EQUB4:EQUB22:EQUB12:EQUB23:EQUB13:EQUB23:EQUB3:EQUB0:EQUB6:EQUB22:EQUB15:EQUB4:EQUB255:.credd EQUB23:EQUB31:EQUB31:EQUB29:EQUB255 ��.space EQUB14:EQUB15:EQUB5:EQUB16:EQUB16:EQUB0:EQUB16:EQUB14:EQUB1:EQUB3:EQUB5:EQUB0:EQUB17:EQUB22:EQUB0:EQUB16:EQUB17:EQUB1:EQUB15:EQUB17:EQUB255 q.string LDY#0:LDA(&72),Y:CMP#&FF:BEQvis:JSRputch:INCxch:LDA&72:CLC:ADC#1:STA&72:LDA&73:ADC#0:STA&73:JMPstring �.doorch PHA:CMP#30:BNEnodor:LDX#&C8:JSRkeybyte:BCCnodor:LDAgys:ASL A:ASL A:ASL A:ASL A:CLC:ADCgxs:ADC#&20:JSRadofcol:SEC:SBC#1:CMPobjects:BEQdoor:CMPobjects+1:BNEnodor:.door PLA:SEC:.vis RTS:.nodor PLA:CLC:RTS 2.locktype LSR A:ROR A:ROR A:�#&C0:STA&72:LDY#0 $�.transtop LDA(&70),Y:�#&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:JSRscrolw .�.transbot LDA(&70),Y:�#&C0:JSRcolbyt:STA(&70),Y:INY:CPY#&40:BNEtransbot:RTS:.colbyt PHA:LDAscrno:JSRadofcol:TAX:LDAdoorc,X:TAX:LDA(&72),Y:�#&3F:STA&74:PLA:.colblop CLC:ADC&74:DEX:BNEcolblop:RTS 8^.adofcol STAreadcll+2:STAreadclh+2:.readcll LDA&10FE:LSR A:LSR A:LSR A:LSR A:�#4:STAsmad+1 B?.readclh LDA&10FF:ASL A:ROL A:ROL A:�#3:CLC:.smad ADC#0:RTS L�.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 � 256):LDY#(puzn � 256):JSRosword V�.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:�#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 JMPcomplete:.puzn EQUW1:EQUW3:EQUW52:EQUW20 j�.puzbloc LDXxscr:STXxch:LDXyscr:STXych:�#15:STAyscr:TYA:PHA:LDA&760,Y:LSR A:LSR A:LSR A:LSR A:STAxscr:.blolop LDA&780,Y:�#15:STAyset:LDA&780,Y:LSR A:LSR A:LSR A:LSR A:STAxset:PHA:TYA:PHA:JSRgetblock+3:PLA:TAX:PLA:PHA:TAY kLDAxdata,Y:TAY tALDA&7A0,X:�#3:LSR A:ROR A:ROR A:STAcol:LDA(&70),Y:�#&3F:�Acol ~�STA(&70),Y:INY:LDA&7A0,X:�#12:ASL A:ASL A:ASL A:ASL A:STAcol:LDA(&70),Y:�#&3F:�Acol:STA(&70),Y:PLA:LSR A:TAY:LDAhbdat,Y:TAY:LDA&7A0,X:�#16:ASL A:ASL A:STAcol:LDAxset:�#1:BEQsecpuz:LDA(&70),Y:�#&7F:CLC:ADCcol:ADCcol �STA(&70),Y �<JMPfirpuz:.secpuz LDA(&70),Y:�#&BF:CLC:ADCcol:STA(&70),Y �u.firpuz TXA:CLC:ADC#&40:TAY:CMP#&80:BCSendbloc:JMPblolop:.endbloc LDAxch:STAxscr:LDAych:STAyscr:PLA:TAY:JMPblopcb �'.zerogr LDA#1:STAzerostat:JMPladder ��.zeropro LDA#0:STAzerobyte:STAzerobyte+1:LDAzerostat:BEQendproz:LDXfine:LDAkey1,X:STAzerobyte:LDAkey2,X:STAzerobyte+1:LDA#0:STAzerostat:.endproz RTS ��.scroff LDA#0:STAlastat:LDA#16:STAscrofd:.scrofflop LDA#&C:LDX#(scrofd �256):LDY#(scrofd �256):JSRosword:DECscrofd:LDAscrofd:BNEscrofflop:.noscrol RTS �_.doscroll LDAcenx:STAxos:LDAceny:STAyos:LDAxpos:SEC:SBC#5:STAcenx:LDAypos:SEC:SBC#7:STAceny �lLDXfine:BEQnoscrol:LDAscroll:PHA:CLC:ADCscra,X:STAscroll:LDAscroll+1:PHA:ADCscrb,X:JSRscrolw:STAscroll+1 ��LDAhorid,X:CMP#&80:BEQvertsc:JSRhoridisp:LDXfine:.vertsc LDAverti,X:CMP#&80:BEQenddosc:JSRvertdisp:.enddosc LDAmovstag:CMP#3:BEQposhi:PLA:STAscroll+1:PLA:STAscroll:JMPrecen:.poshi PLA:PLA:LDAscroll+1:JSRsheila �,.recen LDAxos:STAcenx:LDAyos:STAceny:RTS �.horidisp STAyset:LDXmovstag:LDAhors,X:STAstopv:LDAhors-1,X:.horilop STAxset:PHA:JSRblockon:PLA:CLC:ADC#1:CMPstopv:BNEhorilop:RTS ��.vertdisp STAxset:LDXmovstag:LDAvers,X:STAstopv:LDAvers-1,X:.vertlop STAyset:PHA:JSRblockon:PLA:CLC:ADC#1:CMPstopv:BNEvertlop �.horid RTS:EQUB&80:EQUB&80:EQUW0:EQUB15:EQUB0:EQUB15:.verti EQUB15:EQUB0:EQUB9:EQUB0:EQUB9:EQUB&80:EQUB&80:EQUB0:.scra EQUB9 }EQUB&C0:EQUB&40:EQUB&C0:EQUB&40:EQUB0:EQUB0:EQUB&C0:.scrb EQUB&40:EQUB&4F:EQUB0:EQUB&4A:EQUB&4B:EQUB5:EQUB&4B:EQUB4:EQUB5 b.calcbbc LSR A:STAbbcsh+1:LDAscroll:ROR A:STAbbcsh:LSRbbcsh+1:RORbbcsh:LSRbbcsh+1:RORbbcsh:RTS ,]:� P%>&700 � �"Code Overflow to:";~P%:� �15,3)~P%; (P%=&100:O%=&6800:[OPT pass 2L.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 Fc.jumpn EQUW1:EQUW1:EQUW52:EQUW5:.zapn EQUW1:EQUW2:EQUW52:EQUW10:.switn EQUW1:EQUW3:EQUW52:EQUW2 P�.scort EQUB16:EQUB3:EQUB22:EQUB15:EQUB5:EQUB255:.powt EQUB14:EQUB22:EQUB20:EQUB5:EQUB15:EQUB255:.obstxt EQUB22:EQUB2:EQUB9:EQUB16:EQUB255 Z�.sequen EQUB0:EQUB18:EQUB36:.lowad EQUB0:EQUB&30:EQUB&D0:EQUB&B0:EQUB&50:EQUB&80:EQUB&80:EQUB&B0:EQUB&50:.highad EQUB0:EQUB0:EQUB&FF:EQUB2:EQUB2:EQUB&FD:EQUB2:EQUB&FD:EQUB&FD d�EQUB0:EQUB&20:EQUB&E0:EQUB&A0:EQUB&60:EQUB&80:EQUB&80:EQUB&A0:EQUB&60:EQUB0:EQUB0:EQUB&FF:EQUB2:EQUB2:EQUB&FD:EQUB2:EQUB&FD:EQUB&FD n�EQUB0:EQUB&10:EQUB&F0:EQUB&90:EQUB&70:EQUB0:EQUB0:EQUB&90:EQUB&70:EQUB0:EQUB0:EQUB&FF:EQUB2:EQUB2:EQUB0:EQUB0:EQUB&FD:EQUB&FD x�.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 �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 �N.sndon EQUB16:EQUB22:EQUB18:EQUB13:EQUB4:EQUB0:EQUB22:EQUB13:EQUB0:EQUB255 �N.sndoff EQUB16:EQUB22:EQUB18:EQUB13:EQUB4:EQUB0:EQUB22:EQUB6:EQUB6:EQUB255 �$.enrup EQUW1:EQUW1:EQUW52:EQUW20 �]:� �
00000000 0d 03 e8 1e 50 25 3d 26 34 30 30 3a 4f 25 3d 26 |....P%=&400:O%=&| 00000010 35 34 30 30 3a 5b 4f 50 54 20 70 61 73 73 0d 03 |5400:[OPT pass..| 00000020 f2 8c 2e 63 72 65 64 63 20 45 51 55 42 34 3a 45 |...credc EQUB4:E| 00000030 51 55 42 32 32 3a 45 51 55 42 31 32 3a 45 51 55 |QUB22:EQUB12:EQU| 00000040 42 32 33 3a 45 51 55 42 31 33 3a 45 51 55 42 32 |B23:EQUB13:EQUB2| 00000050 33 3a 45 51 55 42 33 3a 45 51 55 42 30 3a 45 51 |3:EQUB3:EQUB0:EQ| 00000060 55 42 36 3a 45 51 55 42 32 32 3a 45 51 55 42 31 |UB6:EQUB22:EQUB1| 00000070 35 3a 45 51 55 42 34 3a 45 51 55 42 32 35 35 3a |5:EQUB4:EQUB255:| 00000080 2e 63 72 65 64 64 20 45 51 55 42 32 33 3a 45 51 |.credd EQUB23:EQ| 00000090 55 42 33 31 3a 45 51 55 42 33 31 3a 45 51 55 42 |UB31:EQUB31:EQUB| 000000a0 32 39 3a 45 51 55 42 32 35 35 0d 03 fc 96 2e 73 |29:EQUB255.....s| 000000b0 70 61 63 65 20 45 51 55 42 31 34 3a 45 51 55 42 |pace EQUB14:EQUB| 000000c0 31 35 3a 45 51 55 42 35 3a 45 51 55 42 31 36 3a |15:EQUB5:EQUB16:| 000000d0 45 51 55 42 31 36 3a 45 51 55 42 30 3a 45 51 55 |EQUB16:EQUB0:EQU| 000000e0 42 31 36 3a 45 51 55 42 31 34 3a 45 51 55 42 31 |B16:EQUB14:EQUB1| 000000f0 3a 45 51 55 42 33 3a 45 51 55 42 35 3a 45 51 55 |:EQUB3:EQUB5:EQU| 00000100 42 30 3a 45 51 55 42 31 37 3a 45 51 55 42 32 32 |B0:EQUB17:EQUB22| 00000110 3a 45 51 55 42 30 3a 45 51 55 42 31 36 3a 45 51 |:EQUB0:EQUB16:EQ| 00000120 55 42 31 37 3a 45 51 55 42 31 3a 45 51 55 42 31 |UB17:EQUB1:EQUB1| 00000130 35 3a 45 51 55 42 31 37 3a 45 51 55 42 32 35 35 |5:EQUB17:EQUB255| 00000140 0d 04 06 71 2e 73 74 72 69 6e 67 20 4c 44 59 23 |...q.string LDY#| 00000150 30 3a 4c 44 41 28 26 37 32 29 2c 59 3a 43 4d 50 |0:LDA(&72),Y:CMP| 00000160 23 26 46 46 3a 42 45 51 76 69 73 3a 4a 53 52 70 |#&FF:BEQvis:JSRp| 00000170 75 74 63 68 3a 49 4e 43 78 63 68 3a 4c 44 41 26 |utch:INCxch:LDA&| 00000180 37 32 3a 43 4c 43 3a 41 44 43 23 31 3a 53 54 41 |72:CLC:ADC#1:STA| 00000190 26 37 32 3a 4c 44 41 26 37 33 3a 41 44 43 23 30 |&72:LDA&73:ADC#0| 000001a0 3a 53 54 41 26 37 33 3a 4a 4d 50 73 74 72 69 6e |:STA&73:JMPstrin| 000001b0 67 0d 04 10 d5 2e 64 6f 6f 72 63 68 20 50 48 41 |g.....doorch PHA| 000001c0 3a 43 4d 50 23 33 30 3a 42 4e 45 6e 6f 64 6f 72 |:CMP#30:BNEnodor| 000001d0 3a 4c 44 58 23 26 43 38 3a 4a 53 52 6b 65 79 62 |:LDX#&C8:JSRkeyb| 000001e0 79 74 65 3a 42 43 43 6e 6f 64 6f 72 3a 4c 44 41 |yte:BCCnodor:LDA| 000001f0 67 79 73 3a 41 53 4c 20 41 3a 41 53 4c 20 41 3a |gys:ASL A:ASL A:| 00000200 41 53 4c 20 41 3a 41 53 4c 20 41 3a 43 4c 43 3a |ASL A:ASL A:CLC:| 00000210 41 44 43 67 78 73 3a 41 44 43 23 26 32 30 3a 4a |ADCgxs:ADC#&20:J| 00000220 53 52 61 64 6f 66 63 6f 6c 3a 53 45 43 3a 53 42 |SRadofcol:SEC:SB| 00000230 43 23 31 3a 43 4d 50 6f 62 6a 65 63 74 73 3a 42 |C#1:CMPobjects:B| 00000240 45 51 64 6f 6f 72 3a 43 4d 50 6f 62 6a 65 63 74 |EQdoor:CMPobject| 00000250 73 2b 31 3a 42 4e 45 6e 6f 64 6f 72 3a 2e 64 6f |s+1:BNEnodor:.do| 00000260 6f 72 20 50 4c 41 3a 53 45 43 3a 2e 76 69 73 20 |or PLA:SEC:.vis | 00000270 52 54 53 3a 2e 6e 6f 64 6f 72 20 50 4c 41 3a 43 |RTS:.nodor PLA:C| 00000280 4c 43 3a 52 54 53 0d 04 1a 32 2e 6c 6f 63 6b 74 |LC:RTS...2.lockt| 00000290 79 70 65 20 4c 53 52 20 41 3a 52 4f 52 20 41 3a |ype LSR A:ROR A:| 000002a0 52 4f 52 20 41 3a 80 23 26 43 30 3a 53 54 41 26 |ROR A:.#&C0:STA&| 000002b0 37 32 3a 4c 44 59 23 30 0d 04 24 9c 2e 74 72 61 |72:LDY#0..$..tra| 000002c0 6e 73 74 6f 70 20 4c 44 41 28 26 37 30 29 2c 59 |nstop LDA(&70),Y| 000002d0 3a 80 23 26 43 30 3a 4a 53 52 63 6f 6c 62 79 74 |:.#&C0:JSRcolbyt| 000002e0 3a 53 54 41 28 26 37 30 29 2c 59 3a 49 4e 59 3a |:STA(&70),Y:INY:| 000002f0 43 50 59 23 26 34 30 3a 42 4e 45 74 72 61 6e 73 |CPY#&40:BNEtrans| 00000300 74 6f 70 3a 4c 44 59 23 30 3a 4c 44 41 26 37 32 |top:LDY#0:LDA&72| 00000310 3a 43 4c 43 3a 41 44 43 23 26 34 30 3a 53 54 41 |:CLC:ADC#&40:STA| 00000320 26 37 32 3a 4c 44 41 26 37 30 3a 43 4c 43 3a 41 |&72:LDA&70:CLC:A| 00000330 44 43 23 26 38 30 3a 53 54 41 26 37 30 3a 4c 44 |DC#&80:STA&70:LD| 00000340 41 26 37 31 3a 41 44 43 23 32 3a 4a 53 52 73 63 |A&71:ADC#2:JSRsc| 00000350 72 6f 6c 77 0d 04 2e c5 2e 74 72 61 6e 73 62 6f |rolw.....transbo| 00000360 74 20 4c 44 41 28 26 37 30 29 2c 59 3a 80 23 26 |t LDA(&70),Y:.#&| 00000370 43 30 3a 4a 53 52 63 6f 6c 62 79 74 3a 53 54 41 |C0:JSRcolbyt:STA| 00000380 28 26 37 30 29 2c 59 3a 49 4e 59 3a 43 50 59 23 |(&70),Y:INY:CPY#| 00000390 26 34 30 3a 42 4e 45 74 72 61 6e 73 62 6f 74 3a |&40:BNEtransbot:| 000003a0 52 54 53 3a 2e 63 6f 6c 62 79 74 20 50 48 41 3a |RTS:.colbyt PHA:| 000003b0 4c 44 41 73 63 72 6e 6f 3a 4a 53 52 61 64 6f 66 |LDAscrno:JSRadof| 000003c0 63 6f 6c 3a 54 41 58 3a 4c 44 41 64 6f 6f 72 63 |col:TAX:LDAdoorc| 000003d0 2c 58 3a 54 41 58 3a 4c 44 41 28 26 37 32 29 2c |,X:TAX:LDA(&72),| 000003e0 59 3a 80 23 26 33 46 3a 53 54 41 26 37 34 3a 50 |Y:.#&3F:STA&74:P| 000003f0 4c 41 3a 2e 63 6f 6c 62 6c 6f 70 20 43 4c 43 3a |LA:.colblop CLC:| 00000400 41 44 43 26 37 34 3a 44 45 58 3a 42 4e 45 63 6f |ADC&74:DEX:BNEco| 00000410 6c 62 6c 6f 70 3a 52 54 53 0d 04 38 5e 2e 61 64 |lblop:RTS..8^.ad| 00000420 6f 66 63 6f 6c 20 53 54 41 72 65 61 64 63 6c 6c |ofcol STAreadcll| 00000430 2b 32 3a 53 54 41 72 65 61 64 63 6c 68 2b 32 3a |+2:STAreadclh+2:| 00000440 2e 72 65 61 64 63 6c 6c 20 4c 44 41 26 31 30 46 |.readcll LDA&10F| 00000450 45 3a 4c 53 52 20 41 3a 4c 53 52 20 41 3a 4c 53 |E:LSR A:LSR A:LS| 00000460 52 20 41 3a 4c 53 52 20 41 3a 80 23 34 3a 53 54 |R A:LSR A:.#4:ST| 00000470 41 73 6d 61 64 2b 31 0d 04 42 3f 2e 72 65 61 64 |Asmad+1..B?.read| 00000480 63 6c 68 20 4c 44 41 26 31 30 46 46 3a 41 53 4c |clh LDA&10FF:ASL| 00000490 20 41 3a 52 4f 4c 20 41 3a 52 4f 4c 20 41 3a 80 | A:ROL A:ROL A:.| 000004a0 23 33 3a 43 4c 43 3a 2e 73 6d 61 64 20 41 44 43 |#3:CLC:.smad ADC| 000004b0 23 30 3a 52 54 53 0d 04 4c c8 2e 70 75 7a 7a 20 |#0:RTS..L..puzz | 000004c0 4c 44 41 26 46 41 30 2c 59 3a 4c 53 52 20 41 3a |LDA&FA0,Y:LSR A:| 000004d0 4c 53 52 20 41 3a 4c 53 52 20 41 3a 4c 53 52 20 |LSR A:LSR A:LSR | 000004e0 41 3a 43 4d 50 78 73 63 72 3a 42 4e 45 6e 6f 70 |A:CMPxscr:BNEnop| 000004f0 75 7a 7a 3a 4c 44 41 26 46 43 30 2c 59 3a 4c 53 |uzz:LDA&FC0,Y:LS| 00000500 52 20 41 3a 4c 53 52 20 41 3a 4c 53 52 20 41 3a |R A:LSR A:LSR A:| 00000510 4c 53 52 20 41 3a 43 4d 50 79 73 63 72 3a 42 45 |LSR A:CMPyscr:BE| 00000520 51 70 73 6f 6c 76 3a 2e 6e 6f 70 75 7a 7a 20 52 |Qpsolv:.nopuzz R| 00000530 54 53 3a 2e 70 73 6f 6c 76 20 4c 44 41 73 6f 75 |TS:.psolv LDAsou| 00000540 6e 64 3a 42 45 51 70 75 7a 73 6e 64 3a 4c 44 41 |nd:BEQpuzsnd:LDA| 00000550 23 37 3a 4c 44 58 23 28 70 75 7a 6e 20 83 20 32 |#7:LDX#(puzn . 2| 00000560 35 36 29 3a 4c 44 59 23 28 70 75 7a 6e 20 81 20 |56):LDY#(puzn . | 00000570 32 35 36 29 3a 4a 53 52 6f 73 77 6f 72 64 0d 04 |256):JSRosword..| 00000580 56 dd 2e 70 75 7a 73 6e 64 20 4c 44 59 26 37 30 |V..puzsnd LDY&70| 00000590 3a 4c 44 41 26 37 30 30 2c 59 3a 43 4d 50 23 33 |:LDA&700,Y:CMP#3| 000005a0 32 3a 42 43 53 70 75 73 77 61 70 3a 54 41 58 3a |2:BCSpuswap:TAX:| 000005b0 4c 44 41 26 46 32 30 2c 59 3a 53 54 41 26 46 32 |LDA&F20,Y:STA&F2| 000005c0 30 2c 58 3a 4c 44 41 26 46 34 30 2c 59 3a 53 54 |0,X:LDA&F40,Y:ST| 000005d0 41 26 46 34 30 2c 58 3a 4c 44 41 26 46 36 30 2c |A&F40,X:LDA&F60,| 000005e0 59 3a 53 54 41 26 46 36 30 2c 58 3a 4c 44 41 26 |Y:STA&F60,X:LDA&| 000005f0 46 38 30 2c 59 3a 53 54 41 26 46 38 30 2c 58 3a |F80,Y:STA&F80,X:| 00000600 2e 70 75 73 77 61 70 20 4c 44 41 23 26 37 38 3a |.puswap LDA#&78:| 00000610 53 54 41 26 46 32 30 2c 59 3a 4c 44 41 26 37 32 |STA&F20,Y:LDA&72| 00000620 30 2c 59 3a 43 4d 50 23 33 32 3a 42 43 53 70 75 |0,Y:CMP#32:BCSpu| 00000630 6d 6f 76 6f 3a 54 41 58 3a 4c 44 41 26 37 34 30 |movo:TAX:LDA&740| 00000640 2c 59 3a 80 23 31 35 3a 53 54 41 26 46 34 30 2c |,Y:.#15:STA&F40,| 00000650 58 3a 4c 44 41 26 37 34 30 2c 59 0d 04 60 7e 4c |X:LDA&740,Y..`~L| 00000660 53 52 20 41 3a 4c 53 52 20 41 3a 4c 53 52 20 41 |SR A:LSR A:LSR A| 00000670 3a 4c 53 52 20 41 3a 53 54 41 26 46 32 30 2c 58 |:LSR A:STA&F20,X| 00000680 3a 2e 70 75 6d 6f 76 6f 20 4c 44 41 26 37 36 30 |:.pumovo LDA&760| 00000690 2c 59 3a 43 4d 50 23 26 46 46 3a 42 4e 45 70 75 |,Y:CMP#&FF:BNEpu| 000006a0 7a 62 6c 6f 63 3a 2e 62 6c 6f 70 63 62 20 4a 4d |zbloc:.blopcb JM| 000006b0 50 63 6f 6d 70 6c 65 74 65 3a 2e 70 75 7a 6e 20 |Pcomplete:.puzn | 000006c0 45 51 55 57 31 3a 45 51 55 57 33 3a 45 51 55 57 |EQUW1:EQUW3:EQUW| 000006d0 35 32 3a 45 51 55 57 32 30 0d 04 6a e0 2e 70 75 |52:EQUW20..j..pu| 000006e0 7a 62 6c 6f 63 20 4c 44 58 78 73 63 72 3a 53 54 |zbloc LDXxscr:ST| 000006f0 58 78 63 68 3a 4c 44 58 79 73 63 72 3a 53 54 58 |Xxch:LDXyscr:STX| 00000700 79 63 68 3a 80 23 31 35 3a 53 54 41 79 73 63 72 |ych:.#15:STAyscr| 00000710 3a 54 59 41 3a 50 48 41 3a 4c 44 41 26 37 36 30 |:TYA:PHA:LDA&760| 00000720 2c 59 3a 4c 53 52 20 41 3a 4c 53 52 20 41 3a 4c |,Y:LSR A:LSR A:L| 00000730 53 52 20 41 3a 4c 53 52 20 41 3a 53 54 41 78 73 |SR A:LSR A:STAxs| 00000740 63 72 3a 2e 62 6c 6f 6c 6f 70 20 4c 44 41 26 37 |cr:.blolop LDA&7| 00000750 38 30 2c 59 3a 80 23 31 35 3a 53 54 41 79 73 65 |80,Y:.#15:STAyse| 00000760 74 3a 4c 44 41 26 37 38 30 2c 59 3a 4c 53 52 20 |t:LDA&780,Y:LSR | 00000770 41 3a 4c 53 52 20 41 3a 4c 53 52 20 41 3a 4c 53 |A:LSR A:LSR A:LS| 00000780 52 20 41 3a 53 54 41 78 73 65 74 3a 50 48 41 3a |R A:STAxset:PHA:| 00000790 54 59 41 3a 50 48 41 3a 4a 53 52 67 65 74 62 6c |TYA:PHA:JSRgetbl| 000007a0 6f 63 6b 2b 33 3a 50 4c 41 3a 54 41 58 3a 50 4c |ock+3:PLA:TAX:PL| 000007b0 41 3a 50 48 41 3a 54 41 59 0d 04 6b 12 4c 44 41 |A:PHA:TAY..k.LDA| 000007c0 78 64 61 74 61 2c 59 3a 54 41 59 0d 04 74 41 4c |xdata,Y:TAY..tAL| 000007d0 44 41 26 37 41 30 2c 58 3a 80 23 33 3a 4c 53 52 |DA&7A0,X:.#3:LSR| 000007e0 20 41 3a 52 4f 52 20 41 3a 52 4f 52 20 41 3a 53 | A:ROR A:ROR A:S| 000007f0 54 41 63 6f 6c 3a 4c 44 41 28 26 37 30 29 2c 59 |TAcol:LDA(&70),Y| 00000800 3a 80 23 26 33 46 3a 84 41 63 6f 6c 0d 04 7e da |:.#&3F:.Acol..~.| 00000810 53 54 41 28 26 37 30 29 2c 59 3a 49 4e 59 3a 4c |STA(&70),Y:INY:L| 00000820 44 41 26 37 41 30 2c 58 3a 80 23 31 32 3a 41 53 |DA&7A0,X:.#12:AS| 00000830 4c 20 41 3a 41 53 4c 20 41 3a 41 53 4c 20 41 3a |L A:ASL A:ASL A:| 00000840 41 53 4c 20 41 3a 53 54 41 63 6f 6c 3a 4c 44 41 |ASL A:STAcol:LDA| 00000850 28 26 37 30 29 2c 59 3a 80 23 26 33 46 3a 84 41 |(&70),Y:.#&3F:.A| 00000860 63 6f 6c 3a 53 54 41 28 26 37 30 29 2c 59 3a 50 |col:STA(&70),Y:P| 00000870 4c 41 3a 4c 53 52 20 41 3a 54 41 59 3a 4c 44 41 |LA:LSR A:TAY:LDA| 00000880 68 62 64 61 74 2c 59 3a 54 41 59 3a 4c 44 41 26 |hbdat,Y:TAY:LDA&| 00000890 37 41 30 2c 58 3a 80 23 31 36 3a 41 53 4c 20 41 |7A0,X:.#16:ASL A| 000008a0 3a 41 53 4c 20 41 3a 53 54 41 63 6f 6c 3a 4c 44 |:ASL A:STAcol:LD| 000008b0 41 78 73 65 74 3a 80 23 31 3a 42 45 51 73 65 63 |Axset:.#1:BEQsec| 000008c0 70 75 7a 3a 4c 44 41 28 26 37 30 29 2c 59 3a 80 |puz:LDA(&70),Y:.| 000008d0 23 26 37 46 3a 43 4c 43 3a 41 44 43 63 6f 6c 3a |#&7F:CLC:ADCcol:| 000008e0 41 44 43 63 6f 6c 0d 04 88 0e 53 54 41 28 26 37 |ADCcol....STA(&7| 000008f0 30 29 2c 59 0d 04 92 3c 4a 4d 50 66 69 72 70 75 |0),Y...<JMPfirpu| 00000900 7a 3a 2e 73 65 63 70 75 7a 20 4c 44 41 28 26 37 |z:.secpuz LDA(&7| 00000910 30 29 2c 59 3a 80 23 26 42 46 3a 43 4c 43 3a 41 |0),Y:.#&BF:CLC:A| 00000920 44 43 63 6f 6c 3a 53 54 41 28 26 37 30 29 2c 59 |DCcol:STA(&70),Y| 00000930 0d 04 9c 75 2e 66 69 72 70 75 7a 20 54 58 41 3a |...u.firpuz TXA:| 00000940 43 4c 43 3a 41 44 43 23 26 34 30 3a 54 41 59 3a |CLC:ADC#&40:TAY:| 00000950 43 4d 50 23 26 38 30 3a 42 43 53 65 6e 64 62 6c |CMP#&80:BCSendbl| 00000960 6f 63 3a 4a 4d 50 62 6c 6f 6c 6f 70 3a 2e 65 6e |oc:JMPblolop:.en| 00000970 64 62 6c 6f 63 20 4c 44 41 78 63 68 3a 53 54 41 |dbloc LDAxch:STA| 00000980 78 73 63 72 3a 4c 44 41 79 63 68 3a 53 54 41 79 |xscr:LDAych:STAy| 00000990 73 63 72 3a 50 4c 41 3a 54 41 59 3a 4a 4d 50 62 |scr:PLA:TAY:JMPb| 000009a0 6c 6f 70 63 62 0d 04 a6 27 2e 7a 65 72 6f 67 72 |lopcb...'.zerogr| 000009b0 20 4c 44 41 23 31 3a 53 54 41 7a 65 72 6f 73 74 | LDA#1:STAzerost| 000009c0 61 74 3a 4a 4d 50 6c 61 64 64 65 72 0d 04 b0 98 |at:JMPladder....| 000009d0 2e 7a 65 72 6f 70 72 6f 20 4c 44 41 23 30 3a 53 |.zeropro LDA#0:S| 000009e0 54 41 7a 65 72 6f 62 79 74 65 3a 53 54 41 7a 65 |TAzerobyte:STAze| 000009f0 72 6f 62 79 74 65 2b 31 3a 4c 44 41 7a 65 72 6f |robyte+1:LDAzero| 00000a00 73 74 61 74 3a 42 45 51 65 6e 64 70 72 6f 7a 3a |stat:BEQendproz:| 00000a10 4c 44 58 66 69 6e 65 3a 4c 44 41 6b 65 79 31 2c |LDXfine:LDAkey1,| 00000a20 58 3a 53 54 41 7a 65 72 6f 62 79 74 65 3a 4c 44 |X:STAzerobyte:LD| 00000a30 41 6b 65 79 32 2c 58 3a 53 54 41 7a 65 72 6f 62 |Akey2,X:STAzerob| 00000a40 79 74 65 2b 31 3a 4c 44 41 23 30 3a 53 54 41 7a |yte+1:LDA#0:STAz| 00000a50 65 72 6f 73 74 61 74 3a 2e 65 6e 64 70 72 6f 7a |erostat:.endproz| 00000a60 20 52 54 53 0d 04 ba 9a 2e 73 63 72 6f 66 66 20 | RTS.....scroff | 00000a70 4c 44 41 23 30 3a 53 54 41 6c 61 73 74 61 74 3a |LDA#0:STAlastat:| 00000a80 4c 44 41 23 31 36 3a 53 54 41 73 63 72 6f 66 64 |LDA#16:STAscrofd| 00000a90 3a 2e 73 63 72 6f 66 66 6c 6f 70 20 4c 44 41 23 |:.scrofflop LDA#| 00000aa0 26 43 3a 4c 44 58 23 28 73 63 72 6f 66 64 20 83 |&C:LDX#(scrofd .| 00000ab0 32 35 36 29 3a 4c 44 59 23 28 73 63 72 6f 66 64 |256):LDY#(scrofd| 00000ac0 20 81 32 35 36 29 3a 4a 53 52 6f 73 77 6f 72 64 | .256):JSRosword| 00000ad0 3a 44 45 43 73 63 72 6f 66 64 3a 4c 44 41 73 63 |:DECscrofd:LDAsc| 00000ae0 72 6f 66 64 3a 42 4e 45 73 63 72 6f 66 66 6c 6f |rofd:BNEscrofflo| 00000af0 70 3a 2e 6e 6f 73 63 72 6f 6c 20 52 54 53 0d 04 |p:.noscrol RTS..| 00000b00 c4 5f 2e 64 6f 73 63 72 6f 6c 6c 20 4c 44 41 63 |._.doscroll LDAc| 00000b10 65 6e 78 3a 53 54 41 78 6f 73 3a 4c 44 41 63 65 |enx:STAxos:LDAce| 00000b20 6e 79 3a 53 54 41 79 6f 73 3a 4c 44 41 78 70 6f |ny:STAyos:LDAxpo| 00000b30 73 3a 53 45 43 3a 53 42 43 23 35 3a 53 54 41 63 |s:SEC:SBC#5:STAc| 00000b40 65 6e 78 3a 4c 44 41 79 70 6f 73 3a 53 45 43 3a |enx:LDAypos:SEC:| 00000b50 53 42 43 23 37 3a 53 54 41 63 65 6e 79 0d 04 ce |SBC#7:STAceny...| 00000b60 6c 4c 44 58 66 69 6e 65 3a 42 45 51 6e 6f 73 63 |lLDXfine:BEQnosc| 00000b70 72 6f 6c 3a 4c 44 41 73 63 72 6f 6c 6c 3a 50 48 |rol:LDAscroll:PH| 00000b80 41 3a 43 4c 43 3a 41 44 43 73 63 72 61 2c 58 3a |A:CLC:ADCscra,X:| 00000b90 53 54 41 73 63 72 6f 6c 6c 3a 4c 44 41 73 63 72 |STAscroll:LDAscr| 00000ba0 6f 6c 6c 2b 31 3a 50 48 41 3a 41 44 43 73 63 72 |oll+1:PHA:ADCscr| 00000bb0 62 2c 58 3a 4a 53 52 73 63 72 6f 6c 77 3a 53 54 |b,X:JSRscrolw:ST| 00000bc0 41 73 63 72 6f 6c 6c 2b 31 0d 04 d8 d5 4c 44 41 |Ascroll+1....LDA| 00000bd0 68 6f 72 69 64 2c 58 3a 43 4d 50 23 26 38 30 3a |horid,X:CMP#&80:| 00000be0 42 45 51 76 65 72 74 73 63 3a 4a 53 52 68 6f 72 |BEQvertsc:JSRhor| 00000bf0 69 64 69 73 70 3a 4c 44 58 66 69 6e 65 3a 2e 76 |idisp:LDXfine:.v| 00000c00 65 72 74 73 63 20 4c 44 41 76 65 72 74 69 2c 58 |ertsc LDAverti,X| 00000c10 3a 43 4d 50 23 26 38 30 3a 42 45 51 65 6e 64 64 |:CMP#&80:BEQendd| 00000c20 6f 73 63 3a 4a 53 52 76 65 72 74 64 69 73 70 3a |osc:JSRvertdisp:| 00000c30 2e 65 6e 64 64 6f 73 63 20 4c 44 41 6d 6f 76 73 |.enddosc LDAmovs| 00000c40 74 61 67 3a 43 4d 50 23 33 3a 42 45 51 70 6f 73 |tag:CMP#3:BEQpos| 00000c50 68 69 3a 50 4c 41 3a 53 54 41 73 63 72 6f 6c 6c |hi:PLA:STAscroll| 00000c60 2b 31 3a 50 4c 41 3a 53 54 41 73 63 72 6f 6c 6c |+1:PLA:STAscroll| 00000c70 3a 4a 4d 50 72 65 63 65 6e 3a 2e 70 6f 73 68 69 |:JMPrecen:.poshi| 00000c80 20 50 4c 41 3a 50 4c 41 3a 4c 44 41 73 63 72 6f | PLA:PLA:LDAscro| 00000c90 6c 6c 2b 31 3a 4a 53 52 73 68 65 69 6c 61 0d 04 |ll+1:JSRsheila..| 00000ca0 e2 2c 2e 72 65 63 65 6e 20 4c 44 41 78 6f 73 3a |.,.recen LDAxos:| 00000cb0 53 54 41 63 65 6e 78 3a 4c 44 41 79 6f 73 3a 53 |STAcenx:LDAyos:S| 00000cc0 54 41 63 65 6e 79 3a 52 54 53 0d 04 ec 85 2e 68 |TAceny:RTS.....h| 00000cd0 6f 72 69 64 69 73 70 20 53 54 41 79 73 65 74 3a |oridisp STAyset:| 00000ce0 4c 44 58 6d 6f 76 73 74 61 67 3a 4c 44 41 68 6f |LDXmovstag:LDAho| 00000cf0 72 73 2c 58 3a 53 54 41 73 74 6f 70 76 3a 4c 44 |rs,X:STAstopv:LD| 00000d00 41 68 6f 72 73 2d 31 2c 58 3a 2e 68 6f 72 69 6c |Ahors-1,X:.horil| 00000d10 6f 70 20 53 54 41 78 73 65 74 3a 50 48 41 3a 4a |op STAxset:PHA:J| 00000d20 53 52 62 6c 6f 63 6b 6f 6e 3a 50 4c 41 3a 43 4c |SRblockon:PLA:CL| 00000d30 43 3a 41 44 43 23 31 3a 43 4d 50 73 74 6f 70 76 |C:ADC#1:CMPstopv| 00000d40 3a 42 4e 45 68 6f 72 69 6c 6f 70 3a 52 54 53 0d |:BNEhorilop:RTS.| 00000d50 04 f6 81 2e 76 65 72 74 64 69 73 70 20 53 54 41 |....vertdisp STA| 00000d60 78 73 65 74 3a 4c 44 58 6d 6f 76 73 74 61 67 3a |xset:LDXmovstag:| 00000d70 4c 44 41 76 65 72 73 2c 58 3a 53 54 41 73 74 6f |LDAvers,X:STAsto| 00000d80 70 76 3a 4c 44 41 76 65 72 73 2d 31 2c 58 3a 2e |pv:LDAvers-1,X:.| 00000d90 76 65 72 74 6c 6f 70 20 53 54 41 79 73 65 74 3a |vertlop STAyset:| 00000da0 50 48 41 3a 4a 53 52 62 6c 6f 63 6b 6f 6e 3a 50 |PHA:JSRblockon:P| 00000db0 4c 41 3a 43 4c 43 3a 41 44 43 23 31 3a 43 4d 50 |LA:CLC:ADC#1:CMP| 00000dc0 73 74 6f 70 76 3a 42 4e 45 76 65 72 74 6c 6f 70 |stopv:BNEvertlop| 00000dd0 0d 05 00 80 2e 68 6f 72 69 64 20 52 54 53 3a 45 |.....horid RTS:E| 00000de0 51 55 42 26 38 30 3a 45 51 55 42 26 38 30 3a 45 |QUB&80:EQUB&80:E| 00000df0 51 55 57 30 3a 45 51 55 42 31 35 3a 45 51 55 42 |QUW0:EQUB15:EQUB| 00000e00 30 3a 45 51 55 42 31 35 3a 2e 76 65 72 74 69 20 |0:EQUB15:.verti | 00000e10 45 51 55 42 31 35 3a 45 51 55 42 30 3a 45 51 55 |EQUB15:EQUB0:EQU| 00000e20 42 39 3a 45 51 55 42 30 3a 45 51 55 42 39 3a 45 |B9:EQUB0:EQUB9:E| 00000e30 51 55 42 26 38 30 3a 45 51 55 42 26 38 30 3a 45 |QUB&80:EQUB&80:E| 00000e40 51 55 42 30 3a 2e 73 63 72 61 20 45 51 55 42 39 |QUB0:.scra EQUB9| 00000e50 0d 05 0a 7d 45 51 55 42 26 43 30 3a 45 51 55 42 |...}EQUB&C0:EQUB| 00000e60 26 34 30 3a 45 51 55 42 26 43 30 3a 45 51 55 42 |&40:EQUB&C0:EQUB| 00000e70 26 34 30 3a 45 51 55 42 30 3a 45 51 55 42 30 3a |&40:EQUB0:EQUB0:| 00000e80 45 51 55 42 26 43 30 3a 2e 73 63 72 62 20 45 51 |EQUB&C0:.scrb EQ| 00000e90 55 42 26 34 30 3a 45 51 55 42 26 34 46 3a 45 51 |UB&40:EQUB&4F:EQ| 00000ea0 55 42 30 3a 45 51 55 42 26 34 41 3a 45 51 55 42 |UB0:EQUB&4A:EQUB| 00000eb0 26 34 42 3a 45 51 55 42 35 3a 45 51 55 42 26 34 |&4B:EQUB5:EQUB&4| 00000ec0 42 3a 45 51 55 42 34 3a 45 51 55 42 35 0d 05 0f |B:EQUB4:EQUB5...| 00000ed0 62 2e 63 61 6c 63 62 62 63 20 4c 53 52 20 41 3a |b.calcbbc LSR A:| 00000ee0 53 54 41 62 62 63 73 68 2b 31 3a 4c 44 41 73 63 |STAbbcsh+1:LDAsc| 00000ef0 72 6f 6c 6c 3a 52 4f 52 20 41 3a 53 54 41 62 62 |roll:ROR A:STAbb| 00000f00 63 73 68 3a 4c 53 52 62 62 63 73 68 2b 31 3a 52 |csh:LSRbbcsh+1:R| 00000f10 4f 52 62 62 63 73 68 3a 4c 53 52 62 62 63 73 68 |ORbbcsh:LSRbbcsh| 00000f20 2b 31 3a 52 4f 52 62 62 63 73 68 3a 52 54 53 0d |+1:RORbbcsh:RTS.| 00000f30 05 14 2c 5d 3a e7 20 50 25 3e 26 37 30 30 20 8c |..,]:. P%>&700 .| 00000f40 20 f1 22 43 6f 64 65 20 4f 76 65 72 66 6c 6f 77 | ."Code Overflow| 00000f50 20 74 6f 3a 22 3b 7e 50 25 3a e0 0d 05 1e 0f f1 | to:";~P%:......| 00000f60 8a 31 35 2c 33 29 7e 50 25 3b 0d 05 28 1e 50 25 |.15,3)~P%;..(.P%| 00000f70 3d 26 31 30 30 3a 4f 25 3d 26 36 38 30 30 3a 5b |=&100:O%=&6800:[| 00000f80 4f 50 54 20 70 61 73 73 0d 05 32 4c 2e 74 69 74 |OPT pass..2L.tit| 00000f90 73 63 72 73 20 45 51 55 42 26 33 34 3a 45 51 55 |scrs EQUB&34:EQU| 00000fa0 42 26 35 32 3a 45 51 55 42 26 34 32 3a 45 51 55 |B&52:EQUB&42:EQU| 00000fb0 42 26 45 32 3a 45 51 55 42 26 35 31 3a 45 51 55 |B&E2:EQUB&51:EQU| 00000fc0 42 26 39 33 3a 45 51 55 42 26 39 30 3a 45 51 55 |B&93:EQUB&90:EQU| 00000fd0 42 26 45 31 0d 05 3c 2a 2e 6d 6f 6e 70 64 20 45 |B&E1..<*.monpd E| 00000fe0 51 55 42 26 30 32 3a 45 51 55 42 26 30 34 3a 45 |QUB&02:EQUB&04:E| 00000ff0 51 55 42 26 30 36 3a 45 51 55 42 26 30 38 0d 05 |QUB&06:EQUB&08..| 00001000 46 63 2e 6a 75 6d 70 6e 20 45 51 55 57 31 3a 45 |Fc.jumpn EQUW1:E| 00001010 51 55 57 31 3a 45 51 55 57 35 32 3a 45 51 55 57 |QUW1:EQUW52:EQUW| 00001020 35 3a 2e 7a 61 70 6e 20 45 51 55 57 31 3a 45 51 |5:.zapn EQUW1:EQ| 00001030 55 57 32 3a 45 51 55 57 35 32 3a 45 51 55 57 31 |UW2:EQUW52:EQUW1| 00001040 30 3a 2e 73 77 69 74 6e 20 45 51 55 57 31 3a 45 |0:.switn EQUW1:E| 00001050 51 55 57 33 3a 45 51 55 57 35 32 3a 45 51 55 57 |QUW3:EQUW52:EQUW| 00001060 32 0d 05 50 8d 2e 73 63 6f 72 74 20 45 51 55 42 |2..P..scort EQUB| 00001070 31 36 3a 45 51 55 42 33 3a 45 51 55 42 32 32 3a |16:EQUB3:EQUB22:| 00001080 45 51 55 42 31 35 3a 45 51 55 42 35 3a 45 51 55 |EQUB15:EQUB5:EQU| 00001090 42 32 35 35 3a 2e 70 6f 77 74 20 45 51 55 42 31 |B255:.powt EQUB1| 000010a0 34 3a 45 51 55 42 32 32 3a 45 51 55 42 32 30 3a |4:EQUB22:EQUB20:| 000010b0 45 51 55 42 35 3a 45 51 55 42 31 35 3a 45 51 55 |EQUB5:EQUB15:EQU| 000010c0 42 32 35 35 3a 2e 6f 62 73 74 78 74 20 45 51 55 |B255:.obstxt EQU| 000010d0 42 32 32 3a 45 51 55 42 32 3a 45 51 55 42 39 3a |B22:EQUB2:EQUB9:| 000010e0 45 51 55 42 31 36 3a 45 51 55 42 32 35 35 0d 05 |EQUB16:EQUB255..| 000010f0 5a b2 2e 73 65 71 75 65 6e 20 45 51 55 42 30 3a |Z..sequen EQUB0:| 00001100 45 51 55 42 31 38 3a 45 51 55 42 33 36 3a 2e 6c |EQUB18:EQUB36:.l| 00001110 6f 77 61 64 20 45 51 55 42 30 3a 45 51 55 42 26 |owad EQUB0:EQUB&| 00001120 33 30 3a 45 51 55 42 26 44 30 3a 45 51 55 42 26 |30:EQUB&D0:EQUB&| 00001130 42 30 3a 45 51 55 42 26 35 30 3a 45 51 55 42 26 |B0:EQUB&50:EQUB&| 00001140 38 30 3a 45 51 55 42 26 38 30 3a 45 51 55 42 26 |80:EQUB&80:EQUB&| 00001150 42 30 3a 45 51 55 42 26 35 30 3a 2e 68 69 67 68 |B0:EQUB&50:.high| 00001160 61 64 20 45 51 55 42 30 3a 45 51 55 42 30 3a 45 |ad EQUB0:EQUB0:E| 00001170 51 55 42 26 46 46 3a 45 51 55 42 32 3a 45 51 55 |QUB&FF:EQUB2:EQU| 00001180 42 32 3a 45 51 55 42 26 46 44 3a 45 51 55 42 32 |B2:EQUB&FD:EQUB2| 00001190 3a 45 51 55 42 26 46 44 3a 45 51 55 42 26 46 44 |:EQUB&FD:EQUB&FD| 000011a0 0d 05 64 87 45 51 55 42 30 3a 45 51 55 42 26 32 |..d.EQUB0:EQUB&2| 000011b0 30 3a 45 51 55 42 26 45 30 3a 45 51 55 42 26 41 |0:EQUB&E0:EQUB&A| 000011c0 30 3a 45 51 55 42 26 36 30 3a 45 51 55 42 26 38 |0:EQUB&60:EQUB&8| 000011d0 30 3a 45 51 55 42 26 38 30 3a 45 51 55 42 26 41 |0:EQUB&80:EQUB&A| 000011e0 30 3a 45 51 55 42 26 36 30 3a 45 51 55 42 30 3a |0:EQUB&60:EQUB0:| 000011f0 45 51 55 42 30 3a 45 51 55 42 26 46 46 3a 45 51 |EQUB0:EQUB&FF:EQ| 00001200 55 42 32 3a 45 51 55 42 32 3a 45 51 55 42 26 46 |UB2:EQUB2:EQUB&F| 00001210 44 3a 45 51 55 42 32 3a 45 51 55 42 26 46 44 3a |D:EQUB2:EQUB&FD:| 00001220 45 51 55 42 26 46 44 0d 05 6e 81 45 51 55 42 30 |EQUB&FD..n.EQUB0| 00001230 3a 45 51 55 42 26 31 30 3a 45 51 55 42 26 46 30 |:EQUB&10:EQUB&F0| 00001240 3a 45 51 55 42 26 39 30 3a 45 51 55 42 26 37 30 |:EQUB&90:EQUB&70| 00001250 3a 45 51 55 42 30 3a 45 51 55 42 30 3a 45 51 55 |:EQUB0:EQUB0:EQU| 00001260 42 26 39 30 3a 45 51 55 42 26 37 30 3a 45 51 55 |B&90:EQUB&70:EQU| 00001270 42 30 3a 45 51 55 42 30 3a 45 51 55 42 26 46 46 |B0:EQUB0:EQUB&FF| 00001280 3a 45 51 55 42 32 3a 45 51 55 42 32 3a 45 51 55 |:EQUB2:EQUB2:EQU| 00001290 42 30 3a 45 51 55 42 30 3a 45 51 55 42 26 46 44 |B0:EQUB0:EQUB&FD| 000012a0 3a 45 51 55 42 26 46 44 0d 05 78 af 2e 78 64 61 |:EQUB&FD..x..xda| 000012b0 74 61 20 45 51 55 42 30 3a 45 51 55 42 32 3a 45 |ta EQUB0:EQUB2:E| 000012c0 51 55 42 35 3a 45 51 55 42 37 3a 45 51 55 42 31 |QUB5:EQUB7:EQUB1| 000012d0 30 3a 45 51 55 42 31 32 3a 45 51 55 42 31 35 3a |0:EQUB12:EQUB15:| 000012e0 45 51 55 42 31 37 3a 45 51 55 42 32 30 3a 45 51 |EQUB17:EQUB20:EQ| 000012f0 55 42 32 32 3a 2e 68 62 64 61 74 20 45 51 55 42 |UB22:.hbdat EQUB| 00001300 34 3a 45 51 55 42 39 3a 45 51 55 42 31 34 3a 45 |4:EQUB9:EQUB14:E| 00001310 51 55 42 31 39 3a 45 51 55 42 32 34 3a 2e 64 6f |QUB19:EQUB24:.do| 00001320 6f 72 63 20 45 51 55 42 30 3a 45 51 55 42 31 3a |orc EQUB0:EQUB1:| 00001330 45 51 55 42 34 3a 45 51 55 42 35 3a 45 51 55 42 |EQUB4:EQUB5:EQUB| 00001340 31 36 3a 45 51 55 42 31 37 3a 45 51 55 42 32 30 |16:EQUB17:EQUB20| 00001350 3a 45 51 55 42 32 31 0d 05 82 6d 2e 63 72 65 64 |:EQUB21...m.cred| 00001360 61 20 45 51 55 42 31 34 3a 45 51 55 42 31 35 3a |a EQUB14:EQUB15:| 00001370 45 51 55 42 32 32 3a 45 51 55 42 37 3a 45 51 55 |EQUB22:EQUB7:EQU| 00001380 42 31 35 3a 45 51 55 42 31 3a 45 51 55 42 31 32 |B15:EQUB1:EQUB12| 00001390 3a 45 51 55 42 31 32 3a 45 51 55 42 35 3a 45 51 |:EQUB12:EQUB5:EQ| 000013a0 55 42 34 3a 45 51 55 42 30 3a 45 51 55 42 31 3a |UB4:EQUB0:EQUB1:| 000013b0 45 51 55 42 31 33 3a 45 51 55 42 34 3a 45 51 55 |EQUB13:EQUB4:EQU| 000013c0 42 32 35 35 0d 05 8c 58 2e 63 72 65 64 62 20 45 |B255...X.credb E| 000013d0 51 55 42 34 3a 45 51 55 42 35 3a 45 51 55 42 31 |QUB4:EQUB5:EQUB1| 000013e0 36 3a 45 51 55 42 32 33 3a 45 51 55 42 37 3a 45 |6:EQUB23:EQUB7:E| 000013f0 51 55 42 31 33 3a 45 51 55 42 35 3a 45 51 55 42 |QUB13:EQUB5:EQUB| 00001400 34 3a 45 51 55 42 30 3a 45 51 55 42 32 3a 45 51 |4:EQUB0:EQUB2:EQ| 00001410 55 42 32 31 3a 45 51 55 42 32 35 35 0d 05 96 4e |UB21:EQUB255...N| 00001420 2e 73 6e 64 6f 6e 20 45 51 55 42 31 36 3a 45 51 |.sndon EQUB16:EQ| 00001430 55 42 32 32 3a 45 51 55 42 31 38 3a 45 51 55 42 |UB22:EQUB18:EQUB| 00001440 31 33 3a 45 51 55 42 34 3a 45 51 55 42 30 3a 45 |13:EQUB4:EQUB0:E| 00001450 51 55 42 32 32 3a 45 51 55 42 31 33 3a 45 51 55 |QUB22:EQUB13:EQU| 00001460 42 30 3a 45 51 55 42 32 35 35 0d 05 a0 4e 2e 73 |B0:EQUB255...N.s| 00001470 6e 64 6f 66 66 20 45 51 55 42 31 36 3a 45 51 55 |ndoff EQUB16:EQU| 00001480 42 32 32 3a 45 51 55 42 31 38 3a 45 51 55 42 31 |B22:EQUB18:EQUB1| 00001490 33 3a 45 51 55 42 34 3a 45 51 55 42 30 3a 45 51 |3:EQUB4:EQUB0:EQ| 000014a0 55 42 32 32 3a 45 51 55 42 36 3a 45 51 55 42 36 |UB22:EQUB6:EQUB6| 000014b0 3a 45 51 55 42 32 35 35 0d 05 aa 24 2e 65 6e 72 |:EQUB255...$.enr| 000014c0 75 70 20 45 51 55 57 31 3a 45 51 55 57 31 3a 45 |up EQUW1:EQUW1:E| 000014d0 51 55 57 35 32 3a 45 51 55 57 32 30 0d 05 b4 07 |QUW52:EQUW20....| 000014e0 5d 3a e1 0d ff |]:...| 000014e5