G/MINsrc2

Home » Personal collection » Acorn ADFS disks » Electron_User_Group » EUG_23.ADF » G/MINsrc2

G/MINsrc2

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_User_Group » EUG_23.ADF
Filename:	G/MINsrc2
Read OK:	✔
File size:	3100 bytes
Load address:	FFFF0E00
Exec address:	FFFF8023

Duplicates

There is 1 duplicate copy of this file in the archive:

AEW website » eug » eug_5_25_discs_Eug-23_D-EUG23.dsd » G.MINSRC2
Personal collection » Acorn ADFS disks » Electron_User_Group » EUG_23.ADF » G/MINsrc2

File contents

   10REM MINsrc2 (For Mr Miner)
   20REM Additional coding by Richard Dimond for Mr Miner by Mark Bolton & Alastair King (EU Sep 87)
   30REM November 1995
   40REM
   50IFPAGE<&1D00 THENPAGE=&1D00:CHAIN"MINsrc2"
   60PROCass
   70OSCLI"SAVE MIN2 E00 "+STR$~O%+" "+STR$~start+" 2B7D"
   80END
   90DEFPROCass
  100R%=&2A58:S%=&28E2:T%=&2B46:Z%=&2885
  110addr=&76:data=&7A
  130xc=&74:yc=&75:mp=&68:kad=&96
  140kd=&7E:sqd=&7F:fell=&8A:spd=&8F:db=&80
  150FORI%=4TO6STEP2
  160P%=&2B7D:O%=&E00
  170[OPTI%
  180.start
  190LDA#Z% MOD256:STA&220:LDA#Z% DIV256:STA&221
  200LDA#23:LDX#dat1 MOD256:LDY#dat1 DIV256:JSRp:LDX#title MOD256:LDY#title DIV256:JSRdh
  210LDA#15:LDX#dat2 MOD256:LDY#dat2 DIV256:JSRp:LDX#ul MOD256:LDY#ul DIV256:JSRdh
  220.intro LDA#89:LDX#dat3 MOD256:LDY#dat3 DIV256:JSRp:LDX#ul MOD256:LDY#ul DIV256:JSRdh
  230LDA#17:JSR&FFEE:LDA#3:JSR&FFEE
  240LDA#71:STAspd
  250JSRchoose
  260LDA#90:STA&358:LDA#12:JSR&FFEE:LDA#0:STA&358
  270LDA#74:LDX#d2 MOD256:LDY#d2 DIV256:JSRp
  280.st1 JSRinit:LDA#8:LDX#d4 MOD256:LDY#d4 DIV256:JSRp:JSRlives:.st2 JSRlev:LDAlev%:CMP#6:BNElod:JMPgamend:.lod
  290JSRdell:JSRdell:JSRdell
  300JSRload
  310LDA#13:LDX#4:JSR&FFF4
  320JSRcalc:LDA D%:STAsd%:LDA D%+1:STAsd%+1:LDA MX%:STAsmx%:LDA MY%:STAsmy%
  330JSRsond1
  340.game:JSRlives:.game1
  350JSR R%:JSRss%
  360JSRdelsp
  370JSRdi:JSRea:JSRsq
  380LDAkt%:BEQfin:LDXcn%:INX:STXcn%:CPX#5:BNEfin:JSRki:.fin
  390JSRchk1:LDAlvend:BNEnexlev:LDAdeadman:BNElose:JSR move:LDAli%:BEQendgame:JMPgame1:.lose LDA#0:STAdeadman:LDAsmx%:STA MX%:LDAsmy%:STA MY%:LDAsd%:STA D%:LDAsd%+1:STA D%+1:JSRmpos:LDY#48:LDA#230:STA(mp),Y:JMPgame
  400.nexlev LDA#0:STAlvend:STAea%:STAsq%:STAdi%:STAmaxea%:STAmaxsq%:STAmaxdi%:STAdeadman:LDA#0:STAdata:LDA#&57:STAdata+1:LDA#&90:STAaddr:LDA#&63:STAaddr+1:JSR S%:JMPst2
  410.endgame
  420JSRlives:LDA#0:STAdata:LDA#&57:STAdata+1:LDA#&90:STAaddr:LDA#&63:STAaddr+1:JSR S%
  430LDA#31:LDX#endat MOD256:LDY#endat DIV256:JSRp
  440LDA#14:LDX#4:JSR&FFF4
  450JSRrep:LDA#4:JSR&FFEE
  460LDA#13:LDX#4:JSR&FFF4:LDA#15:LDX#0:JSR&FFF4
  470JMPst1
  480.p STX&70:STY&71:TAX:LDY#0
  490.lp LDA(&70),Y:JSR&FFEE:INY:DEX:BNElp:RTS
  500.dh STXdb:STYdb+1:LDA#0:STA&70:.b1 LDY&70:LDA(db),Y:CMP#13:BEQb3:STA&71:INY:STY&70
  510LDX#&71:LDY#0:LDA#10:JSR&FFF1:LDX#1:LDY#0:.b2 LDA&71,X:STA&CF0,Y:INY:STA&CF0,Y:INY:INX:CPX#9:BNEb2
  520LDA#254:JSR&FFEE:LDA#8:JSR&FFEE:LDA#10:JSR&FFEE:LDA#255:JSR&FFEE:LDA#11:JSR&FFEE:JMPb1:.b3 RTS
  530.choose
  540.rdch JSR&FFE0
  550.QT CMP#ASC"Q":BNE SD:JSRsdoff:JMPrdch
  560.SD CMP#ASC"S":BNE LD:JSRsdon:JMPrdch
  570.LD CMP#ASC"L":BNE PL:JSRmload:LDA#12:JSR&FFEE:LDA#26:JSR&FFEE:JMPintro
  580.PL CMP#ASC"P":BNE SP:RTS
  590.SP CMP#49:BCCrdch
  600CMP#52:BCSrdch
  610SEC:SBC#48
  620ASL A:ASL A:ASL A:ASL A:ASL A:ASL A
  630SBC#56
  640STAspd:JMPrdch
  650LDA#12:JSR&FFEE
  660JMP&FFE0
  670RTS
  680.init LDA#0:STAlev%:STAdigits:STAdigits+1:STAea%:STAsq%:STAdi%:STAmaxea%:STAmaxsq%:STAmaxdi%:LDA#3:STAli%:LDA#0:STA&70:LDA#&53:STA&71
  690JSRenvs
  700LDX#0:LDY#0
  710.lop LDA#&E0:STA(&70),Y:INY:BNElop
  720INC&71:INX:CPX#4:BNElop
  730LDA#0:STA&70:LDA#&57:STA&71:LDY#0
  740.lop1 LDA#&E5:STA(&70),Y:INY:BNElop1:RTS
  750.sdoff LDA#210:LDX#1:LDY#0:JMP&FFF4
  760.sdon LDA#210:LDX#0:LDY#0:JMP&FFF4
  770.sond1 PHA:TXA:PHA:TYA:PHA:LDX#sou1 MOD256:LDY#sou1 DIV256:LDA#7:JSR&FFF1:PLA:TAY:PLA:TAX:PLA:RTS
  780.sond2 PHA:TXA:PHA:TYA:PHA:LDX#sou2 MOD256:LDY#sou2 DIV256:LDA#7:JSR&FFF1:PLA:TAY:PLA:TAX:PLA:RTS
  790.sond3 PHA:TXA:PHA:TYA:PHA:LDX#sou3 MOD256:LDY#sou3 DIV256:LDA#7:JSR&FFF1:PLA:TAY:PLA:TAX:PLA:RTS
  800.sond4 PHA:TXA:PHA:TYA:PHA:LDX#sou4 MOD256:LDY#sou4 DIV256:LDA#7:JSR&FFF1:PLA:TAY:PLA:TAX:PLA:RTS
  810.sond5 PHA:TXA:PHA:TYA:PHA:LDX#sou5 MOD256:LDY#sou5 DIV256:LDA#7:JSR&FFF1:PLA:TAY:PLA:TAX:PLA:RTS
  820.sond6 PHA:TXA:PHA:TYA:PHA:LDX#sou6 MOD256:LDY#sou6 DIV256:LDA#7:JSR&FFF1:PLA:TAY:PLA:TAX:PLA:RTS
  830.envs LDX#env1 MOD256:LDY#env1 DIV256:LDA#8:JSR&FFF1
  840LDX#env2 MOD256:LDY#env2 DIV256:LDA#8:JSR&FFF1
  850LDX#env3 MOD256:LDY#env3 DIV256:LDA#8:JMP&FFF1
  860.delsp PHA:TXA:PHA:TYA:PHA:LDAspd:JMPdel
  870.dels PHA:TXA:PHA:TYA:PHA:LDA#12:JMPdel
  880.dell PHA:TXA:PHA:TYA:PHA:LDA#255:.del TAX NOP:NOP:NOP:NOP:NOP:NOP:NOP:NOP:NOP:NOP:.del1 LDY#255:.del2 DEY:BNEdel2:DEX:BNEdel2:PLA:TAY:PLA:TAX:PLA:RTS
  890.lives LDX#24:.lop LDA&1E20,X:STA&5A38,X:LDA&1E38,X:STA&5B78,X:DEX:BNElop
  900LDAli%:CLC:ADC#48:STAdat+1
  910LDA#17:JSR&FFEE:LDA#3:JSR&FFEE:LDX#17:LDY#1:LDA#0:STA&70:LDA#31:JSR&FFEE:TXA:JSR&FFEE:TYA:JSR&FFEE
  920LDX#dat MOD256:LDY#dat DIV256:JMPdh
  930.lev INClev%:LDA#0:STAdata:LDA#&57:STAdata+1:LDA#&90:STAaddr:LDA#&63:STAaddr+1:JSR S%
  940LDA#29:LDX#d3 MOD256:LDY#d3 DIV256:JSRp
  950LDAlev%:ADC#48:JSR&FFEE:RTS
  960.load LDAlev%:ASL A:TAX:DEX:DEX:LDAtable,X:STA&70:LDAtable+1,X:STA&71:LDA#&4B:STA&72:LDA#&53:STA&73
  970LDX#0:.ls2 LDY#0:.ls1 LDA(&70),Y:CLC:ADC#159
  980CMP#232:BNEddd:JSRkyaddr:.ddd
  990CMP#231:BEQmd:CMP#226:BNEsqa:.md:INCmaxdi%:.sqa CMP#227:BNEear:INCmaxsq%:.ear CMP#228:BNEmxs:INCmaxea%:.mxs
 1000CMP#230:BNEnex:JSRset:.nex
 1010STA(&72),Y:INY:CPY#18:BNEls1:CLC:LDA&70:ADC#18:STA&70:LDA&71:ADC#0:STA&71:CLC:LDA&72:ADC#24:STA&72:LDA&73:ADC#0:STA&73:INX:CPX#25:BNEls2:LDAlev%:CMP#2:BNEendld:INCsq%:.endld RTS
 1020.set PHA:TXA:PHA:TYA:PHA:INY:STY MX%:INX:INX:INX:INX:STX MY%:PLA:TAY:PLA:TAX:PLA:RTS
 1030.set2 PHA:TXA:PHA:TYA:PHA:INY:STY x%:INX:INX:INX:INX:STX y%:PLA:TAY:PLA:TAX:PLA:RTS
 1040.sc1 SED:CLC:LDAdigits+1:ADC#3:JMPsc
 1050.sc2 JSRsond4:SED:CLC:LDAdigits+1:ADC#10
 1060.sc STAdigits+1:LDAdigits:ADC#0:STAdigits:CLD:LDA#17:JSR&FFEE:LDA#3:JSR&FFEE:LDA#31:JSR&FFEE:LDA#2:JSR&FFEE:LDA#&FFEE:LDAdigits:JSRprint1:LDAdigits+1:.print1 STAtemp:LSRA:LSRA:LSRA:LSRA:JSRnumber:LDAtemp
 1070.number AND#&0F:CLC:ADC#48:JMP&FFEE
 1080.calc LDA#&9F:STA D%:LDA#&52:STA D%+1:LDA MX%:STAx%:LDA MY%:STAy%:JSRcal:CLC:LDA D%:ADC&62:STA D%:LDA D%+1:ADC&63:STAD%+1:RTS
 1090.cal LDA y%:STA&60:LDA#24:STA&61:.mult LDX#8:LDA#0:.again LSR&61:BCCover:CLC:ADC&60:.over:ROR A:ROR&62:DEX:BNEagain:STA&63:CLC:LDA &62:ADCx%:STA&62:LDA&63:ADC#0:STA&63:RTS
 1100.prt LDA#31:JSR&FFEE:TXA:JSR&FFEE:TYA:JSR&FFEE:LDA&70:CMP#10:BCCu:CMP#100:BCCt:LDA&70:LDX#0:SEC:.hs SBC#100:INX:BCShs:ADC#100:DEX:STA&70:TXA:CLC:ADC#48:JSR&FFEE
 1110.t LDA&70:LDX#0:SEC:.ts SBC#10:INX:BCSts:ADC#10:DEX:STA&70:TXA:CLC:ADC#48:JSR&FFEE
 1120.u LDA&70:CLC:ADC#48:JSR&FFEE:LDA#32:JSR&FFEE:JMP&FFEE
 1130.di LDX#11:LDY#26:LDAmaxdi%:SEC:SBCdi%:STA&70:JMPprt
 1140.ea LDX#11:LDY#28:LDAmaxea%:SEC:SBCea%:STA&70:JMPprt
 1150.sq LDX#11:LDY#30:LDAmaxsq%:SEC:SBCsq%:STA&70:JMPprt
 1160.ki LDX#0:LDA(kad,X):CMP#232:BNEki1:LDA#233:STA(kad,X):LDA#0:STAcn%:RTS
 1170.ki1 CMP#233:BNEki2:LDA#232:STA(kad,X):LDA#0:STAcn%:RTS
 1180.ki2 LDA#0:STAcn%:STAkt%:RTS
 1190.kyaddr PHA:TXA:PHA:TYA:PHA:INY:STY x%:INX:INX:INX:INX:STX y%:LDA#&EA:STAkad:LDA#&52:STAkad+1:JSRcal:CLC:LDAkad:ADC&62:STAkad:LDAkad+1:ADC&63:STAkad+1:LDA#&FF:STAkt%:PLA:TAY:PLA:TAX:PLA:RTS
 1200.eas LDXea%:INX:STXea%:JMPsc1
 1210.dis LDXdi%:INX:STXdi%:JMPsc2
 1220.chk1 LDA&8A:BEQmdd:JSRsond3:.mdd LDA&7E:BEQsqchk:LDA#229:STAtemp:LDY#48:STYtempy:JSRded:.sqchk LDA&7F:BEQchksq:INCsq%:JSRsond6:.chksq LDAsq%:CMPmaxsq%:BNEchend:LDAea%:CMPmaxea%:BNEchend:LDAdi%:CMPmaxdi%:BNEchend
 1230LDA#&FF:STAlvend:.chend RTS
 1240.ss% LDA D%:STAdata:LDA D%+1:STAdata+1:LDA#&90:STAaddr:LDA#&63:STAaddr+1:JSR S%:RTS
 1250.ded STAtemp:STYtempy:JSRsond5:LDA#229:LDY#48:STA(mp),Y:LDX#5:.lpp STX&6A:LDAtemp:LDYtempy:STA(mp),Y:JSRss%:JSRdels:LDA#230:LDYtempy:STA(mp),Y:JSRss%:JSRdels:LDX&6A:DEX:CPX#0:BNElpp:LDAtemp:LDYtempy:STA(mp),Y
 1260INCdeadman:DECli%:RTS
 1270.move LDA#129:LDX#&97:LDY#&FF:JSR&FFF4:CPY#0:BEQup:JSRmvdn
 1280.up LDA#129:LDX#&B7:LDY#&FF:JSR&FFF4:CPY#0:BEQlt:JSRmvup
 1290.lt LDA#129:LDX#&9E:LDY#&FF:JSR&FFF4:CPY#0:BEQrt:JSRmvlt
 1300.rt LDA#129:LDX#&BD:LDY#&FF:JSR&FFF4:CPY#0:BEQsoff:JSRmvrt
 1310.soff LDA#129:LDX#&EF:LDY#&FF:JSR&FFF4:CPY#0:BEQson:JSRsdoff
 1320.son LDA#129:LDX#&AE:LDY#&FF:JSR&FFF4:CPY#0:BEQesc:JSRsdon
 1330.esc LDA#129:LDX#&8F:LDY#&FF:JSR&FFF4:CPY#0:BEQmend:LDA#229:STAtemp:LDY#48:STAtempy:JSRded:.mend RTS
 1340.mvdn JSRmpos:LDY#72:LDA(mp),Y:CMP#231:BEQndn:BCSchgd:CMP#224:BEQndn:CMP#225:BEQndn:CMP#227:BNEdd:JMPded:.dd CMP#226:BNEed:JSRdis:.ed CMP#228:BNEmvd:BNEmvd:JSReas:JMPmvd:.chgd JSR T%:JSRsond2
 1350.mvd JSRmpos:LDY#48:LDA#229:STA(mp),Y:INC MY%:JSRmpos:LDY#48:LDA#230:STA(mp),Y:CLC:LDA D%:ADC#24:STA D%:LDA D%+1:ADC#0:STA D%+1:.ndn RTS
 1360.mvup JSRmpos:LDY#24:LDA(mp),Y:CMP#231:BEQnup:BCSchgu:CMP#224:BEQnup:CMP#225:BEQnup:CMP#227:BNEdu:JMPded:.du CMP#226:BNEeu:JSRdis:.eu CMP#228:BNEmvu:BNEmvu:JSReas:JMPmvu:.chgu JSR T%:JSRsond2
 1370.mvu JSRmpos:LDY#48:LDA#229:STA(mp),Y:DEC MY%:JSRmpos:LDY#48:LDA#230:STA(mp),Y:SEC:LDA D%:SBC#24:STA D%:LDA D%+1:SBC#0:STA D%+1:.nup RTS
 1380.mvlt JSRmpos:LDY#47:LDA(mp),Y:CMP#231:BEQnlt:BCSchgl:CMP#224:BEQnlt:CMP#225:BNEml:JMPrlt:.ml CMP#227:BNEdl:JMPded:.dl CMP#226:BNEel:JSRdis:.el CMP#228:BNEmvl:JSReas:JMPmvl:.chgl JSR T%:JSRsond2
 1390.mvl JSRmpos:LDY#48:LDA#229:STA(mp),Y:DEC MX%:JSRmpos:LDY#48:LDA#230:STA(mp),Y:SEC:LDA D%:SBC#1:STA D%:LDA D%+1:SBC#0:STA D%+1:.nlt RTS
 1400.rlt LDY#46:LDA(mp),Y:CMP#229:BNEnlt:LDA#225:STA(mp),Y:JSRsond3:JMPmvl
 1410.mvrt JSRmpos:LDY#49:LDA(mp),Y:CMP#231:BEQnrt:BCSchgr:CMP#224:BEQnrt:CMP#225:BNEmr:JMPrrt:.mr CMP#227:BNEdr:JMPded:.dr CMP#226:BNEer:JSRdis:.er CMP#228:BNEmvr:JSReas:JMPmvr:.chgr JSR T%:JSRsond2
 1420.mvr JSRmpos:LDY#48:LDA#229:STA(mp),Y:INC MX%:JSRmpos:LDY#48:LDA#230:STA(mp),Y:CLC:LDA D%:ADC#1:STA D%:LDA D%+1:ADC#0:STA D%+1:.nrt RTS
 1430.rrt LDY#50:LDA(mp),Y:CMP#229:BNEnrt:LDA#225:STA(mp),Y:JSRsond3:JMPmvr
 1440.mpos LDA#&BA:STAmp:LDA#&52:STAmp+1:LDA MX%:STAx%:LDA MY%:STAy%:JSRcal:CLC:LDAmp:ADC&62:STAmp:LDAmp+1:ADC&63:STAmp+1:RTS
 1450.rep LDA#129:LDX#&9D:LDY#&FF:JSR&FFF4:CPX#0:BEQrep:RTS
 1460.gamend LDA#14:LDX#4:JSR&FFF4:LDA#83:LDX#endat1 MOD256:LDY#endat1 DIV256:JSRp:.rdc LDA#15:LDX#0:JSR&FFF4:JSR&FFE0:CMP#ASC"Y":BEQyes:CMP#ASC"N":BEQno:JMPrdc
 1470.yes LDA#15:LDX#0:JSR&FFF4:JMPstart
 1480.no RTS
 1490.mload
 1500LDA#79:LDX#mldat MOD256:LDY#mldat DIV256:JSRp
 1510.rd JSR&FFE0
 1520CMP#49:BCCrd
 1530CMP#55:BCSrd
 1540STAldmess+7:STAldmaze+9
 1550LDA#18:LDX#ldmess MOD256:LDY#ldmess DIV256:JSRp
 1560LDX#ldmaze MOD256:LDY#ldmaze DIV256:JSR&FFF7
 1570RTS
 1580.D% EQUW0:.sd% EQUW0:.li% EQUB0:.lev% EQUB0:.SC% EQUW0:.ea% EQUB0:.sq% EQUB0:.di% EQUB0:.maxdi% EQUB0:.maxsq% EQUB0:.maxea% EQUB0:.kt% EQUB0:.cn% EQUB0:.lvend EQUB0:.deadman EQUB0
 1590.MX% EQUB0:.MY% EQUB0:.smx% EQUB0:.smy% EQUB0
 1600.temp EQUB0:.tempy EQUB0:.digits EQUW0:.score EQUW0
 1610.x% EQUB0:.y% EQUB0:.v% EQUW0
 1620.dat1 EQUB22:EQUB5:EQUB23:EQUB1:EQUD0:EQUD0:EQUB19:EQUB3:EQUW2:EQUW0:EQUB17:EQUB1:EQUB31:EQUB5:EQUB5
 1630.title EQUS"MR MINER"+CHR$13
 1640.dat2 EQUB23:EQUB250:EQUB0:EQUB-1:EQUB0:EQUB-1:EQUD0:EQUB17:EQUB2:EQUB31:EQUB5:EQUB7
 1650.ul EQUS STRING$(8,CHR$250)+CHR$13
 1660.dat3 EQUB17:EQUB3
 1670EQUB31:EQUB0:EQUB11
 1680EQUS"Sound, Off/On  Q/S"
 1690EQUB31:EQUB0:EQUB14
 1700EQUS"Speed (1=fast) 1/2/3"
 1710EQUB31:EQUB0:EQUB17
 1720EQUS"Load maze file L"
 1730EQUB31:EQUB0:EQUB20
 1740EQUS"Play Game      P"
 1750EQUB17:EQUB2:EQUB31:EQUB5:EQUB24
 1760.d2 EQUB24:EQUW32:EQUW16:EQUW1247:EQUW208:EQUB16:EQUB24:EQUW32:EQUW920:EQUW1247:EQUW994:EQUB16:EQUB26
 1770EQUB31:EQUB1:EQUB1:EQUS"Score"
 1780EQUB31:EQUB2:EQUB26:EQUS"Diamonds:"
 1790EQUB31:EQUB5:EQUB28:EQUS"Earth:"
 1800EQUB31:EQUB1:EQUB30:EQUS"Mushrooms:"
 1810EQUB24:EQUW316:EQUW284:EQUW992:EQUW742:EQUB16:EQUB26:EQUB25:EQUB4:EQUW316:EQUW742:EQUB25:EQUB5:EQUW316:EQUW284:EQUB25:EQUB5:EQUW992:EQUW284:EQUB25:EQUB5:EQUW992:EQUW742:EQUB25:EQUB5:EQUW324:EQUW742
 1820.d4 EQUB31:EQUB1:EQUB2:EQUS"00000"
 1830.d3 EQUB5:EQUB25:EQUB4:EQUW407:EQUW520:EQUS"Thinking"
 1840EQUB4:EQUB17:EQUB1:EQUB31:EQUB9:EQUB1:EQUS"LEVEL":EQUB31:EQUB11:EQUB2
 1850.env1 EQUB1:EQUB4:EQUB5:EQUB6:EQUB7:EQUB8:EQUB9:EQUB10:EQUB126:EQUB0:EQUB0:EQUB-126:EQUB126:EQUB126
 1860.env2 EQUB2:EQUB2:EQUB17:EQUB-6:EQUB23:EQUB17:EQUB28:EQUB2:EQUB126:EQUB0:EQUB0:EQUB-126:EQUB126:EQUB126
 1870.env3 EQUB3:EQUB2:EQUB2:EQUB0:EQUB0:EQUB180:EQUB0:EQUB0:EQUB126:EQUB0:EQUB0:EQUB-126:EQUB126:EQUB126
 1880.sou1 EQUW1:EQUW3:EQUW0:EQUW9
 1890.sou2 EQUW&11:EQUW2:EQUW150:EQUW3
 1900.sou3 EQUW&10:EQUW-15:EQUW6:EQUW2
 1910.sou4 EQUW&11:EQUW1:EQUW160:EQUW2
 1920.sou5 EQUW&10:EQUW-15:EQUW4:EQUW15
 1930.sou6 EQUW0:EQUW-15:EQUW4:EQUW1
 1940.dat EQUS"=3":EQUB13
 1950.table EQUW&1EE0:EQUW&20A2:EQUW&2264:EQUW&2426:EQUW&25E8
 1960.endat EQUB5:EQUB25:EQUB4:EQUW375:EQUW552:EQUS"Game Over"
 1970EQUB25:EQUB4:EQUW375:EQUW432:EQUS"Hit Space"
 1980.endat1 EQUB12:EQUB31:EQUB7:EQUB8:EQUS"HURRAY":EQUB17:EQUB2:EQUB31:EQUB7:EQUB9:EQUS STRING$(6,CHR$250)
 1990EQUB17:EQUB3:EQUB31:EQUB2:EQUB11:EQUS"YOU HAVE ESCAPED":EQUB31:EQUB2:EQUB13:EQUS"THIS TIME....."
 2000EQUB31:EQUB3:EQUB20:EQUS"Another game?"
 2010EQUB31:EQUB7:EQUB22:EQUS"(Y/N)"
 2020.mldat EQUB17:EQUB3:EQUB28:EQUB0:EQUB22:EQUB19:EQUB10:EQUB12
 2030EQUB31:EQUB5:EQUB0:EQUS"LOAD FILE"
 2040EQUB31:EQUB5:EQUB1:EQUS STRING$(9,CHR$250)
 2050EQUB31:EQUB1:EQUB3:EQUS"Files are MAZE1-5"
 2060EQUB31:EQUB2:EQUB5:EQUS"Press number of"
 2070EQUB31:EQUB6:EQUB7:EQUS"choice"
 2080.ldmess EQUB31:EQUB2:EQUB10:EQUS"MAZE  loading.."
 2090.ldmaze EQUS"LOAD MAZE  1EE0"+CHR$13
 2100]
 2110NEXT:ENDPROC


� MINsrc2 (For Mr Miner)
a� Additional coding by Richard Dimond for Mr Miner by Mark Bolton & Alastair King (EU Sep 87)
� November 1995
(�
2 �<&1D00 ��=&1D00:�"MINsrc2"
<�ass
F.�"SAVE MIN2 E00 "+�~O%+" "+�~start+" 2B7D"
P�
Z	��ass
d'R%=&2A58:S%=&28E2:T%=&2B46:Z%=&2885
naddr=&76:data=&7A
� xc=&74:yc=&75:mp=&68:kad=&96
�*kd=&7E:sqd=&7F:fell=&8A:spd=&8F:db=&80
�
�I%=4�6�2
�P%=&2B7D:O%=&E00
�
[OPTI%
�
.start
�+LDA#Z% �256:STA&220:LDA#Z% �256:STA&221
�OLDA#23:LDX#dat1 �256:LDY#dat1 �256:JSRp:LDX#title �256:LDY#title �256:JSRdh
�ILDA#15:LDX#dat2 �256:LDY#dat2 �256:JSRp:LDX#ul �256:LDY#ul �256:JSRdh
�P.intro LDA#89:LDX#dat3 �256:LDY#dat3 �256:JSRp:LDX#ul �256:LDY#ul �256:JSRdh
�"LDA#17:JSR&FFEE:LDA#3:JSR&FFEE
�LDA#71:STAspd
�
JSRchoose
0LDA#90:STA&358:LDA#12:JSR&FFEE:LDA#0:STA&358
'LDA#74:LDX#d2 �256:LDY#d2 �256:JSRp
l.st1 JSRinit:LDA#8:LDX#d4 �256:LDY#d4 �256:JSRp:JSRlives:.st2 JSRlev:LDAlev%:CMP#6:BNElod:JMPgamend:.lod
"JSRdell:JSRdell:JSRdell
,JSRload
6LDA#13:LDX#4:JSR&FFF4
@KJSRcalc:LDA D%:STAsd%:LDA D%+1:STAsd%+1:LDA MX%:STAsmx%:LDA MY%:STAsmy%
JJSRsond1
T.game:JSRlives:.game1
^JSR R%:JSRss%
hJSRdelsp
rJSRdi:JSRea:JSRsq
|;LDAkt%:BEQfin:LDXcn%:INX:STXcn%:CPX#5:BNEfin:JSRki:.fin
��JSRchk1:LDAlvend:BNEnexlev:LDAdeadman:BNElose:JSR move:LDAli%:BEQendgame:JMPgame1:.lose LDA#0:STAdeadman:LDAsmx%:STA MX%:LDAsmy%:STA MY%:LDAsd%:STA D%:LDAsd%+1:STA D%+1:JSRmpos:LDY#48:LDA#230:STA(mp),Y:JMPgame
��.nexlev LDA#0:STAlvend:STAea%:STAsq%:STAdi%:STAmaxea%:STAmaxsq%:STAmaxdi%:STAdeadman:LDA#0:STAdata:LDA#&57:STAdata+1:LDA#&90:STAaddr:LDA#&63:STAaddr+1:JSR S%:JMPst2
�.endgame
�UJSRlives:LDA#0:STAdata:LDA#&57:STAdata+1:LDA#&90:STAaddr:LDA#&63:STAaddr+1:JSR S%
�-LDA#31:LDX#endat �256:LDY#endat �256:JSRp
�LDA#14:LDX#4:JSR&FFF4
�JSRrep:LDA#4:JSR&FFEE
�/LDA#13:LDX#4:JSR&FFF4:LDA#15:LDX#0:JSR&FFF4
�
JMPst1
�.p STX&70:STY&71:TAX:LDY#0
�-.lp LDA(&70),Y:JSR&FFEE:INY:DEX:BNElp:RTS
�V.dh STXdb:STYdb+1:LDA#0:STA&70:.b1 LDY&70:LDA(db),Y:CMP#13:BEQb3:STA&71:INY:STY&70
�fLDX#&71:LDY#0:LDA#10:JSR&FFF1:LDX#1:LDY#0:.b2 LDA&71,X:STA&CF0,Y:INY:STA&CF0,Y:INY:INX:CPX#9:BNEb2
bLDA#254:JSR&FFEE:LDA#8:JSR&FFEE:LDA#10:JSR&FFEE:LDA#255:JSR&FFEE:LDA#11:JSR&FFEE:JMPb1:.b3 RTS
.choose
.rdch JSR&FFE0
&(.QT CMP#�"Q":BNE SD:JSRsdoff:JMPrdch
0'.SD CMP#�"S":BNE LD:JSRsdon:JMPrdch
:I.LD CMP#�"L":BNE PL:JSRmload:LDA#12:JSR&FFEE:LDA#26:JSR&FFEE:JMPintro
D.PL CMP#�"P":BNE SP:RTS
N.SP CMP#49:BCCrdch
XCMP#52:BCSrdch
bSEC:SBC#48
l'ASL A:ASL A:ASL A:ASL A:ASL A:ASL A
v
SBC#56
�STAspd:JMPrdch
�LDA#12:JSR&FFEE
�JMP&FFE0
�RTS
��.init LDA#0:STAlev%:STAdigits:STAdigits+1:STAea%:STAsq%:STAdi%:STAmaxea%:STAmaxsq%:STAmaxdi%:LDA#3:STAli%:LDA#0:STA&70:LDA#&53:STA&71
�JSRenvs
�LDX#0:LDY#0
�&.lop LDA#&E0:STA(&70),Y:INY:BNElop
�INC&71:INX:CPX#4:BNElop
�%LDA#0:STA&70:LDA#&57:STA&71:LDY#0
�,.lop1 LDA#&E5:STA(&70),Y:INY:BNElop1:RTS
�'.sdoff LDA#210:LDX#1:LDY#0:JMP&FFF4
�&.sdon LDA#210:LDX#0:LDY#0:JMP&FFF4
a.sond1 PHA:TXA:PHA:TYA:PHA:LDX#sou1 �256:LDY#sou1 �256:LDA#7:JSR&FFF1:PLA:TAY:PLA:TAX:PLA:RTS
a.sond2 PHA:TXA:PHA:TYA:PHA:LDX#sou2 �256:LDY#sou2 �256:LDA#7:JSR&FFF1:PLA:TAY:PLA:TAX:PLA:RTS
a.sond3 PHA:TXA:PHA:TYA:PHA:LDX#sou3 �256:LDY#sou3 �256:LDA#7:JSR&FFF1:PLA:TAY:PLA:TAX:PLA:RTS
 a.sond4 PHA:TXA:PHA:TYA:PHA:LDX#sou4 �256:LDY#sou4 �256:LDA#7:JSR&FFF1:PLA:TAY:PLA:TAX:PLA:RTS
*a.sond5 PHA:TXA:PHA:TYA:PHA:LDX#sou5 �256:LDY#sou5 �256:LDA#7:JSR&FFF1:PLA:TAY:PLA:TAX:PLA:RTS
4a.sond6 PHA:TXA:PHA:TYA:PHA:LDX#sou6 �256:LDY#sou6 �256:LDA#7:JSR&FFF1:PLA:TAY:PLA:TAX:PLA:RTS
>4.envs LDX#env1 �256:LDY#env1 �256:LDA#8:JSR&FFF1
H.LDX#env2 �256:LDY#env2 �256:LDA#8:JSR&FFF1
R.LDX#env3 �256:LDY#env3 �256:LDA#8:JMP&FFF1
\,.delsp PHA:TXA:PHA:TYA:PHA:LDAspd:JMPdel
f+.dels PHA:TXA:PHA:TYA:PHA:LDA#12:JMPdel
p�.dell PHA:TXA:PHA:TYA:PHA:LDA#255:.del TAX NOP:NOP:NOP:NOP:NOP:NOP:NOP:NOP:NOP:NOP:.del1 LDY#255:.del2 DEY:BNEdel2:DEX:BNEdel2:PLA:TAY:PLA:TAX:PLA:RTS
zM.lives LDX#24:.lop LDA&1E20,X:STA&5A38,X:LDA&1E38,X:STA&5B78,X:DEX:BNElop
�LDAli%:CLC:ADC#48:STAdat+1
�fLDA#17:JSR&FFEE:LDA#3:JSR&FFEE:LDX#17:LDY#1:LDA#0:STA&70:LDA#31:JSR&FFEE:TXA:JSR&FFEE:TYA:JSR&FFEE
�#LDX#dat �256:LDY#dat �256:JMPdh
�Y.lev INClev%:LDA#0:STAdata:LDA#&57:STAdata+1:LDA#&90:STAaddr:LDA#&63:STAaddr+1:JSR S%
�'LDA#29:LDX#d3 �256:LDY#d3 �256:JSRp
�LDAlev%:ADC#48:JSR&FFEE:RTS
�g.load LDAlev%:ASL A:TAX:DEX:DEX:LDAtable,X:STA&70:LDAtable+1,X:STA&71:LDA#&4B:STA&72:LDA#&53:STA&73
�0LDX#0:.ls2 LDY#0:.ls1 LDA(&70),Y:CLC:ADC#159
�!CMP#232:BNEddd:JSRkyaddr:.ddd
�oCMP#231:BEQmd:CMP#226:BNEsqa:.md:INCmaxdi%:.sqa CMP#227:BNEear:INCmaxsq%:.ear CMP#228:BNEmxs:INCmaxea%:.mxs
�CMP#230:BNEnex:JSRset:.nex
�STA(&72),Y:INY:CPY#18:BNEls1:CLC:LDA&70:ADC#18:STA&70:LDA&71:ADC#0:STA&71:CLC:LDA&72:ADC#24:STA&72:LDA&73:ADC#0:STA&73:INX:CPX#25:BNEls2:LDAlev%:CMP#2:BNEendld:INCsq%:.endld RTS
�X.set PHA:TXA:PHA:TYA:PHA:INY:STY MX%:INX:INX:INX:INX:STX MY%:PLA:TAY:PLA:TAX:PLA:RTS
W.set2 PHA:TXA:PHA:TYA:PHA:INY:STY x%:INX:INX:INX:INX:STX y%:PLA:TAY:PLA:TAX:PLA:RTS
(.sc1 SED:CLC:LDAdigits+1:ADC#3:JMPsc
,.sc2 JSRsond4:SED:CLC:LDAdigits+1:ADC#10
$�.sc STAdigits+1:LDAdigits:ADC#0:STAdigits:CLD:LDA#17:JSR&FFEE:LDA#3:JSR&FFEE:LDA#31:JSR&FFEE:LDA#2:JSR&FFEE:LDA#&FFEE:LDAdigits:JSRprint1:LDAdigits+1:.print1 STAtemp:LSRA:LSRA:LSRA:LSRA:JSRnumber:LDAtemp
.%.number �#&0F:CLC:ADC#48:JMP&FFEE
8�.calc LDA#&9F:STA D%:LDA#&52:STA D%+1:LDA MX%:STAx%:LDA MY%:STAy%:JSRcal:CLC:LDA D%:ADC&62:STA D%:LDA D%+1:ADC&63:STAD%+1:RTS
B�.cal LDA y%:STA&60:LDA#24:STA&61:.mult LDX#8:LDA#0:.again LSR&61:BCCover:CLC:ADC&60:.over:ROR A:ROR&62:DEX:BNEagain:STA&63:CLC:LDA &62:ADCx%:STA&62:LDA&63:ADC#0:STA&63:RTS
L�.prt LDA#31:JSR&FFEE:TXA:JSR&FFEE:TYA:JSR&FFEE:LDA&70:CMP#10:BCCu:CMP#100:BCCt:LDA&70:LDX#0:SEC:.hs SBC#100:INX:BCShs:ADC#100:DEX:STA&70:TXA:CLC:ADC#48:JSR&FFEE
VV.t LDA&70:LDX#0:SEC:.ts SBC#10:INX:BCSts:ADC#10:DEX:STA&70:TXA:CLC:ADC#48:JSR&FFEE
`:.u LDA&70:CLC:ADC#48:JSR&FFEE:LDA#32:JSR&FFEE:JMP&FFEE
j8.di LDX#11:LDY#26:LDAmaxdi%:SEC:SBCdi%:STA&70:JMPprt
t8.ea LDX#11:LDY#28:LDAmaxea%:SEC:SBCea%:STA&70:JMPprt
~8.sq LDX#11:LDY#30:LDAmaxsq%:SEC:SBCsq%:STA&70:JMPprt
�K.ki LDX#0:LDA(kad,X):CMP#232:BNEki1:LDA#233:STA(kad,X):LDA#0:STAcn%:RTS
�;.ki1 CMP#233:BNEki2:LDA#232:STA(kad,X):LDA#0:STAcn%:RTS
� .ki2 LDA#0:STAcn%:STAkt%:RTS
��.kyaddr PHA:TXA:PHA:TYA:PHA:INY:STY x%:INX:INX:INX:INX:STX y%:LDA#&EA:STAkad:LDA#&52:STAkad+1:JSRcal:CLC:LDAkad:ADC&62:STAkad:LDAkad+1:ADC&63:STAkad+1:LDA#&FF:STAkt%:PLA:TAY:PLA:TAX:PLA:RTS
�!.eas LDXea%:INX:STXea%:JMPsc1
�!.dis LDXdi%:INX:STXdi%:JMPsc2
��.chk1 LDA&8A:BEQmdd:JSRsond3:.mdd LDA&7E:BEQsqchk:LDA#229:STAtemp:LDY#48:STYtempy:JSRded:.sqchk LDA&7F:BEQchksq:INCsq%:JSRsond6:.chksq LDAsq%:CMPmaxsq%:BNEchend:LDAea%:CMPmaxea%:BNEchend:LDAdi%:CMPmaxdi%:BNEchend
�LDA#&FF:STAlvend:.chend RTS
�W.ss% LDA D%:STAdata:LDA D%+1:STAdata+1:LDA#&90:STAaddr:LDA#&63:STAaddr+1:JSR S%:RTS
��.ded STAtemp:STYtempy:JSRsond5:LDA#229:LDY#48:STA(mp),Y:LDX#5:.lpp STX&6A:LDAtemp:LDYtempy:STA(mp),Y:JSRss%:JSRdels:LDA#230:LDYtempy:STA(mp),Y:JSRss%:JSRdels:LDX&6A:DEX:CPX#0:BNElpp:LDAtemp:LDYtempy:STA(mp),Y
�INCdeadman:DECli%:RTS
�>.move LDA#129:LDX#&97:LDY#&FF:JSR&FFF4:CPY#0:BEQup:JSRmvdn
<.up LDA#129:LDX#&B7:LDY#&FF:JSR&FFF4:CPY#0:BEQlt:JSRmvup

<.lt LDA#129:LDX#&9E:LDY#&FF:JSR&FFF4:CPY#0:BEQrt:JSRmvlt
>.rt LDA#129:LDX#&BD:LDY#&FF:JSR&FFF4:CPY#0:BEQsoff:JSRmvrt
@.soff LDA#129:LDX#&EF:LDY#&FF:JSR&FFF4:CPY#0:BEQson:JSRsdoff
(>.son LDA#129:LDX#&AE:LDY#&FF:JSR&FFF4:CPY#0:BEQesc:JSRsdon
2h.esc LDA#129:LDX#&8F:LDY#&FF:JSR&FFF4:CPY#0:BEQmend:LDA#229:STAtemp:LDY#48:STAtempy:JSRded:.mend RTS
<�.mvdn JSRmpos:LDY#72:LDA(mp),Y:CMP#231:BEQndn:BCSchgd:CMP#224:BEQndn:CMP#225:BEQndn:CMP#227:BNEdd:JMPded:.dd CMP#226:BNEed:JSRdis:.ed CMP#228:BNEmvd:BNEmvd:JSReas:JMPmvd:.chgd JSR T%:JSRsond2
F�.mvd JSRmpos:LDY#48:LDA#229:STA(mp),Y:INC MY%:JSRmpos:LDY#48:LDA#230:STA(mp),Y:CLC:LDA D%:ADC#24:STA D%:LDA D%+1:ADC#0:STA D%+1:.ndn RTS
P�.mvup JSRmpos:LDY#24:LDA(mp),Y:CMP#231:BEQnup:BCSchgu:CMP#224:BEQnup:CMP#225:BEQnup:CMP#227:BNEdu:JMPded:.du CMP#226:BNEeu:JSRdis:.eu CMP#228:BNEmvu:BNEmvu:JSReas:JMPmvu:.chgu JSR T%:JSRsond2
Z�.mvu JSRmpos:LDY#48:LDA#229:STA(mp),Y:DEC MY%:JSRmpos:LDY#48:LDA#230:STA(mp),Y:SEC:LDA D%:SBC#24:STA D%:LDA D%+1:SBC#0:STA D%+1:.nup RTS
d�.mvlt JSRmpos:LDY#47:LDA(mp),Y:CMP#231:BEQnlt:BCSchgl:CMP#224:BEQnlt:CMP#225:BNEml:JMPrlt:.ml CMP#227:BNEdl:JMPded:.dl CMP#226:BNEel:JSRdis:.el CMP#228:BNEmvl:JSReas:JMPmvl:.chgl JSR T%:JSRsond2
n�.mvl JSRmpos:LDY#48:LDA#229:STA(mp),Y:DEC MX%:JSRmpos:LDY#48:LDA#230:STA(mp),Y:SEC:LDA D%:SBC#1:STA D%:LDA D%+1:SBC#0:STA D%+1:.nlt RTS
xJ.rlt LDY#46:LDA(mp),Y:CMP#229:BNEnlt:LDA#225:STA(mp),Y:JSRsond3:JMPmvl
��.mvrt JSRmpos:LDY#49:LDA(mp),Y:CMP#231:BEQnrt:BCSchgr:CMP#224:BEQnrt:CMP#225:BNEmr:JMPrrt:.mr CMP#227:BNEdr:JMPded:.dr CMP#226:BNEer:JSRdis:.er CMP#228:BNEmvr:JSReas:JMPmvr:.chgr JSR T%:JSRsond2
��.mvr JSRmpos:LDY#48:LDA#229:STA(mp),Y:INC MX%:JSRmpos:LDY#48:LDA#230:STA(mp),Y:CLC:LDA D%:ADC#1:STA D%:LDA D%+1:ADC#0:STA D%+1:.nrt RTS
�J.rrt LDY#50:LDA(mp),Y:CMP#229:BNEnrt:LDA#225:STA(mp),Y:JSRsond3:JMPmvr
�|.mpos LDA#&BA:STAmp:LDA#&52:STAmp+1:LDA MX%:STAx%:LDA MY%:STAy%:JSRcal:CLC:LDAmp:ADC&62:STAmp:LDAmp+1:ADC&63:STAmp+1:RTS
�:.rep LDA#129:LDX#&9D:LDY#&FF:JSR&FFF4:CPX#0:BEQrep:RTS
��.gamend LDA#14:LDX#4:JSR&FFF4:LDA#83:LDX#endat1 �256:LDY#endat1 �256:JSRp:.rdc LDA#15:LDX#0:JSR&FFF4:JSR&FFE0:CMP#�"Y":BEQyes:CMP#�"N":BEQno:JMPrdc
�'.yes LDA#15:LDX#0:JSR&FFF4:JMPstart
�.no RTS
�
.mload
�-LDA#79:LDX#mldat �256:LDY#mldat �256:JSRp
�.rd JSR&FFE0
�CMP#49:BCCrd
�CMP#55:BCSrd
STAldmess+7:STAldmaze+9
/LDA#18:LDX#ldmess �256:LDY#ldmess �256:JSRp
,LDX#ldmaze �256:LDY#ldmaze �256:JSR&FFF7
"RTS
,�.D% EQUW0:.sd% EQUW0:.li% EQUB0:.lev% EQUB0:.SC% EQUW0:.ea% EQUB0:.sq% EQUB0:.di% EQUB0:.maxdi% EQUB0:.maxsq% EQUB0:.maxea% EQUB0:.kt% EQUB0:.cn% EQUB0:.lvend EQUB0:.deadman EQUB0
61.MX% EQUB0:.MY% EQUB0:.smx% EQUB0:.smy% EQUB0
@7.temp EQUB0:.tempy EQUB0:.digits EQUW0:.score EQUW0
J!.x% EQUB0:.y% EQUB0:.v% EQUW0
Th.dat1 EQUB22:EQUB5:EQUB23:EQUB1:EQUD0:EQUD0:EQUB19:EQUB3:EQUW2:EQUW0:EQUB17:EQUB1:EQUB31:EQUB5:EQUB5
^.title EQUS"MR MINER"+�13
hX.dat2 EQUB23:EQUB250:EQUB0:EQUB-1:EQUB0:EQUB-1:EQUD0:EQUB17:EQUB2:EQUB31:EQUB5:EQUB7
r.ul EQUS �8,�250)+�13
|.dat3 EQUB17:EQUB3
�EQUB31:EQUB0:EQUB11
�EQUS"Sound, Off/On  Q/S"
�EQUB31:EQUB0:EQUB14
�EQUS"Speed (1=fast) 1/2/3"
�EQUB31:EQUB0:EQUB17
�EQUS"Load maze file L"
�EQUB31:EQUB0:EQUB20
�EQUS"Play Game      P"
�$EQUB17:EQUB2:EQUB31:EQUB5:EQUB24
�i.d2 EQUB24:EQUW32:EQUW16:EQUW1247:EQUW208:EQUB16:EQUB24:EQUW32:EQUW920:EQUW1247:EQUW994:EQUB16:EQUB26
�"EQUB31:EQUB1:EQUB1:EQUS"Score"
�'EQUB31:EQUB2:EQUB26:EQUS"Diamonds:"
�$EQUB31:EQUB5:EQUB28:EQUS"Earth:"
(EQUB31:EQUB1:EQUB30:EQUS"Mushrooms:"
�EQUB24:EQUW316:EQUW284:EQUW992:EQUW742:EQUB16:EQUB26:EQUB25:EQUB4:EQUW316:EQUW742:EQUB25:EQUB5:EQUW316:EQUW284:EQUB25:EQUB5:EQUW992:EQUW284:EQUB25:EQUB5:EQUW992:EQUW742:EQUB25:EQUB5:EQUW324:EQUW742
&.d4 EQUB31:EQUB1:EQUB2:EQUS"00000"
&9.d3 EQUB5:EQUB25:EQUB4:EQUW407:EQUW520:EQUS"Thinking"
0IEQUB4:EQUB17:EQUB1:EQUB31:EQUB9:EQUB1:EQUS"LEVEL":EQUB31:EQUB11:EQUB2
:g.env1 EQUB1:EQUB4:EQUB5:EQUB6:EQUB7:EQUB8:EQUB9:EQUB10:EQUB126:EQUB0:EQUB0:EQUB-126:EQUB126:EQUB126
Dk.env2 EQUB2:EQUB2:EQUB17:EQUB-6:EQUB23:EQUB17:EQUB28:EQUB2:EQUB126:EQUB0:EQUB0:EQUB-126:EQUB126:EQUB126
Nh.env3 EQUB3:EQUB2:EQUB2:EQUB0:EQUB0:EQUB180:EQUB0:EQUB0:EQUB126:EQUB0:EQUB0:EQUB-126:EQUB126:EQUB126
X!.sou1 EQUW1:EQUW3:EQUW0:EQUW9
b%.sou2 EQUW&11:EQUW2:EQUW150:EQUW3
l%.sou3 EQUW&10:EQUW-15:EQUW6:EQUW2
v%.sou4 EQUW&11:EQUW1:EQUW160:EQUW2
�&.sou5 EQUW&10:EQUW-15:EQUW4:EQUW15
�#.sou6 EQUW0:EQUW-15:EQUW4:EQUW1
�.dat EQUS"=3":EQUB13
�<.table EQUW&1EE0:EQUW&20A2:EQUW&2264:EQUW&2426:EQUW&25E8
�=.endat EQUB5:EQUB25:EQUB4:EQUW375:EQUW552:EQUS"Game Over"
�0EQUB25:EQUB4:EQUW375:EQUW432:EQUS"Hit Space"
�`.endat1 EQUB12:EQUB31:EQUB7:EQUB8:EQUS"HURRAY":EQUB17:EQUB2:EQUB31:EQUB7:EQUB9:EQUS �6,�250)
�dEQUB17:EQUB3:EQUB31:EQUB2:EQUB11:EQUS"YOU HAVE ESCAPED":EQUB31:EQUB2:EQUB13:EQUS"THIS TIME....."
�+EQUB31:EQUB3:EQUB20:EQUS"Another game?"
�#EQUB31:EQUB7:EQUB22:EQUS"(Y/N)"
�@.mldat EQUB17:EQUB3:EQUB28:EQUB0:EQUB22:EQUB19:EQUB10:EQUB12
�&EQUB31:EQUB5:EQUB0:EQUS"LOAD FILE"
�$EQUB31:EQUB5:EQUB1:EQUS �9,�250)
.EQUB31:EQUB1:EQUB3:EQUS"Files are MAZE1-5"
,EQUB31:EQUB2:EQUB5:EQUS"Press number of"
#EQUB31:EQUB6:EQUB7:EQUS"choice"
 5.ldmess EQUB31:EQUB2:EQUB10:EQUS"MAZE  loading.."
*%.ldmaze EQUS"LOAD MAZE  1EE0"+�13
4]
>�:�
�

00000000  0d 00 0a 1c f4 20 4d 49  4e 73 72 63 32 20 28 46  |..... MINsrc2 (F|
00000010  6f 72 20 4d 72 20 4d 69  6e 65 72 29 0d 00 14 61  |or Mr Miner)...a|
00000020  f4 20 41 64 64 69 74 69  6f 6e 61 6c 20 63 6f 64  |. Additional cod|
00000030  69 6e 67 20 62 79 20 52  69 63 68 61 72 64 20 44  |ing by Richard D|
00000040  69 6d 6f 6e 64 20 66 6f  72 20 4d 72 20 4d 69 6e  |imond for Mr Min|
00000050  65 72 20 62 79 20 4d 61  72 6b 20 42 6f 6c 74 6f  |er by Mark Bolto|
00000060  6e 20 26 20 41 6c 61 73  74 61 69 72 20 4b 69 6e  |n & Alastair Kin|
00000070  67 20 28 45 55 20 53 65  70 20 38 37 29 0d 00 1e  |g (EU Sep 87)...|
00000080  13 f4 20 4e 6f 76 65 6d  62 65 72 20 31 39 39 35  |.. November 1995|
00000090  0d 00 28 05 f4 0d 00 32  20 e7 90 3c 26 31 44 30  |..(....2 ..<&1D0|
000000a0  30 20 8c d0 3d 26 31 44  30 30 3a d7 22 4d 49 4e  |0 ..=&1D00:."MIN|
000000b0  73 72 63 32 22 0d 00 3c  08 f2 61 73 73 0d 00 46  |src2"..<..ass..F|
000000c0  2e ff 22 53 41 56 45 20  4d 49 4e 32 20 45 30 30  |.."SAVE MIN2 E00|
000000d0  20 22 2b c3 7e 4f 25 2b  22 20 22 2b c3 7e 73 74  | "+.~O%+" "+.~st|
000000e0  61 72 74 2b 22 20 32 42  37 44 22 0d 00 50 05 e0  |art+" 2B7D"..P..|
000000f0  0d 00 5a 09 dd f2 61 73  73 0d 00 64 27 52 25 3d  |..Z...ass..d'R%=|
00000100  26 32 41 35 38 3a 53 25  3d 26 32 38 45 32 3a 54  |&2A58:S%=&28E2:T|
00000110  25 3d 26 32 42 34 36 3a  5a 25 3d 26 32 38 38 35  |%=&2B46:Z%=&2885|
00000120  0d 00 6e 15 61 64 64 72  3d 26 37 36 3a 64 61 74  |..n.addr=&76:dat|
00000130  61 3d 26 37 41 0d 00 82  20 78 63 3d 26 37 34 3a  |a=&7A... xc=&74:|
00000140  79 63 3d 26 37 35 3a 6d  70 3d 26 36 38 3a 6b 61  |yc=&75:mp=&68:ka|
00000150  64 3d 26 39 36 0d 00 8c  2a 6b 64 3d 26 37 45 3a  |d=&96...*kd=&7E:|
00000160  73 71 64 3d 26 37 46 3a  66 65 6c 6c 3d 26 38 41  |sqd=&7F:fell=&8A|
00000170  3a 73 70 64 3d 26 38 46  3a 64 62 3d 26 38 30 0d  |:spd=&8F:db=&80.|
00000180  00 96 0d e3 49 25 3d 34  b8 36 88 32 0d 00 a0 14  |....I%=4.6.2....|
00000190  50 25 3d 26 32 42 37 44  3a 4f 25 3d 26 45 30 30  |P%=&2B7D:O%=&E00|
000001a0  0d 00 aa 0a 5b 4f 50 54  49 25 0d 00 b4 0a 2e 73  |....[OPTI%.....s|
000001b0  74 61 72 74 0d 00 be 2b  4c 44 41 23 5a 25 20 83  |tart...+LDA#Z% .|
000001c0  32 35 36 3a 53 54 41 26  32 32 30 3a 4c 44 41 23  |256:STA&220:LDA#|
000001d0  5a 25 20 81 32 35 36 3a  53 54 41 26 32 32 31 0d  |Z% .256:STA&221.|
000001e0  00 c8 4f 4c 44 41 23 32  33 3a 4c 44 58 23 64 61  |..OLDA#23:LDX#da|
000001f0  74 31 20 83 32 35 36 3a  4c 44 59 23 64 61 74 31  |t1 .256:LDY#dat1|
00000200  20 81 32 35 36 3a 4a 53  52 70 3a 4c 44 58 23 74  | .256:JSRp:LDX#t|
00000210  69 74 6c 65 20 83 32 35  36 3a 4c 44 59 23 74 69  |itle .256:LDY#ti|
00000220  74 6c 65 20 81 32 35 36  3a 4a 53 52 64 68 0d 00  |tle .256:JSRdh..|
00000230  d2 49 4c 44 41 23 31 35  3a 4c 44 58 23 64 61 74  |.ILDA#15:LDX#dat|
00000240  32 20 83 32 35 36 3a 4c  44 59 23 64 61 74 32 20  |2 .256:LDY#dat2 |
00000250  81 32 35 36 3a 4a 53 52  70 3a 4c 44 58 23 75 6c  |.256:JSRp:LDX#ul|
00000260  20 83 32 35 36 3a 4c 44  59 23 75 6c 20 81 32 35  | .256:LDY#ul .25|
00000270  36 3a 4a 53 52 64 68 0d  00 dc 50 2e 69 6e 74 72  |6:JSRdh...P.intr|
00000280  6f 20 4c 44 41 23 38 39  3a 4c 44 58 23 64 61 74  |o LDA#89:LDX#dat|
00000290  33 20 83 32 35 36 3a 4c  44 59 23 64 61 74 33 20  |3 .256:LDY#dat3 |
000002a0  81 32 35 36 3a 4a 53 52  70 3a 4c 44 58 23 75 6c  |.256:JSRp:LDX#ul|
000002b0  20 83 32 35 36 3a 4c 44  59 23 75 6c 20 81 32 35  | .256:LDY#ul .25|
000002c0  36 3a 4a 53 52 64 68 0d  00 e6 22 4c 44 41 23 31  |6:JSRdh..."LDA#1|
000002d0  37 3a 4a 53 52 26 46 46  45 45 3a 4c 44 41 23 33  |7:JSR&FFEE:LDA#3|
000002e0  3a 4a 53 52 26 46 46 45  45 0d 00 f0 11 4c 44 41  |:JSR&FFEE....LDA|
000002f0  23 37 31 3a 53 54 41 73  70 64 0d 00 fa 0d 4a 53  |#71:STAspd....JS|
00000300  52 63 68 6f 6f 73 65 0d  01 04 30 4c 44 41 23 39  |Rchoose...0LDA#9|
00000310  30 3a 53 54 41 26 33 35  38 3a 4c 44 41 23 31 32  |0:STA&358:LDA#12|
00000320  3a 4a 53 52 26 46 46 45  45 3a 4c 44 41 23 30 3a  |:JSR&FFEE:LDA#0:|
00000330  53 54 41 26 33 35 38 0d  01 0e 27 4c 44 41 23 37  |STA&358...'LDA#7|
00000340  34 3a 4c 44 58 23 64 32  20 83 32 35 36 3a 4c 44  |4:LDX#d2 .256:LD|
00000350  59 23 64 32 20 81 32 35  36 3a 4a 53 52 70 0d 01  |Y#d2 .256:JSRp..|
00000360  18 6c 2e 73 74 31 20 4a  53 52 69 6e 69 74 3a 4c  |.l.st1 JSRinit:L|
00000370  44 41 23 38 3a 4c 44 58  23 64 34 20 83 32 35 36  |DA#8:LDX#d4 .256|
00000380  3a 4c 44 59 23 64 34 20  81 32 35 36 3a 4a 53 52  |:LDY#d4 .256:JSR|
00000390  70 3a 4a 53 52 6c 69 76  65 73 3a 2e 73 74 32 20  |p:JSRlives:.st2 |
000003a0  4a 53 52 6c 65 76 3a 4c  44 41 6c 65 76 25 3a 43  |JSRlev:LDAlev%:C|
000003b0  4d 50 23 36 3a 42 4e 45  6c 6f 64 3a 4a 4d 50 67  |MP#6:BNElod:JMPg|
000003c0  61 6d 65 6e 64 3a 2e 6c  6f 64 0d 01 22 1b 4a 53  |amend:.lod..".JS|
000003d0  52 64 65 6c 6c 3a 4a 53  52 64 65 6c 6c 3a 4a 53  |Rdell:JSRdell:JS|
000003e0  52 64 65 6c 6c 0d 01 2c  0b 4a 53 52 6c 6f 61 64  |Rdell..,.JSRload|
000003f0  0d 01 36 19 4c 44 41 23  31 33 3a 4c 44 58 23 34  |..6.LDA#13:LDX#4|
00000400  3a 4a 53 52 26 46 46 46  34 0d 01 40 4b 4a 53 52  |:JSR&FFF4..@KJSR|
00000410  63 61 6c 63 3a 4c 44 41  20 44 25 3a 53 54 41 73  |calc:LDA D%:STAs|
00000420  64 25 3a 4c 44 41 20 44  25 2b 31 3a 53 54 41 73  |d%:LDA D%+1:STAs|
00000430  64 25 2b 31 3a 4c 44 41  20 4d 58 25 3a 53 54 41  |d%+1:LDA MX%:STA|
00000440  73 6d 78 25 3a 4c 44 41  20 4d 59 25 3a 53 54 41  |smx%:LDA MY%:STA|
00000450  73 6d 79 25 0d 01 4a 0c  4a 53 52 73 6f 6e 64 31  |smy%..J.JSRsond1|
00000460  0d 01 54 19 2e 67 61 6d  65 3a 4a 53 52 6c 69 76  |..T..game:JSRliv|
00000470  65 73 3a 2e 67 61 6d 65  31 0d 01 5e 11 4a 53 52  |es:.game1..^.JSR|
00000480  20 52 25 3a 4a 53 52 73  73 25 0d 01 68 0c 4a 53  | R%:JSRss%..h.JS|
00000490  52 64 65 6c 73 70 0d 01  72 15 4a 53 52 64 69 3a  |Rdelsp..r.JSRdi:|
000004a0  4a 53 52 65 61 3a 4a 53  52 73 71 0d 01 7c 3b 4c  |JSRea:JSRsq..|;L|
000004b0  44 41 6b 74 25 3a 42 45  51 66 69 6e 3a 4c 44 58  |DAkt%:BEQfin:LDX|
000004c0  63 6e 25 3a 49 4e 58 3a  53 54 58 63 6e 25 3a 43  |cn%:INX:STXcn%:C|
000004d0  50 58 23 35 3a 42 4e 45  66 69 6e 3a 4a 53 52 6b  |PX#5:BNEfin:JSRk|
000004e0  69 3a 2e 66 69 6e 0d 01  86 d5 4a 53 52 63 68 6b  |i:.fin....JSRchk|
000004f0  31 3a 4c 44 41 6c 76 65  6e 64 3a 42 4e 45 6e 65  |1:LDAlvend:BNEne|
00000500  78 6c 65 76 3a 4c 44 41  64 65 61 64 6d 61 6e 3a  |xlev:LDAdeadman:|
00000510  42 4e 45 6c 6f 73 65 3a  4a 53 52 20 6d 6f 76 65  |BNElose:JSR move|
00000520  3a 4c 44 41 6c 69 25 3a  42 45 51 65 6e 64 67 61  |:LDAli%:BEQendga|
00000530  6d 65 3a 4a 4d 50 67 61  6d 65 31 3a 2e 6c 6f 73  |me:JMPgame1:.los|
00000540  65 20 4c 44 41 23 30 3a  53 54 41 64 65 61 64 6d  |e LDA#0:STAdeadm|
00000550  61 6e 3a 4c 44 41 73 6d  78 25 3a 53 54 41 20 4d  |an:LDAsmx%:STA M|
00000560  58 25 3a 4c 44 41 73 6d  79 25 3a 53 54 41 20 4d  |X%:LDAsmy%:STA M|
00000570  59 25 3a 4c 44 41 73 64  25 3a 53 54 41 20 44 25  |Y%:LDAsd%:STA D%|
00000580  3a 4c 44 41 73 64 25 2b  31 3a 53 54 41 20 44 25  |:LDAsd%+1:STA D%|
00000590  2b 31 3a 4a 53 52 6d 70  6f 73 3a 4c 44 59 23 34  |+1:JSRmpos:LDY#4|
000005a0  38 3a 4c 44 41 23 32 33  30 3a 53 54 41 28 6d 70  |8:LDA#230:STA(mp|
000005b0  29 2c 59 3a 4a 4d 50 67  61 6d 65 0d 01 90 a8 2e  |),Y:JMPgame.....|
000005c0  6e 65 78 6c 65 76 20 4c  44 41 23 30 3a 53 54 41  |nexlev LDA#0:STA|
000005d0  6c 76 65 6e 64 3a 53 54  41 65 61 25 3a 53 54 41  |lvend:STAea%:STA|
000005e0  73 71 25 3a 53 54 41 64  69 25 3a 53 54 41 6d 61  |sq%:STAdi%:STAma|
000005f0  78 65 61 25 3a 53 54 41  6d 61 78 73 71 25 3a 53  |xea%:STAmaxsq%:S|
00000600  54 41 6d 61 78 64 69 25  3a 53 54 41 64 65 61 64  |TAmaxdi%:STAdead|
00000610  6d 61 6e 3a 4c 44 41 23  30 3a 53 54 41 64 61 74  |man:LDA#0:STAdat|
00000620  61 3a 4c 44 41 23 26 35  37 3a 53 54 41 64 61 74  |a:LDA#&57:STAdat|
00000630  61 2b 31 3a 4c 44 41 23  26 39 30 3a 53 54 41 61  |a+1:LDA#&90:STAa|
00000640  64 64 72 3a 4c 44 41 23  26 36 33 3a 53 54 41 61  |ddr:LDA#&63:STAa|
00000650  64 64 72 2b 31 3a 4a 53  52 20 53 25 3a 4a 4d 50  |ddr+1:JSR S%:JMP|
00000660  73 74 32 0d 01 9a 0c 2e  65 6e 64 67 61 6d 65 0d  |st2.....endgame.|
00000670  01 a4 55 4a 53 52 6c 69  76 65 73 3a 4c 44 41 23  |..UJSRlives:LDA#|
00000680  30 3a 53 54 41 64 61 74  61 3a 4c 44 41 23 26 35  |0:STAdata:LDA#&5|
00000690  37 3a 53 54 41 64 61 74  61 2b 31 3a 4c 44 41 23  |7:STAdata+1:LDA#|
000006a0  26 39 30 3a 53 54 41 61  64 64 72 3a 4c 44 41 23  |&90:STAaddr:LDA#|
000006b0  26 36 33 3a 53 54 41 61  64 64 72 2b 31 3a 4a 53  |&63:STAaddr+1:JS|
000006c0  52 20 53 25 0d 01 ae 2d  4c 44 41 23 33 31 3a 4c  |R S%...-LDA#31:L|
000006d0  44 58 23 65 6e 64 61 74  20 83 32 35 36 3a 4c 44  |DX#endat .256:LD|
000006e0  59 23 65 6e 64 61 74 20  81 32 35 36 3a 4a 53 52  |Y#endat .256:JSR|
000006f0  70 0d 01 b8 19 4c 44 41  23 31 34 3a 4c 44 58 23  |p....LDA#14:LDX#|
00000700  34 3a 4a 53 52 26 46 46  46 34 0d 01 c2 19 4a 53  |4:JSR&FFF4....JS|
00000710  52 72 65 70 3a 4c 44 41  23 34 3a 4a 53 52 26 46  |Rrep:LDA#4:JSR&F|
00000720  46 45 45 0d 01 cc 2f 4c  44 41 23 31 33 3a 4c 44  |FEE.../LDA#13:LD|
00000730  58 23 34 3a 4a 53 52 26  46 46 46 34 3a 4c 44 41  |X#4:JSR&FFF4:LDA|
00000740  23 31 35 3a 4c 44 58 23  30 3a 4a 53 52 26 46 46  |#15:LDX#0:JSR&FF|
00000750  46 34 0d 01 d6 0a 4a 4d  50 73 74 31 0d 01 e0 1e  |F4....JMPst1....|
00000760  2e 70 20 53 54 58 26 37  30 3a 53 54 59 26 37 31  |.p STX&70:STY&71|
00000770  3a 54 41 58 3a 4c 44 59  23 30 0d 01 ea 2d 2e 6c  |:TAX:LDY#0...-.l|
00000780  70 20 4c 44 41 28 26 37  30 29 2c 59 3a 4a 53 52  |p LDA(&70),Y:JSR|
00000790  26 46 46 45 45 3a 49 4e  59 3a 44 45 58 3a 42 4e  |&FFEE:INY:DEX:BN|
000007a0  45 6c 70 3a 52 54 53 0d  01 f4 56 2e 64 68 20 53  |Elp:RTS...V.dh S|
000007b0  54 58 64 62 3a 53 54 59  64 62 2b 31 3a 4c 44 41  |TXdb:STYdb+1:LDA|
000007c0  23 30 3a 53 54 41 26 37  30 3a 2e 62 31 20 4c 44  |#0:STA&70:.b1 LD|
000007d0  59 26 37 30 3a 4c 44 41  28 64 62 29 2c 59 3a 43  |Y&70:LDA(db),Y:C|
000007e0  4d 50 23 31 33 3a 42 45  51 62 33 3a 53 54 41 26  |MP#13:BEQb3:STA&|
000007f0  37 31 3a 49 4e 59 3a 53  54 59 26 37 30 0d 01 fe  |71:INY:STY&70...|
00000800  66 4c 44 58 23 26 37 31  3a 4c 44 59 23 30 3a 4c  |fLDX#&71:LDY#0:L|
00000810  44 41 23 31 30 3a 4a 53  52 26 46 46 46 31 3a 4c  |DA#10:JSR&FFF1:L|
00000820  44 58 23 31 3a 4c 44 59  23 30 3a 2e 62 32 20 4c  |DX#1:LDY#0:.b2 L|
00000830  44 41 26 37 31 2c 58 3a  53 54 41 26 43 46 30 2c  |DA&71,X:STA&CF0,|
00000840  59 3a 49 4e 59 3a 53 54  41 26 43 46 30 2c 59 3a  |Y:INY:STA&CF0,Y:|
00000850  49 4e 59 3a 49 4e 58 3a  43 50 58 23 39 3a 42 4e  |INY:INX:CPX#9:BN|
00000860  45 62 32 0d 02 08 62 4c  44 41 23 32 35 34 3a 4a  |Eb2...bLDA#254:J|
00000870  53 52 26 46 46 45 45 3a  4c 44 41 23 38 3a 4a 53  |SR&FFEE:LDA#8:JS|
00000880  52 26 46 46 45 45 3a 4c  44 41 23 31 30 3a 4a 53  |R&FFEE:LDA#10:JS|
00000890  52 26 46 46 45 45 3a 4c  44 41 23 32 35 35 3a 4a  |R&FFEE:LDA#255:J|
000008a0  53 52 26 46 46 45 45 3a  4c 44 41 23 31 31 3a 4a  |SR&FFEE:LDA#11:J|
000008b0  53 52 26 46 46 45 45 3a  4a 4d 50 62 31 3a 2e 62  |SR&FFEE:JMPb1:.b|
000008c0  33 20 52 54 53 0d 02 12  0b 2e 63 68 6f 6f 73 65  |3 RTS.....choose|
000008d0  0d 02 1c 12 2e 72 64 63  68 20 4a 53 52 26 46 46  |.....rdch JSR&FF|
000008e0  45 30 0d 02 26 28 2e 51  54 20 43 4d 50 23 97 22  |E0..&(.QT CMP#."|
000008f0  51 22 3a 42 4e 45 20 53  44 3a 4a 53 52 73 64 6f  |Q":BNE SD:JSRsdo|
00000900  66 66 3a 4a 4d 50 72 64  63 68 0d 02 30 27 2e 53  |ff:JMPrdch..0'.S|
00000910  44 20 43 4d 50 23 97 22  53 22 3a 42 4e 45 20 4c  |D CMP#."S":BNE L|
00000920  44 3a 4a 53 52 73 64 6f  6e 3a 4a 4d 50 72 64 63  |D:JSRsdon:JMPrdc|
00000930  68 0d 02 3a 49 2e 4c 44  20 43 4d 50 23 97 22 4c  |h..:I.LD CMP#."L|
00000940  22 3a 42 4e 45 20 50 4c  3a 4a 53 52 6d 6c 6f 61  |":BNE PL:JSRmloa|
00000950  64 3a 4c 44 41 23 31 32  3a 4a 53 52 26 46 46 45  |d:LDA#12:JSR&FFE|
00000960  45 3a 4c 44 41 23 32 36  3a 4a 53 52 26 46 46 45  |E:LDA#26:JSR&FFE|
00000970  45 3a 4a 4d 50 69 6e 74  72 6f 0d 02 44 1b 2e 50  |E:JMPintro..D..P|
00000980  4c 20 43 4d 50 23 97 22  50 22 3a 42 4e 45 20 53  |L CMP#."P":BNE S|
00000990  50 3a 52 54 53 0d 02 4e  16 2e 53 50 20 43 4d 50  |P:RTS..N..SP CMP|
000009a0  23 34 39 3a 42 43 43 72  64 63 68 0d 02 58 12 43  |#49:BCCrdch..X.C|
000009b0  4d 50 23 35 32 3a 42 43  53 72 64 63 68 0d 02 62  |MP#52:BCSrdch..b|
000009c0  0e 53 45 43 3a 53 42 43  23 34 38 0d 02 6c 27 41  |.SEC:SBC#48..l'A|
000009d0  53 4c 20 41 3a 41 53 4c  20 41 3a 41 53 4c 20 41  |SL A:ASL A:ASL A|
000009e0  3a 41 53 4c 20 41 3a 41  53 4c 20 41 3a 41 53 4c  |:ASL A:ASL A:ASL|
000009f0  20 41 0d 02 76 0a 53 42  43 23 35 36 0d 02 80 12  | A..v.SBC#56....|
00000a00  53 54 41 73 70 64 3a 4a  4d 50 72 64 63 68 0d 02  |STAspd:JMPrdch..|
00000a10  8a 13 4c 44 41 23 31 32  3a 4a 53 52 26 46 46 45  |..LDA#12:JSR&FFE|
00000a20  45 0d 02 94 0c 4a 4d 50  26 46 46 45 30 0d 02 9e  |E....JMP&FFE0...|
00000a30  07 52 54 53 0d 02 a8 89  2e 69 6e 69 74 20 4c 44  |.RTS.....init LD|
00000a40  41 23 30 3a 53 54 41 6c  65 76 25 3a 53 54 41 64  |A#0:STAlev%:STAd|
00000a50  69 67 69 74 73 3a 53 54  41 64 69 67 69 74 73 2b  |igits:STAdigits+|
00000a60  31 3a 53 54 41 65 61 25  3a 53 54 41 73 71 25 3a  |1:STAea%:STAsq%:|
00000a70  53 54 41 64 69 25 3a 53  54 41 6d 61 78 65 61 25  |STAdi%:STAmaxea%|
00000a80  3a 53 54 41 6d 61 78 73  71 25 3a 53 54 41 6d 61  |:STAmaxsq%:STAma|
00000a90  78 64 69 25 3a 4c 44 41  23 33 3a 53 54 41 6c 69  |xdi%:LDA#3:STAli|
00000aa0  25 3a 4c 44 41 23 30 3a  53 54 41 26 37 30 3a 4c  |%:LDA#0:STA&70:L|
00000ab0  44 41 23 26 35 33 3a 53  54 41 26 37 31 0d 02 b2  |DA#&53:STA&71...|
00000ac0  0b 4a 53 52 65 6e 76 73  0d 02 bc 0f 4c 44 58 23  |.JSRenvs....LDX#|
00000ad0  30 3a 4c 44 59 23 30 0d  02 c6 26 2e 6c 6f 70 20  |0:LDY#0...&.lop |
00000ae0  4c 44 41 23 26 45 30 3a  53 54 41 28 26 37 30 29  |LDA#&E0:STA(&70)|
00000af0  2c 59 3a 49 4e 59 3a 42  4e 45 6c 6f 70 0d 02 d0  |,Y:INY:BNElop...|
00000b00  1b 49 4e 43 26 37 31 3a  49 4e 58 3a 43 50 58 23  |.INC&71:INX:CPX#|
00000b10  34 3a 42 4e 45 6c 6f 70  0d 02 da 25 4c 44 41 23  |4:BNElop...%LDA#|
00000b20  30 3a 53 54 41 26 37 30  3a 4c 44 41 23 26 35 37  |0:STA&70:LDA#&57|
00000b30  3a 53 54 41 26 37 31 3a  4c 44 59 23 30 0d 02 e4  |:STA&71:LDY#0...|
00000b40  2c 2e 6c 6f 70 31 20 4c  44 41 23 26 45 35 3a 53  |,.lop1 LDA#&E5:S|
00000b50  54 41 28 26 37 30 29 2c  59 3a 49 4e 59 3a 42 4e  |TA(&70),Y:INY:BN|
00000b60  45 6c 6f 70 31 3a 52 54  53 0d 02 ee 27 2e 73 64  |Elop1:RTS...'.sd|
00000b70  6f 66 66 20 4c 44 41 23  32 31 30 3a 4c 44 58 23  |off LDA#210:LDX#|
00000b80  31 3a 4c 44 59 23 30 3a  4a 4d 50 26 46 46 46 34  |1:LDY#0:JMP&FFF4|
00000b90  0d 02 f8 26 2e 73 64 6f  6e 20 4c 44 41 23 32 31  |...&.sdon LDA#21|
00000ba0  30 3a 4c 44 58 23 30 3a  4c 44 59 23 30 3a 4a 4d  |0:LDX#0:LDY#0:JM|
00000bb0  50 26 46 46 46 34 0d 03  02 61 2e 73 6f 6e 64 31  |P&FFF4...a.sond1|
00000bc0  20 50 48 41 3a 54 58 41  3a 50 48 41 3a 54 59 41  | PHA:TXA:PHA:TYA|
00000bd0  3a 50 48 41 3a 4c 44 58  23 73 6f 75 31 20 83 32  |:PHA:LDX#sou1 .2|
00000be0  35 36 3a 4c 44 59 23 73  6f 75 31 20 81 32 35 36  |56:LDY#sou1 .256|
00000bf0  3a 4c 44 41 23 37 3a 4a  53 52 26 46 46 46 31 3a  |:LDA#7:JSR&FFF1:|
00000c00  50 4c 41 3a 54 41 59 3a  50 4c 41 3a 54 41 58 3a  |PLA:TAY:PLA:TAX:|
00000c10  50 4c 41 3a 52 54 53 0d  03 0c 61 2e 73 6f 6e 64  |PLA:RTS...a.sond|
00000c20  32 20 50 48 41 3a 54 58  41 3a 50 48 41 3a 54 59  |2 PHA:TXA:PHA:TY|
00000c30  41 3a 50 48 41 3a 4c 44  58 23 73 6f 75 32 20 83  |A:PHA:LDX#sou2 .|
00000c40  32 35 36 3a 4c 44 59 23  73 6f 75 32 20 81 32 35  |256:LDY#sou2 .25|
00000c50  36 3a 4c 44 41 23 37 3a  4a 53 52 26 46 46 46 31  |6:LDA#7:JSR&FFF1|
00000c60  3a 50 4c 41 3a 54 41 59  3a 50 4c 41 3a 54 41 58  |:PLA:TAY:PLA:TAX|
00000c70  3a 50 4c 41 3a 52 54 53  0d 03 16 61 2e 73 6f 6e  |:PLA:RTS...a.son|
00000c80  64 33 20 50 48 41 3a 54  58 41 3a 50 48 41 3a 54  |d3 PHA:TXA:PHA:T|
00000c90  59 41 3a 50 48 41 3a 4c  44 58 23 73 6f 75 33 20  |YA:PHA:LDX#sou3 |
00000ca0  83 32 35 36 3a 4c 44 59  23 73 6f 75 33 20 81 32  |.256:LDY#sou3 .2|
00000cb0  35 36 3a 4c 44 41 23 37  3a 4a 53 52 26 46 46 46  |56:LDA#7:JSR&FFF|
00000cc0  31 3a 50 4c 41 3a 54 41  59 3a 50 4c 41 3a 54 41  |1:PLA:TAY:PLA:TA|
00000cd0  58 3a 50 4c 41 3a 52 54  53 0d 03 20 61 2e 73 6f  |X:PLA:RTS.. a.so|
00000ce0  6e 64 34 20 50 48 41 3a  54 58 41 3a 50 48 41 3a  |nd4 PHA:TXA:PHA:|
00000cf0  54 59 41 3a 50 48 41 3a  4c 44 58 23 73 6f 75 34  |TYA:PHA:LDX#sou4|
00000d00  20 83 32 35 36 3a 4c 44  59 23 73 6f 75 34 20 81  | .256:LDY#sou4 .|
00000d10  32 35 36 3a 4c 44 41 23  37 3a 4a 53 52 26 46 46  |256:LDA#7:JSR&FF|
00000d20  46 31 3a 50 4c 41 3a 54  41 59 3a 50 4c 41 3a 54  |F1:PLA:TAY:PLA:T|
00000d30  41 58 3a 50 4c 41 3a 52  54 53 0d 03 2a 61 2e 73  |AX:PLA:RTS..*a.s|
00000d40  6f 6e 64 35 20 50 48 41  3a 54 58 41 3a 50 48 41  |ond5 PHA:TXA:PHA|
00000d50  3a 54 59 41 3a 50 48 41  3a 4c 44 58 23 73 6f 75  |:TYA:PHA:LDX#sou|
00000d60  35 20 83 32 35 36 3a 4c  44 59 23 73 6f 75 35 20  |5 .256:LDY#sou5 |
00000d70  81 32 35 36 3a 4c 44 41  23 37 3a 4a 53 52 26 46  |.256:LDA#7:JSR&F|
00000d80  46 46 31 3a 50 4c 41 3a  54 41 59 3a 50 4c 41 3a  |FF1:PLA:TAY:PLA:|
00000d90  54 41 58 3a 50 4c 41 3a  52 54 53 0d 03 34 61 2e  |TAX:PLA:RTS..4a.|
00000da0  73 6f 6e 64 36 20 50 48  41 3a 54 58 41 3a 50 48  |sond6 PHA:TXA:PH|
00000db0  41 3a 54 59 41 3a 50 48  41 3a 4c 44 58 23 73 6f  |A:TYA:PHA:LDX#so|
00000dc0  75 36 20 83 32 35 36 3a  4c 44 59 23 73 6f 75 36  |u6 .256:LDY#sou6|
00000dd0  20 81 32 35 36 3a 4c 44  41 23 37 3a 4a 53 52 26  | .256:LDA#7:JSR&|
00000de0  46 46 46 31 3a 50 4c 41  3a 54 41 59 3a 50 4c 41  |FFF1:PLA:TAY:PLA|
00000df0  3a 54 41 58 3a 50 4c 41  3a 52 54 53 0d 03 3e 34  |:TAX:PLA:RTS..>4|
00000e00  2e 65 6e 76 73 20 4c 44  58 23 65 6e 76 31 20 83  |.envs LDX#env1 .|
00000e10  32 35 36 3a 4c 44 59 23  65 6e 76 31 20 81 32 35  |256:LDY#env1 .25|
00000e20  36 3a 4c 44 41 23 38 3a  4a 53 52 26 46 46 46 31  |6:LDA#8:JSR&FFF1|
00000e30  0d 03 48 2e 4c 44 58 23  65 6e 76 32 20 83 32 35  |..H.LDX#env2 .25|
00000e40  36 3a 4c 44 59 23 65 6e  76 32 20 81 32 35 36 3a  |6:LDY#env2 .256:|
00000e50  4c 44 41 23 38 3a 4a 53  52 26 46 46 46 31 0d 03  |LDA#8:JSR&FFF1..|
00000e60  52 2e 4c 44 58 23 65 6e  76 33 20 83 32 35 36 3a  |R.LDX#env3 .256:|
00000e70  4c 44 59 23 65 6e 76 33  20 81 32 35 36 3a 4c 44  |LDY#env3 .256:LD|
00000e80  41 23 38 3a 4a 4d 50 26  46 46 46 31 0d 03 5c 2c  |A#8:JMP&FFF1..\,|
00000e90  2e 64 65 6c 73 70 20 50  48 41 3a 54 58 41 3a 50  |.delsp PHA:TXA:P|
00000ea0  48 41 3a 54 59 41 3a 50  48 41 3a 4c 44 41 73 70  |HA:TYA:PHA:LDAsp|
00000eb0  64 3a 4a 4d 50 64 65 6c  0d 03 66 2b 2e 64 65 6c  |d:JMPdel..f+.del|
00000ec0  73 20 50 48 41 3a 54 58  41 3a 50 48 41 3a 54 59  |s PHA:TXA:PHA:TY|
00000ed0  41 3a 50 48 41 3a 4c 44  41 23 31 32 3a 4a 4d 50  |A:PHA:LDA#12:JMP|
00000ee0  64 65 6c 0d 03 70 9a 2e  64 65 6c 6c 20 50 48 41  |del..p..dell PHA|
00000ef0  3a 54 58 41 3a 50 48 41  3a 54 59 41 3a 50 48 41  |:TXA:PHA:TYA:PHA|
00000f00  3a 4c 44 41 23 32 35 35  3a 2e 64 65 6c 20 54 41  |:LDA#255:.del TA|
00000f10  58 20 4e 4f 50 3a 4e 4f  50 3a 4e 4f 50 3a 4e 4f  |X NOP:NOP:NOP:NO|
00000f20  50 3a 4e 4f 50 3a 4e 4f  50 3a 4e 4f 50 3a 4e 4f  |P:NOP:NOP:NOP:NO|
00000f30  50 3a 4e 4f 50 3a 4e 4f  50 3a 2e 64 65 6c 31 20  |P:NOP:NOP:.del1 |
00000f40  4c 44 59 23 32 35 35 3a  2e 64 65 6c 32 20 44 45  |LDY#255:.del2 DE|
00000f50  59 3a 42 4e 45 64 65 6c  32 3a 44 45 58 3a 42 4e  |Y:BNEdel2:DEX:BN|
00000f60  45 64 65 6c 32 3a 50 4c  41 3a 54 41 59 3a 50 4c  |Edel2:PLA:TAY:PL|
00000f70  41 3a 54 41 58 3a 50 4c  41 3a 52 54 53 0d 03 7a  |A:TAX:PLA:RTS..z|
00000f80  4d 2e 6c 69 76 65 73 20  4c 44 58 23 32 34 3a 2e  |M.lives LDX#24:.|
00000f90  6c 6f 70 20 4c 44 41 26  31 45 32 30 2c 58 3a 53  |lop LDA&1E20,X:S|
00000fa0  54 41 26 35 41 33 38 2c  58 3a 4c 44 41 26 31 45  |TA&5A38,X:LDA&1E|
00000fb0  33 38 2c 58 3a 53 54 41  26 35 42 37 38 2c 58 3a  |38,X:STA&5B78,X:|
00000fc0  44 45 58 3a 42 4e 45 6c  6f 70 0d 03 84 1e 4c 44  |DEX:BNElop....LD|
00000fd0  41 6c 69 25 3a 43 4c 43  3a 41 44 43 23 34 38 3a  |Ali%:CLC:ADC#48:|
00000fe0  53 54 41 64 61 74 2b 31  0d 03 8e 66 4c 44 41 23  |STAdat+1...fLDA#|
00000ff0  31 37 3a 4a 53 52 26 46  46 45 45 3a 4c 44 41 23  |17:JSR&FFEE:LDA#|
00001000  33 3a 4a 53 52 26 46 46  45 45 3a 4c 44 58 23 31  |3:JSR&FFEE:LDX#1|
00001010  37 3a 4c 44 59 23 31 3a  4c 44 41 23 30 3a 53 54  |7:LDY#1:LDA#0:ST|
00001020  41 26 37 30 3a 4c 44 41  23 33 31 3a 4a 53 52 26  |A&70:LDA#31:JSR&|
00001030  46 46 45 45 3a 54 58 41  3a 4a 53 52 26 46 46 45  |FFEE:TXA:JSR&FFE|
00001040  45 3a 54 59 41 3a 4a 53  52 26 46 46 45 45 0d 03  |E:TYA:JSR&FFEE..|
00001050  98 23 4c 44 58 23 64 61  74 20 83 32 35 36 3a 4c  |.#LDX#dat .256:L|
00001060  44 59 23 64 61 74 20 81  32 35 36 3a 4a 4d 50 64  |DY#dat .256:JMPd|
00001070  68 0d 03 a2 59 2e 6c 65  76 20 49 4e 43 6c 65 76  |h...Y.lev INClev|
00001080  25 3a 4c 44 41 23 30 3a  53 54 41 64 61 74 61 3a  |%:LDA#0:STAdata:|
00001090  4c 44 41 23 26 35 37 3a  53 54 41 64 61 74 61 2b  |LDA#&57:STAdata+|
000010a0  31 3a 4c 44 41 23 26 39  30 3a 53 54 41 61 64 64  |1:LDA#&90:STAadd|
000010b0  72 3a 4c 44 41 23 26 36  33 3a 53 54 41 61 64 64  |r:LDA#&63:STAadd|
000010c0  72 2b 31 3a 4a 53 52 20  53 25 0d 03 ac 27 4c 44  |r+1:JSR S%...'LD|
000010d0  41 23 32 39 3a 4c 44 58  23 64 33 20 83 32 35 36  |A#29:LDX#d3 .256|
000010e0  3a 4c 44 59 23 64 33 20  81 32 35 36 3a 4a 53 52  |:LDY#d3 .256:JSR|
000010f0  70 0d 03 b6 1f 4c 44 41  6c 65 76 25 3a 41 44 43  |p....LDAlev%:ADC|
00001100  23 34 38 3a 4a 53 52 26  46 46 45 45 3a 52 54 53  |#48:JSR&FFEE:RTS|
00001110  0d 03 c0 67 2e 6c 6f 61  64 20 4c 44 41 6c 65 76  |...g.load LDAlev|
00001120  25 3a 41 53 4c 20 41 3a  54 41 58 3a 44 45 58 3a  |%:ASL A:TAX:DEX:|
00001130  44 45 58 3a 4c 44 41 74  61 62 6c 65 2c 58 3a 53  |DEX:LDAtable,X:S|
00001140  54 41 26 37 30 3a 4c 44  41 74 61 62 6c 65 2b 31  |TA&70:LDAtable+1|
00001150  2c 58 3a 53 54 41 26 37  31 3a 4c 44 41 23 26 34  |,X:STA&71:LDA#&4|
00001160  42 3a 53 54 41 26 37 32  3a 4c 44 41 23 26 35 33  |B:STA&72:LDA#&53|
00001170  3a 53 54 41 26 37 33 0d  03 ca 30 4c 44 58 23 30  |:STA&73...0LDX#0|
00001180  3a 2e 6c 73 32 20 4c 44  59 23 30 3a 2e 6c 73 31  |:.ls2 LDY#0:.ls1|
00001190  20 4c 44 41 28 26 37 30  29 2c 59 3a 43 4c 43 3a  | LDA(&70),Y:CLC:|
000011a0  41 44 43 23 31 35 39 0d  03 d4 21 43 4d 50 23 32  |ADC#159...!CMP#2|
000011b0  33 32 3a 42 4e 45 64 64  64 3a 4a 53 52 6b 79 61  |32:BNEddd:JSRkya|
000011c0  64 64 72 3a 2e 64 64 64  0d 03 de 6f 43 4d 50 23  |ddr:.ddd...oCMP#|
000011d0  32 33 31 3a 42 45 51 6d  64 3a 43 4d 50 23 32 32  |231:BEQmd:CMP#22|
000011e0  36 3a 42 4e 45 73 71 61  3a 2e 6d 64 3a 49 4e 43  |6:BNEsqa:.md:INC|
000011f0  6d 61 78 64 69 25 3a 2e  73 71 61 20 43 4d 50 23  |maxdi%:.sqa CMP#|
00001200  32 32 37 3a 42 4e 45 65  61 72 3a 49 4e 43 6d 61  |227:BNEear:INCma|
00001210  78 73 71 25 3a 2e 65 61  72 20 43 4d 50 23 32 32  |xsq%:.ear CMP#22|
00001220  38 3a 42 4e 45 6d 78 73  3a 49 4e 43 6d 61 78 65  |8:BNEmxs:INCmaxe|
00001230  61 25 3a 2e 6d 78 73 0d  03 e8 1e 43 4d 50 23 32  |a%:.mxs....CMP#2|
00001240  33 30 3a 42 4e 45 6e 65  78 3a 4a 53 52 73 65 74  |30:BNEnex:JSRset|
00001250  3a 2e 6e 65 78 0d 03 f2  b5 53 54 41 28 26 37 32  |:.nex....STA(&72|
00001260  29 2c 59 3a 49 4e 59 3a  43 50 59 23 31 38 3a 42  |),Y:INY:CPY#18:B|
00001270  4e 45 6c 73 31 3a 43 4c  43 3a 4c 44 41 26 37 30  |NEls1:CLC:LDA&70|
00001280  3a 41 44 43 23 31 38 3a  53 54 41 26 37 30 3a 4c  |:ADC#18:STA&70:L|
00001290  44 41 26 37 31 3a 41 44  43 23 30 3a 53 54 41 26  |DA&71:ADC#0:STA&|
000012a0  37 31 3a 43 4c 43 3a 4c  44 41 26 37 32 3a 41 44  |71:CLC:LDA&72:AD|
000012b0  43 23 32 34 3a 53 54 41  26 37 32 3a 4c 44 41 26  |C#24:STA&72:LDA&|
000012c0  37 33 3a 41 44 43 23 30  3a 53 54 41 26 37 33 3a  |73:ADC#0:STA&73:|
000012d0  49 4e 58 3a 43 50 58 23  32 35 3a 42 4e 45 6c 73  |INX:CPX#25:BNEls|
000012e0  32 3a 4c 44 41 6c 65 76  25 3a 43 4d 50 23 32 3a  |2:LDAlev%:CMP#2:|
000012f0  42 4e 45 65 6e 64 6c 64  3a 49 4e 43 73 71 25 3a  |BNEendld:INCsq%:|
00001300  2e 65 6e 64 6c 64 20 52  54 53 0d 03 fc 58 2e 73  |.endld RTS...X.s|
00001310  65 74 20 50 48 41 3a 54  58 41 3a 50 48 41 3a 54  |et PHA:TXA:PHA:T|
00001320  59 41 3a 50 48 41 3a 49  4e 59 3a 53 54 59 20 4d  |YA:PHA:INY:STY M|
00001330  58 25 3a 49 4e 58 3a 49  4e 58 3a 49 4e 58 3a 49  |X%:INX:INX:INX:I|
00001340  4e 58 3a 53 54 58 20 4d  59 25 3a 50 4c 41 3a 54  |NX:STX MY%:PLA:T|
00001350  41 59 3a 50 4c 41 3a 54  41 58 3a 50 4c 41 3a 52  |AY:PLA:TAX:PLA:R|
00001360  54 53 0d 04 06 57 2e 73  65 74 32 20 50 48 41 3a  |TS...W.set2 PHA:|
00001370  54 58 41 3a 50 48 41 3a  54 59 41 3a 50 48 41 3a  |TXA:PHA:TYA:PHA:|
00001380  49 4e 59 3a 53 54 59 20  78 25 3a 49 4e 58 3a 49  |INY:STY x%:INX:I|
00001390  4e 58 3a 49 4e 58 3a 49  4e 58 3a 53 54 58 20 79  |NX:INX:INX:STX y|
000013a0  25 3a 50 4c 41 3a 54 41  59 3a 50 4c 41 3a 54 41  |%:PLA:TAY:PLA:TA|
000013b0  58 3a 50 4c 41 3a 52 54  53 0d 04 10 28 2e 73 63  |X:PLA:RTS...(.sc|
000013c0  31 20 53 45 44 3a 43 4c  43 3a 4c 44 41 64 69 67  |1 SED:CLC:LDAdig|
000013d0  69 74 73 2b 31 3a 41 44  43 23 33 3a 4a 4d 50 73  |its+1:ADC#3:JMPs|
000013e0  63 0d 04 1a 2c 2e 73 63  32 20 4a 53 52 73 6f 6e  |c...,.sc2 JSRson|
000013f0  64 34 3a 53 45 44 3a 43  4c 43 3a 4c 44 41 64 69  |d4:SED:CLC:LDAdi|
00001400  67 69 74 73 2b 31 3a 41  44 43 23 31 30 0d 04 24  |gits+1:ADC#10..$|
00001410  cf 2e 73 63 20 53 54 41  64 69 67 69 74 73 2b 31  |..sc STAdigits+1|
00001420  3a 4c 44 41 64 69 67 69  74 73 3a 41 44 43 23 30  |:LDAdigits:ADC#0|
00001430  3a 53 54 41 64 69 67 69  74 73 3a 43 4c 44 3a 4c  |:STAdigits:CLD:L|
00001440  44 41 23 31 37 3a 4a 53  52 26 46 46 45 45 3a 4c  |DA#17:JSR&FFEE:L|
00001450  44 41 23 33 3a 4a 53 52  26 46 46 45 45 3a 4c 44  |DA#3:JSR&FFEE:LD|
00001460  41 23 33 31 3a 4a 53 52  26 46 46 45 45 3a 4c 44  |A#31:JSR&FFEE:LD|
00001470  41 23 32 3a 4a 53 52 26  46 46 45 45 3a 4c 44 41  |A#2:JSR&FFEE:LDA|
00001480  23 26 46 46 45 45 3a 4c  44 41 64 69 67 69 74 73  |#&FFEE:LDAdigits|
00001490  3a 4a 53 52 70 72 69 6e  74 31 3a 4c 44 41 64 69  |:JSRprint1:LDAdi|
000014a0  67 69 74 73 2b 31 3a 2e  70 72 69 6e 74 31 20 53  |gits+1:.print1 S|
000014b0  54 41 74 65 6d 70 3a 4c  53 52 41 3a 4c 53 52 41  |TAtemp:LSRA:LSRA|
000014c0  3a 4c 53 52 41 3a 4c 53  52 41 3a 4a 53 52 6e 75  |:LSRA:LSRA:JSRnu|
000014d0  6d 62 65 72 3a 4c 44 41  74 65 6d 70 0d 04 2e 25  |mber:LDAtemp...%|
000014e0  2e 6e 75 6d 62 65 72 20  80 23 26 30 46 3a 43 4c  |.number .#&0F:CL|
000014f0  43 3a 41 44 43 23 34 38  3a 4a 4d 50 26 46 46 45  |C:ADC#48:JMP&FFE|
00001500  45 0d 04 38 81 2e 63 61  6c 63 20 4c 44 41 23 26  |E..8..calc LDA#&|
00001510  39 46 3a 53 54 41 20 44  25 3a 4c 44 41 23 26 35  |9F:STA D%:LDA#&5|
00001520  32 3a 53 54 41 20 44 25  2b 31 3a 4c 44 41 20 4d  |2:STA D%+1:LDA M|
00001530  58 25 3a 53 54 41 78 25  3a 4c 44 41 20 4d 59 25  |X%:STAx%:LDA MY%|
00001540  3a 53 54 41 79 25 3a 4a  53 52 63 61 6c 3a 43 4c  |:STAy%:JSRcal:CL|
00001550  43 3a 4c 44 41 20 44 25  3a 41 44 43 26 36 32 3a  |C:LDA D%:ADC&62:|
00001560  53 54 41 20 44 25 3a 4c  44 41 20 44 25 2b 31 3a  |STA D%:LDA D%+1:|
00001570  41 44 43 26 36 33 3a 53  54 41 44 25 2b 31 3a 52  |ADC&63:STAD%+1:R|
00001580  54 53 0d 04 42 af 2e 63  61 6c 20 4c 44 41 20 79  |TS..B..cal LDA y|
00001590  25 3a 53 54 41 26 36 30  3a 4c 44 41 23 32 34 3a  |%:STA&60:LDA#24:|
000015a0  53 54 41 26 36 31 3a 2e  6d 75 6c 74 20 4c 44 58  |STA&61:.mult LDX|
000015b0  23 38 3a 4c 44 41 23 30  3a 2e 61 67 61 69 6e 20  |#8:LDA#0:.again |
000015c0  4c 53 52 26 36 31 3a 42  43 43 6f 76 65 72 3a 43  |LSR&61:BCCover:C|
000015d0  4c 43 3a 41 44 43 26 36  30 3a 2e 6f 76 65 72 3a  |LC:ADC&60:.over:|
000015e0  52 4f 52 20 41 3a 52 4f  52 26 36 32 3a 44 45 58  |ROR A:ROR&62:DEX|
000015f0  3a 42 4e 45 61 67 61 69  6e 3a 53 54 41 26 36 33  |:BNEagain:STA&63|
00001600  3a 43 4c 43 3a 4c 44 41  20 26 36 32 3a 41 44 43  |:CLC:LDA &62:ADC|
00001610  78 25 3a 53 54 41 26 36  32 3a 4c 44 41 26 36 33  |x%:STA&62:LDA&63|
00001620  3a 41 44 43 23 30 3a 53  54 41 26 36 33 3a 52 54  |:ADC#0:STA&63:RT|
00001630  53 0d 04 4c a4 2e 70 72  74 20 4c 44 41 23 33 31  |S..L..prt LDA#31|
00001640  3a 4a 53 52 26 46 46 45  45 3a 54 58 41 3a 4a 53  |:JSR&FFEE:TXA:JS|
00001650  52 26 46 46 45 45 3a 54  59 41 3a 4a 53 52 26 46  |R&FFEE:TYA:JSR&F|
00001660  46 45 45 3a 4c 44 41 26  37 30 3a 43 4d 50 23 31  |FEE:LDA&70:CMP#1|
00001670  30 3a 42 43 43 75 3a 43  4d 50 23 31 30 30 3a 42  |0:BCCu:CMP#100:B|
00001680  43 43 74 3a 4c 44 41 26  37 30 3a 4c 44 58 23 30  |CCt:LDA&70:LDX#0|
00001690  3a 53 45 43 3a 2e 68 73  20 53 42 43 23 31 30 30  |:SEC:.hs SBC#100|
000016a0  3a 49 4e 58 3a 42 43 53  68 73 3a 41 44 43 23 31  |:INX:BCShs:ADC#1|
000016b0  30 30 3a 44 45 58 3a 53  54 41 26 37 30 3a 54 58  |00:DEX:STA&70:TX|
000016c0  41 3a 43 4c 43 3a 41 44  43 23 34 38 3a 4a 53 52  |A:CLC:ADC#48:JSR|
000016d0  26 46 46 45 45 0d 04 56  56 2e 74 20 4c 44 41 26  |&FFEE..VV.t LDA&|
000016e0  37 30 3a 4c 44 58 23 30  3a 53 45 43 3a 2e 74 73  |70:LDX#0:SEC:.ts|
000016f0  20 53 42 43 23 31 30 3a  49 4e 58 3a 42 43 53 74  | SBC#10:INX:BCSt|
00001700  73 3a 41 44 43 23 31 30  3a 44 45 58 3a 53 54 41  |s:ADC#10:DEX:STA|
00001710  26 37 30 3a 54 58 41 3a  43 4c 43 3a 41 44 43 23  |&70:TXA:CLC:ADC#|
00001720  34 38 3a 4a 53 52 26 46  46 45 45 0d 04 60 3a 2e  |48:JSR&FFEE..`:.|
00001730  75 20 4c 44 41 26 37 30  3a 43 4c 43 3a 41 44 43  |u LDA&70:CLC:ADC|
00001740  23 34 38 3a 4a 53 52 26  46 46 45 45 3a 4c 44 41  |#48:JSR&FFEE:LDA|
00001750  23 33 32 3a 4a 53 52 26  46 46 45 45 3a 4a 4d 50  |#32:JSR&FFEE:JMP|
00001760  26 46 46 45 45 0d 04 6a  38 2e 64 69 20 4c 44 58  |&FFEE..j8.di LDX|
00001770  23 31 31 3a 4c 44 59 23  32 36 3a 4c 44 41 6d 61  |#11:LDY#26:LDAma|
00001780  78 64 69 25 3a 53 45 43  3a 53 42 43 64 69 25 3a  |xdi%:SEC:SBCdi%:|
00001790  53 54 41 26 37 30 3a 4a  4d 50 70 72 74 0d 04 74  |STA&70:JMPprt..t|
000017a0  38 2e 65 61 20 4c 44 58  23 31 31 3a 4c 44 59 23  |8.ea LDX#11:LDY#|
000017b0  32 38 3a 4c 44 41 6d 61  78 65 61 25 3a 53 45 43  |28:LDAmaxea%:SEC|
000017c0  3a 53 42 43 65 61 25 3a  53 54 41 26 37 30 3a 4a  |:SBCea%:STA&70:J|
000017d0  4d 50 70 72 74 0d 04 7e  38 2e 73 71 20 4c 44 58  |MPprt..~8.sq LDX|
000017e0  23 31 31 3a 4c 44 59 23  33 30 3a 4c 44 41 6d 61  |#11:LDY#30:LDAma|
000017f0  78 73 71 25 3a 53 45 43  3a 53 42 43 73 71 25 3a  |xsq%:SEC:SBCsq%:|
00001800  53 54 41 26 37 30 3a 4a  4d 50 70 72 74 0d 04 88  |STA&70:JMPprt...|
00001810  4b 2e 6b 69 20 4c 44 58  23 30 3a 4c 44 41 28 6b  |K.ki LDX#0:LDA(k|
00001820  61 64 2c 58 29 3a 43 4d  50 23 32 33 32 3a 42 4e  |ad,X):CMP#232:BN|
00001830  45 6b 69 31 3a 4c 44 41  23 32 33 33 3a 53 54 41  |Eki1:LDA#233:STA|
00001840  28 6b 61 64 2c 58 29 3a  4c 44 41 23 30 3a 53 54  |(kad,X):LDA#0:ST|
00001850  41 63 6e 25 3a 52 54 53  0d 04 92 3b 2e 6b 69 31  |Acn%:RTS...;.ki1|
00001860  20 43 4d 50 23 32 33 33  3a 42 4e 45 6b 69 32 3a  | CMP#233:BNEki2:|
00001870  4c 44 41 23 32 33 32 3a  53 54 41 28 6b 61 64 2c  |LDA#232:STA(kad,|
00001880  58 29 3a 4c 44 41 23 30  3a 53 54 41 63 6e 25 3a  |X):LDA#0:STAcn%:|
00001890  52 54 53 0d 04 9c 20 2e  6b 69 32 20 4c 44 41 23  |RTS... .ki2 LDA#|
000018a0  30 3a 53 54 41 63 6e 25  3a 53 54 41 6b 74 25 3a  |0:STAcn%:STAkt%:|
000018b0  52 54 53 0d 04 a6 c1 2e  6b 79 61 64 64 72 20 50  |RTS.....kyaddr P|
000018c0  48 41 3a 54 58 41 3a 50  48 41 3a 54 59 41 3a 50  |HA:TXA:PHA:TYA:P|
000018d0  48 41 3a 49 4e 59 3a 53  54 59 20 78 25 3a 49 4e  |HA:INY:STY x%:IN|
000018e0  58 3a 49 4e 58 3a 49 4e  58 3a 49 4e 58 3a 53 54  |X:INX:INX:INX:ST|
000018f0  58 20 79 25 3a 4c 44 41  23 26 45 41 3a 53 54 41  |X y%:LDA#&EA:STA|
00001900  6b 61 64 3a 4c 44 41 23  26 35 32 3a 53 54 41 6b  |kad:LDA#&52:STAk|
00001910  61 64 2b 31 3a 4a 53 52  63 61 6c 3a 43 4c 43 3a  |ad+1:JSRcal:CLC:|
00001920  4c 44 41 6b 61 64 3a 41  44 43 26 36 32 3a 53 54  |LDAkad:ADC&62:ST|
00001930  41 6b 61 64 3a 4c 44 41  6b 61 64 2b 31 3a 41 44  |Akad:LDAkad+1:AD|
00001940  43 26 36 33 3a 53 54 41  6b 61 64 2b 31 3a 4c 44  |C&63:STAkad+1:LD|
00001950  41 23 26 46 46 3a 53 54  41 6b 74 25 3a 50 4c 41  |A#&FF:STAkt%:PLA|
00001960  3a 54 41 59 3a 50 4c 41  3a 54 41 58 3a 50 4c 41  |:TAY:PLA:TAX:PLA|
00001970  3a 52 54 53 0d 04 b0 21  2e 65 61 73 20 4c 44 58  |:RTS...!.eas LDX|
00001980  65 61 25 3a 49 4e 58 3a  53 54 58 65 61 25 3a 4a  |ea%:INX:STXea%:J|
00001990  4d 50 73 63 31 0d 04 ba  21 2e 64 69 73 20 4c 44  |MPsc1...!.dis LD|
000019a0  58 64 69 25 3a 49 4e 58  3a 53 54 58 64 69 25 3a  |Xdi%:INX:STXdi%:|
000019b0  4a 4d 50 73 63 32 0d 04  c4 d8 2e 63 68 6b 31 20  |JMPsc2.....chk1 |
000019c0  4c 44 41 26 38 41 3a 42  45 51 6d 64 64 3a 4a 53  |LDA&8A:BEQmdd:JS|
000019d0  52 73 6f 6e 64 33 3a 2e  6d 64 64 20 4c 44 41 26  |Rsond3:.mdd LDA&|
000019e0  37 45 3a 42 45 51 73 71  63 68 6b 3a 4c 44 41 23  |7E:BEQsqchk:LDA#|
000019f0  32 32 39 3a 53 54 41 74  65 6d 70 3a 4c 44 59 23  |229:STAtemp:LDY#|
00001a00  34 38 3a 53 54 59 74 65  6d 70 79 3a 4a 53 52 64  |48:STYtempy:JSRd|
00001a10  65 64 3a 2e 73 71 63 68  6b 20 4c 44 41 26 37 46  |ed:.sqchk LDA&7F|
00001a20  3a 42 45 51 63 68 6b 73  71 3a 49 4e 43 73 71 25  |:BEQchksq:INCsq%|
00001a30  3a 4a 53 52 73 6f 6e 64  36 3a 2e 63 68 6b 73 71  |:JSRsond6:.chksq|
00001a40  20 4c 44 41 73 71 25 3a  43 4d 50 6d 61 78 73 71  | LDAsq%:CMPmaxsq|
00001a50  25 3a 42 4e 45 63 68 65  6e 64 3a 4c 44 41 65 61  |%:BNEchend:LDAea|
00001a60  25 3a 43 4d 50 6d 61 78  65 61 25 3a 42 4e 45 63  |%:CMPmaxea%:BNEc|
00001a70  68 65 6e 64 3a 4c 44 41  64 69 25 3a 43 4d 50 6d  |hend:LDAdi%:CMPm|
00001a80  61 78 64 69 25 3a 42 4e  45 63 68 65 6e 64 0d 04  |axdi%:BNEchend..|
00001a90  ce 1f 4c 44 41 23 26 46  46 3a 53 54 41 6c 76 65  |..LDA#&FF:STAlve|
00001aa0  6e 64 3a 2e 63 68 65 6e  64 20 52 54 53 0d 04 d8  |nd:.chend RTS...|
00001ab0  57 2e 73 73 25 20 4c 44  41 20 44 25 3a 53 54 41  |W.ss% LDA D%:STA|
00001ac0  64 61 74 61 3a 4c 44 41  20 44 25 2b 31 3a 53 54  |data:LDA D%+1:ST|
00001ad0  41 64 61 74 61 2b 31 3a  4c 44 41 23 26 39 30 3a  |Adata+1:LDA#&90:|
00001ae0  53 54 41 61 64 64 72 3a  4c 44 41 23 26 36 33 3a  |STAaddr:LDA#&63:|
00001af0  53 54 41 61 64 64 72 2b  31 3a 4a 53 52 20 53 25  |STAaddr+1:JSR S%|
00001b00  3a 52 54 53 0d 04 e2 d4  2e 64 65 64 20 53 54 41  |:RTS.....ded STA|
00001b10  74 65 6d 70 3a 53 54 59  74 65 6d 70 79 3a 4a 53  |temp:STYtempy:JS|
00001b20  52 73 6f 6e 64 35 3a 4c  44 41 23 32 32 39 3a 4c  |Rsond5:LDA#229:L|
00001b30  44 59 23 34 38 3a 53 54  41 28 6d 70 29 2c 59 3a  |DY#48:STA(mp),Y:|
00001b40  4c 44 58 23 35 3a 2e 6c  70 70 20 53 54 58 26 36  |LDX#5:.lpp STX&6|
00001b50  41 3a 4c 44 41 74 65 6d  70 3a 4c 44 59 74 65 6d  |A:LDAtemp:LDYtem|
00001b60  70 79 3a 53 54 41 28 6d  70 29 2c 59 3a 4a 53 52  |py:STA(mp),Y:JSR|
00001b70  73 73 25 3a 4a 53 52 64  65 6c 73 3a 4c 44 41 23  |ss%:JSRdels:LDA#|
00001b80  32 33 30 3a 4c 44 59 74  65 6d 70 79 3a 53 54 41  |230:LDYtempy:STA|
00001b90  28 6d 70 29 2c 59 3a 4a  53 52 73 73 25 3a 4a 53  |(mp),Y:JSRss%:JS|
00001ba0  52 64 65 6c 73 3a 4c 44  58 26 36 41 3a 44 45 58  |Rdels:LDX&6A:DEX|
00001bb0  3a 43 50 58 23 30 3a 42  4e 45 6c 70 70 3a 4c 44  |:CPX#0:BNElpp:LD|
00001bc0  41 74 65 6d 70 3a 4c 44  59 74 65 6d 70 79 3a 53  |Atemp:LDYtempy:S|
00001bd0  54 41 28 6d 70 29 2c 59  0d 04 ec 19 49 4e 43 64  |TA(mp),Y....INCd|
00001be0  65 61 64 6d 61 6e 3a 44  45 43 6c 69 25 3a 52 54  |eadman:DECli%:RT|
00001bf0  53 0d 04 f6 3e 2e 6d 6f  76 65 20 4c 44 41 23 31  |S...>.move LDA#1|
00001c00  32 39 3a 4c 44 58 23 26  39 37 3a 4c 44 59 23 26  |29:LDX#&97:LDY#&|
00001c10  46 46 3a 4a 53 52 26 46  46 46 34 3a 43 50 59 23  |FF:JSR&FFF4:CPY#|
00001c20  30 3a 42 45 51 75 70 3a  4a 53 52 6d 76 64 6e 0d  |0:BEQup:JSRmvdn.|
00001c30  05 00 3c 2e 75 70 20 4c  44 41 23 31 32 39 3a 4c  |..<.up LDA#129:L|
00001c40  44 58 23 26 42 37 3a 4c  44 59 23 26 46 46 3a 4a  |DX#&B7:LDY#&FF:J|
00001c50  53 52 26 46 46 46 34 3a  43 50 59 23 30 3a 42 45  |SR&FFF4:CPY#0:BE|
00001c60  51 6c 74 3a 4a 53 52 6d  76 75 70 0d 05 0a 3c 2e  |Qlt:JSRmvup...<.|
00001c70  6c 74 20 4c 44 41 23 31  32 39 3a 4c 44 58 23 26  |lt LDA#129:LDX#&|
00001c80  39 45 3a 4c 44 59 23 26  46 46 3a 4a 53 52 26 46  |9E:LDY#&FF:JSR&F|
00001c90  46 46 34 3a 43 50 59 23  30 3a 42 45 51 72 74 3a  |FF4:CPY#0:BEQrt:|
00001ca0  4a 53 52 6d 76 6c 74 0d  05 14 3e 2e 72 74 20 4c  |JSRmvlt...>.rt L|
00001cb0  44 41 23 31 32 39 3a 4c  44 58 23 26 42 44 3a 4c  |DA#129:LDX#&BD:L|
00001cc0  44 59 23 26 46 46 3a 4a  53 52 26 46 46 46 34 3a  |DY#&FF:JSR&FFF4:|
00001cd0  43 50 59 23 30 3a 42 45  51 73 6f 66 66 3a 4a 53  |CPY#0:BEQsoff:JS|
00001ce0  52 6d 76 72 74 0d 05 1e  40 2e 73 6f 66 66 20 4c  |Rmvrt...@.soff L|
00001cf0  44 41 23 31 32 39 3a 4c  44 58 23 26 45 46 3a 4c  |DA#129:LDX#&EF:L|
00001d00  44 59 23 26 46 46 3a 4a  53 52 26 46 46 46 34 3a  |DY#&FF:JSR&FFF4:|
00001d10  43 50 59 23 30 3a 42 45  51 73 6f 6e 3a 4a 53 52  |CPY#0:BEQson:JSR|
00001d20  73 64 6f 66 66 0d 05 28  3e 2e 73 6f 6e 20 4c 44  |sdoff..(>.son LD|
00001d30  41 23 31 32 39 3a 4c 44  58 23 26 41 45 3a 4c 44  |A#129:LDX#&AE:LD|
00001d40  59 23 26 46 46 3a 4a 53  52 26 46 46 46 34 3a 43  |Y#&FF:JSR&FFF4:C|
00001d50  50 59 23 30 3a 42 45 51  65 73 63 3a 4a 53 52 73  |PY#0:BEQesc:JSRs|
00001d60  64 6f 6e 0d 05 32 68 2e  65 73 63 20 4c 44 41 23  |don..2h.esc LDA#|
00001d70  31 32 39 3a 4c 44 58 23  26 38 46 3a 4c 44 59 23  |129:LDX#&8F:LDY#|
00001d80  26 46 46 3a 4a 53 52 26  46 46 46 34 3a 43 50 59  |&FF:JSR&FFF4:CPY|
00001d90  23 30 3a 42 45 51 6d 65  6e 64 3a 4c 44 41 23 32  |#0:BEQmend:LDA#2|
00001da0  32 39 3a 53 54 41 74 65  6d 70 3a 4c 44 59 23 34  |29:STAtemp:LDY#4|
00001db0  38 3a 53 54 41 74 65 6d  70 79 3a 4a 53 52 64 65  |8:STAtempy:JSRde|
00001dc0  64 3a 2e 6d 65 6e 64 20  52 54 53 0d 05 3c c3 2e  |d:.mend RTS..<..|
00001dd0  6d 76 64 6e 20 4a 53 52  6d 70 6f 73 3a 4c 44 59  |mvdn JSRmpos:LDY|
00001de0  23 37 32 3a 4c 44 41 28  6d 70 29 2c 59 3a 43 4d  |#72:LDA(mp),Y:CM|
00001df0  50 23 32 33 31 3a 42 45  51 6e 64 6e 3a 42 43 53  |P#231:BEQndn:BCS|
00001e00  63 68 67 64 3a 43 4d 50  23 32 32 34 3a 42 45 51  |chgd:CMP#224:BEQ|
00001e10  6e 64 6e 3a 43 4d 50 23  32 32 35 3a 42 45 51 6e  |ndn:CMP#225:BEQn|
00001e20  64 6e 3a 43 4d 50 23 32  32 37 3a 42 4e 45 64 64  |dn:CMP#227:BNEdd|
00001e30  3a 4a 4d 50 64 65 64 3a  2e 64 64 20 43 4d 50 23  |:JMPded:.dd CMP#|
00001e40  32 32 36 3a 42 4e 45 65  64 3a 4a 53 52 64 69 73  |226:BNEed:JSRdis|
00001e50  3a 2e 65 64 20 43 4d 50  23 32 32 38 3a 42 4e 45  |:.ed CMP#228:BNE|
00001e60  6d 76 64 3a 42 4e 45 6d  76 64 3a 4a 53 52 65 61  |mvd:BNEmvd:JSRea|
00001e70  73 3a 4a 4d 50 6d 76 64  3a 2e 63 68 67 64 20 4a  |s:JMPmvd:.chgd J|
00001e80  53 52 20 54 25 3a 4a 53  52 73 6f 6e 64 32 0d 05  |SR T%:JSRsond2..|
00001e90  46 8c 2e 6d 76 64 20 4a  53 52 6d 70 6f 73 3a 4c  |F..mvd JSRmpos:L|
00001ea0  44 59 23 34 38 3a 4c 44  41 23 32 32 39 3a 53 54  |DY#48:LDA#229:ST|
00001eb0  41 28 6d 70 29 2c 59 3a  49 4e 43 20 4d 59 25 3a  |A(mp),Y:INC MY%:|
00001ec0  4a 53 52 6d 70 6f 73 3a  4c 44 59 23 34 38 3a 4c  |JSRmpos:LDY#48:L|
00001ed0  44 41 23 32 33 30 3a 53  54 41 28 6d 70 29 2c 59  |DA#230:STA(mp),Y|
00001ee0  3a 43 4c 43 3a 4c 44 41  20 44 25 3a 41 44 43 23  |:CLC:LDA D%:ADC#|
00001ef0  32 34 3a 53 54 41 20 44  25 3a 4c 44 41 20 44 25  |24:STA D%:LDA D%|
00001f00  2b 31 3a 41 44 43 23 30  3a 53 54 41 20 44 25 2b  |+1:ADC#0:STA D%+|
00001f10  31 3a 2e 6e 64 6e 20 52  54 53 0d 05 50 c3 2e 6d  |1:.ndn RTS..P..m|
00001f20  76 75 70 20 4a 53 52 6d  70 6f 73 3a 4c 44 59 23  |vup JSRmpos:LDY#|
00001f30  32 34 3a 4c 44 41 28 6d  70 29 2c 59 3a 43 4d 50  |24:LDA(mp),Y:CMP|
00001f40  23 32 33 31 3a 42 45 51  6e 75 70 3a 42 43 53 63  |#231:BEQnup:BCSc|
00001f50  68 67 75 3a 43 4d 50 23  32 32 34 3a 42 45 51 6e  |hgu:CMP#224:BEQn|
00001f60  75 70 3a 43 4d 50 23 32  32 35 3a 42 45 51 6e 75  |up:CMP#225:BEQnu|
00001f70  70 3a 43 4d 50 23 32 32  37 3a 42 4e 45 64 75 3a  |p:CMP#227:BNEdu:|
00001f80  4a 4d 50 64 65 64 3a 2e  64 75 20 43 4d 50 23 32  |JMPded:.du CMP#2|
00001f90  32 36 3a 42 4e 45 65 75  3a 4a 53 52 64 69 73 3a  |26:BNEeu:JSRdis:|
00001fa0  2e 65 75 20 43 4d 50 23  32 32 38 3a 42 4e 45 6d  |.eu CMP#228:BNEm|
00001fb0  76 75 3a 42 4e 45 6d 76  75 3a 4a 53 52 65 61 73  |vu:BNEmvu:JSReas|
00001fc0  3a 4a 4d 50 6d 76 75 3a  2e 63 68 67 75 20 4a 53  |:JMPmvu:.chgu JS|
00001fd0  52 20 54 25 3a 4a 53 52  73 6f 6e 64 32 0d 05 5a  |R T%:JSRsond2..Z|
00001fe0  8c 2e 6d 76 75 20 4a 53  52 6d 70 6f 73 3a 4c 44  |..mvu JSRmpos:LD|
00001ff0  59 23 34 38 3a 4c 44 41  23 32 32 39 3a 53 54 41  |Y#48:LDA#229:STA|
00002000  28 6d 70 29 2c 59 3a 44  45 43 20 4d 59 25 3a 4a  |(mp),Y:DEC MY%:J|
00002010  53 52 6d 70 6f 73 3a 4c  44 59 23 34 38 3a 4c 44  |SRmpos:LDY#48:LD|
00002020  41 23 32 33 30 3a 53 54  41 28 6d 70 29 2c 59 3a  |A#230:STA(mp),Y:|
00002030  53 45 43 3a 4c 44 41 20  44 25 3a 53 42 43 23 32  |SEC:LDA D%:SBC#2|
00002040  34 3a 53 54 41 20 44 25  3a 4c 44 41 20 44 25 2b  |4:STA D%:LDA D%+|
00002050  31 3a 53 42 43 23 30 3a  53 54 41 20 44 25 2b 31  |1:SBC#0:STA D%+1|
00002060  3a 2e 6e 75 70 20 52 54  53 0d 05 64 c6 2e 6d 76  |:.nup RTS..d..mv|
00002070  6c 74 20 4a 53 52 6d 70  6f 73 3a 4c 44 59 23 34  |lt JSRmpos:LDY#4|
00002080  37 3a 4c 44 41 28 6d 70  29 2c 59 3a 43 4d 50 23  |7:LDA(mp),Y:CMP#|
00002090  32 33 31 3a 42 45 51 6e  6c 74 3a 42 43 53 63 68  |231:BEQnlt:BCSch|
000020a0  67 6c 3a 43 4d 50 23 32  32 34 3a 42 45 51 6e 6c  |gl:CMP#224:BEQnl|
000020b0  74 3a 43 4d 50 23 32 32  35 3a 42 4e 45 6d 6c 3a  |t:CMP#225:BNEml:|
000020c0  4a 4d 50 72 6c 74 3a 2e  6d 6c 20 43 4d 50 23 32  |JMPrlt:.ml CMP#2|
000020d0  32 37 3a 42 4e 45 64 6c  3a 4a 4d 50 64 65 64 3a  |27:BNEdl:JMPded:|
000020e0  2e 64 6c 20 43 4d 50 23  32 32 36 3a 42 4e 45 65  |.dl CMP#226:BNEe|
000020f0  6c 3a 4a 53 52 64 69 73  3a 2e 65 6c 20 43 4d 50  |l:JSRdis:.el CMP|
00002100  23 32 32 38 3a 42 4e 45  6d 76 6c 3a 4a 53 52 65  |#228:BNEmvl:JSRe|
00002110  61 73 3a 4a 4d 50 6d 76  6c 3a 2e 63 68 67 6c 20  |as:JMPmvl:.chgl |
00002120  4a 53 52 20 54 25 3a 4a  53 52 73 6f 6e 64 32 0d  |JSR T%:JSRsond2.|
00002130  05 6e 8b 2e 6d 76 6c 20  4a 53 52 6d 70 6f 73 3a  |.n..mvl JSRmpos:|
00002140  4c 44 59 23 34 38 3a 4c  44 41 23 32 32 39 3a 53  |LDY#48:LDA#229:S|
00002150  54 41 28 6d 70 29 2c 59  3a 44 45 43 20 4d 58 25  |TA(mp),Y:DEC MX%|
00002160  3a 4a 53 52 6d 70 6f 73  3a 4c 44 59 23 34 38 3a  |:JSRmpos:LDY#48:|
00002170  4c 44 41 23 32 33 30 3a  53 54 41 28 6d 70 29 2c  |LDA#230:STA(mp),|
00002180  59 3a 53 45 43 3a 4c 44  41 20 44 25 3a 53 42 43  |Y:SEC:LDA D%:SBC|
00002190  23 31 3a 53 54 41 20 44  25 3a 4c 44 41 20 44 25  |#1:STA D%:LDA D%|
000021a0  2b 31 3a 53 42 43 23 30  3a 53 54 41 20 44 25 2b  |+1:SBC#0:STA D%+|
000021b0  31 3a 2e 6e 6c 74 20 52  54 53 0d 05 78 4a 2e 72  |1:.nlt RTS..xJ.r|
000021c0  6c 74 20 4c 44 59 23 34  36 3a 4c 44 41 28 6d 70  |lt LDY#46:LDA(mp|
000021d0  29 2c 59 3a 43 4d 50 23  32 32 39 3a 42 4e 45 6e  |),Y:CMP#229:BNEn|
000021e0  6c 74 3a 4c 44 41 23 32  32 35 3a 53 54 41 28 6d  |lt:LDA#225:STA(m|
000021f0  70 29 2c 59 3a 4a 53 52  73 6f 6e 64 33 3a 4a 4d  |p),Y:JSRsond3:JM|
00002200  50 6d 76 6c 0d 05 82 c6  2e 6d 76 72 74 20 4a 53  |Pmvl.....mvrt JS|
00002210  52 6d 70 6f 73 3a 4c 44  59 23 34 39 3a 4c 44 41  |Rmpos:LDY#49:LDA|
00002220  28 6d 70 29 2c 59 3a 43  4d 50 23 32 33 31 3a 42  |(mp),Y:CMP#231:B|
00002230  45 51 6e 72 74 3a 42 43  53 63 68 67 72 3a 43 4d  |EQnrt:BCSchgr:CM|
00002240  50 23 32 32 34 3a 42 45  51 6e 72 74 3a 43 4d 50  |P#224:BEQnrt:CMP|
00002250  23 32 32 35 3a 42 4e 45  6d 72 3a 4a 4d 50 72 72  |#225:BNEmr:JMPrr|
00002260  74 3a 2e 6d 72 20 43 4d  50 23 32 32 37 3a 42 4e  |t:.mr CMP#227:BN|
00002270  45 64 72 3a 4a 4d 50 64  65 64 3a 2e 64 72 20 43  |Edr:JMPded:.dr C|
00002280  4d 50 23 32 32 36 3a 42  4e 45 65 72 3a 4a 53 52  |MP#226:BNEer:JSR|
00002290  64 69 73 3a 2e 65 72 20  43 4d 50 23 32 32 38 3a  |dis:.er CMP#228:|
000022a0  42 4e 45 6d 76 72 3a 4a  53 52 65 61 73 3a 4a 4d  |BNEmvr:JSReas:JM|
000022b0  50 6d 76 72 3a 2e 63 68  67 72 20 4a 53 52 20 54  |Pmvr:.chgr JSR T|
000022c0  25 3a 4a 53 52 73 6f 6e  64 32 0d 05 8c 8b 2e 6d  |%:JSRsond2.....m|
000022d0  76 72 20 4a 53 52 6d 70  6f 73 3a 4c 44 59 23 34  |vr JSRmpos:LDY#4|
000022e0  38 3a 4c 44 41 23 32 32  39 3a 53 54 41 28 6d 70  |8:LDA#229:STA(mp|
000022f0  29 2c 59 3a 49 4e 43 20  4d 58 25 3a 4a 53 52 6d  |),Y:INC MX%:JSRm|
00002300  70 6f 73 3a 4c 44 59 23  34 38 3a 4c 44 41 23 32  |pos:LDY#48:LDA#2|
00002310  33 30 3a 53 54 41 28 6d  70 29 2c 59 3a 43 4c 43  |30:STA(mp),Y:CLC|
00002320  3a 4c 44 41 20 44 25 3a  41 44 43 23 31 3a 53 54  |:LDA D%:ADC#1:ST|
00002330  41 20 44 25 3a 4c 44 41  20 44 25 2b 31 3a 41 44  |A D%:LDA D%+1:AD|
00002340  43 23 30 3a 53 54 41 20  44 25 2b 31 3a 2e 6e 72  |C#0:STA D%+1:.nr|
00002350  74 20 52 54 53 0d 05 96  4a 2e 72 72 74 20 4c 44  |t RTS...J.rrt LD|
00002360  59 23 35 30 3a 4c 44 41  28 6d 70 29 2c 59 3a 43  |Y#50:LDA(mp),Y:C|
00002370  4d 50 23 32 32 39 3a 42  4e 45 6e 72 74 3a 4c 44  |MP#229:BNEnrt:LD|
00002380  41 23 32 32 35 3a 53 54  41 28 6d 70 29 2c 59 3a  |A#225:STA(mp),Y:|
00002390  4a 53 52 73 6f 6e 64 33  3a 4a 4d 50 6d 76 72 0d  |JSRsond3:JMPmvr.|
000023a0  05 a0 7c 2e 6d 70 6f 73  20 4c 44 41 23 26 42 41  |..|.mpos LDA#&BA|
000023b0  3a 53 54 41 6d 70 3a 4c  44 41 23 26 35 32 3a 53  |:STAmp:LDA#&52:S|
000023c0  54 41 6d 70 2b 31 3a 4c  44 41 20 4d 58 25 3a 53  |TAmp+1:LDA MX%:S|
000023d0  54 41 78 25 3a 4c 44 41  20 4d 59 25 3a 53 54 41  |TAx%:LDA MY%:STA|
000023e0  79 25 3a 4a 53 52 63 61  6c 3a 43 4c 43 3a 4c 44  |y%:JSRcal:CLC:LD|
000023f0  41 6d 70 3a 41 44 43 26  36 32 3a 53 54 41 6d 70  |Amp:ADC&62:STAmp|
00002400  3a 4c 44 41 6d 70 2b 31  3a 41 44 43 26 36 33 3a  |:LDAmp+1:ADC&63:|
00002410  53 54 41 6d 70 2b 31 3a  52 54 53 0d 05 aa 3a 2e  |STAmp+1:RTS...:.|
00002420  72 65 70 20 4c 44 41 23  31 32 39 3a 4c 44 58 23  |rep LDA#129:LDX#|
00002430  26 39 44 3a 4c 44 59 23  26 46 46 3a 4a 53 52 26  |&9D:LDY#&FF:JSR&|
00002440  46 46 46 34 3a 43 50 58  23 30 3a 42 45 51 72 65  |FFF4:CPX#0:BEQre|
00002450  70 3a 52 54 53 0d 05 b4  97 2e 67 61 6d 65 6e 64  |p:RTS.....gamend|
00002460  20 4c 44 41 23 31 34 3a  4c 44 58 23 34 3a 4a 53  | LDA#14:LDX#4:JS|
00002470  52 26 46 46 46 34 3a 4c  44 41 23 38 33 3a 4c 44  |R&FFF4:LDA#83:LD|
00002480  58 23 65 6e 64 61 74 31  20 83 32 35 36 3a 4c 44  |X#endat1 .256:LD|
00002490  59 23 65 6e 64 61 74 31  20 81 32 35 36 3a 4a 53  |Y#endat1 .256:JS|
000024a0  52 70 3a 2e 72 64 63 20  4c 44 41 23 31 35 3a 4c  |Rp:.rdc LDA#15:L|
000024b0  44 58 23 30 3a 4a 53 52  26 46 46 46 34 3a 4a 53  |DX#0:JSR&FFF4:JS|
000024c0  52 26 46 46 45 30 3a 43  4d 50 23 97 22 59 22 3a  |R&FFE0:CMP#."Y":|
000024d0  42 45 51 79 65 73 3a 43  4d 50 23 97 22 4e 22 3a  |BEQyes:CMP#."N":|
000024e0  42 45 51 6e 6f 3a 4a 4d  50 72 64 63 0d 05 be 27  |BEQno:JMPrdc...'|
000024f0  2e 79 65 73 20 4c 44 41  23 31 35 3a 4c 44 58 23  |.yes LDA#15:LDX#|
00002500  30 3a 4a 53 52 26 46 46  46 34 3a 4a 4d 50 73 74  |0:JSR&FFF4:JMPst|
00002510  61 72 74 0d 05 c8 0b 2e  6e 6f 20 52 54 53 0d 05  |art.....no RTS..|
00002520  d2 0a 2e 6d 6c 6f 61 64  0d 05 dc 2d 4c 44 41 23  |...mload...-LDA#|
00002530  37 39 3a 4c 44 58 23 6d  6c 64 61 74 20 83 32 35  |79:LDX#mldat .25|
00002540  36 3a 4c 44 59 23 6d 6c  64 61 74 20 81 32 35 36  |6:LDY#mldat .256|
00002550  3a 4a 53 52 70 0d 05 e6  10 2e 72 64 20 4a 53 52  |:JSRp.....rd JSR|
00002560  26 46 46 45 30 0d 05 f0  10 43 4d 50 23 34 39 3a  |&FFE0....CMP#49:|
00002570  42 43 43 72 64 0d 05 fa  10 43 4d 50 23 35 35 3a  |BCCrd....CMP#55:|
00002580  42 43 53 72 64 0d 06 04  1b 53 54 41 6c 64 6d 65  |BCSrd....STAldme|
00002590  73 73 2b 37 3a 53 54 41  6c 64 6d 61 7a 65 2b 39  |ss+7:STAldmaze+9|
000025a0  0d 06 0e 2f 4c 44 41 23  31 38 3a 4c 44 58 23 6c  |.../LDA#18:LDX#l|
000025b0  64 6d 65 73 73 20 83 32  35 36 3a 4c 44 59 23 6c  |dmess .256:LDY#l|
000025c0  64 6d 65 73 73 20 81 32  35 36 3a 4a 53 52 70 0d  |dmess .256:JSRp.|
000025d0  06 18 2c 4c 44 58 23 6c  64 6d 61 7a 65 20 83 32  |..,LDX#ldmaze .2|
000025e0  35 36 3a 4c 44 59 23 6c  64 6d 61 7a 65 20 81 32  |56:LDY#ldmaze .2|
000025f0  35 36 3a 4a 53 52 26 46  46 46 37 0d 06 22 07 52  |56:JSR&FFF7..".R|
00002600  54 53 0d 06 2c b7 2e 44  25 20 45 51 55 57 30 3a  |TS..,..D% EQUW0:|
00002610  2e 73 64 25 20 45 51 55  57 30 3a 2e 6c 69 25 20  |.sd% EQUW0:.li% |
00002620  45 51 55 42 30 3a 2e 6c  65 76 25 20 45 51 55 42  |EQUB0:.lev% EQUB|
00002630  30 3a 2e 53 43 25 20 45  51 55 57 30 3a 2e 65 61  |0:.SC% EQUW0:.ea|
00002640  25 20 45 51 55 42 30 3a  2e 73 71 25 20 45 51 55  |% EQUB0:.sq% EQU|
00002650  42 30 3a 2e 64 69 25 20  45 51 55 42 30 3a 2e 6d  |B0:.di% EQUB0:.m|
00002660  61 78 64 69 25 20 45 51  55 42 30 3a 2e 6d 61 78  |axdi% EQUB0:.max|
00002670  73 71 25 20 45 51 55 42  30 3a 2e 6d 61 78 65 61  |sq% EQUB0:.maxea|
00002680  25 20 45 51 55 42 30 3a  2e 6b 74 25 20 45 51 55  |% EQUB0:.kt% EQU|
00002690  42 30 3a 2e 63 6e 25 20  45 51 55 42 30 3a 2e 6c  |B0:.cn% EQUB0:.l|
000026a0  76 65 6e 64 20 45 51 55  42 30 3a 2e 64 65 61 64  |vend EQUB0:.dead|
000026b0  6d 61 6e 20 45 51 55 42  30 0d 06 36 31 2e 4d 58  |man EQUB0..61.MX|
000026c0  25 20 45 51 55 42 30 3a  2e 4d 59 25 20 45 51 55  |% EQUB0:.MY% EQU|
000026d0  42 30 3a 2e 73 6d 78 25  20 45 51 55 42 30 3a 2e  |B0:.smx% EQUB0:.|
000026e0  73 6d 79 25 20 45 51 55  42 30 0d 06 40 37 2e 74  |smy% EQUB0..@7.t|
000026f0  65 6d 70 20 45 51 55 42  30 3a 2e 74 65 6d 70 79  |emp EQUB0:.tempy|
00002700  20 45 51 55 42 30 3a 2e  64 69 67 69 74 73 20 45  | EQUB0:.digits E|
00002710  51 55 57 30 3a 2e 73 63  6f 72 65 20 45 51 55 57  |QUW0:.score EQUW|
00002720  30 0d 06 4a 21 2e 78 25  20 45 51 55 42 30 3a 2e  |0..J!.x% EQUB0:.|
00002730  79 25 20 45 51 55 42 30  3a 2e 76 25 20 45 51 55  |y% EQUB0:.v% EQU|
00002740  57 30 0d 06 54 68 2e 64  61 74 31 20 45 51 55 42  |W0..Th.dat1 EQUB|
00002750  32 32 3a 45 51 55 42 35  3a 45 51 55 42 32 33 3a  |22:EQUB5:EQUB23:|
00002760  45 51 55 42 31 3a 45 51  55 44 30 3a 45 51 55 44  |EQUB1:EQUD0:EQUD|
00002770  30 3a 45 51 55 42 31 39  3a 45 51 55 42 33 3a 45  |0:EQUB19:EQUB3:E|
00002780  51 55 57 32 3a 45 51 55  57 30 3a 45 51 55 42 31  |QUW2:EQUW0:EQUB1|
00002790  37 3a 45 51 55 42 31 3a  45 51 55 42 33 31 3a 45  |7:EQUB1:EQUB31:E|
000027a0  51 55 42 35 3a 45 51 55  42 35 0d 06 5e 1d 2e 74  |QUB5:EQUB5..^..t|
000027b0  69 74 6c 65 20 45 51 55  53 22 4d 52 20 4d 49 4e  |itle EQUS"MR MIN|
000027c0  45 52 22 2b bd 31 33 0d  06 68 58 2e 64 61 74 32  |ER"+.13..hX.dat2|
000027d0  20 45 51 55 42 32 33 3a  45 51 55 42 32 35 30 3a  | EQUB23:EQUB250:|
000027e0  45 51 55 42 30 3a 45 51  55 42 2d 31 3a 45 51 55  |EQUB0:EQUB-1:EQU|
000027f0  42 30 3a 45 51 55 42 2d  31 3a 45 51 55 44 30 3a  |B0:EQUB-1:EQUD0:|
00002800  45 51 55 42 31 37 3a 45  51 55 42 32 3a 45 51 55  |EQUB17:EQUB2:EQU|
00002810  42 33 31 3a 45 51 55 42  35 3a 45 51 55 42 37 0d  |B31:EQUB5:EQUB7.|
00002820  06 72 19 2e 75 6c 20 45  51 55 53 20 c4 38 2c bd  |.r..ul EQUS .8,.|
00002830  32 35 30 29 2b bd 31 33  0d 06 7c 16 2e 64 61 74  |250)+.13..|..dat|
00002840  33 20 45 51 55 42 31 37  3a 45 51 55 42 33 0d 06  |3 EQUB17:EQUB3..|
00002850  86 17 45 51 55 42 33 31  3a 45 51 55 42 30 3a 45  |..EQUB31:EQUB0:E|
00002860  51 55 42 31 31 0d 06 90  1c 45 51 55 53 22 53 6f  |QUB11....EQUS"So|
00002870  75 6e 64 2c 20 4f 66 66  2f 4f 6e 20 20 51 2f 53  |und, Off/On  Q/S|
00002880  22 0d 06 9a 17 45 51 55  42 33 31 3a 45 51 55 42  |"....EQUB31:EQUB|
00002890  30 3a 45 51 55 42 31 34  0d 06 a4 1e 45 51 55 53  |0:EQUB14....EQUS|
000028a0  22 53 70 65 65 64 20 28  31 3d 66 61 73 74 29 20  |"Speed (1=fast) |
000028b0  31 2f 32 2f 33 22 0d 06  ae 17 45 51 55 42 33 31  |1/2/3"....EQUB31|
000028c0  3a 45 51 55 42 30 3a 45  51 55 42 31 37 0d 06 b8  |:EQUB0:EQUB17...|
000028d0  1a 45 51 55 53 22 4c 6f  61 64 20 6d 61 7a 65 20  |.EQUS"Load maze |
000028e0  66 69 6c 65 20 4c 22 0d  06 c2 17 45 51 55 42 33  |file L"....EQUB3|
000028f0  31 3a 45 51 55 42 30 3a  45 51 55 42 32 30 0d 06  |1:EQUB0:EQUB20..|
00002900  cc 1a 45 51 55 53 22 50  6c 61 79 20 47 61 6d 65  |..EQUS"Play Game|
00002910  20 20 20 20 20 20 50 22  0d 06 d6 24 45 51 55 42  |      P"...$EQUB|
00002920  31 37 3a 45 51 55 42 32  3a 45 51 55 42 33 31 3a  |17:EQUB2:EQUB31:|
00002930  45 51 55 42 35 3a 45 51  55 42 32 34 0d 06 e0 69  |EQUB5:EQUB24...i|
00002940  2e 64 32 20 45 51 55 42  32 34 3a 45 51 55 57 33  |.d2 EQUB24:EQUW3|
00002950  32 3a 45 51 55 57 31 36  3a 45 51 55 57 31 32 34  |2:EQUW16:EQUW124|
00002960  37 3a 45 51 55 57 32 30  38 3a 45 51 55 42 31 36  |7:EQUW208:EQUB16|
00002970  3a 45 51 55 42 32 34 3a  45 51 55 57 33 32 3a 45  |:EQUB24:EQUW32:E|
00002980  51 55 57 39 32 30 3a 45  51 55 57 31 32 34 37 3a  |QUW920:EQUW1247:|
00002990  45 51 55 57 39 39 34 3a  45 51 55 42 31 36 3a 45  |EQUW994:EQUB16:E|
000029a0  51 55 42 32 36 0d 06 ea  22 45 51 55 42 33 31 3a  |QUB26..."EQUB31:|
000029b0  45 51 55 42 31 3a 45 51  55 42 31 3a 45 51 55 53  |EQUB1:EQUB1:EQUS|
000029c0  22 53 63 6f 72 65 22 0d  06 f4 27 45 51 55 42 33  |"Score"...'EQUB3|
000029d0  31 3a 45 51 55 42 32 3a  45 51 55 42 32 36 3a 45  |1:EQUB2:EQUB26:E|
000029e0  51 55 53 22 44 69 61 6d  6f 6e 64 73 3a 22 0d 06  |QUS"Diamonds:"..|
000029f0  fe 24 45 51 55 42 33 31  3a 45 51 55 42 35 3a 45  |.$EQUB31:EQUB5:E|
00002a00  51 55 42 32 38 3a 45 51  55 53 22 45 61 72 74 68  |QUB28:EQUS"Earth|
00002a10  3a 22 0d 07 08 28 45 51  55 42 33 31 3a 45 51 55  |:"...(EQUB31:EQU|
00002a20  42 31 3a 45 51 55 42 33  30 3a 45 51 55 53 22 4d  |B1:EQUB30:EQUS"M|
00002a30  75 73 68 72 6f 6f 6d 73  3a 22 0d 07 12 c9 45 51  |ushrooms:"....EQ|
00002a40  55 42 32 34 3a 45 51 55  57 33 31 36 3a 45 51 55  |UB24:EQUW316:EQU|
00002a50  57 32 38 34 3a 45 51 55  57 39 39 32 3a 45 51 55  |W284:EQUW992:EQU|
00002a60  57 37 34 32 3a 45 51 55  42 31 36 3a 45 51 55 42  |W742:EQUB16:EQUB|
00002a70  32 36 3a 45 51 55 42 32  35 3a 45 51 55 42 34 3a  |26:EQUB25:EQUB4:|
00002a80  45 51 55 57 33 31 36 3a  45 51 55 57 37 34 32 3a  |EQUW316:EQUW742:|
00002a90  45 51 55 42 32 35 3a 45  51 55 42 35 3a 45 51 55  |EQUB25:EQUB5:EQU|
00002aa0  57 33 31 36 3a 45 51 55  57 32 38 34 3a 45 51 55  |W316:EQUW284:EQU|
00002ab0  42 32 35 3a 45 51 55 42  35 3a 45 51 55 57 39 39  |B25:EQUB5:EQUW99|
00002ac0  32 3a 45 51 55 57 32 38  34 3a 45 51 55 42 32 35  |2:EQUW284:EQUB25|
00002ad0  3a 45 51 55 42 35 3a 45  51 55 57 39 39 32 3a 45  |:EQUB5:EQUW992:E|
00002ae0  51 55 57 37 34 32 3a 45  51 55 42 32 35 3a 45 51  |QUW742:EQUB25:EQ|
00002af0  55 42 35 3a 45 51 55 57  33 32 34 3a 45 51 55 57  |UB5:EQUW324:EQUW|
00002b00  37 34 32 0d 07 1c 26 2e  64 34 20 45 51 55 42 33  |742...&.d4 EQUB3|
00002b10  31 3a 45 51 55 42 31 3a  45 51 55 42 32 3a 45 51  |1:EQUB1:EQUB2:EQ|
00002b20  55 53 22 30 30 30 30 30  22 0d 07 26 39 2e 64 33  |US"00000"..&9.d3|
00002b30  20 45 51 55 42 35 3a 45  51 55 42 32 35 3a 45 51  | EQUB5:EQUB25:EQ|
00002b40  55 42 34 3a 45 51 55 57  34 30 37 3a 45 51 55 57  |UB4:EQUW407:EQUW|
00002b50  35 32 30 3a 45 51 55 53  22 54 68 69 6e 6b 69 6e  |520:EQUS"Thinkin|
00002b60  67 22 0d 07 30 49 45 51  55 42 34 3a 45 51 55 42  |g"..0IEQUB4:EQUB|
00002b70  31 37 3a 45 51 55 42 31  3a 45 51 55 42 33 31 3a  |17:EQUB1:EQUB31:|
00002b80  45 51 55 42 39 3a 45 51  55 42 31 3a 45 51 55 53  |EQUB9:EQUB1:EQUS|
00002b90  22 4c 45 56 45 4c 22 3a  45 51 55 42 33 31 3a 45  |"LEVEL":EQUB31:E|
00002ba0  51 55 42 31 31 3a 45 51  55 42 32 0d 07 3a 67 2e  |QUB11:EQUB2..:g.|
00002bb0  65 6e 76 31 20 45 51 55  42 31 3a 45 51 55 42 34  |env1 EQUB1:EQUB4|
00002bc0  3a 45 51 55 42 35 3a 45  51 55 42 36 3a 45 51 55  |:EQUB5:EQUB6:EQU|
00002bd0  42 37 3a 45 51 55 42 38  3a 45 51 55 42 39 3a 45  |B7:EQUB8:EQUB9:E|
00002be0  51 55 42 31 30 3a 45 51  55 42 31 32 36 3a 45 51  |QUB10:EQUB126:EQ|
00002bf0  55 42 30 3a 45 51 55 42  30 3a 45 51 55 42 2d 31  |UB0:EQUB0:EQUB-1|
00002c00  32 36 3a 45 51 55 42 31  32 36 3a 45 51 55 42 31  |26:EQUB126:EQUB1|
00002c10  32 36 0d 07 44 6b 2e 65  6e 76 32 20 45 51 55 42  |26..Dk.env2 EQUB|
00002c20  32 3a 45 51 55 42 32 3a  45 51 55 42 31 37 3a 45  |2:EQUB2:EQUB17:E|
00002c30  51 55 42 2d 36 3a 45 51  55 42 32 33 3a 45 51 55  |QUB-6:EQUB23:EQU|
00002c40  42 31 37 3a 45 51 55 42  32 38 3a 45 51 55 42 32  |B17:EQUB28:EQUB2|
00002c50  3a 45 51 55 42 31 32 36  3a 45 51 55 42 30 3a 45  |:EQUB126:EQUB0:E|
00002c60  51 55 42 30 3a 45 51 55  42 2d 31 32 36 3a 45 51  |QUB0:EQUB-126:EQ|
00002c70  55 42 31 32 36 3a 45 51  55 42 31 32 36 0d 07 4e  |UB126:EQUB126..N|
00002c80  68 2e 65 6e 76 33 20 45  51 55 42 33 3a 45 51 55  |h.env3 EQUB3:EQU|
00002c90  42 32 3a 45 51 55 42 32  3a 45 51 55 42 30 3a 45  |B2:EQUB2:EQUB0:E|
00002ca0  51 55 42 30 3a 45 51 55  42 31 38 30 3a 45 51 55  |QUB0:EQUB180:EQU|
00002cb0  42 30 3a 45 51 55 42 30  3a 45 51 55 42 31 32 36  |B0:EQUB0:EQUB126|
00002cc0  3a 45 51 55 42 30 3a 45  51 55 42 30 3a 45 51 55  |:EQUB0:EQUB0:EQU|
00002cd0  42 2d 31 32 36 3a 45 51  55 42 31 32 36 3a 45 51  |B-126:EQUB126:EQ|
00002ce0  55 42 31 32 36 0d 07 58  21 2e 73 6f 75 31 20 45  |UB126..X!.sou1 E|
00002cf0  51 55 57 31 3a 45 51 55  57 33 3a 45 51 55 57 30  |QUW1:EQUW3:EQUW0|
00002d00  3a 45 51 55 57 39 0d 07  62 25 2e 73 6f 75 32 20  |:EQUW9..b%.sou2 |
00002d10  45 51 55 57 26 31 31 3a  45 51 55 57 32 3a 45 51  |EQUW&11:EQUW2:EQ|
00002d20  55 57 31 35 30 3a 45 51  55 57 33 0d 07 6c 25 2e  |UW150:EQUW3..l%.|
00002d30  73 6f 75 33 20 45 51 55  57 26 31 30 3a 45 51 55  |sou3 EQUW&10:EQU|
00002d40  57 2d 31 35 3a 45 51 55  57 36 3a 45 51 55 57 32  |W-15:EQUW6:EQUW2|
00002d50  0d 07 76 25 2e 73 6f 75  34 20 45 51 55 57 26 31  |..v%.sou4 EQUW&1|
00002d60  31 3a 45 51 55 57 31 3a  45 51 55 57 31 36 30 3a  |1:EQUW1:EQUW160:|
00002d70  45 51 55 57 32 0d 07 80  26 2e 73 6f 75 35 20 45  |EQUW2...&.sou5 E|
00002d80  51 55 57 26 31 30 3a 45  51 55 57 2d 31 35 3a 45  |QUW&10:EQUW-15:E|
00002d90  51 55 57 34 3a 45 51 55  57 31 35 0d 07 8a 23 2e  |QUW4:EQUW15...#.|
00002da0  73 6f 75 36 20 45 51 55  57 30 3a 45 51 55 57 2d  |sou6 EQUW0:EQUW-|
00002db0  31 35 3a 45 51 55 57 34  3a 45 51 55 57 31 0d 07  |15:EQUW4:EQUW1..|
00002dc0  94 18 2e 64 61 74 20 45  51 55 53 22 3d 33 22 3a  |...dat EQUS"=3":|
00002dd0  45 51 55 42 31 33 0d 07  9e 3c 2e 74 61 62 6c 65  |EQUB13...<.table|
00002de0  20 45 51 55 57 26 31 45  45 30 3a 45 51 55 57 26  | EQUW&1EE0:EQUW&|
00002df0  32 30 41 32 3a 45 51 55  57 26 32 32 36 34 3a 45  |20A2:EQUW&2264:E|
00002e00  51 55 57 26 32 34 32 36  3a 45 51 55 57 26 32 35  |QUW&2426:EQUW&25|
00002e10  45 38 0d 07 a8 3d 2e 65  6e 64 61 74 20 45 51 55  |E8...=.endat EQU|
00002e20  42 35 3a 45 51 55 42 32  35 3a 45 51 55 42 34 3a  |B5:EQUB25:EQUB4:|
00002e30  45 51 55 57 33 37 35 3a  45 51 55 57 35 35 32 3a  |EQUW375:EQUW552:|
00002e40  45 51 55 53 22 47 61 6d  65 20 4f 76 65 72 22 0d  |EQUS"Game Over".|
00002e50  07 b2 30 45 51 55 42 32  35 3a 45 51 55 42 34 3a  |..0EQUB25:EQUB4:|
00002e60  45 51 55 57 33 37 35 3a  45 51 55 57 34 33 32 3a  |EQUW375:EQUW432:|
00002e70  45 51 55 53 22 48 69 74  20 53 70 61 63 65 22 0d  |EQUS"Hit Space".|
00002e80  07 bc 60 2e 65 6e 64 61  74 31 20 45 51 55 42 31  |..`.endat1 EQUB1|
00002e90  32 3a 45 51 55 42 33 31  3a 45 51 55 42 37 3a 45  |2:EQUB31:EQUB7:E|
00002ea0  51 55 42 38 3a 45 51 55  53 22 48 55 52 52 41 59  |QUB8:EQUS"HURRAY|
00002eb0  22 3a 45 51 55 42 31 37  3a 45 51 55 42 32 3a 45  |":EQUB17:EQUB2:E|
00002ec0  51 55 42 33 31 3a 45 51  55 42 37 3a 45 51 55 42  |QUB31:EQUB7:EQUB|
00002ed0  39 3a 45 51 55 53 20 c4  36 2c bd 32 35 30 29 0d  |9:EQUS .6,.250).|
00002ee0  07 c6 64 45 51 55 42 31  37 3a 45 51 55 42 33 3a  |..dEQUB17:EQUB3:|
00002ef0  45 51 55 42 33 31 3a 45  51 55 42 32 3a 45 51 55  |EQUB31:EQUB2:EQU|
00002f00  42 31 31 3a 45 51 55 53  22 59 4f 55 20 48 41 56  |B11:EQUS"YOU HAV|
00002f10  45 20 45 53 43 41 50 45  44 22 3a 45 51 55 42 33  |E ESCAPED":EQUB3|
00002f20  31 3a 45 51 55 42 32 3a  45 51 55 42 31 33 3a 45  |1:EQUB2:EQUB13:E|
00002f30  51 55 53 22 54 48 49 53  20 54 49 4d 45 2e 2e 2e  |QUS"THIS TIME...|
00002f40  2e 2e 22 0d 07 d0 2b 45  51 55 42 33 31 3a 45 51  |.."...+EQUB31:EQ|
00002f50  55 42 33 3a 45 51 55 42  32 30 3a 45 51 55 53 22  |UB3:EQUB20:EQUS"|
00002f60  41 6e 6f 74 68 65 72 20  67 61 6d 65 3f 22 0d 07  |Another game?"..|
00002f70  da 23 45 51 55 42 33 31  3a 45 51 55 42 37 3a 45  |.#EQUB31:EQUB7:E|
00002f80  51 55 42 32 32 3a 45 51  55 53 22 28 59 2f 4e 29  |QUB22:EQUS"(Y/N)|
00002f90  22 0d 07 e4 40 2e 6d 6c  64 61 74 20 45 51 55 42  |"...@.mldat EQUB|
00002fa0  31 37 3a 45 51 55 42 33  3a 45 51 55 42 32 38 3a  |17:EQUB3:EQUB28:|
00002fb0  45 51 55 42 30 3a 45 51  55 42 32 32 3a 45 51 55  |EQUB0:EQUB22:EQU|
00002fc0  42 31 39 3a 45 51 55 42  31 30 3a 45 51 55 42 31  |B19:EQUB10:EQUB1|
00002fd0  32 0d 07 ee 26 45 51 55  42 33 31 3a 45 51 55 42  |2...&EQUB31:EQUB|
00002fe0  35 3a 45 51 55 42 30 3a  45 51 55 53 22 4c 4f 41  |5:EQUB0:EQUS"LOA|
00002ff0  44 20 46 49 4c 45 22 0d  07 f8 24 45 51 55 42 33  |D FILE"...$EQUB3|
00003000  31 3a 45 51 55 42 35 3a  45 51 55 42 31 3a 45 51  |1:EQUB5:EQUB1:EQ|
00003010  55 53 20 c4 39 2c bd 32  35 30 29 0d 08 02 2e 45  |US .9,.250)....E|
00003020  51 55 42 33 31 3a 45 51  55 42 31 3a 45 51 55 42  |QUB31:EQUB1:EQUB|
00003030  33 3a 45 51 55 53 22 46  69 6c 65 73 20 61 72 65  |3:EQUS"Files are|
00003040  20 4d 41 5a 45 31 2d 35  22 0d 08 0c 2c 45 51 55  | MAZE1-5"...,EQU|
00003050  42 33 31 3a 45 51 55 42  32 3a 45 51 55 42 35 3a  |B31:EQUB2:EQUB5:|
00003060  45 51 55 53 22 50 72 65  73 73 20 6e 75 6d 62 65  |EQUS"Press numbe|
00003070  72 20 6f 66 22 0d 08 16  23 45 51 55 42 33 31 3a  |r of"...#EQUB31:|
00003080  45 51 55 42 36 3a 45 51  55 42 37 3a 45 51 55 53  |EQUB6:EQUB7:EQUS|
00003090  22 63 68 6f 69 63 65 22  0d 08 20 35 2e 6c 64 6d  |"choice".. 5.ldm|
000030a0  65 73 73 20 45 51 55 42  33 31 3a 45 51 55 42 32  |ess EQUB31:EQUB2|
000030b0  3a 45 51 55 42 31 30 3a  45 51 55 53 22 4d 41 5a  |:EQUB10:EQUS"MAZ|
000030c0  45 20 20 6c 6f 61 64 69  6e 67 2e 2e 22 0d 08 2a  |E  loading.."..*|
000030d0  25 2e 6c 64 6d 61 7a 65  20 45 51 55 53 22 4c 4f  |%.ldmaze EQUS"LO|
000030e0  41 44 20 4d 41 5a 45 20  20 31 45 45 30 22 2b bd  |AD MAZE  1EE0"+.|
000030f0  31 33 0d 08 34 05 5d 0d  08 3e 07 ed 3a e1 0d ff  |13..4.]..>..:...|
00003100

G/MINsrc2.m0

G/MINsrc2.m1

G/MINsrc2.m2

G/MINsrc2.m4

G/MINsrc2.m5

Our privacy policy is here.
Last updated: 28 Jul 2024, 23:31 UTC
Website designed by .