diff --git a/bin/d5_strings.dsk b/bin/d5_strings.dsk index 56e8622..e3000e1 100644 Binary files a/bin/d5_strings.dsk and b/bin/d5_strings.dsk differ diff --git a/disks/disk5_strings/MINIFY b/disks/disk5_strings/MINIFY new file mode 100644 index 0000000..2cd43f2 --- /dev/null +++ b/disks/disk5_strings/MINIFY @@ -0,0 +1,30 @@ + 5 HOME + 8 ONERR GOTO 1000 + 10 PRINT "ASSEMBLY CODE MINIFIER" + 20 PRINT "-=-=-=-=-=-=-=-=-=-=-=" + 30 PRINT + 35 DIM FC$(1000):C = 0 + 40 INPUT "ENTER THE SOURCE FILE NAME: ";FF$ + 50 INPUT "ENTER THE DESTINATION FILE NAME: ";DD$ + 55 PRINT "WORKING.." + 60 PRINT CHR$ (4);"OPEN ";FF$ + 70 PRINT CHR$ (4);"READ ";FF$ + 80 GET AA$ + 85 REM ? CHR$ (34);"."; + 90 IF AA$ = CHR$ (13) THEN GOTO 200 + 95 S$ = S$ + AA$ + 110 GOTO 80 + 200 IF LEFT$ (S$,1) = "*" OR LEFT$ (S$,1) = ";" THEN S$ = "" + 500 FC$(C) = S$ + 510 S$ = "" + 520 C = C + 1 + 990 GOTO 80 + 1000 PRINT : PRINT CHR$ (4);"CLOSE ";FF$ + 1010 PRINT CHR$ (4);"OPEN ";DD$ + 1020 PRINT CHR$ (4);"WRITE ";DD$ + 1030 FOR Z = 0 TO C + 1040 IF FC$(Z) < > "" THEN PRINT FC$(Z) + 1050 NEXT Z + 1060 PRINT CHR$ (4);"CLOSE ";DD$ + 1070 PRINT "DONE!": PRINT : PRINT : PRINT + 1080 PRINT CHR$ (7): PRINT CHR$ (7): PRINT CHR$ (7) diff --git a/disks/disk5_strings/STRINGS.DEMO b/disks/disk5_strings/STRINGS.DEMO index be609d1..1c3c527 100644 --- a/disks/disk5_strings/STRINGS.DEMO +++ b/disks/disk5_strings/STRINGS.DEMO @@ -1,3010 +1,3093 @@ -6000- 20 CC 73 JSR $73CC -6003- A0 8D LDY #$8D -6005- 8D 8D 8D STA $8D8D +6000- 4C 4A 62 JMP $624A +6003- 00 BRK +6004- 00 BRK +6005- 00 BRK +6006- 00 BRK +6007- 00 BRK 6008- 00 BRK -6009- 20 CC 73 JSR $73CC -600C- D3 ??? -600D- D4 ??? -600E- D2 C9 CMP ($C9) -6010- CE C7 D3 DEC $D3C7 -6013- A0 CC LDY #$CC -6015- C9 C2 CMP #$C2 -6017- D2 C1 CMP ($C1) -6019- D2 D9 CMP ($D9) -601B- A0 C4 LDY #$C4 -601D- C5 CD CMP $CD -601F- CF ??? -6020- 8D 00 20 STA $2000 -6023- CC 73 AD CPY $AD73 -6026- AD AD AD LDA $ADAD -6029- AD AD AD LDA $ADAD -602C- AD AD AD LDA $ADAD -602F- AD AD AD LDA $ADAD -6032- AD AD AD LDA $ADAD -6035- AD AD AD LDA $ADAD -6038- AD 8D 00 LDA $008D -603B- 20 CC 73 JSR $73CC -603E- A0 8D LDY #$8D +6009- 00 BRK +600A- 00 BRK +600B- 00 BRK +600C- 00 BRK +600D- 00 BRK +600E- 00 BRK +600F- 00 BRK +6010- 00 BRK +6011- 00 BRK +6012- 00 BRK +6013- 00 BRK +6014- 00 BRK +6015- 00 BRK +6016- 00 BRK +6017- 00 BRK +6018- 00 BRK +6019- 00 BRK +601A- 00 BRK +601B- 00 BRK +601C- 00 BRK +601D- 00 BRK +601E- 00 BRK +601F- 00 BRK +6020- 00 BRK +6021- 00 BRK +6022- 00 BRK +6023- 00 BRK +6024- 00 BRK +6025- 00 BRK +6026- 00 BRK +6027- 00 BRK +6028- 00 BRK +6029- 00 BRK +602A- 00 BRK +602B- 00 BRK +602C- 00 BRK +602D- 00 BRK +602E- 00 BRK +602F- 00 BRK +6030- 00 BRK +6031- 00 BRK +6032- 00 BRK +6033- 00 BRK +6034- 00 BRK +6035- 00 BRK +6036- 00 BRK +6037- 00 BRK +6038- 00 BRK +6039- 00 BRK +603A- 00 BRK +603B- 00 BRK +603C- 00 BRK +603D- 00 BRK +603E- 00 BRK +603F- 00 BRK 6040- 00 BRK -6041- 20 CC 73 JSR $73CC -6044- D4 ??? -6045- C8 INY -6046- C5 A0 CMP $A0 -6048- D3 ??? -6049- C3 ??? -604A- CD D0 A0 CMP $A0D0 -604D- CD C1 C3 CMP $C3C1 -6050- D2 CF CMP ($CF) -6052- A0 C3 LDY #$C3 -6054- CF ??? -6055- CD D0 C1 CMP $C1D0 -6058- D2 C5 CMP ($C5) -605A- D3 ??? -605B- A0 D4 LDY #$D4 -605D- D7 ??? -605E- CF ??? -605F- A0 8D LDY #$8D +6041- 00 BRK +6042- 00 BRK +6043- 00 BRK +6044- 00 BRK +6045- 00 BRK +6046- 00 BRK +6047- 00 BRK +6048- 00 BRK +6049- 00 BRK +604A- 00 BRK +604B- 00 BRK +604C- 00 BRK +604D- 00 BRK +604E- 00 BRK +604F- 00 BRK +6050- 00 BRK +6051- 00 BRK +6052- 00 BRK +6053- 00 BRK +6054- 00 BRK +6055- 00 BRK +6056- 00 BRK +6057- 00 BRK +6058- 00 BRK +6059- 00 BRK +605A- 00 BRK +605B- 00 BRK +605C- 00 BRK +605D- 00 BRK +605E- 00 BRK +605F- 00 BRK +6060- 00 BRK 6061- 00 BRK -6062- 20 CC 73 JSR $73CC -6065- D3 ??? -6066- D4 ??? -6067- D2 C9 CMP ($C9) -6069- CE C7 D3 DEC $D3C7 -606C- A0 C1 LDY #$C1 -606E- CE C4 A0 DEC $A0C4 -6071- D3 ??? -6072- C5 D4 CMP $D4 -6074- D3 ??? -6075- A0 D4 LDY #$D4 -6077- C8 INY -6078- C5 A0 CMP $A0 -607A- C6 CC DEC $CC -607C- C1 C7 CMP ($C7,X) -607E- D3 ??? -607F- 8D 00 20 STA $2000 -6082- CC 73 C1 CPY $C173 -6085- C3 ??? -6086- C3 ??? -6087- CF ??? -6088- D2 C4 CMP ($C4) -608A- C9 CE CMP #$CE -608C- C7 ??? -608D- CC D9 AE CPY $AED9 -6090- A0 C9 LDY #$C9 -6092- C6 A0 DEC $A0 -6094- D4 ??? -6095- C8 INY -6096- C5 A0 CMP $A0 -6098- D4 ??? -6099- D7 ??? -609A- CF ??? -609B- A0 C1 LDY #$C1 -609D- D2 C5 CMP ($C5) -609F- A0 C5 LDY #$C5 -60A1- D1 D5 CMP ($D5),Y -60A3- C1 CC CMP ($CC,X) -60A5- AC 8D 00 LDY $008D -60A8- 20 CC 73 JSR $73CC -60AB- D4 ??? -60AC- C8 INY -60AD- C5 CE CMP $CE -60AF- A0 AE LDY #$AE -60B1- DA PHX -60B2- A0 C9 LDY #$C9 -60B4- D3 ??? -60B5- A0 D3 LDY #$D3 -60B7- C5 D4 CMP $D4 -60B9- A0 D4 LDY #$D4 -60BB- CF ??? -60BC- A0 DA LDY #$DA -60BE- C5 D2 CMP $D2 -60C0- CF ??? -60C1- BB ??? -60C2- A0 C9 LDY #$C9 -60C4- C6 A0 DEC $A0 -60C6- CE CF D4 DEC $D4CF -60C9- AC A0 B1 LDY $B1A0 -60CC- AE 8D 8D LDX $8D8D +6062- 00 BRK +6063- 00 BRK +6064- 00 BRK +6065- 00 BRK +6066- 00 BRK +6067- 00 BRK +6068- 00 BRK +6069- 00 BRK +606A- 00 BRK +606B- 00 BRK +606C- 00 BRK +606D- 00 BRK +606E- 00 BRK +606F- 00 BRK +6070- 00 BRK +6071- 00 BRK +6072- 00 BRK +6073- 00 BRK +6074- 00 BRK +6075- 00 BRK +6076- 00 BRK +6077- 00 BRK +6078- 00 BRK +6079- 00 BRK +607A- 00 BRK +607B- 00 BRK +607C- 00 BRK +607D- 00 BRK +607E- 00 BRK +607F- 00 BRK +6080- 00 BRK +6081- 00 BRK +6082- 00 BRK +6083- 00 BRK +6084- 00 BRK +6085- 00 BRK +6086- 00 BRK +6087- 00 BRK +6088- 00 BRK +6089- 00 BRK +608A- 00 BRK +608B- 00 BRK +608C- 00 BRK +608D- 00 BRK +608E- 00 BRK +608F- 00 BRK +6090- 00 BRK +6091- 00 BRK +6092- 00 BRK +6093- 00 BRK +6094- 00 BRK +6095- 00 BRK +6096- 00 BRK +6097- 00 BRK +6098- 00 BRK +6099- 00 BRK +609A- 00 BRK +609B- 00 BRK +609C- 00 BRK +609D- 00 BRK +609E- 00 BRK +609F- 00 BRK +60A0- 00 BRK +60A1- 00 BRK +60A2- 00 BRK +60A3- 00 BRK +60A4- 00 BRK +60A5- 00 BRK +60A6- 00 BRK +60A7- 00 BRK +60A8- 00 BRK +60A9- 00 BRK +60AA- 00 BRK +60AB- 00 BRK +60AC- 00 BRK +60AD- 00 BRK +60AE- 00 BRK +60AF- 00 BRK +60B0- 00 BRK +60B1- 00 BRK +60B2- 00 BRK +60B3- 00 BRK +60B4- 00 BRK +60B5- 00 BRK +60B6- 00 BRK +60B7- 00 BRK +60B8- 00 BRK +60B9- 00 BRK +60BA- 00 BRK +60BB- 00 BRK +60BC- 00 BRK +60BD- 00 BRK +60BE- 00 BRK +60BF- 00 BRK +60C0- 00 BRK +60C1- 00 BRK +60C2- 00 BRK +60C3- 00 BRK +60C4- 00 BRK +60C5- 00 BRK +60C6- 00 BRK +60C7- 00 BRK +60C8- 00 BRK +60C9- 00 BRK +60CA- 00 BRK +60CB- 00 BRK +60CC- 00 BRK +60CD- 00 BRK +60CE- 00 BRK 60CF- 00 BRK -60D0- 20 CC 73 JSR $73CC -60D3- C9 C6 CMP #$C6 -60D5- A0 D3 LDY #$D3 -60D7- D4 ??? -60D8- D2 C9 CMP ($C9) -60DA- CE C7 B1 DEC $B1C7 -60DD- A0 CC LDY #$CC -60DF- C5 CE CMP $CE -60E1- C7 ??? -60E2- D4 ??? -60E3- C8 INY -60E4- A0 BE LDY #$BE -60E6- A0 D3 LDY #$D3 -60E8- D4 ??? -60E9- D2 C9 CMP ($C9) -60EB- CE C7 B2 DEC $B2C7 -60EE- A0 CC LDY #$CC -60F0- C5 CE CMP $CE -60F2- C7 ??? -60F3- D4 ??? -60F4- C8 INY -60F5- AC 8D 00 LDY $008D -60F8- 20 CC 73 JSR $73CC -60FB- AE C3 A8 LDX $A8C3 -60FE- C1 D2 CMP ($D2,X) -6100- D2 D9 CMP ($D9) -6102- A9 A0 LDA #$A0 -6104- BD A0 B0 LDA $B0A0,X -6107- BB ??? -6108- A0 C5 LDY #$C5 -610A- CC D3 C5 CPY $C5D3 -610D- AC A0 AE LDY $AEA0 -6110- C3 ??? -6111- A0 BD LDY #$BD -6113- A0 B1 LDY #$B1 -6115- AE 8D 8D LDX $8D8D +60D0- 00 BRK +60D1- 00 BRK +60D2- 00 BRK +60D3- 00 BRK +60D4- 00 BRK +60D5- 00 BRK +60D6- 00 BRK +60D7- 00 BRK +60D8- 00 BRK +60D9- 00 BRK +60DA- 00 BRK +60DB- 00 BRK +60DC- 00 BRK +60DD- 00 BRK +60DE- 00 BRK +60DF- 00 BRK +60E0- 00 BRK +60E1- 00 BRK +60E2- 00 BRK +60E3- 00 BRK +60E4- 00 BRK +60E5- 00 BRK +60E6- 00 BRK +60E7- 00 BRK +60E8- 00 BRK +60E9- 00 BRK +60EA- 00 BRK +60EB- 00 BRK +60EC- 00 BRK +60ED- 00 BRK +60EE- 00 BRK +60EF- 00 BRK +60F0- 00 BRK +60F1- 00 BRK +60F2- 00 BRK +60F3- 00 BRK +60F4- 00 BRK +60F5- 00 BRK +60F6- 00 BRK +60F7- 00 BRK +60F8- 00 BRK +60F9- 00 BRK +60FA- 00 BRK +60FB- 00 BRK +60FC- 00 BRK +60FD- 00 BRK +60FE- 00 BRK +60FF- 00 BRK +6100- 00 BRK +6101- 00 BRK +6102- 00 BRK +6103- 00 BRK +6104- 00 BRK +6105- 00 BRK +6106- 00 BRK +6107- 00 BRK +6108- 00 BRK +6109- 00 BRK +610A- 00 BRK +610B- 00 BRK +610C- 00 BRK +610D- 00 BRK +610E- 00 BRK +610F- 00 BRK +6110- 00 BRK +6111- 00 BRK +6112- 00 BRK +6113- 00 BRK +6114- 00 BRK +6115- 00 BRK +6116- 00 BRK +6117- 00 BRK 6118- 00 BRK -6119- 20 CC 73 JSR $73CC -611C- D3 ??? -611D- CF ??? -611E- AC A0 D7 LDY $D7A0 -6121- C5 A0 CMP $A0 -6123- C3 ??? -6124- C1 CE CMP ($CE,X) -6126- A0 C3 LDY #$C3 -6128- CF ??? -6129- CD D0 C1 CMP $C1D0 -612C- D2 C5 CMP ($C5) -612E- A0 D4 LDY #$D4 -6130- C8 INY -6131- C5 A0 CMP $A0 -6133- CC C9 D4 CPY $D4C9 -6136- C5 D2 CMP $D2 -6138- C1 CC CMP ($CC,X) -613A- A0 A7 LDY #$A7 -613C- C1 A7 CMP ($A7,X) -613E- 8D 00 20 STA $2000 -6141- CC 73 D4 CPY $D473 -6144- CF ??? -6145- A0 D4 LDY #$D4 -6147- C8 INY -6148- C5 A0 CMP $A0 -614A- D6 C1 DEC $C1,X -614C- CC D5 C5 CPY $C5D5 -614F- A0 D3 LDY #$D3 -6151- D4 ??? -6152- CF ??? -6153- D2 C5 CMP ($C5) -6155- C4 A0 CPY $A0 -6157- C9 CE CMP #$CE -6159- A0 C1 LDY #$C1 -615B- D3 ??? -615C- D4 ??? -615D- D2 AC CMP ($AC) -615F- A0 D7 LDY #$D7 -6161- C8 INY -6162- C9 C3 CMP #$C3 -6164- C8 INY -6165- 8D 00 20 STA $2000 -6168- CC 73 C8 CPY $C873 -616B- CF ??? -616C- CC C4 D3 CPY $D3C4 -616F- A0 D4 LDY #$D4 -6171- C8 INY -6172- C5 A0 CMP $A0 -6174- D3 ??? -6175- C1 CD CMP ($CD,X) -6177- C5 A0 CMP $A0 -6179- D3 ??? -617A- D4 ??? -617B- D2 C9 CMP ($C9) -617D- CE C7 AC DEC $ACC7 -6180- A0 D4 LDY #$D4 -6182- C8 INY -6183- C5 CE CMP $CE -6185- A0 D5 LDY #$D5 -6187- D3 ??? -6188- C5 A0 CMP $A0 -618A- C2 ??? -618B- CE C5 A0 DEC $A0C5 -618E- D4 ??? -618F- CF ??? -6190- 8D 00 20 STA $2000 -6193- CC 73 D4 CPY $D473 -6196- C5 D3 CMP $D3 -6198- D4 ??? -6199- A0 C9 LDY #$C9 -619B- C6 A0 DEC $A0 -619D- D4 ??? -619E- C8 INY -619F- C5 D9 CMP $D9 -61A1- A0 C1 LDY #$C1 -61A3- D2 C5 CMP ($C5) -61A5- A0 C5 LDY #$C5 -61A7- D1 D5 CMP ($D5),Y -61A9- C1 CC CMP ($CC,X) -61AB- AE 8D 8D LDX $8D8D +6119- 00 BRK +611A- 00 BRK +611B- 00 BRK +611C- 00 BRK +611D- 00 BRK +611E- 00 BRK +611F- 00 BRK +6120- 00 BRK +6121- 00 BRK +6122- 00 BRK +6123- 00 BRK +6124- 00 BRK +6125- 00 BRK +6126- 00 BRK +6127- 00 BRK +6128- 00 BRK +6129- 00 BRK +612A- 00 BRK +612B- 00 BRK +612C- 00 BRK +612D- 00 BRK +612E- 00 BRK +612F- 00 BRK +6130- 00 BRK +6131- 00 BRK +6132- 00 BRK +6133- 00 BRK +6134- 00 BRK +6135- 00 BRK +6136- 00 BRK +6137- 00 BRK +6138- 00 BRK +6139- 00 BRK +613A- 00 BRK +613B- 00 BRK +613C- 00 BRK +613D- 00 BRK +613E- 00 BRK +613F- 00 BRK +6140- 00 BRK +6141- 00 BRK +6142- 00 BRK +6143- 00 BRK +6144- 00 BRK +6145- 00 BRK +6146- 00 BRK +6147- 00 BRK +6148- 00 BRK +6149- 00 BRK +614A- 00 BRK +614B- 00 BRK +614C- 00 BRK +614D- 00 BRK +614E- 00 BRK +614F- 00 BRK +6150- 00 BRK +6151- 00 BRK +6152- 00 BRK +6153- 00 BRK +6154- 00 BRK +6155- 00 BRK +6156- 00 BRK +6157- 00 BRK +6158- 00 BRK +6159- 00 BRK +615A- 00 BRK +615B- 00 BRK +615C- 00 BRK +615D- 00 BRK +615E- 00 BRK +615F- 00 BRK +6160- 00 BRK +6161- 00 BRK +6162- 00 BRK +6163- 00 BRK +6164- 00 BRK +6165- 00 BRK +6166- 00 BRK +6167- 00 BRK +6168- 00 BRK +6169- 00 BRK +616A- 00 BRK +616B- 00 BRK +616C- 00 BRK +616D- 00 BRK +616E- 00 BRK +616F- 00 BRK +6170- 00 BRK +6171- 00 BRK +6172- 00 BRK +6173- 00 BRK +6174- 00 BRK +6175- 00 BRK +6176- 00 BRK +6177- 00 BRK +6178- 00 BRK +6179- 00 BRK +617A- 00 BRK +617B- 00 BRK +617C- 00 BRK +617D- 00 BRK +617E- 00 BRK +617F- 00 BRK +6180- 00 BRK +6181- 00 BRK +6182- 00 BRK +6183- 00 BRK +6184- 00 BRK +6185- 00 BRK +6186- 00 BRK +6187- 00 BRK +6188- 00 BRK +6189- 00 BRK +618A- 00 BRK +618B- 00 BRK +618C- 00 BRK +618D- 00 BRK +618E- 00 BRK +618F- 00 BRK +6190- 00 BRK +6191- 00 BRK +6192- 00 BRK +6193- 00 BRK +6194- 00 BRK +6195- 00 BRK +6196- 00 BRK +6197- 00 BRK +6198- 00 BRK +6199- 00 BRK +619A- 00 BRK +619B- 00 BRK +619C- 00 BRK +619D- 00 BRK +619E- 00 BRK +619F- 00 BRK +61A0- 00 BRK +61A1- 00 BRK +61A2- 00 BRK +61A3- 00 BRK +61A4- 00 BRK +61A5- 00 BRK +61A6- 00 BRK +61A7- 00 BRK +61A8- 00 BRK +61A9- 00 BRK +61AA- 00 BRK +61AB- 00 BRK +61AC- 00 BRK +61AD- 00 BRK 61AE- 00 BRK -61AF- 4C B4 61 JMP $61B4 -61B2- 01 C1 ORA ($C1,X) -61B4- A0 00 LDY #$00 -61B6- AD B2 61 LDA $61B2 -61B9- 8D F2 74 STA $74F2 -61BC- 8D F3 74 STA $74F3 -61BF- C8 INY -61C0- B9 B2 61 LDA $61B2,Y -61C3- 99 F3 74 STA $74F3,Y -61C6- CC F2 74 CPY $74F2 -61C9- D0 F4 BNE $61BF -61CB- A9 74 LDA #$74 -61CD- 48 PHA -61CE- A9 F3 LDA #$F3 -61D0- 48 PHA -61D1- A9 75 LDA #$75 -61D3- 48 PHA -61D4- A9 F3 LDA #$F3 -61D6- 48 PHA -61D7- 20 8F 6D JSR $6D8F -61DA- D0 03 BNE $61DF -61DC- 4C 13 62 JMP $6213 -61DF- 20 CC 73 JSR $73CC -61E2- D4 ??? -61E3- C8 INY -61E4- C5 A0 CMP $A0 -61E6- CC C9 D4 CPY $D4C9 -61E9- C5 D2 CMP $D2 -61EB- C1 CC CMP ($CC,X) -61ED- A0 C1 LDY #$C1 -61EF- A0 C1 LDY #$C1 -61F1- CE C4 A0 DEC $A0C4 -61F4- D4 ??? -61F5- C8 INY -61F6- C5 A0 CMP $A0 -61F8- C1 A0 CMP ($A0,X) -61FA- D3 ??? -61FB- D4 ??? -61FC- D2 C9 CMP ($C9) -61FE- CE C7 A0 DEC $A0C7 -6201- C1 D2 CMP ($D2,X) -6203- C5 8D CMP $8D +61AF- 00 BRK +61B0- 00 BRK +61B1- 00 BRK +61B2- 00 BRK +61B3- 00 BRK +61B4- 00 BRK +61B5- 00 BRK +61B6- 00 BRK +61B7- 00 BRK +61B8- 00 BRK +61B9- 00 BRK +61BA- 00 BRK +61BB- 00 BRK +61BC- 00 BRK +61BD- 00 BRK +61BE- 00 BRK +61BF- 00 BRK +61C0- 00 BRK +61C1- 00 BRK +61C2- 00 BRK +61C3- 00 BRK +61C4- 00 BRK +61C5- 00 BRK +61C6- 00 BRK +61C7- 00 BRK +61C8- 00 BRK +61C9- 00 BRK +61CA- 00 BRK +61CB- 00 BRK +61CC- 00 BRK +61CD- 00 BRK +61CE- 00 BRK +61CF- 00 BRK +61D0- 00 BRK +61D1- 00 BRK +61D2- 00 BRK +61D3- 00 BRK +61D4- 00 BRK +61D5- 00 BRK +61D6- 00 BRK +61D7- 00 BRK +61D8- 00 BRK +61D9- 00 BRK +61DA- 00 BRK +61DB- 00 BRK +61DC- 00 BRK +61DD- 00 BRK +61DE- 00 BRK +61DF- 00 BRK +61E0- 00 BRK +61E1- 00 BRK +61E2- 00 BRK +61E3- 00 BRK +61E4- 00 BRK +61E5- 00 BRK +61E6- 00 BRK +61E7- 00 BRK +61E8- 00 BRK +61E9- 00 BRK +61EA- 00 BRK +61EB- 00 BRK +61EC- 00 BRK +61ED- 00 BRK +61EE- 00 BRK +61EF- 00 BRK +61F0- 00 BRK +61F1- 00 BRK +61F2- 00 BRK +61F3- 00 BRK +61F4- 00 BRK +61F5- 00 BRK +61F6- 00 BRK +61F7- 00 BRK +61F8- 00 BRK +61F9- 00 BRK +61FA- 00 BRK +61FB- 00 BRK +61FC- 00 BRK +61FD- 00 BRK +61FE- 00 BRK +61FF- 00 BRK +6200- 00 BRK +6201- 00 BRK +6202- 00 BRK +6203- 00 BRK +6204- 00 BRK 6205- 00 BRK -6206- 20 CC 73 JSR $73CC -6209- C5 D1 CMP $D1 -620B- D5 C1 CMP $C1,X -620D- CC AE 8D CPY $8DAE -6210- 8D 8D 00 STA $008D -6213- 20 ED 73 JSR $73ED -6216- 20 CC 73 JSR $73CC -6219- CE CF D4 DEC $D4CF -621C- C5 A0 CMP $A0 -621E- D4 ??? -621F- C8 INY -6220- C1 D4 CMP ($D4,X) -6222- A0 CF LDY #$CF -6224- CE CC D9 DEC $D9CC -6227- A0 C1 LDY #$C1 -6229- A0 D3 LDY #$D3 -622B- C9 CE CMP #$CE -622D- C7 ??? -622E- CC C5 A0 CPY $A0C5 -6231- D0 C1 BNE $61F4 -6233- D2 C1 CMP ($C1) -6235- CD C5 D4 CMP $D4C5 -6238- C5 D2 CMP $D2 -623A- 8D 00 20 STA $2000 -623D- CC 73 CD CPY $CD73 -6240- C1 D9 CMP ($D9,X) -6242- A0 C2 LDY #$C2 -6244- C5 A0 CMP $A0 -6246- C1 A0 CMP ($A0,X) -6248- CC C9 D4 CPY $D4C9 -624B- C5 D2 CMP $D2 -624D- C1 CC CMP ($CC,X) -624F- A0 D3 LDY #$D3 -6251- D4 ??? -6252- D2 C9 CMP ($C9) -6254- CE C7 A0 DEC $A0C7 -6257- C9 CE CMP #$CE -6259- A0 D3 LDY #$D3 -625B- C3 ??? -625C- CD D0 BB CMP $BBD0 -625F- 8D 00 20 STA $2000 -6262- CC 73 D4 CPY $D473 -6265- C8 INY -6266- C9 D3 CMP #$D3 -6268- A0 D3 LDY #$D3 -626A- C1 CD CMP ($CD,X) -626C- C5 A0 CMP $A0 -626E- D2 D5 CMP ($D5) -6270- CC C5 A0 CPY $A0C5 -6273- C1 D0 CMP ($D0,X) -6275- D0 CC BNE $6243 -6277- C9 C5 CMP #$C5 -6279- D3 ??? -627A- A0 D4 LDY #$D4 -627C- CF ??? -627D- A0 C1 LDY #$C1 -627F- CC CC A0 CPY $A0CC -6282- CD C1 C3 CMP $C3C1 -6285- D2 CF CMP ($CF) -6287- D3 ??? -6288- 8D 00 20 STA $2000 -628B- CC 73 D4 CPY $D473 -628E- C8 INY -628F- C1 D4 CMP ($D4,X) -6291- A0 C1 LDY #$C1 -6293- C3 ??? -6294- C3 ??? -6295- C5 D0 CMP $D0 -6297- D4 ??? -6298- A0 D3 LDY #$D3 -629A- D4 ??? -629B- D2 C9 CMP ($C9) -629D- CE C7 D3 DEC $D3C7 -62A0- A0 C1 LDY #$C1 -62A2- D3 ??? -62A3- A0 D0 LDY #$D0 -62A5- C1 D2 CMP ($D2,X) -62A7- C1 CD CMP ($CD,X) -62A9- C5 D4 CMP $D4 -62AB- C5 D2 CMP $D2 -62AD- D3 ??? -62AE- AE 8D 8D LDX $8D8D -62B1- 00 BRK -62B2- 20 CC 73 JSR $73CC -62B5- D9 CF D5 CMP $D5CF,Y -62B8- A0 C3 LDY #$C3 -62BA- C1 CE CMP ($CE,X) -62BC- A0 C1 LDY #$C1 -62BE- CC D3 CF CPY $CFD3 -62C1- A0 D5 LDY #$D5 -62C3- D3 ??? -62C4- C5 A0 CMP $A0 -62C6- D3 ??? -62C7- C3 ??? -62C8- CD D0 A0 CMP $A0D0 -62CB- D4 ??? -62CC- CF ??? -62CD- A0 C3 LDY #$C3 -62CF- CF ??? -62D0- CD D0 C1 CMP $C1D0 -62D3- D2 C5 CMP ($C5) -62D5- 8D 00 20 STA $2000 -62D8- CC 73 D4 CPY $D473 -62DB- C8 INY -62DC- C5 A0 CMP $A0 -62DE- CC C5 CE CPY $CEC5 -62E1- C7 ??? -62E2- D4 ??? -62E3- C8 INY -62E4- D3 ??? -62E5- A0 CF LDY #$CF -62E7- C6 A0 DEC $A0 -62E9- D4 ??? -62EA- D7 ??? -62EB- CF ??? -62EC- A0 C4 LDY #$C4 -62EE- C9 C6 CMP #$C6 -62F0- C6 C5 DEC $C5 -62F2- D2 C5 CMP ($C5) -62F4- CE D4 A0 DEC $A0D4 -62F7- D3 ??? -62F8- D4 ??? -62F9- D2 C9 CMP ($C9) -62FB- CE C7 D3 DEC $D3C7 -62FE- AE 8D 8D LDX $8D8D -6301- 00 BRK -6302- 20 CC 73 JSR $73CC -6305- D4 ??? -6306- C8 INY -6307- C5 A0 CMP $A0 -6309- C3 ??? -630A- C1 D2 CMP ($D2,X) -630C- D2 D9 CMP ($D9) -630E- A0 C6 LDY #$C6 -6310- CC C1 C7 CPY $C7C1 -6313- A0 C9 LDY #$C9 -6315- D3 ??? -6316- A0 D3 LDY #$D3 -6318- C5 D4 CMP $D4 -631A- A0 D4 LDY #$D4 -631C- CF ??? -631D- A0 B0 LDY #$B0 -631F- A0 C9 LDY #$C9 -6321- C6 A0 DEC $A0 -6323- D4 ??? -6324- C8 INY -6325- C5 8D CMP $8D -6327- 00 BRK -6328- 20 CC 73 JSR $73CC -632B- C6 C9 DEC $C9 -632D- D2 D3 CMP ($D3) -632F- D4 ??? -6330- A0 D3 LDY #$D3 -6332- D4 ??? -6333- D2 C9 CMP ($C9) -6335- CE C7 A0 DEC $A0C7 -6338- C8 INY -6339- C1 D3 CMP ($D3,X) -633B- A0 C1 LDY #$C1 -633D- A0 CC LDY #$CC -633F- C5 CE CMP $CE -6341- C7 ??? -6342- D4 ??? -6343- C8 INY -6344- A0 BE LDY #$BE -6346- A0 D4 LDY #$D4 +6206- 00 BRK +6207- 00 BRK +6208- 00 BRK +6209- 00 BRK +620A- 00 BRK +620B- 00 BRK +620C- 00 BRK +620D- 00 BRK +620E- 00 BRK +620F- 00 BRK +6210- 00 BRK +6211- 00 BRK +6212- 00 BRK +6213- 00 BRK +6214- 00 BRK +6215- 00 BRK +6216- 00 BRK +6217- 00 BRK +6218- 00 BRK +6219- 00 BRK +621A- 00 BRK +621B- 00 BRK +621C- 00 BRK +621D- 00 BRK +621E- 00 BRK +621F- 00 BRK +6220- 00 BRK +6221- 00 BRK +6222- 00 BRK +6223- 00 BRK +6224- 00 BRK +6225- 00 BRK +6226- 00 BRK +6227- 00 BRK +6228- 00 BRK +6229- 00 BRK +622A- 00 BRK +622B- 00 BRK +622C- 00 BRK +622D- 00 BRK +622E- 00 BRK +622F- 00 BRK +6230- 00 BRK +6231- 00 BRK +6232- 00 BRK +6233- 00 BRK +6234- 00 BRK +6235- 00 BRK +6236- 00 BRK +6237- 00 BRK +6238- 00 BRK +6239- 00 BRK +623A- 00 BRK +623B- 00 BRK +623C- 00 BRK +623D- 00 BRK +623E- 00 BRK +623F- 00 BRK +6240- 00 BRK +6241- 00 BRK +6242- 00 BRK +6243- 00 BRK +6244- 00 BRK +6245- 00 BRK +6246- 00 BRK +6247- 00 BRK +6248- 00 BRK +6249- 00 BRK +624A- A9 01 LDA #$01 +624C- 8D 41 62 STA $6241 +624F- A9 01 LDA #$01 +6251- 8D 42 62 STA $6242 +6254- 20 BE 70 JSR $70BE +6257- A0 8D LDY #$8D +6259- 8D 8D 8D STA $8D8D +625C- 00 BRK +625D- 20 BE 70 JSR $70BE +6260- D3 ??? +6261- D4 ??? +6262- D2 C9 CMP ($C9) +6264- CE C7 D3 DEC $D3C7 +6267- A0 CC LDY #$CC +6269- C9 C2 CMP #$C2 +626B- D2 C1 CMP ($C1) +626D- D2 D9 CMP ($D9) +626F- A0 C4 LDY #$C4 +6271- C5 CD CMP $CD +6273- CF ??? +6274- 8D 00 20 STA $2000 +6277- BE 70 AD LDX $AD70,Y +627A- AD AD AD LDA $ADAD +627D- AD AD AD LDA $ADAD +6280- AD AD AD LDA $ADAD +6283- AD AD AD LDA $ADAD +6286- AD AD AD LDA $ADAD +6289- AD AD AD LDA $ADAD +628C- AD 8D 00 LDA $008D +628F- 20 BE 70 JSR $70BE +6292- A0 8D LDY #$8D +6294- 00 BRK +6295- 20 BE 70 JSR $70BE +6298- D4 ??? +6299- C8 INY +629A- C5 A0 CMP $A0 +629C- D3 ??? +629D- C3 ??? +629E- CD D0 A0 CMP $A0D0 +62A1- CD C1 C3 CMP $C3C1 +62A4- D2 CF CMP ($CF) +62A6- A0 C3 LDY #$C3 +62A8- CF ??? +62A9- CD D0 C1 CMP $C1D0 +62AC- D2 C5 CMP ($C5) +62AE- D3 ??? +62AF- A0 D4 LDY #$D4 +62B1- D7 ??? +62B2- CF ??? +62B3- A0 8D LDY #$8D +62B5- 00 BRK +62B6- 20 BE 70 JSR $70BE +62B9- D3 ??? +62BA- D4 ??? +62BB- D2 C9 CMP ($C9) +62BD- CE C7 D3 DEC $D3C7 +62C0- A0 C1 LDY #$C1 +62C2- CE C4 A0 DEC $A0C4 +62C5- D3 ??? +62C6- C5 D4 CMP $D4 +62C8- D3 ??? +62C9- A0 D4 LDY #$D4 +62CB- C8 INY +62CC- C5 A0 CMP $A0 +62CE- C6 CC DEC $CC +62D0- C1 C7 CMP ($C7,X) +62D2- D3 ??? +62D3- 8D 00 20 STA $2000 +62D6- BE 70 C1 LDX $C170,Y +62D9- C3 ??? +62DA- C3 ??? +62DB- CF ??? +62DC- D2 C4 CMP ($C4) +62DE- C9 CE CMP #$CE +62E0- C7 ??? +62E1- CC D9 AE CPY $AED9 +62E4- A0 C9 LDY #$C9 +62E6- C6 A0 DEC $A0 +62E8- D4 ??? +62E9- C8 INY +62EA- C5 A0 CMP $A0 +62EC- D4 ??? +62ED- D7 ??? +62EE- CF ??? +62EF- A0 C1 LDY #$C1 +62F1- D2 C5 CMP ($C5) +62F3- A0 C5 LDY #$C5 +62F5- D1 D5 CMP ($D5),Y +62F7- C1 CC CMP ($CC,X) +62F9- AC 8D 00 LDY $008D +62FC- 20 BE 70 JSR $70BE +62FF- D4 ??? +6300- C8 INY +6301- C5 CE CMP $CE +6303- A0 AE LDY #$AE +6305- DA PHX +6306- A0 C9 LDY #$C9 +6308- D3 ??? +6309- A0 D3 LDY #$D3 +630B- C5 D4 CMP $D4 +630D- A0 D4 LDY #$D4 +630F- CF ??? +6310- A0 DA LDY #$DA +6312- C5 D2 CMP $D2 +6314- CF ??? +6315- BB ??? +6316- A0 C9 LDY #$C9 +6318- C6 A0 DEC $A0 +631A- CE CF D4 DEC $D4CF +631D- AC A0 B1 LDY $B1A0 +6320- AE 8D 8D LDX $8D8D +6323- 00 BRK +6324- 20 BE 70 JSR $70BE +6327- C9 C6 CMP #$C6 +6329- A0 D3 LDY #$D3 +632B- D4 ??? +632C- D2 C9 CMP ($C9) +632E- CE C7 B1 DEC $B1C7 +6331- A0 CC LDY #$CC +6333- C5 CE CMP $CE +6335- C7 ??? +6336- D4 ??? +6337- C8 INY +6338- A0 BE LDY #$BE +633A- A0 D3 LDY #$D3 +633C- D4 ??? +633D- D2 C9 CMP ($C9) +633F- CE C7 B2 DEC $B2C7 +6342- A0 CC LDY #$CC +6344- C5 CE CMP $CE +6346- C7 ??? +6347- D4 ??? 6348- C8 INY -6349- C1 CE CMP ($CE,X) -634B- A0 D4 LDY #$D4 -634D- C8 INY -634E- C5 A0 CMP $A0 -6350- 8D 00 20 STA $2000 -6353- CC 73 D3 CPY $D373 -6356- C5 C3 CMP $C3 -6358- CF ??? -6359- CE C4 A0 DEC $A0C4 -635C- D3 ??? -635D- D4 ??? -635E- D2 C9 CMP ($C9) -6360- CE C7 A7 DEC $A7C7 -6363- D3 ??? -6364- A0 CC LDY #$CC -6366- C5 CE CMP $CE -6368- C7 ??? -6369- D4 ??? -636A- C8 INY -636B- AE A0 D4 LDX $D4A0 -636E- C8 INY -636F- C9 D3 CMP #$D3 -6371- A0 C3 LDY #$C3 -6373- C1 CE CMP ($CE,X) -6375- A0 D4 LDY #$D4 -6377- C8 INY -6378- C5 CE CMP $CE -637A- 8D 00 20 STA $2000 -637D- CC 73 C2 CPY $C273 -6380- C5 A0 CMP $A0 -6382- D4 ??? -6383- C5 D3 CMP $D3 -6385- D4 ??? -6386- C5 C4 CMP $C4 -6388- A0 D7 LDY #$D7 -638A- C9 D4 CMP #$D4 -638C- C8 INY -638D- A0 C2 LDY #$C2 -638F- C3 ??? -6390- D3 ??? -6391- AE 8D 8D LDX $8D8D -6394- 00 BRK -6395- 20 CC 73 JSR $73CC -6398- D3 ??? -6399- CF ??? -639A- A0 C9 LDY #$C9 -639C- C6 A0 DEC $A0 -639E- D7 ??? -639F- C5 A0 CMP $A0 -63A1- C3 ??? -63A2- CF ??? -63A3- CD D0 C1 CMP $C1D0 -63A6- D2 C5 CMP ($C5) -63A8- A0 D4 LDY #$D4 -63AA- C8 INY -63AB- C5 A0 CMP $A0 -63AD- CC C9 D4 CPY $D4C9 -63B0- C5 D2 CMP $D2 -63B2- C1 CC CMP ($CC,X) -63B4- A0 A7 LDY #$A7 -63B6- C1 C1 CMP ($C1,X) -63B8- A7 ??? -63B9- A0 8D LDY #$8D -63BB- 00 BRK -63BC- 20 CC 73 JSR $73CC -63BF- D4 ??? -63C0- CF ??? -63C1- A0 D4 LDY #$D4 -63C3- C8 INY -63C4- C5 A0 CMP $A0 -63C6- D3 ??? -63C7- C1 CD CMP ($CD,X) -63C9- C5 A0 CMP $A0 -63CB- C1 D3 CMP ($D3,X) -63CD- D4 ??? -63CE- D2 AC CMP ($AC) -63D0- A0 D7 LDY #$D7 -63D2- C5 A0 CMP $A0 -63D4- D7 ??? -63D5- C9 CC CMP #$CC -63D7- CC A0 C6 CPY $C6A0 -63DA- C9 CE CMP #$CE -63DC- C4 A0 CPY $A0 -63DE- D4 ??? -63DF- C8 INY -63E0- C1 D4 CMP ($D4,X) -63E2- 8D 00 20 STA $2000 -63E5- CC 73 D4 CPY $D473 -63E8- C8 INY -63E9- C5 A0 CMP $A0 -63EB- CC C9 D4 CPY $D4C9 -63EE- C5 D2 CMP $D2 -63F0- C1 CC CMP ($CC,X) -63F2- A0 C8 LDY #$C8 -63F4- C1 D3 CMP ($D3,X) -63F6- A0 C1 LDY #$C1 -63F8- A0 C7 LDY #$C7 -63FA- D2 C5 CMP ($C5) -63FC- C1 D4 CMP ($D4,X) -63FE- C5 D2 CMP $D2 -6400- A0 CC LDY #$CC -6402- C5 CE CMP $CE -6404- C7 ??? -6405- D4 ??? -6406- C8 INY -6407- AE 8D 8D LDX $8D8D -640A- 00 BRK -640B- 4C 11 64 JMP $6411 -640E- 02 ??? -640F- C1 C1 CMP ($C1,X) -6411- A0 00 LDY #$00 -6413- AD 0E 64 LDA $640E -6416- 8D F2 74 STA $74F2 -6419- 8D F3 74 STA $74F3 -641C- C8 INY -641D- B9 0E 64 LDA $640E,Y -6420- 99 F3 74 STA $74F3,Y -6423- CC F2 74 CPY $74F2 -6426- D0 F4 BNE $641C -6428- A9 74 LDA #$74 +6349- AC 8D 00 LDY $008D +634C- 20 BE 70 JSR $70BE +634F- AE C3 A8 LDX $A8C3 +6352- C1 D2 CMP ($D2,X) +6354- D2 D9 CMP ($D9) +6356- A9 A0 LDA #$A0 +6358- BD A0 B0 LDA $B0A0,X +635B- BB ??? +635C- A0 C5 LDY #$C5 +635E- CC D3 C5 CPY $C5D3 +6361- AC A0 AE LDY $AEA0 +6364- C3 ??? +6365- A0 BD LDY #$BD +6367- A0 B1 LDY #$B1 +6369- AE 8D 8D LDX $8D8D +636C- 00 BRK +636D- 20 BE 70 JSR $70BE +6370- D3 ??? +6371- CF ??? +6372- AC A0 D7 LDY $D7A0 +6375- C5 A0 CMP $A0 +6377- C3 ??? +6378- C1 CE CMP ($CE,X) +637A- A0 C3 LDY #$C3 +637C- CF ??? +637D- CD D0 C1 CMP $C1D0 +6380- D2 C5 CMP ($C5) +6382- A0 D4 LDY #$D4 +6384- C8 INY +6385- C5 A0 CMP $A0 +6387- CC C9 D4 CPY $D4C9 +638A- C5 D2 CMP $D2 +638C- C1 CC CMP ($CC,X) +638E- A0 A7 LDY #$A7 +6390- C1 A7 CMP ($A7,X) +6392- 8D 00 20 STA $2000 +6395- BE 70 D4 LDX $D470,Y +6398- CF ??? +6399- A0 D4 LDY #$D4 +639B- C8 INY +639C- C5 A0 CMP $A0 +639E- D6 C1 DEC $C1,X +63A0- CC D5 C5 CPY $C5D5 +63A3- A0 D3 LDY #$D3 +63A5- D4 ??? +63A6- CF ??? +63A7- D2 C5 CMP ($C5) +63A9- C4 A0 CPY $A0 +63AB- C9 CE CMP #$CE +63AD- A0 C1 LDY #$C1 +63AF- D3 ??? +63B0- D4 ??? +63B1- D2 AC CMP ($AC) +63B3- A0 D7 LDY #$D7 +63B5- C8 INY +63B6- C9 C3 CMP #$C3 +63B8- C8 INY +63B9- 8D 00 20 STA $2000 +63BC- BE 70 C8 LDX $C870,Y +63BF- CF ??? +63C0- CC C4 D3 CPY $D3C4 +63C3- A0 D4 LDY #$D4 +63C5- C8 INY +63C6- C5 A0 CMP $A0 +63C8- D3 ??? +63C9- C1 CD CMP ($CD,X) +63CB- C5 A0 CMP $A0 +63CD- D3 ??? +63CE- D4 ??? +63CF- D2 C9 CMP ($C9) +63D1- CE C7 AC DEC $ACC7 +63D4- A0 D4 LDY #$D4 +63D6- C8 INY +63D7- C5 CE CMP $CE +63D9- A0 D5 LDY #$D5 +63DB- D3 ??? +63DC- C5 A0 CMP $A0 +63DE- C2 ??? +63DF- CE C5 A0 DEC $A0C5 +63E2- D4 ??? +63E3- CF ??? +63E4- 8D 00 20 STA $2000 +63E7- BE 70 D4 LDX $D470,Y +63EA- C5 D3 CMP $D3 +63EC- D4 ??? +63ED- A0 C9 LDY #$C9 +63EF- C6 A0 DEC $A0 +63F1- D4 ??? +63F2- C8 INY +63F3- C5 D9 CMP $D9 +63F5- A0 C1 LDY #$C1 +63F7- D2 C5 CMP ($C5) +63F9- A0 C5 LDY #$C5 +63FB- D1 D5 CMP ($D5),Y +63FD- C1 CC CMP ($CC,X) +63FF- AE 8D 8D LDX $8D8D +6402- 00 BRK +6403- 4C 08 64 JMP $6408 +6406- 01 C1 ORA ($C1,X) +6408- A0 00 LDY #$00 +640A- AD 06 64 LDA $6406 +640D- 8D 40 61 STA $6140 +6410- 8D 41 61 STA $6141 +6413- C8 INY +6414- B9 06 64 LDA $6406,Y +6417- 99 41 61 STA $6141,Y +641A- CC 40 61 CPY $6140 +641D- D0 F4 BNE $6413 +641F- A9 61 LDA #$61 +6421- 48 PHA +6422- A9 41 LDA #$41 +6424- 48 PHA +6425- A9 6F LDA #$6F +6427- 48 PHA +6428- A9 E0 LDA #$E0 642A- 48 PHA -642B- A9 F3 LDA #$F3 -642D- 48 PHA -642E- A9 75 LDA #$75 -6430- 48 PHA -6431- A9 F3 LDA #$F3 -6433- 48 PHA -6434- 20 8F 6D JSR $6D8F -6437- B0 03 BCS $643C -6439- 4C 7F 64 JMP $647F -643C- 20 CC 73 JSR $73CC -643F- D4 ??? -6440- C8 INY -6441- C5 A0 CMP $A0 -6443- CC C9 D4 CPY $D4C9 -6446- C5 D2 CMP $D2 -6448- C1 CC CMP ($CC,X) -644A- A0 A7 LDY #$A7 -644C- C1 C1 CMP ($C1,X) -644E- A7 ??? -644F- A0 C9 LDY #$C9 -6451- D3 ??? -6452- A0 C7 LDY #$C7 -6454- D2 C5 CMP ($C5) -6456- C1 D4 CMP ($D4,X) -6458- C5 D2 CMP $D2 -645A- A0 D4 LDY #$D4 -645C- C8 INY -645D- C1 CE CMP ($CE,X) -645F- A0 8D LDY #$8D -6461- 00 BRK -6462- 20 CC 73 JSR $73CC -6465- C1 D3 CMP ($D3,X) -6467- D4 ??? -6468- D2 AC CMP ($AC) -646A- A0 D7 LDY #$D7 -646C- C8 INY -646D- C9 C3 CMP #$C3 -646F- C8 INY -6470- A0 C8 LDY #$C8 -6472- CF ??? -6473- CC C4 D3 CPY $D3C4 -6476- A0 A7 LDY #$A7 -6478- C1 A7 CMP ($A7,X) -647A- AE 8D 8D LDX $8D8D -647D- 8D 00 20 STA $2000 -6480- ED 73 20 SBC $2073 -6483- CC 73 A0 CPY $A073 -6486- 8D 8D 8D STA $8D8D -6489- 8D 00 20 STA $2000 -648C- CC 73 D4 CPY $D473 -648F- C8 INY -6490- C5 A0 CMP $A0 -6492- D3 ??? -6493- C3 ??? -6494- C1 D4 CMP ($D4,X) -6496- A0 CD LDY #$CD -6498- C1 C3 CMP ($C3,X) -649A- D2 CF CMP ($CF) -649C- A0 C3 LDY #$C3 -649E- CF ??? -649F- CE C3 C1 DEC $C1C3 -64A2- D4 ??? -64A3- C5 CE CMP $CE -64A5- C1 D4 CMP ($D4,X) -64A7- C5 D3 CMP $D3 -64A9- 8D 00 20 STA $2000 -64AC- CC 73 C1 CPY $C173 -64AF- A0 D3 LDY #$D3 -64B1- C5 C3 CMP $C3 -64B3- CF ??? -64B4- CE C4 A0 DEC $A0C4 -64B7- C7 ??? -64B8- C9 D6 CMP #$D6 -64BA- C5 CE CMP $CE +642B- 20 7B 75 JSR $757B +642E- D0 03 BNE $6433 +6430- 4C 67 64 JMP $6467 +6433- 20 BE 70 JSR $70BE +6436- D4 ??? +6437- C8 INY +6438- C5 A0 CMP $A0 +643A- CC C9 D4 CPY $D4C9 +643D- C5 D2 CMP $D2 +643F- C1 CC CMP ($CC,X) +6441- A0 C1 LDY #$C1 +6443- A0 C1 LDY #$C1 +6445- CE C4 A0 DEC $A0C4 +6448- D4 ??? +6449- C8 INY +644A- C5 A0 CMP $A0 +644C- C1 A0 CMP ($A0,X) +644E- D3 ??? +644F- D4 ??? +6450- D2 C9 CMP ($C9) +6452- CE C7 A0 DEC $A0C7 +6455- C1 D2 CMP ($D2,X) +6457- C5 8D CMP $8D +6459- 00 BRK +645A- 20 BE 70 JSR $70BE +645D- C5 D1 CMP $D1 +645F- D5 C1 CMP $C1,X +6461- CC AE 8D CPY $8DAE +6464- 8D 8D 00 STA $008D +6467- 20 DF 70 JSR $70DF +646A- 20 BE 70 JSR $70BE +646D- CE CF D4 DEC $D4CF +6470- C5 A0 CMP $A0 +6472- D4 ??? +6473- C8 INY +6474- C1 D4 CMP ($D4,X) +6476- A0 CF LDY #$CF +6478- CE CC D9 DEC $D9CC +647B- A0 C1 LDY #$C1 +647D- A0 D3 LDY #$D3 +647F- C9 CE CMP #$CE +6481- C7 ??? +6482- CC C5 A0 CPY $A0C5 +6485- D0 C1 BNE $6448 +6487- D2 C1 CMP ($C1) +6489- CD C5 D4 CMP $D4C5 +648C- C5 D2 CMP $D2 +648E- 8D 00 20 STA $2000 +6491- BE 70 CD LDX $CD70,Y +6494- C1 D9 CMP ($D9,X) +6496- A0 C2 LDY #$C2 +6498- C5 A0 CMP $A0 +649A- C1 A0 CMP ($A0,X) +649C- CC C9 D4 CPY $D4C9 +649F- C5 D2 CMP $D2 +64A1- C1 CC CMP ($CC,X) +64A3- A0 D3 LDY #$D3 +64A5- D4 ??? +64A6- D2 C9 CMP ($C9) +64A8- CE C7 A0 DEC $A0C7 +64AB- C9 CE CMP #$CE +64AD- A0 D3 LDY #$D3 +64AF- C3 ??? +64B0- CD D0 BB CMP $BBD0 +64B3- 8D 00 20 STA $2000 +64B6- BE 70 D4 LDX $D470,Y +64B9- C8 INY +64BA- C9 D3 CMP #$D3 64BC- A0 D3 LDY #$D3 -64BE- D4 ??? -64BF- D2 C9 CMP ($C9) -64C1- CE C7 A0 DEC $A0C7 -64C4- D4 ??? -64C5- CF ??? -64C6- A0 C1 LDY #$C1 -64C8- A0 8D LDY #$8D -64CA- 00 BRK -64CB- 20 CC 73 JSR $73CC -64CE- C6 C9 DEC $C9 -64D0- D2 D3 CMP ($D3) -64D2- D4 ??? -64D3- A0 C7 LDY #$C7 -64D5- C9 D6 CMP #$D6 -64D7- C5 CE CMP $CE -64D9- A0 D3 LDY #$D3 -64DB- D4 ??? -64DC- D2 C9 CMP ($C9) -64DE- CE C7 AE DEC $AEC7 -64E1- A0 C5 LDY #$C5 -64E3- C9 D4 CMP #$D4 -64E5- C8 INY -64E6- C5 D2 CMP $D2 -64E8- A0 D0 LDY #$D0 -64EA- C1 D2 CMP ($D2,X) -64EC- C1 CD CMP ($CD,X) -64EE- C5 D4 CMP $D4 -64F0- C5 D2 CMP $D2 -64F2- 8D 00 20 STA $2000 -64F5- CC 73 CD CPY $CD73 -64F8- C1 D9 CMP ($D9,X) -64FA- A0 C2 LDY #$C2 -64FC- C5 A0 CMP $A0 -64FE- C1 A0 CMP ($A0,X) -6500- CC C9 D4 CPY $D4C9 -6503- C5 D2 CMP $D2 -6505- C1 CC CMP ($CC,X) -6507- A0 D3 LDY #$D3 -6509- D4 ??? -650A- D2 C9 CMP ($C9) -650C- CE C7 AC DEC $ACC7 -650F- A0 C2 LDY #$C2 -6511- D5 D4 CMP $D4,X -6513- A0 CE LDY #$CE -6515- C5 D6 CMP $D6 -6517- C5 D2 CMP $D2 -6519- A0 C2 LDY #$C2 -651B- CF ??? -651C- D4 ??? -651D- C8 INY -651E- AE 8D 8D LDX $8D8D -6521- 00 BRK -6522- 20 CC 73 JSR $73CC -6525- D3 ??? -6526- C3 ??? -6527- C1 D4 CMP ($D4,X) -6529- A0 A7 LDY #$A7 -652B- D7 ??? -652C- D4 ??? -652D- C6 A0 DEC $A0 -652F- C9 D3 CMP #$D3 -6531- A0 A7 LDY #$A7 -6533- BB ??? -6534- C1 D3 CMP ($D3,X) +64BE- C1 CD CMP ($CD,X) +64C0- C5 A0 CMP $A0 +64C2- D2 D5 CMP ($D5) +64C4- CC C5 A0 CPY $A0C5 +64C7- C1 D0 CMP ($D0,X) +64C9- D0 CC BNE $6497 +64CB- C9 C5 CMP #$C5 +64CD- D3 ??? +64CE- A0 D4 LDY #$D4 +64D0- CF ??? +64D1- A0 C1 LDY #$C1 +64D3- CC CC A0 CPY $A0CC +64D6- CD C1 C3 CMP $C3C1 +64D9- D2 CF CMP ($CF) +64DB- D3 ??? +64DC- 8D 00 20 STA $2000 +64DF- BE 70 D4 LDX $D470,Y +64E2- C8 INY +64E3- C1 D4 CMP ($D4,X) +64E5- A0 C1 LDY #$C1 +64E7- C3 ??? +64E8- C3 ??? +64E9- C5 D0 CMP $D0 +64EB- D4 ??? +64EC- A0 D3 LDY #$D3 +64EE- D4 ??? +64EF- D2 C9 CMP ($C9) +64F1- CE C7 D3 DEC $D3C7 +64F4- A0 C1 LDY #$C1 +64F6- D3 ??? +64F7- A0 D0 LDY #$D0 +64F9- C1 D2 CMP ($D2,X) +64FB- C1 CD CMP ($CD,X) +64FD- C5 D4 CMP $D4 +64FF- C5 D2 CMP $D2 +6501- D3 ??? +6502- AE 8D 8D LDX $8D8D +6505- 00 BRK +6506- 20 BE 70 JSR $70BE +6509- D9 CF D5 CMP $D5CF,Y +650C- A0 C3 LDY #$C3 +650E- C1 CE CMP ($CE,X) +6510- A0 C1 LDY #$C1 +6512- CC D3 CF CPY $CFD3 +6515- A0 D5 LDY #$D5 +6517- D3 ??? +6518- C5 A0 CMP $A0 +651A- D3 ??? +651B- C3 ??? +651C- CD D0 A0 CMP $A0D0 +651F- D4 ??? +6520- CF ??? +6521- A0 C3 LDY #$C3 +6523- CF ??? +6524- CD D0 C1 CMP $C1D0 +6527- D2 C5 CMP ($C5) +6529- 8D 00 20 STA $2000 +652C- BE 70 D4 LDX $D470,Y +652F- C8 INY +6530- C5 A0 CMP $A0 +6532- CC C5 CE CPY $CEC5 +6535- C7 ??? 6536- D4 ??? -6537- D2 BB CMP ($BB) -6539- A3 ??? -653A- B5 B0 LDA $B0,X -653C- A0 D2 LDY #$D2 -653E- C5 D4 CMP $D4 -6540- D5 D2 CMP $D2,X -6542- CE D3 BA DEC $BAD3 -6545- A0 8D LDY #$8D -6547- 8D 00 4C STA $4C00 -654A- 54 ??? -654B- 65 07 ADC $07 -654D- D7 ??? -654E- D4 ??? -654F- C6 A0 DEC $A0 -6551- C9 D3 CMP #$D3 -6553- A0 A0 LDY #$A0 +6537- C8 INY +6538- D3 ??? +6539- A0 CF LDY #$CF +653B- C6 A0 DEC $A0 +653D- D4 ??? +653E- D7 ??? +653F- CF ??? +6540- A0 C4 LDY #$C4 +6542- C9 C6 CMP #$C6 +6544- C6 C5 DEC $C5 +6546- D2 C5 CMP ($C5) +6548- CE D4 A0 DEC $A0D4 +654B- D3 ??? +654C- D4 ??? +654D- D2 C9 CMP ($C9) +654F- CE C7 D3 DEC $D3C7 +6552- AE 8D 8D LDX $8D8D 6555- 00 BRK -6556- AD 4C 65 LDA $654C -6559- 8D F2 74 STA $74F2 -655C- 8D F3 74 STA $74F3 -655F- C8 INY -6560- B9 4C 65 LDA $654C,Y -6563- 99 F3 74 STA $74F3,Y -6566- CC F2 74 CPY $74F2 -6569- D0 F4 BNE $655F -656B- A9 74 LDA #$74 -656D- 48 PHA -656E- A9 F3 LDA #$F3 -6570- 48 PHA -6571- A9 75 LDA #$75 -6573- 48 PHA -6574- A9 F3 LDA #$F3 -6576- 48 PHA -6577- A9 32 LDA #$32 -6579- 48 PHA -657A- 20 CF 6D JSR $6DCF -657D- A9 73 LDA #$73 -657F- 48 PHA -6580- A9 F2 LDA #$F2 -6582- 48 PHA -6583- 20 89 6E JSR $6E89 -6586- 20 CC 73 JSR $73CC -6589- A0 8D LDY #$8D -658B- 8D 8D 00 STA $008D -658E- 20 ED 73 JSR $73ED -6591- 20 CC 73 JSR $73CC -6594- D4 ??? -6595- CF ??? -6596- A0 D3 LDY #$D3 -6598- C8 INY -6599- CF ??? -659A- D7 ??? -659B- A0 D4 LDY #$D4 -659D- C8 INY -659E- C5 A0 CMP $A0 -65A0- D2 C5 CMP ($C5) -65A2- D3 ??? -65A3- D5 CC CMP $CC,X -65A5- D4 ??? -65A6- A0 CF LDY #$CF -65A8- C6 A0 DEC $A0 -65AA- D3 ??? -65AB- C3 ??? -65AC- C1 D4 CMP ($D4,X) -65AE- AC 8D 00 LDY $008D -65B1- 20 CC 73 JSR $73CC -65B4- D7 ??? -65B5- C5 A0 CMP $A0 -65B7- D5 D3 CMP $D3,X -65B9- C5 C4 CMP $C4 -65BB- A0 D4 LDY #$D4 -65BD- C8 INY -65BE- C5 A0 CMP $A0 -65C0- D3 ??? -65C1- D0 D2 BNE $6595 -65C3- CE A0 CD DEC $CDA0 -65C6- C1 C3 CMP ($C3,X) -65C8- D2 CF CMP ($CF) -65CA- AC A0 D7 LDY $D7A0 -65CD- C8 INY -65CE- C9 C3 CMP #$C3 -65D0- C8 INY -65D1- 8D 00 20 STA $2000 -65D4- CC 73 D3 CPY $D373 -65D7- C9 CD CMP #$CD -65D9- D0 CC BNE $65A7 -65DB- D9 A0 D0 CMP $D0A0,Y -65DE- D2 C9 CMP ($C9) -65E0- CE D4 D3 DEC $D3D4 -65E3- A0 C1 LDY #$C1 -65E5- A0 D3 LDY #$D3 -65E7- D4 ??? -65E8- D2 C9 CMP ($C9) -65EA- CE C7 AE DEC $AEC7 -65ED- A0 D4 LDY #$D4 -65EF- C8 INY -65F0- C9 D3 CMP #$D3 -65F2- 8D 00 20 STA $2000 -65F5- CC 73 D7 CPY $D773 -65F8- CF ??? -65F9- D2 CB CMP ($CB) -65FB- D3 ??? -65FC- A0 C4 LDY #$C4 -65FE- C9 C6 CMP #$C6 -6600- C6 C5 DEC $C5 -6602- D2 C5 CMP ($C5) -6604- CE D4 CC DEC $CCD4 -6607- D9 A0 D4 CMP $D4A0,Y -660A- C8 INY -660B- C1 CE CMP ($CE,X) -660D- A0 D4 LDY #$D4 -660F- C8 INY -6610- C5 A0 CMP $A0 -6612- D0 D2 BNE $65E6 -6614- C9 CE CMP #$CE -6616- D4 ??? -6617- 8D 00 20 STA $2000 -661A- CC 73 D2 CPY $D273 -661D- CF ??? -661E- D5 D4 CMP $D4,X -6620- C9 CE CMP #$CE -6622- C5 D3 CMP $D3 -6624- A0 C9 LDY #$C9 -6626- CE A0 D3 DEC $D3A0 -6629- D4 ??? -662A- C4 C9 CPY $C9 -662C- CF ??? -662D- A0 CF LDY #$CF -662F- D2 A0 CMP ($A0) -6631- D4 ??? -6632- C8 INY -6633- C5 A0 CMP $A0 -6635- DF ??? -6636- D0 D2 BNE $660A -6638- CE D4 8D DEC $8DD4 -663B- 00 BRK -663C- 20 CC 73 JSR $73CC -663F- D2 CF CMP ($CF) -6641- D5 D4 CMP $D4,X -6643- C9 CE CMP #$CE -6645- C5 AC CMP $AC -6647- A0 C1 LDY #$C1 -6649- D3 ??? -664A- A0 C9 LDY #$C9 -664C- D4 ??? -664D- A0 C3 LDY #$C3 -664F- C1 CE CMP ($CE,X) -6651- A0 CF LDY #$CF -6653- CE CC D9 DEC $D9CC -6656- A0 C8 LDY #$C8 -6658- C1 CE CMP ($CE,X) -665A- C4 CC CPY $CC -665C- C5 8D CMP $8D +6556- 20 BE 70 JSR $70BE +6559- D4 ??? +655A- C8 INY +655B- C5 A0 CMP $A0 +655D- C3 ??? +655E- C1 D2 CMP ($D2,X) +6560- D2 D9 CMP ($D9) +6562- A0 C6 LDY #$C6 +6564- CC C1 C7 CPY $C7C1 +6567- A0 C9 LDY #$C9 +6569- D3 ??? +656A- A0 D3 LDY #$D3 +656C- C5 D4 CMP $D4 +656E- A0 D4 LDY #$D4 +6570- CF ??? +6571- A0 B0 LDY #$B0 +6573- A0 C9 LDY #$C9 +6575- C6 A0 DEC $A0 +6577- D4 ??? +6578- C8 INY +6579- C5 8D CMP $8D +657B- 00 BRK +657C- 20 BE 70 JSR $70BE +657F- C6 C9 DEC $C9 +6581- D2 D3 CMP ($D3) +6583- D4 ??? +6584- A0 D3 LDY #$D3 +6586- D4 ??? +6587- D2 C9 CMP ($C9) +6589- CE C7 A0 DEC $A0C7 +658C- C8 INY +658D- C1 D3 CMP ($D3,X) +658F- A0 C1 LDY #$C1 +6591- A0 CC LDY #$CC +6593- C5 CE CMP $CE +6595- C7 ??? +6596- D4 ??? +6597- C8 INY +6598- A0 BE LDY #$BE +659A- A0 D4 LDY #$D4 +659C- C8 INY +659D- C1 CE CMP ($CE,X) +659F- A0 D4 LDY #$D4 +65A1- C8 INY +65A2- C5 A0 CMP $A0 +65A4- 8D 00 20 STA $2000 +65A7- BE 70 D3 LDX $D370,Y +65AA- C5 C3 CMP $C3 +65AC- CF ??? +65AD- CE C4 A0 DEC $A0C4 +65B0- D3 ??? +65B1- D4 ??? +65B2- D2 C9 CMP ($C9) +65B4- CE C7 A7 DEC $A7C7 +65B7- D3 ??? +65B8- A0 CC LDY #$CC +65BA- C5 CE CMP $CE +65BC- C7 ??? +65BD- D4 ??? +65BE- C8 INY +65BF- AE A0 D4 LDX $D4A0 +65C2- C8 INY +65C3- C9 D3 CMP #$D3 +65C5- A0 C3 LDY #$C3 +65C7- C1 CE CMP ($CE,X) +65C9- A0 D4 LDY #$D4 +65CB- C8 INY +65CC- C5 CE CMP $CE +65CE- 8D 00 20 STA $2000 +65D1- BE 70 C2 LDX $C270,Y +65D4- C5 A0 CMP $A0 +65D6- D4 ??? +65D7- C5 D3 CMP $D3 +65D9- D4 ??? +65DA- C5 C4 CMP $C4 +65DC- A0 D7 LDY #$D7 +65DE- C9 D4 CMP #$D4 +65E0- C8 INY +65E1- A0 C2 LDY #$C2 +65E3- C3 ??? +65E4- D3 ??? +65E5- AE 8D 8D LDX $8D8D +65E8- 00 BRK +65E9- 20 BE 70 JSR $70BE +65EC- D3 ??? +65ED- CF ??? +65EE- A0 C9 LDY #$C9 +65F0- C6 A0 DEC $A0 +65F2- D7 ??? +65F3- C5 A0 CMP $A0 +65F5- C3 ??? +65F6- CF ??? +65F7- CD D0 C1 CMP $C1D0 +65FA- D2 C5 CMP ($C5) +65FC- A0 D4 LDY #$D4 +65FE- C8 INY +65FF- C5 A0 CMP $A0 +6601- CC C9 D4 CPY $D4C9 +6604- C5 D2 CMP $D2 +6606- C1 CC CMP ($CC,X) +6608- A0 A7 LDY #$A7 +660A- C1 C1 CMP ($C1,X) +660C- A7 ??? +660D- A0 8D LDY #$8D +660F- 00 BRK +6610- 20 BE 70 JSR $70BE +6613- D4 ??? +6614- CF ??? +6615- A0 D4 LDY #$D4 +6617- C8 INY +6618- C5 A0 CMP $A0 +661A- D3 ??? +661B- C1 CD CMP ($CD,X) +661D- C5 A0 CMP $A0 +661F- C1 D3 CMP ($D3,X) +6621- D4 ??? +6622- D2 AC CMP ($AC) +6624- A0 D7 LDY #$D7 +6626- C5 A0 CMP $A0 +6628- D7 ??? +6629- C9 CC CMP #$CC +662B- CC A0 C6 CPY $C6A0 +662E- C9 CE CMP #$CE +6630- C4 A0 CPY $A0 +6632- D4 ??? +6633- C8 INY +6634- C1 D4 CMP ($D4,X) +6636- 8D 00 20 STA $2000 +6639- BE 70 D4 LDX $D470,Y +663C- C8 INY +663D- C5 A0 CMP $A0 +663F- CC C9 D4 CPY $D4C9 +6642- C5 D2 CMP $D2 +6644- C1 CC CMP ($CC,X) +6646- A0 C8 LDY #$C8 +6648- C1 D3 CMP ($D3,X) +664A- A0 C1 LDY #$C1 +664C- A0 C7 LDY #$C7 +664E- D2 C5 CMP ($C5) +6650- C1 D4 CMP ($D4,X) +6652- C5 D2 CMP $D2 +6654- A0 CC LDY #$CC +6656- C5 CE CMP $CE +6658- C7 ??? +6659- D4 ??? +665A- C8 INY +665B- AE 8D 8D LDX $8D8D 665E- 00 BRK -665F- 20 CC 73 JSR $73CC -6662- C1 A0 CMP ($A0,X) -6664- D3 ??? -6665- D4 ??? -6666- D2 C9 CMP ($C9) -6668- CE C7 A0 DEC $A0C7 -666B- C1 C4 CMP ($C4,X) -666D- C4 D2 CPY $D2 -666F- C5 D3 CMP $D3 -6671- D3 ??? -6672- AE 8D 8D LDX $8D8D -6675- 00 BRK -6676- 20 CC 73 JSR $73CC -6679- D3 ??? -667A- D0 D2 BNE $664E -667C- CE A0 C2 DEC $C2A0 -667F- D3 ??? -6680- D4 ??? -6681- D2 A0 CMP ($A0) -6683- D2 C5 CMP ($C5) -6685- D4 ??? -6686- D5 D2 CMP $D2,X -6688- CE D3 BA DEC $BAD3 -668B- A0 00 LDY #$00 -668D- A9 75 LDA #$75 -668F- 48 PHA -6690- A9 F5 LDA #$F5 -6692- 48 PHA -6693- 20 89 6E JSR $6E89 -6696- 20 CC 73 JSR $73CC -6699- A0 8D LDY #$8D -669B- 8D 8D 00 STA $008D -669E- 20 ED 73 JSR $73ED -66A1- 20 CC 73 JSR $73CC -66A4- A0 8D LDY #$8D -66A6- 8D 8D 00 STA $008D -66A9- 20 CC 73 JSR $73CC -66AC- D4 ??? -66AD- CF ??? -66AE- D3 ??? -66AF- D4 ??? -66B0- D2 A0 CMP ($A0) -66B2- C3 ??? -66B3- CF ??? -66B4- CE D6 C5 DEC $C5D6 -66B7- D2 D4 CMP ($D4) -66B9- D3 ??? -66BA- A0 C1 LDY #$C1 -66BC- A0 B1 LDY #$B1 -66BE- B6 AD LDX $AD,Y -66C0- C2 ??? -66C1- C9 D4 CMP #$D4 -66C3- A0 C9 LDY #$C9 -66C5- CE D4 C5 DEC $C5D4 -66C8- C7 ??? -66C9- C5 D2 CMP $D2 -66CB- A0 C9 LDY #$C9 -66CD- CE D4 CF DEC $CFD4 -66D0- 8D 00 20 STA $2000 -66D3- CC 73 C9 CPY $C973 -66D6- D4 ??? -66D7- D3 ??? -66D8- A0 D3 LDY #$D3 -66DA- D4 ??? -66DB- D2 C9 CMP ($C9) -66DD- CE C7 A0 DEC $A0C7 -66E0- C5 D1 CMP $D1 -66E2- D5 C9 CMP $C9,X -66E4- D6 C1 DEC $C1,X -66E6- CC C5 CE CPY $CEC5 -66E9- D4 ??? -66EA- AE A0 D4 LDX $D4A0 -66ED- C8 INY -66EE- C9 D3 CMP #$D3 +665F- 4C 65 66 JMP $6665 +6662- 02 ??? +6663- C1 C1 CMP ($C1,X) +6665- A0 00 LDY #$00 +6667- AD 62 66 LDA $6662 +666A- 8D 40 61 STA $6140 +666D- 8D 41 61 STA $6141 +6670- C8 INY +6671- B9 62 66 LDA $6662,Y +6674- 99 41 61 STA $6141,Y +6677- CC 40 61 CPY $6140 +667A- D0 F4 BNE $6670 +667C- A9 61 LDA #$61 +667E- 48 PHA +667F- A9 41 LDA #$41 +6681- 48 PHA +6682- A9 6F LDA #$6F +6684- 48 PHA +6685- A9 E0 LDA #$E0 +6687- 48 PHA +6688- 20 7B 75 JSR $757B +668B- B0 03 BCS $6690 +668D- 4C D3 66 JMP $66D3 +6690- 20 BE 70 JSR $70BE +6693- D4 ??? +6694- C8 INY +6695- C5 A0 CMP $A0 +6697- CC C9 D4 CPY $D4C9 +669A- C5 D2 CMP $D2 +669C- C1 CC CMP ($CC,X) +669E- A0 A7 LDY #$A7 +66A0- C1 C1 CMP ($C1,X) +66A2- A7 ??? +66A3- A0 C9 LDY #$C9 +66A5- D3 ??? +66A6- A0 C7 LDY #$C7 +66A8- D2 C5 CMP ($C5) +66AA- C1 D4 CMP ($D4,X) +66AC- C5 D2 CMP $D2 +66AE- A0 D4 LDY #$D4 +66B0- C8 INY +66B1- C1 CE CMP ($CE,X) +66B3- A0 8D LDY #$8D +66B5- 00 BRK +66B6- 20 BE 70 JSR $70BE +66B9- C1 D3 CMP ($D3,X) +66BB- D4 ??? +66BC- D2 AC CMP ($AC) +66BE- A0 D7 LDY #$D7 +66C0- C8 INY +66C1- C9 C3 CMP #$C3 +66C3- C8 INY +66C4- A0 C8 LDY #$C8 +66C6- CF ??? +66C7- CC C4 D3 CPY $D3C4 +66CA- A0 A7 LDY #$A7 +66CC- C1 A7 CMP ($A7,X) +66CE- AE 8D 8D LDX $8D8D +66D1- 8D 00 20 STA $2000 +66D4- DF ??? +66D5- 70 20 BVS $66F7 +66D7- BE 70 A0 LDX $A070,Y +66DA- 8D 8D 8D STA $8D8D +66DD- 8D 00 20 STA $2000 +66E0- BE 70 D4 LDX $D470,Y +66E3- C8 INY +66E4- C5 A0 CMP $A0 +66E6- D3 ??? +66E7- C3 ??? +66E8- C1 D4 CMP ($D4,X) +66EA- A0 CD LDY #$CD +66EC- C1 C3 CMP ($C3,X) +66EE- D2 CF CMP ($CF) 66F0- A0 C3 LDY #$C3 -66F2- C1 CE CMP ($CE,X) -66F4- 8D 00 20 STA $2000 -66F7- CC 73 C5 CPY $C573 -66FA- C9 D4 CMP #$D4 -66FC- C8 INY -66FD- C5 D2 CMP $D2 -66FF- A0 C2 LDY #$C2 -6701- C5 A0 CMP $A0 -6703- C1 A0 CMP ($A0,X) -6705- CC C9 D4 CPY $D4C9 -6708- C5 D2 CMP $D2 -670A- C1 CC CMP ($CC,X) -670C- A0 CF LDY #$CF -670E- D2 A0 CMP ($A0) -6710- C1 CE CMP ($CE,X) -6712- A0 C1 LDY #$C1 -6714- C4 C4 CPY $C4 -6716- D2 C5 CMP ($C5) -6718- D3 ??? -6719- D3 ??? -671A- AE 00 20 LDX $2000 -671D- CC 73 A0 CPY $A073 -6720- 8D 8D 00 STA $008D -6723- 20 CC 73 JSR $73CC +66F2- CF ??? +66F3- CE C3 C1 DEC $C1C3 +66F6- D4 ??? +66F7- C5 CE CMP $CE +66F9- C1 D4 CMP ($D4,X) +66FB- C5 D3 CMP $D3 +66FD- 8D 00 20 STA $2000 +6700- BE 70 C1 LDX $C170,Y +6703- A0 D3 LDY #$D3 +6705- C5 C3 CMP $C3 +6707- CF ??? +6708- CE C4 A0 DEC $A0C4 +670B- C7 ??? +670C- C9 D6 CMP #$D6 +670E- C5 CE CMP $CE +6710- A0 D3 LDY #$D3 +6712- D4 ??? +6713- D2 C9 CMP ($C9) +6715- CE C7 A0 DEC $A0C7 +6718- D4 ??? +6719- CF ??? +671A- A0 C1 LDY #$C1 +671C- A0 8D LDY #$8D +671E- 00 BRK +671F- 20 BE 70 JSR $70BE +6722- C6 C9 DEC $C9 +6724- D2 D3 CMP ($D3) 6726- D4 ??? -6727- CF ??? -6728- D3 ??? -6729- D4 ??? -672A- D2 A0 CMP ($A0) -672C- A3 ??? -672D- B5 B0 LDA $B0,X -672F- B0 B0 BCS $66E1 -6731- A0 D2 LDY #$D2 -6733- C5 D4 CMP $D4 -6735- D5 D2 CMP $D2,X -6737- CE D3 BA DEC $BAD3 -673A- A0 00 LDY #$00 -673C- A9 13 LDA #$13 -673E- 48 PHA -673F- A9 88 LDA #$88 -6741- 48 PHA -6742- 20 BB 6E JSR $6EBB -6745- A9 73 LDA #$73 -6747- 48 PHA -6748- A9 F2 LDA #$F2 -674A- 48 PHA -674B- 20 89 6E JSR $6E89 -674E- 20 CC 73 JSR $73CC -6751- A0 8D LDY #$8D -6753- 8D 00 20 STA $2000 -6756- CC 73 D4 CPY $D473 -6759- CF ??? -675A- D3 ??? -675B- D4 ??? -675C- D2 A0 CMP ($A0) -675E- A4 B3 LDY $B3 -6760- B0 B0 BCS $6712 -6762- A0 D2 LDY #$D2 -6764- C5 D4 CMP $D4 -6766- D5 D2 CMP $D2,X -6768- CE D3 A0 DEC $A0D3 -676B- 00 BRK -676C- A9 FF LDA #$FF -676E- 8D 00 03 STA $0300 -6771- 8D 01 03 STA $0301 -6774- AD 01 03 LDA $0301 -6777- 48 PHA -6778- AD 00 03 LDA $0300 -677B- 48 PHA -677C- 20 BB 6E JSR $6EBB -677F- A9 73 LDA #$73 -6781- 48 PHA -6782- A9 F2 LDA #$F2 -6784- 48 PHA -6785- 20 89 6E JSR $6E89 -6788- 20 CC 73 JSR $73CC -678B- A0 8D LDY #$8D -678D- 8D 00 20 STA $2000 -6790- CC 73 CE CPY $CE73 -6793- CF ??? -6794- D4 ??? -6795- C5 A0 CMP $A0 -6797- D4 ??? -6798- C8 INY -6799- C1 D4 CMP ($D4,X) -679B- A0 A4 LDY #$A4 -679D- C6 C6 DEC $C6 -679F- C6 C6 DEC $C6 -67A1- A0 D2 LDY #$D2 -67A3- C5 D4 CMP $D4 -67A5- D5 D2 CMP $D2,X -67A7- CE D3 A0 DEC $A0D3 -67AA- AD B1 A0 LDA $A0B1 -67AD- C2 ??? -67AE- C5 C3 CMP $C3 -67B0- C1 D5 CMP ($D5,X) -67B2- D3 ??? -67B3- C5 8D CMP $8D -67B5- 00 BRK -67B6- 20 CC 73 JSR $73CC -67B9- D4 ??? -67BA- C8 INY -67BB- C5 A0 CMP $A0 -67BD- D4 ??? -67BE- CF ??? -67BF- D3 ??? -67C0- D4 ??? -67C1- D2 A0 CMP ($A0) -67C3- D2 CF CMP ($CF) -67C5- D5 D4 CMP $D4,X -67C7- C9 CE CMP #$CE -67C9- C5 A0 CMP $A0 -67CB- C1 D3 CMP ($D3,X) -67CD- D3 ??? -67CE- D5 CD CMP $CD,X -67D0- C5 D3 CMP $D3 -67D2- A0 C1 LDY #$C1 -67D4- A0 8D LDY #$8D -67D6- 00 BRK -67D7- 20 CC 73 JSR $73CC -67DA- D3 ??? -67DB- C9 C7 CMP #$C7 -67DD- CE C5 C4 DEC $C4C5 -67E0- A0 D6 LDY #$D6 -67E2- C1 CC CMP ($CC,X) -67E4- D5 C5 CMP $C5,X -67E6- AE A0 00 LDX $00A0 -67E9- 20 CC 73 JSR $73CC -67EC- A0 8D LDY #$8D -67EE- 8D 8D 00 STA $008D -67F1- 20 ED 73 JSR $73ED -67F4- 20 CC 73 JSR $73CC -67F7- A0 8D LDY #$8D -67F9- 8D 8D 00 STA $008D -67FC- 20 CC 73 JSR $73CC -67FF- C1 CE CMP ($CE,X) -6801- C4 A0 CPY $A0 -6803- D4 ??? -6804- C8 INY -6805- C5 A0 CMP $A0 -6807- D4 ??? -6808- CF ??? -6809- CE D5 CD DEC $CDD5 -680C- A0 CD LDY #$CD -680E- C1 C3 CMP ($C3,X) -6810- D2 CF CMP ($CF) -6812- A0 C4 LDY #$C4 -6814- CF ??? -6815- C5 D3 CMP $D3 -6817- A0 D4 LDY #$D4 -6819- C8 INY -681A- C5 8D CMP $8D -681C- 00 BRK -681D- 20 CC 73 JSR $73CC -6820- CF ??? -6821- D0 D0 BNE $67F3 -6823- CF ??? -6824- D3 ??? -6825- C9 D4 CMP #$D4 -6827- C5 BA CMP $BA -6829- A0 C9 LDY #$C9 -682B- D4 ??? -682C- A0 D2 LDY #$D2 -682E- C5 D4 CMP $D4 -6830- D5 D2 CMP $D2,X -6832- CE D3 A0 DEC $A0D3 -6835- C1 A0 CMP ($A0,X) -6837- B1 B6 LDA ($B6),Y -6839- AD C2 C9 LDA $C9C2 -683C- D4 ??? -683D- A0 8D LDY #$8D -683F- 00 BRK -6840- 20 CC 73 JSR $73CC -6843- C9 CE CMP #$CE -6845- D4 ??? -6846- C5 C7 CMP $C7 -6848- C5 D2 CMP $D2 -684A- A0 D6 LDY #$D6 -684C- C1 CC CMP ($CC,X) -684E- D5 C5 CMP $C5,X -6850- A0 C3 LDY #$C3 -6852- CF ??? -6853- CE C5 D2 DEC $D2C5 -6856- D4 ??? -6857- C5 C4 CMP $C4 -6859- A0 C6 LDY #$C6 -685B- D2 CF CMP ($CF) -685D- CD A0 C9 CMP $C9A0 -6860- D4 ??? -6861- D3 ??? -6862- 8D 00 20 STA $2000 -6865- CC 73 D3 CPY $D373 -6868- D4 ??? -6869- D2 C9 CMP ($C9) -686B- CE C7 A0 DEC $A0C7 -686E- C5 D1 CMP $D1 -6870- D5 C9 CMP $C9,X -6872- D6 C1 DEC $C1,X -6874- CC C5 CE CPY $CEC5 -6877- D4 ??? -6878- AE A0 D4 LDX $D4A0 -687B- C8 INY -687C- D5 D3 CMP $D3,X -687E- BA TSX -687F- 8D 8D 00 STA $008D -6882- 20 CC 73 JSR $73CC +6727- A0 C7 LDY #$C7 +6729- C9 D6 CMP #$D6 +672B- C5 CE CMP $CE +672D- A0 D3 LDY #$D3 +672F- D4 ??? +6730- D2 C9 CMP ($C9) +6732- CE C7 AE DEC $AEC7 +6735- A0 C5 LDY #$C5 +6737- C9 D4 CMP #$D4 +6739- C8 INY +673A- C5 D2 CMP $D2 +673C- A0 D0 LDY #$D0 +673E- C1 D2 CMP ($D2,X) +6740- C1 CD CMP ($CD,X) +6742- C5 D4 CMP $D4 +6744- C5 D2 CMP $D2 +6746- 8D 00 20 STA $2000 +6749- BE 70 CD LDX $CD70,Y +674C- C1 D9 CMP ($D9,X) +674E- A0 C2 LDY #$C2 +6750- C5 A0 CMP $A0 +6752- C1 A0 CMP ($A0,X) +6754- CC C9 D4 CPY $D4C9 +6757- C5 D2 CMP $D2 +6759- C1 CC CMP ($CC,X) +675B- A0 D3 LDY #$D3 +675D- D4 ??? +675E- D2 C9 CMP ($C9) +6760- CE C7 AC DEC $ACC7 +6763- A0 C2 LDY #$C2 +6765- D5 D4 CMP $D4,X +6767- A0 CE LDY #$CE +6769- C5 D6 CMP $D6 +676B- C5 D2 CMP $D2 +676D- A0 C2 LDY #$C2 +676F- CF ??? +6770- D4 ??? +6771- C8 INY +6772- AE 8D 8D LDX $8D8D +6775- 00 BRK +6776- 20 BE 70 JSR $70BE +6779- D3 ??? +677A- C3 ??? +677B- C1 D4 CMP ($D4,X) +677D- A0 A7 LDY #$A7 +677F- D7 ??? +6780- D4 ??? +6781- C6 A0 DEC $A0 +6783- C9 D3 CMP #$D3 +6785- A0 A7 LDY #$A7 +6787- BB ??? +6788- C1 D3 CMP ($D3,X) +678A- D4 ??? +678B- D2 BB CMP ($BB) +678D- A3 ??? +678E- B5 B0 LDA $B0,X +6790- A0 D2 LDY #$D2 +6792- C5 D4 CMP $D4 +6794- D5 D2 CMP $D2,X +6796- CE D3 BA DEC $BAD3 +6799- A0 8D LDY #$8D +679B- 8D 00 4C STA $4C00 +679E- A8 TAY +679F- 67 ??? +67A0- 07 ??? +67A1- D7 ??? +67A2- D4 ??? +67A3- C6 A0 DEC $A0 +67A5- C9 D3 CMP #$D3 +67A7- A0 A0 LDY #$A0 +67A9- 00 BRK +67AA- AD A0 67 LDA $67A0 +67AD- 8D 40 61 STA $6140 +67B0- 8D 41 61 STA $6141 +67B3- C8 INY +67B4- B9 A0 67 LDA $67A0,Y +67B7- 99 41 61 STA $6141,Y +67BA- CC 40 61 CPY $6140 +67BD- D0 F4 BNE $67B3 +67BF- A9 61 LDA #$61 +67C1- 48 PHA +67C2- A9 41 LDA #$41 +67C4- 48 PHA +67C5- A9 6F LDA #$6F +67C7- 48 PHA +67C8- A9 E0 LDA #$E0 +67CA- 48 PHA +67CB- A9 32 LDA #$32 +67CD- 48 PHA +67CE- 20 C1 74 JSR $74C1 +67D1- A9 60 LDA #$60 +67D3- 48 PHA +67D4- A9 40 LDA #$40 +67D6- 48 PHA +67D7- 20 8F 74 JSR $748F +67DA- 20 BE 70 JSR $70BE +67DD- A0 8D LDY #$8D +67DF- 8D 8D 00 STA $008D +67E2- 20 DF 70 JSR $70DF +67E5- 20 BE 70 JSR $70BE +67E8- D4 ??? +67E9- CF ??? +67EA- A0 D3 LDY #$D3 +67EC- C8 INY +67ED- CF ??? +67EE- D7 ??? +67EF- A0 D4 LDY #$D4 +67F1- C8 INY +67F2- C5 A0 CMP $A0 +67F4- D2 C5 CMP ($C5) +67F6- D3 ??? +67F7- D5 CC CMP $CC,X +67F9- D4 ??? +67FA- A0 CF LDY #$CF +67FC- C6 A0 DEC $A0 +67FE- D3 ??? +67FF- C3 ??? +6800- C1 D4 CMP ($D4,X) +6802- AC 8D 00 LDY $008D +6805- 20 BE 70 JSR $70BE +6808- D7 ??? +6809- C5 A0 CMP $A0 +680B- D5 D3 CMP $D3,X +680D- C5 C4 CMP $C4 +680F- A0 D4 LDY #$D4 +6811- C8 INY +6812- C5 A0 CMP $A0 +6814- D3 ??? +6815- D0 D2 BNE $67E9 +6817- CE A0 CD DEC $CDA0 +681A- C1 C3 CMP ($C3,X) +681C- D2 CF CMP ($CF) +681E- AC A0 D7 LDY $D7A0 +6821- C8 INY +6822- C9 C3 CMP #$C3 +6824- C8 INY +6825- 8D 00 20 STA $2000 +6828- BE 70 D3 LDX $D370,Y +682B- C9 CD CMP #$CD +682D- D0 CC BNE $67FB +682F- D9 A0 D0 CMP $D0A0,Y +6832- D2 C9 CMP ($C9) +6834- CE D4 D3 DEC $D3D4 +6837- A0 C1 LDY #$C1 +6839- A0 D3 LDY #$D3 +683B- D4 ??? +683C- D2 C9 CMP ($C9) +683E- CE C7 AE DEC $AEC7 +6841- A0 D4 LDY #$D4 +6843- C8 INY +6844- C9 D3 CMP #$D3 +6846- 8D 00 20 STA $2000 +6849- BE 70 D7 LDX $D770,Y +684C- CF ??? +684D- D2 CB CMP ($CB) +684F- D3 ??? +6850- A0 C4 LDY #$C4 +6852- C9 C6 CMP #$C6 +6854- C6 C5 DEC $C5 +6856- D2 C5 CMP ($C5) +6858- CE D4 CC DEC $CCD4 +685B- D9 A0 D4 CMP $D4A0,Y +685E- C8 INY +685F- C1 CE CMP ($CE,X) +6861- A0 D4 LDY #$D4 +6863- C8 INY +6864- C5 A0 CMP $A0 +6866- D0 D2 BNE $683A +6868- C9 CE CMP #$CE +686A- D4 ??? +686B- 8D 00 20 STA $2000 +686E- BE 70 D2 LDX $D270,Y +6871- CF ??? +6872- D5 D4 CMP $D4,X +6874- C9 CE CMP #$CE +6876- C5 D3 CMP $D3 +6878- A0 C9 LDY #$C9 +687A- CE A0 D3 DEC $D3A0 +687D- D4 ??? +687E- C4 C9 CPY $C9 +6880- CF ??? +6881- A0 CF LDY #$CF +6883- D2 A0 CMP ($A0) 6885- D4 ??? -6886- CF ??? -6887- CE D5 CD DEC $CDD5 -688A- A0 A7 LDY #$A7 -688C- B2 B5 LDA ($B5) -688E- B5 A7 LDA $A7,X -6890- A0 D2 LDY #$D2 -6892- C5 D4 CMP $D4 -6894- D5 D2 CMP $D2,X -6896- CE D3 BA DEC $BAD3 -6899- 8D 00 4C STA $4C00 -689C- A2 68 LDX #$68 -689E- 03 ??? -689F- B2 B5 LDA ($B5) -68A1- B5 A0 LDA $A0,X -68A3- 00 BRK -68A4- AD 9E 68 LDA $689E -68A7- 8D F2 74 STA $74F2 -68AA- 8D F3 74 STA $74F3 -68AD- C8 INY -68AE- B9 9E 68 LDA $689E,Y -68B1- 99 F3 74 STA $74F3,Y -68B4- CC F2 74 CPY $74F2 -68B7- D0 F4 BNE $68AD -68B9- A9 74 LDA #$74 -68BB- 48 PHA -68BC- A9 F3 LDA #$F3 -68BE- 48 PHA -68BF- 20 68 6F JSR $6F68 -68C2- A9 73 LDA #$73 -68C4- 48 PHA -68C5- A9 F2 LDA #$F2 -68C7- 48 PHA -68C8- AD F1 73 LDA $73F1 -68CB- 48 PHA -68CC- 20 28 73 JSR $7328 -68CF- 20 CC 73 JSR $73CC -68D2- A0 8D LDY #$8D -68D4- 8D 8D 00 STA $008D -68D7- 20 ED 73 JSR $73ED -68DA- 20 CC 73 JSR $73CC -68DD- A0 8D LDY #$8D -68DF- 8D 8D 8D STA $8D8D -68E2- 00 BRK -68E3- 20 CC 73 JSR $73CC -68E6- D3 ??? -68E7- D5 C2 CMP $C2,X -68E9- D3 ??? -68EA- D4 ??? -68EB- D2 C9 CMP ($C9) -68ED- CE C7 A0 DEC $A0C7 -68F0- D2 CF CMP ($CF) -68F2- D5 D4 CMP $D4,X -68F4- C9 CE CMP #$CE -68F6- C5 D3 CMP $D3 -68F8- AF ??? -68F9- CD C1 C3 CMP $C3C1 -68FC- D2 CF CMP ($CF) -68FE- D3 ??? -68FF- 8D 00 20 STA $2000 -6902- CC 73 AD CPY $AD73 -6905- AD AD AD LDA $ADAD -6908- AD AD AD LDA $ADAD -690B- AD AD AD LDA $ADAD -690E- AD AD AD LDA $ADAD -6911- AD AD AD LDA $ADAD -6914- AD AD AD LDA $ADAD -6917- AD AD AD LDA $ADAD -691A- AD AD AD LDA $ADAD -691D- 8D 8D 00 STA $008D -6920- 20 CC 73 JSR $73CC -6923- D3 ??? -6924- D0 CF BNE $68F5 -6926- D3 ??? -6927- A0 C6 LDY #$C6 -6929- C9 CE CMP #$CE -692B- C4 D3 CPY $D3 -692D- A0 D4 LDY #$D4 -692F- C8 INY -6930- C5 A0 CMP $A0 -6932- D0 CF BNE $6903 -6934- D3 ??? -6935- C9 D4 CMP #$D4 -6937- C9 CF CMP #$CF -6939- CE A0 CF DEC $CFA0 -693C- C6 8D DEC $8D -693E- 00 BRK -693F- 20 CC 73 JSR $73CC -6942- C1 A0 CMP ($A0,X) -6944- D3 ??? -6945- D5 C2 CMP $C2,X -6947- D3 ??? -6948- D4 ??? -6949- D2 C9 CMP ($C9) -694B- CE C7 A0 DEC $A0C7 -694E- D7 ??? -694F- C9 D4 CMP #$D4 -6951- C8 INY -6952- C9 CE CMP #$CE -6954- A0 C1 LDY #$C1 -6956- CE CF D4 DEC $D4CF -6959- C8 INY -695A- C5 D2 CMP $D2 -695C- 8D 00 20 STA $2000 -695F- CC 73 D3 CPY $D373 -6962- D4 ??? -6963- D2 C9 CMP ($C9) -6965- CE C7 AE DEC $AEC7 -6968- 8D 8D 00 STA $008D -696B- 20 CC 73 JSR $73CC -696E- D3 ??? -696F- D0 CF BNE $6940 -6971- D3 ??? -6972- A0 A7 LDY #$A7 -6974- D4 ??? -6975- C8 INY -6976- C9 D3 CMP #$D3 -6978- A0 C9 LDY #$C9 -697A- D3 ??? -697B- A0 C1 LDY #$C1 -697D- A0 D3 LDY #$D3 -697F- D4 ??? -6980- D2 C9 CMP ($C9) -6982- CE C7 A7 DEC $A7C7 -6985- BB ??? -6986- C1 D3 CMP ($D3,X) -6988- D4 ??? -6989- D2 A0 CMP ($A0) -698B- D2 C5 CMP ($C5) -698D- D4 ??? -698E- D5 D2 CMP $D2,X -6990- CE D3 BA DEC $BAD3 -6993- A0 00 LDY #$00 -6995- 4C A9 69 JMP $69A9 -6998- 10 D4 BPL $696E -699A- C8 INY -699B- C9 D3 CMP #$D3 -699D- A0 C9 LDY #$C9 -699F- D3 ??? -69A0- A0 C1 LDY #$C1 -69A2- A0 D3 LDY #$D3 -69A4- D4 ??? -69A5- D2 C9 CMP ($C9) -69A7- CE C7 A0 DEC $A0C7 -69AA- 00 BRK -69AB- AD 98 69 LDA $6998 -69AE- 8D F2 74 STA $74F2 -69B1- 8D F3 74 STA $74F3 -69B4- C8 INY -69B5- B9 98 69 LDA $6998,Y -69B8- 99 F3 74 STA $74F3,Y -69BB- CC F2 74 CPY $74F2 -69BE- D0 F4 BNE $69B4 -69C0- A9 74 LDA #$74 -69C2- 48 PHA -69C3- A9 F3 LDA #$F3 -69C5- 48 PHA -69C6- A9 75 LDA #$75 -69C8- 48 PHA -69C9- A9 F3 LDA #$F3 +6886- C8 INY +6887- C5 A0 CMP $A0 +6889- DF ??? +688A- D0 D2 BNE $685E +688C- CE D4 8D DEC $8DD4 +688F- 00 BRK +6890- 20 BE 70 JSR $70BE +6893- D2 CF CMP ($CF) +6895- D5 D4 CMP $D4,X +6897- C9 CE CMP #$CE +6899- C5 AC CMP $AC +689B- A0 C1 LDY #$C1 +689D- D3 ??? +689E- A0 C9 LDY #$C9 +68A0- D4 ??? +68A1- A0 C3 LDY #$C3 +68A3- C1 CE CMP ($CE,X) +68A5- A0 CF LDY #$CF +68A7- CE CC D9 DEC $D9CC +68AA- A0 C8 LDY #$C8 +68AC- C1 CE CMP ($CE,X) +68AE- C4 CC CPY $CC +68B0- C5 8D CMP $8D +68B2- 00 BRK +68B3- 20 BE 70 JSR $70BE +68B6- C1 A0 CMP ($A0,X) +68B8- D3 ??? +68B9- D4 ??? +68BA- D2 C9 CMP ($C9) +68BC- CE C7 A0 DEC $A0C7 +68BF- C1 C4 CMP ($C4,X) +68C1- C4 D2 CPY $D2 +68C3- C5 D3 CMP $D3 +68C5- D3 ??? +68C6- AE 8D 8D LDX $8D8D +68C9- 00 BRK +68CA- 20 BE 70 JSR $70BE +68CD- D3 ??? +68CE- D0 D2 BNE $68A2 +68D0- CE A0 C2 DEC $C2A0 +68D3- D3 ??? +68D4- D4 ??? +68D5- D2 A0 CMP ($A0) +68D7- D2 C5 CMP ($C5) +68D9- D4 ??? +68DA- D5 D2 CMP $D2,X +68DC- CE D3 BA DEC $BAD3 +68DF- A0 00 LDY #$00 +68E1- A9 6F LDA #$6F +68E3- 48 PHA +68E4- A9 E2 LDA #$E2 +68E6- 48 PHA +68E7- 20 8F 74 JSR $748F +68EA- 20 BE 70 JSR $70BE +68ED- A0 8D LDY #$8D +68EF- 8D 8D 00 STA $008D +68F2- 20 DF 70 JSR $70DF +68F5- 20 BE 70 JSR $70BE +68F8- A0 8D LDY #$8D +68FA- 8D 8D 00 STA $008D +68FD- 20 BE 70 JSR $70BE +6900- D4 ??? +6901- CF ??? +6902- D3 ??? +6903- D4 ??? +6904- D2 A0 CMP ($A0) +6906- C3 ??? +6907- CF ??? +6908- CE D6 C5 DEC $C5D6 +690B- D2 D4 CMP ($D4) +690D- D3 ??? +690E- A0 C1 LDY #$C1 +6910- A0 B1 LDY #$B1 +6912- B6 AD LDX $AD,Y +6914- C2 ??? +6915- C9 D4 CMP #$D4 +6917- A0 C9 LDY #$C9 +6919- CE D4 C5 DEC $C5D4 +691C- C7 ??? +691D- C5 D2 CMP $D2 +691F- A0 C9 LDY #$C9 +6921- CE D4 CF DEC $CFD4 +6924- 8D 00 20 STA $2000 +6927- BE 70 C9 LDX $C970,Y +692A- D4 ??? +692B- D3 ??? +692C- A0 D3 LDY #$D3 +692E- D4 ??? +692F- D2 C9 CMP ($C9) +6931- CE C7 A0 DEC $A0C7 +6934- C5 D1 CMP $D1 +6936- D5 C9 CMP $C9,X +6938- D6 C1 DEC $C1,X +693A- CC C5 CE CPY $CEC5 +693D- D4 ??? +693E- AE A0 D4 LDX $D4A0 +6941- C8 INY +6942- C9 D3 CMP #$D3 +6944- A0 C3 LDY #$C3 +6946- C1 CE CMP ($CE,X) +6948- 8D 00 20 STA $2000 +694B- BE 70 C5 LDX $C570,Y +694E- C9 D4 CMP #$D4 +6950- C8 INY +6951- C5 D2 CMP $D2 +6953- A0 C2 LDY #$C2 +6955- C5 A0 CMP $A0 +6957- C1 A0 CMP ($A0,X) +6959- CC C9 D4 CPY $D4C9 +695C- C5 D2 CMP $D2 +695E- C1 CC CMP ($CC,X) +6960- A0 CF LDY #$CF +6962- D2 A0 CMP ($A0) +6964- C1 CE CMP ($CE,X) +6966- A0 C1 LDY #$C1 +6968- C4 C4 CPY $C4 +696A- D2 C5 CMP ($C5) +696C- D3 ??? +696D- D3 ??? +696E- AE 00 20 LDX $2000 +6971- BE 70 A0 LDX $A070,Y +6974- 8D 8D 00 STA $008D +6977- 20 BE 70 JSR $70BE +697A- D4 ??? +697B- CF ??? +697C- D3 ??? +697D- D4 ??? +697E- D2 A0 CMP ($A0) +6980- A3 ??? +6981- B5 B0 LDA $B0,X +6983- B0 B0 BCS $6935 +6985- A0 D2 LDY #$D2 +6987- C5 D4 CMP $D4 +6989- D5 D2 CMP $D2,X +698B- CE D3 BA DEC $BAD3 +698E- A0 00 LDY #$00 +6990- A9 13 LDA #$13 +6992- 48 PHA +6993- A9 88 LDA #$88 +6995- 48 PHA +6996- 20 E2 73 JSR $73E2 +6999- A9 60 LDA #$60 +699B- 48 PHA +699C- A9 40 LDA #$40 +699E- 48 PHA +699F- 20 8F 74 JSR $748F +69A2- 20 BE 70 JSR $70BE +69A5- A0 8D LDY #$8D +69A7- 8D 00 20 STA $2000 +69AA- BE 70 D4 LDX $D470,Y +69AD- CF ??? +69AE- D3 ??? +69AF- D4 ??? +69B0- D2 A0 CMP ($A0) +69B2- A4 B3 LDY $B3 +69B4- B0 B0 BCS $6966 +69B6- A0 D2 LDY #$D2 +69B8- C5 D4 CMP $D4 +69BA- D5 D2 CMP $D2,X +69BC- CE D3 A0 DEC $A0D3 +69BF- 00 BRK +69C0- A9 FF LDA #$FF +69C2- 8D 00 03 STA $0300 +69C5- 8D 01 03 STA $0301 +69C8- AD 01 03 LDA $0301 69CB- 48 PHA -69CC- 20 36 70 JSR $7036 -69CF- 8D 00 03 STA $0300 -69D2- A9 00 LDA #$00 -69D4- 8D 01 03 STA $0301 -69D7- AD 01 03 LDA $0301 -69DA- 48 PHA -69DB- AD 00 03 LDA $0300 -69DE- 48 PHA -69DF- 20 BB 6E JSR $6EBB -69E2- A9 73 LDA #$73 -69E4- 48 PHA -69E5- A9 F2 LDA #$F2 -69E7- 48 PHA -69E8- 20 89 6E JSR $6E89 -69EB- 20 CC 73 JSR $73CC -69EE- A0 8D LDY #$8D -69F0- 8D 8D 00 STA $008D -69F3- 20 CC 73 JSR $73CC -69F6- A0 8D LDY #$8D -69F8- 8D 8D 00 STA $008D -69FB- 20 CC 73 JSR $73CC -69FE- D4 ??? -69FF- C8 INY -6A00- C5 A0 CMP $A0 -6A02- D3 ??? -6A03- C3 ??? -6A04- D0 D9 BNE $69DF -6A06- A0 CD LDY #$CD -6A08- C1 C3 CMP ($C3,X) -6A0A- D2 CF CMP ($CF) -6A0C- A0 C3 LDY #$C3 -6A0E- CF ??? -6A0F- D0 C9 BNE $69DA -6A11- C5 D3 CMP $D3 -6A13- A0 C1 LDY #$C1 -6A15- A0 8D LDY #$8D -6A17- 00 BRK -6A18- 20 CC 73 JSR $73CC -6A1B- D3 ??? -6A1C- D5 C2 CMP $C2,X -6A1E- D3 ??? -6A1F- D4 ??? -6A20- D2 C9 CMP ($C9) -6A22- CE C7 A0 DEC $A0C7 -6A25- C6 D2 DEC $D2 -6A27- CF ??? -6A28- CD A0 C1 CMP $C1A0 -6A2B- CE CF D4 DEC $D4CF -6A2E- C8 INY -6A2F- C5 D2 CMP $D2 -6A31- A0 D3 LDY #$D3 -6A33- D4 ??? -6A34- D2 C9 CMP ($C9) -6A36- CE C7 8D DEC $8DC7 -6A39- 00 BRK -6A3A- 20 CC 73 JSR $73CC -6A3D- C1 D4 CMP ($D4,X) -6A3F- A0 D4 LDY #$D4 -6A41- C8 INY -6A42- C5 A0 CMP $A0 -6A44- D3 ??? -6A45- D0 C5 BNE $6A0C -6A47- C3 ??? -6A48- C9 C6 CMP #$C6 -6A4A- C9 C5 CMP #$C5 -6A4C- C4 A0 CPY $A0 -6A4E- C9 CE CMP #$CE -6A50- C4 C5 CPY $C5 -6A52- D8 CLD -6A53- AC A0 C8 LDY $C8A0 -6A56- CF ??? -6A57- CC C4 C9 CPY $C9C4 -6A5A- CE C7 8D DEC $8DC7 -6A5D- 00 BRK -6A5E- 20 CC 73 JSR $73CC -6A61- D4 ??? -6A62- C8 INY -6A63- C5 A0 CMP $A0 -6A65- D3 ??? -6A66- D5 C2 CMP $C2,X -6A68- D3 ??? -6A69- D4 ??? -6A6A- D2 C9 CMP ($C9) -6A6C- CE C7 A0 DEC $A0C7 -6A6F- C9 CE CMP #$CE -6A71- A0 DB LDY #$DB -6A73- D2 C5 CMP ($C5) -6A75- D4 ??? -6A76- D5 D2 CMP $D2,X -6A78- CE DD AE DEC $AEDD -6A7B- 8D 8D 00 STA $008D -6A7E- 20 CC 73 JSR $73CC -6A81- D3 ??? -6A82- C3 ??? -6A83- D0 D9 BNE $6A5E -6A85- A0 A7 LDY #$A7 -6A87- C1 C2 CMP ($C2,X) -6A89- C3 ??? -6A8A- C4 C5 CPY $C5 -6A8C- C6 C7 DEC $C7 -6A8E- C8 INY -6A8F- C9 CA CMP #$CA -6A91- CB ??? -6A92- A7 ??? -6A93- BB ??? -6A94- A3 ??? -6A95- B2 BB LDA ($BB) -6A97- A3 ??? -6A98- B4 BB LDY $BB,X -6A9A- A3 ??? -6A9B- B5 B0 LDA $B0,X -6A9D- A0 D2 LDY #$D2 -6A9F- C5 D4 CMP $D4 -6AA1- D5 D2 CMP $D2,X -6AA3- CE D3 BA DEC $BAD3 -6AA6- A0 00 LDY #$00 -6AA8- 4C B7 6A JMP $6AB7 -6AAB- 0B ??? -6AAC- C1 C2 CMP ($C2,X) -6AAE- C3 ??? -6AAF- C4 C5 CPY $C5 -6AB1- C6 C7 DEC $C7 -6AB3- C8 INY -6AB4- C9 CA CMP #$CA -6AB6- CB ??? -6AB7- A0 00 LDY #$00 -6AB9- AD AB 6A LDA $6AAB -6ABC- 8D F2 74 STA $74F2 -6ABF- 8D F3 74 STA $74F3 -6AC2- C8 INY -6AC3- B9 AB 6A LDA $6AAB,Y -6AC6- 99 F3 74 STA $74F3,Y -6AC9- CC F2 74 CPY $74F2 -6ACC- D0 F4 BNE $6AC2 -6ACE- A9 74 LDA #$74 -6AD0- 48 PHA -6AD1- A9 F3 LDA #$F3 -6AD3- 48 PHA -6AD4- A9 02 LDA #$02 -6AD6- 48 PHA -6AD7- A9 04 LDA #$04 -6AD9- 48 PHA -6ADA- A9 FF LDA #$FF -6ADC- 48 PHA -6ADD- 20 C4 70 JSR $70C4 -6AE0- A9 73 LDA #$73 -6AE2- 48 PHA -6AE3- A9 F2 LDA #$F2 -6AE5- 48 PHA -6AE6- 20 89 6E JSR $6E89 -6AE9- 20 CC 73 JSR $73CC -6AEC- A0 8D LDY #$8D -6AEE- 8D 8D 00 STA $008D -6AF1- 20 ED 73 JSR $73ED -6AF4- 20 CC 73 JSR $73CC -6AF7- A0 8D LDY #$8D -6AF9- 8D 8D 8D STA $8D8D -6AFC- 8D 00 20 STA $2000 -6AFF- CC 73 D4 CPY $D473 -6B02- C8 INY -6B03- C5 A0 CMP $A0 -6B05- D3 ??? -6B06- C4 C5 CPY $C5 -6B08- CC A0 CD CPY $CDA0 -6B0B- C1 C3 CMP ($C3,X) -6B0D- D2 CF CMP ($CF) -6B0F- A0 C4 LDY #$C4 -6B11- C5 CC CMP $CC -6B13- C5 D4 CMP $D4 -6B15- C5 D3 CMP $D3 -6B17- A0 C1 LDY #$C1 -6B19- A0 D3 LDY #$D3 -6B1B- D5 C2 CMP $C2,X -6B1D- D3 ??? -6B1E- D4 ??? -6B1F- D2 C9 CMP ($C9) -6B21- CE C7 8D DEC $8DC7 -6B24- 00 BRK -6B25- 20 CC 73 JSR $73CC -6B28- C6 D2 DEC $D2 -6B2A- CF ??? -6B2B- CD A0 D4 CMP $D4A0 -6B2E- C8 INY -6B2F- C5 A0 CMP $A0 -6B31- C7 ??? -6B32- C9 D6 CMP #$D6 -6B34- C5 CE CMP $CE -6B36- A0 D3 LDY #$D3 -6B38- CF ??? -6B39- D5 D2 CMP $D2,X -6B3B- C3 ??? -6B3C- C5 A0 CMP $A0 -6B3E- D3 ??? -6B3F- D4 ??? -6B40- D2 C9 CMP ($C9) -6B42- CE C7 AE DEC $AEC7 -6B45- A0 CE LDY #$CE -6B47- CF ??? -6B48- D4 ??? -6B49- C5 A0 CMP $A0 -6B4B- 8D 00 20 STA $2000 -6B4E- CC 73 D4 CPY $D473 -6B51- C8 INY -6B52- C1 D4 CMP ($D4,X) -6B54- A0 D4 LDY #$D4 -6B56- C8 INY -6B57- C5 A0 CMP $A0 -6B59- D3 ??? -6B5A- CF ??? -6B5B- D5 D2 CMP $D2,X -6B5D- C3 ??? -6B5E- C5 A0 CMP $A0 -6B60- D3 ??? -6B61- D4 ??? -6B62- D2 C9 CMP ($C9) -6B64- CE C7 A0 DEC $A0C7 -6B67- CD D5 D3 CMP $D3D5 -6B6A- D4 ??? -6B6B- A0 CE LDY #$CE -6B6D- CF ??? -6B6E- D4 ??? -6B6F- 8D 00 20 STA $2000 -6B72- CC 73 C2 CPY $C273 -6B75- C5 A0 CMP $A0 -6B77- C1 A0 CMP ($A0,X) -6B79- CC C9 D4 CPY $D4C9 -6B7C- C5 D2 CMP $D2 -6B7E- C1 CC CMP ($CC,X) -6B80- A0 C2 LDY #$C2 -6B82- C5 C3 CMP $C3 -6B84- C1 D5 CMP ($D5,X) -6B86- D3 ??? -6B87- C5 A0 CMP $A0 -6B89- D4 ??? -6B8A- C8 INY -6B8B- C9 D3 CMP #$D3 -6B8D- A0 D2 LDY #$D2 -6B8F- CF ??? -6B90- D5 D4 CMP $D4,X -6B92- C9 CE CMP #$CE -6B94- C5 8D CMP $8D -6B96- 00 BRK -6B97- 20 CC 73 JSR $73CC -6B9A- C1 CC CMP ($CC,X) +69CC- AD 00 03 LDA $0300 +69CF- 48 PHA +69D0- 20 E2 73 JSR $73E2 +69D3- A9 60 LDA #$60 +69D5- 48 PHA +69D6- A9 40 LDA #$40 +69D8- 48 PHA +69D9- 20 8F 74 JSR $748F +69DC- 20 BE 70 JSR $70BE +69DF- A0 8D LDY #$8D +69E1- 8D 00 20 STA $2000 +69E4- BE 70 CE LDX $CE70,Y +69E7- CF ??? +69E8- D4 ??? +69E9- C5 A0 CMP $A0 +69EB- D4 ??? +69EC- C8 INY +69ED- C1 D4 CMP ($D4,X) +69EF- A0 A4 LDY #$A4 +69F1- C6 C6 DEC $C6 +69F3- C6 C6 DEC $C6 +69F5- A0 D2 LDY #$D2 +69F7- C5 D4 CMP $D4 +69F9- D5 D2 CMP $D2,X +69FB- CE D3 A0 DEC $A0D3 +69FE- AD B1 A0 LDA $A0B1 +6A01- C2 ??? +6A02- C5 C3 CMP $C3 +6A04- C1 D5 CMP ($D5,X) +6A06- D3 ??? +6A07- C5 8D CMP $8D +6A09- 00 BRK +6A0A- 20 BE 70 JSR $70BE +6A0D- D4 ??? +6A0E- C8 INY +6A0F- C5 A0 CMP $A0 +6A11- D4 ??? +6A12- CF ??? +6A13- D3 ??? +6A14- D4 ??? +6A15- D2 A0 CMP ($A0) +6A17- D2 CF CMP ($CF) +6A19- D5 D4 CMP $D4,X +6A1B- C9 CE CMP #$CE +6A1D- C5 A0 CMP $A0 +6A1F- C1 D3 CMP ($D3,X) +6A21- D3 ??? +6A22- D5 CD CMP $CD,X +6A24- C5 D3 CMP $D3 +6A26- A0 C1 LDY #$C1 +6A28- A0 8D LDY #$8D +6A2A- 00 BRK +6A2B- 20 BE 70 JSR $70BE +6A2E- D3 ??? +6A2F- C9 C7 CMP #$C7 +6A31- CE C5 C4 DEC $C4C5 +6A34- A0 D6 LDY #$D6 +6A36- C1 CC CMP ($CC,X) +6A38- D5 C5 CMP $C5,X +6A3A- AE A0 00 LDX $00A0 +6A3D- 20 BE 70 JSR $70BE +6A40- A0 8D LDY #$8D +6A42- 8D 8D 00 STA $008D +6A45- 20 DF 70 JSR $70DF +6A48- 20 BE 70 JSR $70BE +6A4B- A0 8D LDY #$8D +6A4D- 8D 8D 00 STA $008D +6A50- 20 BE 70 JSR $70BE +6A53- C1 CE CMP ($CE,X) +6A55- C4 A0 CPY $A0 +6A57- D4 ??? +6A58- C8 INY +6A59- C5 A0 CMP $A0 +6A5B- D4 ??? +6A5C- CF ??? +6A5D- CE D5 CD DEC $CDD5 +6A60- A0 CD LDY #$CD +6A62- C1 C3 CMP ($C3,X) +6A64- D2 CF CMP ($CF) +6A66- A0 C4 LDY #$C4 +6A68- CF ??? +6A69- C5 D3 CMP $D3 +6A6B- A0 D4 LDY #$D4 +6A6D- C8 INY +6A6E- C5 8D CMP $8D +6A70- 00 BRK +6A71- 20 BE 70 JSR $70BE +6A74- CF ??? +6A75- D0 D0 BNE $6A47 +6A77- CF ??? +6A78- D3 ??? +6A79- C9 D4 CMP #$D4 +6A7B- C5 BA CMP $BA +6A7D- A0 C9 LDY #$C9 +6A7F- D4 ??? +6A80- A0 D2 LDY #$D2 +6A82- C5 D4 CMP $D4 +6A84- D5 D2 CMP $D2,X +6A86- CE D3 A0 DEC $A0D3 +6A89- C1 A0 CMP ($A0,X) +6A8B- B1 B6 LDA ($B6),Y +6A8D- AD C2 C9 LDA $C9C2 +6A90- D4 ??? +6A91- A0 8D LDY #$8D +6A93- 00 BRK +6A94- 20 BE 70 JSR $70BE +6A97- C9 CE CMP #$CE +6A99- D4 ??? +6A9A- C5 C7 CMP $C7 +6A9C- C5 D2 CMP $D2 +6A9E- A0 D6 LDY #$D6 +6AA0- C1 CC CMP ($CC,X) +6AA2- D5 C5 CMP $C5,X +6AA4- A0 C3 LDY #$C3 +6AA6- CF ??? +6AA7- CE C5 D2 DEC $D2C5 +6AAA- D4 ??? +6AAB- C5 C4 CMP $C4 +6AAD- A0 C6 LDY #$C6 +6AAF- D2 CF CMP ($CF) +6AB1- CD A0 C9 CMP $C9A0 +6AB4- D4 ??? +6AB5- D3 ??? +6AB6- 8D 00 20 STA $2000 +6AB9- BE 70 D3 LDX $D370,Y +6ABC- D4 ??? +6ABD- D2 C9 CMP ($C9) +6ABF- CE C7 A0 DEC $A0C7 +6AC2- C5 D1 CMP $D1 +6AC4- D5 C9 CMP $C9,X +6AC6- D6 C1 DEC $C1,X +6AC8- CC C5 CE CPY $CEC5 +6ACB- D4 ??? +6ACC- AE A0 D4 LDX $D4A0 +6ACF- C8 INY +6AD0- D5 D3 CMP $D3,X +6AD2- BA TSX +6AD3- 8D 8D 00 STA $008D +6AD6- 20 BE 70 JSR $70BE +6AD9- D4 ??? +6ADA- CF ??? +6ADB- CE D5 CD DEC $CDD5 +6ADE- A0 A7 LDY #$A7 +6AE0- B2 B5 LDA ($B5) +6AE2- B5 A7 LDA $A7,X +6AE4- A0 D2 LDY #$D2 +6AE6- C5 D4 CMP $D4 +6AE8- D5 D2 CMP $D2,X +6AEA- CE D3 BA DEC $BAD3 +6AED- 8D 00 4C STA $4C00 +6AF0- F6 6A INC $6A,X +6AF2- 03 ??? +6AF3- B2 B5 LDA ($B5) +6AF5- B5 A0 LDA $A0,X +6AF7- 00 BRK +6AF8- AD F2 6A LDA $6AF2 +6AFB- 8D 40 61 STA $6140 +6AFE- 8D 41 61 STA $6141 +6B01- C8 INY +6B02- B9 F2 6A LDA $6AF2,Y +6B05- 99 41 61 STA $6141,Y +6B08- CC 40 61 CPY $6140 +6B0B- D0 F4 BNE $6B01 +6B0D- A9 61 LDA #$61 +6B0F- 48 PHA +6B10- A9 41 LDA #$41 +6B12- 48 PHA +6B13- 20 BB 75 JSR $75BB +6B16- A9 60 LDA #$60 +6B18- 48 PHA +6B19- A9 40 LDA #$40 +6B1B- 48 PHA +6B1C- AD 3F 60 LDA $603F +6B1F- 48 PHA +6B20- 20 2A 70 JSR $702A +6B23- 20 BE 70 JSR $70BE +6B26- A0 8D LDY #$8D +6B28- 8D 8D 00 STA $008D +6B2B- 20 DF 70 JSR $70DF +6B2E- 20 BE 70 JSR $70BE +6B31- A0 8D LDY #$8D +6B33- 8D 8D 8D STA $8D8D +6B36- 00 BRK +6B37- 20 BE 70 JSR $70BE +6B3A- D3 ??? +6B3B- D5 C2 CMP $C2,X +6B3D- D3 ??? +6B3E- D4 ??? +6B3F- D2 C9 CMP ($C9) +6B41- CE C7 A0 DEC $A0C7 +6B44- D2 CF CMP ($CF) +6B46- D5 D4 CMP $D4,X +6B48- C9 CE CMP #$CE +6B4A- C5 D3 CMP $D3 +6B4C- AF ??? +6B4D- CD C1 C3 CMP $C3C1 +6B50- D2 CF CMP ($CF) +6B52- D3 ??? +6B53- 8D 00 20 STA $2000 +6B56- BE 70 AD LDX $AD70,Y +6B59- AD AD AD LDA $ADAD +6B5C- AD AD AD LDA $ADAD +6B5F- AD AD AD LDA $ADAD +6B62- AD AD AD LDA $ADAD +6B65- AD AD AD LDA $ADAD +6B68- AD AD AD LDA $ADAD +6B6B- AD AD AD LDA $ADAD +6B6E- AD AD AD LDA $ADAD +6B71- 8D 8D 00 STA $008D +6B74- 20 BE 70 JSR $70BE +6B77- D3 ??? +6B78- D0 CF BNE $6B49 +6B7A- D3 ??? +6B7B- A0 C6 LDY #$C6 +6B7D- C9 CE CMP #$CE +6B7F- C4 D3 CPY $D3 +6B81- A0 D4 LDY #$D4 +6B83- C8 INY +6B84- C5 A0 CMP $A0 +6B86- D0 CF BNE $6B57 +6B88- D3 ??? +6B89- C9 D4 CMP #$D4 +6B8B- C9 CF CMP #$CF +6B8D- CE A0 CF DEC $CFA0 +6B90- C6 8D DEC $8D +6B92- 00 BRK +6B93- 20 BE 70 JSR $70BE +6B96- C1 A0 CMP ($A0,X) +6B98- D3 ??? +6B99- D5 C2 CMP $C2,X +6B9B- D3 ??? 6B9C- D4 ??? -6B9D- C5 D2 CMP $D2 -6B9F- D3 ??? -6BA0- A0 D4 LDY #$D4 -6BA2- C8 INY -6BA3- C5 A0 CMP $A0 -6BA5- D3 ??? -6BA6- D4 ??? -6BA7- D2 C9 CMP ($C9) -6BA9- CE C7 A0 DEC $A0C7 -6BAC- D0 C1 BNE $6B6F -6BAE- D3 ??? -6BAF- D3 ??? -6BB0- C5 C4 CMP $C4 -6BB2- A0 D4 LDY #$D4 -6BB4- CF ??? -6BB5- A0 C9 LDY #$C9 -6BB7- D4 ??? -6BB8- AE 8D 8D LDX $8D8D -6BBB- 00 BRK -6BBC- 20 CC 73 JSR $73CC -6BBF- C9 C6 CMP #$C6 -6BC1- A0 CC LDY #$CC -6BC3- D3 ??? -6BC4- D4 ??? -6BC5- D2 A0 CMP ($A0) -6BC7- C8 INY -6BC8- CF ??? -6BC9- CC C4 D3 CPY $D3C4 -6BCC- A0 A7 LDY #$A7 -6BCE- D4 ??? -6BCF- C8 INY -6BD0- C9 D3 CMP #$D3 -6BD2- A0 C9 LDY #$C9 -6BD4- D3 ??? -6BD5- A0 C1 LDY #$C1 -6BD7- A0 D3 LDY #$D3 -6BD9- D4 ??? -6BDA- D2 C9 CMP ($C9) -6BDC- CE C7 AE DEC $AEC7 -6BDF- A7 ??? -6BE0- 8D 00 20 STA $2000 -6BE3- CC 73 D4 CPY $D473 -6BE6- C8 INY -6BE7- C5 CE CMP $CE -6BE9- A0 D3 LDY #$D3 -6BEB- C4 C5 CPY $C5 -6BED- CC A0 CC CPY $CCA0 -6BF0- D3 ??? -6BF1- D4 ??? -6BF2- D2 BB CMP ($BB) -6BF4- A3 ??? -6BF5- B1 BB LDA ($BB),Y -6BF7- A3 ??? -6BF8- B7 ??? -6BF9- A0 D2 LDY #$D2 -6BFB- C5 D4 CMP $D4 -6BFD- D5 D2 CMP $D2,X -6BFF- CE D3 BA DEC $BAD3 -6C02- A0 8D LDY #$8D -6C04- 8D 00 A9 STA $A900 -6C07- 75 48 ADC $48,X -6C09- A9 F7 LDA #$F7 -6C0B- 48 PHA -6C0C- A9 01 LDA #$01 -6C0E- 48 PHA -6C0F- A9 07 LDA #$07 -6C11- 48 PHA -6C12- 20 83 71 JSR $7183 -6C15- A9 75 LDA #$75 -6C17- 48 PHA -6C18- A9 F7 LDA #$F7 -6C1A- 48 PHA -6C1B- 20 89 6E JSR $6E89 -6C1E- 20 CC 73 JSR $73CC -6C21- A0 8D LDY #$8D -6C23- 8D 8D 8D STA $8D8D -6C26- 00 BRK -6C27- 20 ED 73 JSR $73ED -6C2A- 20 CC 73 JSR $73CC -6C2D- D4 ??? -6C2E- C8 INY -6C2F- C5 A0 CMP $A0 -6C31- D3 ??? -6C32- C9 CE CMP #$CE -6C34- D3 ??? -6C35- A0 CD LDY #$CD -6C37- C1 C3 CMP ($C3,X) -6C39- D2 CF CMP ($CF) -6C3B- A0 C4 LDY #$C4 -6C3D- CF ??? -6C3E- C5 D3 CMP $D3 -6C40- A0 D4 LDY #$D4 -6C42- C8 INY -6C43- C5 A0 CMP $A0 -6C45- 8D 00 20 STA $2000 -6C48- CC 73 CF CPY $CF73 -6C4B- D0 D0 BNE $6C1D -6C4D- CF ??? -6C4E- D3 ??? -6C4F- C9 D4 CMP #$D4 -6C51- C5 A0 CMP $A0 -6C53- CF ??? -6C54- C6 A0 DEC $A0 +6B9D- D2 C9 CMP ($C9) +6B9F- CE C7 A0 DEC $A0C7 +6BA2- D7 ??? +6BA3- C9 D4 CMP #$D4 +6BA5- C8 INY +6BA6- C9 CE CMP #$CE +6BA8- A0 C1 LDY #$C1 +6BAA- CE CF D4 DEC $D4CF +6BAD- C8 INY +6BAE- C5 D2 CMP $D2 +6BB0- 8D 00 20 STA $2000 +6BB3- BE 70 D3 LDX $D370,Y +6BB6- D4 ??? +6BB7- D2 C9 CMP ($C9) +6BB9- CE C7 AE DEC $AEC7 +6BBC- 8D 8D 00 STA $008D +6BBF- 20 BE 70 JSR $70BE +6BC2- D3 ??? +6BC3- D0 CF BNE $6B94 +6BC5- D3 ??? +6BC6- A0 A7 LDY #$A7 +6BC8- D4 ??? +6BC9- C8 INY +6BCA- C9 D3 CMP #$D3 +6BCC- A0 C9 LDY #$C9 +6BCE- D3 ??? +6BCF- A0 C1 LDY #$C1 +6BD1- A0 D3 LDY #$D3 +6BD3- D4 ??? +6BD4- D2 C9 CMP ($C9) +6BD6- CE C7 A7 DEC $A7C7 +6BD9- BB ??? +6BDA- C1 D3 CMP ($D3,X) +6BDC- D4 ??? +6BDD- D2 A0 CMP ($A0) +6BDF- D2 C5 CMP ($C5) +6BE1- D4 ??? +6BE2- D5 D2 CMP $D2,X +6BE4- CE D3 BA DEC $BAD3 +6BE7- A0 00 LDY #$00 +6BE9- 4C FD 6B JMP $6BFD +6BEC- 10 D4 BPL $6BC2 +6BEE- C8 INY +6BEF- C9 D3 CMP #$D3 +6BF1- A0 C9 LDY #$C9 +6BF3- D3 ??? +6BF4- A0 C1 LDY #$C1 +6BF6- A0 D3 LDY #$D3 +6BF8- D4 ??? +6BF9- D2 C9 CMP ($C9) +6BFB- CE C7 A0 DEC $A0C7 +6BFE- 00 BRK +6BFF- AD EC 6B LDA $6BEC +6C02- 8D 40 61 STA $6140 +6C05- 8D 41 61 STA $6141 +6C08- C8 INY +6C09- B9 EC 6B LDA $6BEC,Y +6C0C- 99 41 61 STA $6141,Y +6C0F- CC 40 61 CPY $6140 +6C12- D0 F4 BNE $6C08 +6C14- A9 61 LDA #$61 +6C16- 48 PHA +6C17- A9 41 LDA #$41 +6C19- 48 PHA +6C1A- A9 6F LDA #$6F +6C1C- 48 PHA +6C1D- A9 E0 LDA #$E0 +6C1F- 48 PHA +6C20- 20 3E 79 JSR $793E +6C23- 8D 00 03 STA $0300 +6C26- A9 00 LDA #$00 +6C28- 8D 01 03 STA $0301 +6C2B- AD 01 03 LDA $0301 +6C2E- 48 PHA +6C2F- AD 00 03 LDA $0300 +6C32- 48 PHA +6C33- 20 E2 73 JSR $73E2 +6C36- A9 60 LDA #$60 +6C38- 48 PHA +6C39- A9 40 LDA #$40 +6C3B- 48 PHA +6C3C- 20 8F 74 JSR $748F +6C3F- 20 BE 70 JSR $70BE +6C42- A0 8D LDY #$8D +6C44- 8D 8D 00 STA $008D +6C47- 20 BE 70 JSR $70BE +6C4A- A0 8D LDY #$8D +6C4C- 8D 8D 00 STA $008D +6C4F- 20 BE 70 JSR $70BE +6C52- D4 ??? +6C53- C8 INY +6C54- C5 A0 CMP $A0 6C56- D3 ??? -6C57- C4 C5 CPY $C5 -6C59- CC BA A0 CPY $A0BA -6C5C- C9 D4 CMP #$D4 -6C5E- A0 C9 LDY #$C9 -6C60- CE D3 C5 DEC $C5D3 -6C63- D2 D4 CMP ($D4) -6C65- D3 ??? -6C66- 8D 00 20 STA $2000 -6C69- CC 73 C1 CPY $C173 -6C6C- A0 D3 LDY #$D3 -6C6E- D5 C2 CMP $C2,X -6C70- D3 ??? -6C71- D4 ??? -6C72- D2 C9 CMP ($C9) -6C74- CE C7 A0 DEC $A0C7 -6C77- C9 CE CMP #$CE -6C79- D4 ??? -6C7A- CF ??? -6C7B- A0 C1 LDY #$C1 -6C7D- A0 D0 LDY #$D0 -6C7F- C1 D2 CMP ($D2,X) -6C81- C5 CE CMP $CE -6C83- D4 ??? -6C84- A0 D3 LDY #$D3 -6C86- D4 ??? -6C87- D2 C9 CMP ($C9) -6C89- CE C7 8D DEC $8DC7 -6C8C- 00 BRK -6C8D- 20 CC 73 JSR $73CC -6C90- C1 D4 CMP ($D4,X) -6C92- A0 D4 LDY #$D4 -6C94- C8 INY -6C95- C5 A0 CMP $A0 -6C97- C7 ??? -6C98- C9 D6 CMP #$D6 -6C9A- C5 CE CMP $CE -6C9C- A0 C9 LDY #$C9 -6C9E- CE C4 C5 DEC $C5C4 -6CA1- D8 CLD -6CA2- AE A0 CE LDX $CEA0 -6CA5- CF ??? -6CA6- D4 ??? -6CA7- C5 A0 CMP $A0 -6CA9- D4 ??? -6CAA- C8 INY -6CAB- C1 D4 CMP ($D4,X) -6CAD- 8D 00 20 STA $2000 -6CB0- CC 73 D7 CPY $D773 -6CB3- C8 INY -6CB4- C9 CC CMP #$CC -6CB6- C5 A0 CMP $A0 -6CB8- D4 ??? -6CB9- C8 INY -6CBA- C5 A0 CMP $A0 -6CBC- D0 C1 BNE $6C7F -6CBE- D2 C5 CMP ($C5) -6CC0- CE D4 A0 DEC $A0D4 -6CC3- D3 ??? -6CC4- D4 ??? -6CC5- D2 C9 CMP ($C9) -6CC7- CE C7 A0 DEC $A0C7 -6CCA- C3 ??? -6CCB- C1 CE CMP ($CE,X) -6CCD- CE CF D4 DEC $D4CF -6CD0- A0 C2 LDY #$C2 -6CD2- C5 A0 CMP $A0 -6CD4- 8D 00 20 STA $2000 -6CD7- CC 73 C1 CPY $C173 -6CDA- A0 CC LDY #$CC -6CDC- C9 D4 CMP #$D4 -6CDE- C5 D2 CMP $D2 -6CE0- C1 CC CMP ($CC,X) -6CE2- AC A0 D4 LDY $D4A0 -6CE5- C8 INY -6CE6- C5 A0 CMP $A0 -6CE8- D3 ??? -6CE9- D5 C2 CMP $C2,X -6CEB- D3 ??? -6CEC- D4 ??? -6CED- D2 C9 CMP ($C9) -6CEF- CE C7 A0 DEC $A0C7 -6CF2- C9 D4 CMP #$D4 -6CF4- D3 ??? -6CF5- C5 CC CMP $CC -6CF7- C6 A0 DEC $A0 -6CF9- C3 ??? -6CFA- C1 CE CMP ($CE,X) -6CFC- A0 C2 LDY #$C2 -6CFE- C5 AE CMP $AE -6D00- 8D 8D 00 STA $008D -6D03- 20 CC 73 JSR $73CC -6D06- D4 ??? +6C57- C3 ??? +6C58- D0 D9 BNE $6C33 +6C5A- A0 CD LDY #$CD +6C5C- C1 C3 CMP ($C3,X) +6C5E- D2 CF CMP ($CF) +6C60- A0 C3 LDY #$C3 +6C62- CF ??? +6C63- D0 C9 BNE $6C2E +6C65- C5 D3 CMP $D3 +6C67- A0 C1 LDY #$C1 +6C69- A0 8D LDY #$8D +6C6B- 00 BRK +6C6C- 20 BE 70 JSR $70BE +6C6F- D3 ??? +6C70- D5 C2 CMP $C2,X +6C72- D3 ??? +6C73- D4 ??? +6C74- D2 C9 CMP ($C9) +6C76- CE C7 A0 DEC $A0C7 +6C79- C6 D2 DEC $D2 +6C7B- CF ??? +6C7C- CD A0 C1 CMP $C1A0 +6C7F- CE CF D4 DEC $D4CF +6C82- C8 INY +6C83- C5 D2 CMP $D2 +6C85- A0 D3 LDY #$D3 +6C87- D4 ??? +6C88- D2 C9 CMP ($C9) +6C8A- CE C7 8D DEC $8DC7 +6C8D- 00 BRK +6C8E- 20 BE 70 JSR $70BE +6C91- C1 D4 CMP ($D4,X) +6C93- A0 D4 LDY #$D4 +6C95- C8 INY +6C96- C5 A0 CMP $A0 +6C98- D3 ??? +6C99- D0 C5 BNE $6C60 +6C9B- C3 ??? +6C9C- C9 C6 CMP #$C6 +6C9E- C9 C5 CMP #$C5 +6CA0- C4 A0 CPY $A0 +6CA2- C9 CE CMP #$CE +6CA4- C4 C5 CPY $C5 +6CA6- D8 CLD +6CA7- AC A0 C8 LDY $C8A0 +6CAA- CF ??? +6CAB- CC C4 C9 CPY $C9C4 +6CAE- CE C7 8D DEC $8DC7 +6CB1- 00 BRK +6CB2- 20 BE 70 JSR $70BE +6CB5- D4 ??? +6CB6- C8 INY +6CB7- C5 A0 CMP $A0 +6CB9- D3 ??? +6CBA- D5 C2 CMP $C2,X +6CBC- D3 ??? +6CBD- D4 ??? +6CBE- D2 C9 CMP ($C9) +6CC0- CE C7 A0 DEC $A0C7 +6CC3- C9 CE CMP #$CE +6CC5- A0 DB LDY #$DB +6CC7- D2 C5 CMP ($C5) +6CC9- D4 ??? +6CCA- D5 D2 CMP $D2,X +6CCC- CE DD AE DEC $AEDD +6CCF- 8D 8D 00 STA $008D +6CD2- 20 BE 70 JSR $70BE +6CD5- D3 ??? +6CD6- C3 ??? +6CD7- D0 D9 BNE $6CB2 +6CD9- A0 A7 LDY #$A7 +6CDB- C1 C2 CMP ($C2,X) +6CDD- C3 ??? +6CDE- C4 C5 CPY $C5 +6CE0- C6 C7 DEC $C7 +6CE2- C8 INY +6CE3- C9 CA CMP #$CA +6CE5- CB ??? +6CE6- A7 ??? +6CE7- BB ??? +6CE8- A3 ??? +6CE9- B2 BB LDA ($BB) +6CEB- A3 ??? +6CEC- B4 BB LDY $BB,X +6CEE- A3 ??? +6CEF- B5 B0 LDA $B0,X +6CF1- A0 D2 LDY #$D2 +6CF3- C5 D4 CMP $D4 +6CF5- D5 D2 CMP $D2,X +6CF7- CE D3 BA DEC $BAD3 +6CFA- A0 00 LDY #$00 +6CFC- 4C 0B 6D JMP $6D0B +6CFF- 0B ??? +6D00- C1 C2 CMP ($C2,X) +6D02- C3 ??? +6D03- C4 C5 CPY $C5 +6D05- C6 C7 DEC $C7 6D07- C8 INY -6D08- D5 D3 CMP $D3,X -6D0A- A0 D3 LDY #$D3 -6D0C- C9 CE CMP #$CE -6D0E- D3 ??? -6D0F- A0 CC LDY #$CC -6D11- D3 ??? -6D12- D4 ??? -6D13- D2 BB CMP ($BB) -6D15- A3 ??? -6D16- B1 BB LDA ($BB),Y -6D18- A3 ??? -6D19- B5 B0 LDA $B0,X -6D1B- BB ??? -6D1C- A7 ??? -6D1D- D4 ??? -6D1E- C8 INY -6D1F- C9 D3 CMP #$D3 -6D21- A0 C9 LDY #$C9 -6D23- D3 ??? -6D24- A0 CE LDY #$CE -6D26- CF ??? -6D27- D4 ??? -6D28- A7 ??? -6D29- 8D 00 20 STA $2000 -6D2C- CC 73 D2 CPY $D273 -6D2F- C5 D4 CMP $D4 -6D31- D5 D2 CMP $D2,X -6D33- CE D3 BA DEC $BAD3 -6D36- A0 8D LDY #$8D -6D38- 00 BRK -6D39- A9 75 LDA #$75 -6D3B- 48 PHA -6D3C- A9 F7 LDA #$F7 -6D3E- 48 PHA -6D3F- A9 01 LDA #$01 -6D41- 48 PHA -6D42- A9 32 LDA #$32 -6D44- 48 PHA -6D45- 4C 54 6D JMP $6D54 -6D48- 0B ??? -6D49- D4 ??? -6D4A- C8 INY -6D4B- C9 D3 CMP #$D3 -6D4D- A0 C9 LDY #$C9 -6D4F- D3 ??? -6D50- A0 CE LDY #$CE -6D52- CF ??? -6D53- D4 ??? -6D54- A0 00 LDY #$00 -6D56- AD 48 6D LDA $6D48 -6D59- 8D F2 74 STA $74F2 -6D5C- 8D F3 74 STA $74F3 -6D5F- C8 INY -6D60- B9 48 6D LDA $6D48,Y -6D63- 99 F3 74 STA $74F3,Y -6D66- CC F2 74 CPY $74F2 -6D69- D0 F4 BNE $6D5F -6D6B- A9 74 LDA #$74 -6D6D- 48 PHA -6D6E- A9 F3 LDA #$F3 -6D70- 48 PHA -6D71- 20 13 72 JSR $7213 -6D74- A9 75 LDA #$75 -6D76- 48 PHA -6D77- A9 F7 LDA #$F7 -6D79- 48 PHA -6D7A- 20 89 6E JSR $6E89 -6D7D- 20 CC 73 JSR $73CC -6D80- A0 8D LDY #$8D -6D82- 8D 8D 8D STA $8D8D -6D85- 00 BRK -6D86- 20 ED 73 JSR $73ED -6D89- 4C D0 03 JMP $03D0 -6D8C- 4C 33 70 JMP $7033 -6D8F- 68 PLA -6D90- 85 FE STA $FE -6D92- 68 PLA -6D93- 85 FF STA $FF -6D95- 68 PLA -6D96- 85 08 STA $08 -6D98- 68 PLA -6D99- 85 09 STA $09 -6D9B- 68 PLA -6D9C- 85 06 STA $06 -6D9E- 68 PLA -6D9F- 85 07 STA $07 -6DA1- A0 00 LDY #$00 -6DA3- B1 06 LDA ($06),Y -6DA5- D1 08 CMP ($08),Y -6DA7- 90 02 BCC $6DAB -6DA9- B1 08 LDA ($08),Y -6DAB- AA TAX -6DAC- F0 0C BEQ $6DBA -6DAE- A0 01 LDY #$01 -6DB0- B1 06 LDA ($06),Y -6DB2- D1 08 CMP ($08),Y -6DB4- D0 0A BNE $6DC0 -6DB6- C8 INY -6DB7- CA DEX -6DB8- D0 F6 BNE $6DB0 -6DBA- A0 00 LDY #$00 -6DBC- B1 06 LDA ($06),Y -6DBE- D1 08 CMP ($08),Y -6DC0- A5 FF LDA $FF -6DC2- 48 PHA -6DC3- A5 FE LDA $FE -6DC5- 48 PHA -6DC6- A0 00 LDY #$00 -6DC8- B1 06 LDA ($06),Y -6DCA- AA TAX -6DCB- B1 08 LDA ($08),Y -6DCD- A8 TAY -6DCE- 60 RTS -6DCF- 68 PLA -6DD0- 85 FE STA $FE -6DD2- 68 PLA -6DD3- 85 FF STA $FF -6DD5- 68 PLA -6DD6- 8D 86 6E STA $6E86 -6DD9- 68 PLA -6DDA- 85 08 STA $08 -6DDC- 68 PLA -6DDD- 85 09 STA $09 -6DDF- 68 PLA -6DE0- 85 06 STA $06 -6DE2- 68 PLA -6DE3- 85 07 STA $07 -6DE5- A0 00 LDY #$00 -6DE7- B1 06 LDA ($06),Y -6DE9- 8D 82 6E STA $6E82 -6DEC- 8D 83 6E STA $6E83 -6DEF- EE 83 6E INC $6E83 -6DF2- B1 08 LDA ($08),Y -6DF4- 8D 84 6E STA $6E84 -6DF7- A9 01 LDA #$01 -6DF9- 8D 85 6E STA $6E85 -6DFC- AD 84 6E LDA $6E84 -6DFF- 18 CLC -6E00- 6D 82 6E ADC $6E82 -6E03- 8D 81 6E STA $6E81 -6E06- B0 07 BCS $6E0F -6E08- CD 86 6E CMP $6E86 -6E0B- F0 1C BEQ $6E29 -6E0D- 90 1A BCC $6E29 -6E0F- A9 FF LDA #$FF -6E11- 8D 88 6E STA $6E88 -6E14- AD 86 6E LDA $6E86 -6E17- 38 SEC -6E18- ED 82 6E SBC $6E82 -6E1B- 90 34 BCC $6E51 -6E1D- 8D 87 6E STA $6E87 -6E20- AD 86 6E LDA $6E86 -6E23- 8D 82 6E STA $6E82 -6E26- 4C 37 6E JMP $6E37 -6E29- 8D 82 6E STA $6E82 -6E2C- A9 00 LDA #$00 -6E2E- 8D 88 6E STA $6E88 -6E31- AD 84 6E LDA $6E84 -6E34- 8D 87 6E STA $6E87 -6E37- AD 87 6E LDA $6E87 -6E3A- F0 15 BEQ $6E51 -6E3C- AC 85 6E LDY $6E85 -6E3F- B1 08 LDA ($08),Y -6E41- AC 83 6E LDY $6E83 -6E44- 91 06 STA ($06),Y -6E46- EE 83 6E INC $6E83 -6E49- EE 85 6E INC $6E85 -6E4C- CE 87 6E DEC $6E87 -6E4F- D0 EB BNE $6E3C -6E51- AD 82 6E LDA $6E82 -6E54- A0 00 LDY #$00 -6E56- 91 06 STA ($06),Y -6E58- AD 88 6E LDA $6E88 -6E5B- 6A ROR -6E5C- A5 FF LDA $FF -6E5E- 48 PHA -6E5F- A5 FE LDA $FE -6E61- 48 PHA -6E62- A0 00 LDY #$00 -6E64- B1 06 LDA ($06),Y -6E66- 8D F1 73 STA $73F1 -6E69- A9 01 LDA #$01 -6E6B- B1 06 LDA ($06),Y -6E6D- 99 F2 73 STA $73F2,Y -6E70- CC F1 73 CPY $73F1 -6E73- C8 INY -6E74- D0 F5 BNE $6E6B -6E76- AD F1 73 LDA $73F1 -6E79- A0 00 LDY #$00 -6E7B- 91 06 STA ($06),Y -6E7D- AE 81 6E LDX $6E81 -6E80- 60 RTS -6E81- 00 BRK -6E82- 00 BRK -6E83- 00 BRK -6E84- 00 BRK -6E85- 00 BRK -6E86- 00 BRK -6E87- 00 BRK -6E88- 00 BRK -6E89- 68 PLA -6E8A- 85 FE STA $FE -6E8C- 68 PLA -6E8D- 85 FF STA $FF -6E8F- 68 PLA -6E90- 85 06 STA $06 -6E92- 68 PLA -6E93- 85 07 STA $07 -6E95- A0 00 LDY #$00 -6E97- B1 06 LDA ($06),Y -6E99- 8D BA 6E STA $6EBA -6E9C- C8 INY -6E9D- B1 06 LDA ($06),Y -6E9F- 20 F0 FD JSR $FDF0 F8ROM:COUT1 -6EA2- CC BA 6E CPY $6EBA -6EA5- D0 F5 BNE $6E9C -6EA7- A0 00 LDY #$00 -6EA9- B1 06 LDA ($06),Y -6EAB- A5 FF LDA $FF -6EAD- 48 PHA -6EAE- A5 FE LDA $FE -6EB0- 48 PHA -6EB1- A0 00 LDY #$00 -6EB3- B1 06 LDA ($06),Y -6EB5- A4 06 LDY $06 -6EB7- A6 07 LDX $07 -6EB9- 60 RTS -6EBA- 00 BRK -6EBB- 68 PLA -6EBC- 85 FE STA $FE -6EBE- 68 PLA -6EBF- 85 FF STA $FF -6EC1- 68 PLA -6EC2- 8D 64 6F STA $6F64 -6EC5- 68 PLA -6EC6- 8D 65 6F STA $6F65 -6EC9- 8D 63 6F STA $6F63 -6ECC- 10 11 BPL $6EDF -6ECE- A9 00 LDA #$00 -6ED0- 38 SEC -6ED1- ED 64 6F SBC $6F64 -6ED4- 8D 64 6F STA $6F64 -6ED7- A9 00 LDA #$00 -6ED9- ED 65 6F SBC $6F65 -6EDC- 8D 65 6F STA $6F65 -6EDF- A9 F2 LDA #$F2 -6EE1- 85 06 STA $06 -6EE3- A9 73 LDA #$73 -6EE5- 85 07 STA $07 -6EE7- A9 00 LDA #$00 -6EE9- A0 00 LDY #$00 -6EEB- 91 06 STA ($06),Y -6EED- A9 00 LDA #$00 -6EEF- 8D 66 6F STA $6F66 -6EF2- 8D 67 6F STA $6F67 -6EF5- A2 10 LDX #$10 -6EF7- 18 CLC -6EF8- 2E 64 6F ROL $6F64 -6EFB- 2E 65 6F ROL $6F65 -6EFE- 2E 66 6F ROL $6F66 -6F01- 2E 67 6F ROL $6F67 -6F04- 38 SEC -6F05- AD 66 6F LDA $6F66 -6F08- E9 0A SBC #$0A -6F0A- A8 TAY -6F0B- AD 67 6F LDA $6F67 -6F0E- E9 00 SBC #$00 -6F10- 90 06 BCC $6F18 -6F12- 8C 66 6F STY $6F66 -6F15- 8D 67 6F STA $6F67 -6F18- CA DEX -6F19- D0 DD BNE $6EF8 -6F1B- 2E 64 6F ROL $6F64 -6F1E- 2E 65 6F ROL $6F65 -6F21- AD 66 6F LDA $6F66 -6F24- 18 CLC -6F25- 69 B0 ADC #$B0 -6F27- 20 43 6F JSR $6F43 -6F2A- AD 64 6F LDA $6F64 -6F2D- 0D 65 6F ORA $6F65 -6F30- D0 BB BNE $6EED -6F32- AD 63 6F LDA $6F63 -6F35- 10 05 BPL $6F3C -6F37- A9 AD LDA #$AD -6F39- 20 43 6F JSR $6F43 -6F3C- A5 FF LDA $FF -6F3E- 48 PHA -6F3F- A5 FE LDA $FE -6F41- 48 PHA -6F42- 60 RTS -6F43- 48 PHA -6F44- A0 00 LDY #$00 -6F46- B1 06 LDA ($06),Y -6F48- A8 TAY -6F49- F0 09 BEQ $6F54 -6F4B- B1 06 LDA ($06),Y -6F4D- C8 INY -6F4E- 91 06 STA ($06),Y -6F50- 88 DEY -6F51- 88 DEY -6F52- D0 F7 BNE $6F4B -6F54- 68 PLA -6F55- A0 01 LDY #$01 -6F57- 91 06 STA ($06),Y -6F59- A0 00 LDY #$00 -6F5B- B1 06 LDA ($06),Y -6F5D- 18 CLC -6F5E- 69 01 ADC #$01 -6F60- 91 06 STA ($06),Y -6F62- 60 RTS -6F63- 00 BRK -6F64- 00 BRK -6F65- 00 BRK -6F66- 00 BRK -6F67- 00 BRK -6F68- 68 PLA -6F69- 85 FE STA $FE -6F6B- 68 PLA -6F6C- 85 FF STA $FF -6F6E- 68 PLA -6F6F- 85 06 STA $06 -6F71- 68 PLA -6F72- 85 07 STA $07 -6F74- A0 00 LDY #$00 -6F76- B1 06 LDA ($06),Y -6F78- AA TAX -6F79- A9 01 LDA #$01 -6F7B- 8D 32 70 STA $7032 -6F7E- A9 00 LDA #$00 -6F80- 8D 2F 70 STA $702F -6F83- 8D 30 70 STA $7030 -6F86- 8D 31 70 STA $7031 -6F89- 8A TXA -6F8A- D0 03 BNE $6F8F -6F8C- 4C 13 70 JMP $7013 -6F8F- AC 32 70 LDY $7032 -6F92- B1 06 LDA ($06),Y -6F94- C9 AD CMP #$AD -6F96- D0 0E BNE $6FA6 -6F98- A9 FF LDA #$FF -6F9A- 8D 31 70 STA $7031 -6F9D- EE 32 70 INC $7032 -6FA0- CA DEX -6FA1- F0 70 BEQ $7013 -6FA3- 4C B0 6F JMP $6FB0 -6FA6- C9 2B CMP #$2B -6FA8- D0 0B BNE $6FB5 -6FAA- EE 32 70 INC $7032 -6FAD- CA DEX -6FAE- F0 63 BEQ $7013 -6FB0- AC 32 70 LDY $7032 -6FB3- B1 06 LDA ($06),Y -6FB5- C9 B0 CMP #$B0 -6FB7- 30 5A BMI $7013 -6FB9- C9 BA CMP #$BA -6FBB- 10 56 BPL $7013 -6FBD- 48 PHA -6FBE- 0E 2F 70 ASL $702F -6FC1- 2E 30 70 ROL $7030 -6FC4- AD 2F 70 LDA $702F -6FC7- AC 30 70 LDY $7030 -6FCA- 0E 2F 70 ASL $702F -6FCD- 2E 30 70 ROL $7030 -6FD0- 0E 2F 70 ASL $702F -6FD3- 2E 30 70 ROL $7030 -6FD6- 18 CLC -6FD7- 6D 2F 70 ADC $702F -6FDA- 8D 2F 70 STA $702F -6FDD- 98 TYA -6FDE- 6D 30 70 ADC $7030 -6FE1- 8D 30 70 STA $7030 -6FE4- 68 PLA -6FE5- 38 SEC -6FE6- E9 B0 SBC #$B0 -6FE8- 18 CLC -6FE9- 6D 2F 70 ADC $702F -6FEC- 8D 2F 70 STA $702F -6FEF- 90 03 BCC $6FF4 -6FF1- EE 30 70 INC $7030 -6FF4- EE 32 70 INC $7032 -6FF7- CA DEX -6FF8- D0 B6 BNE $6FB0 -6FFA- AD 31 70 LDA $7031 -6FFD- 10 11 BPL $7010 -6FFF- A9 00 LDA #$00 -7001- 38 SEC -7002- ED 2F 70 SBC $702F -7005- 8D 2F 70 STA $702F -7008- A9 00 LDA #$00 -700A- ED 30 70 SBC $7030 -700D- 8D 30 70 STA $7030 -7010- 18 CLC -7011- 90 01 BCC $7014 -7013- 38 SEC -7014- A5 FF LDA $FF -7016- 48 PHA -7017- A5 FE LDA $FE -7019- 48 PHA -701A- AE 30 70 LDX $7030 -701D- AC 2F 70 LDY $702F -7020- 8C F2 73 STY $73F2 -7023- 8E F3 73 STX $73F3 -7026- A9 02 LDA #$02 -7028- 8D F1 73 STA $73F1 -702B- AD 32 70 LDA $7032 -702E- 60 RTS -702F- 00 BRK -7030- 00 BRK -7031- 00 BRK -7032- 00 BRK -7033- 4C F1 72 JMP $72F1 +6D08- C9 CA CMP #$CA +6D0A- CB ??? +6D0B- A0 00 LDY #$00 +6D0D- AD FF 6C LDA $6CFF +6D10- 8D 40 61 STA $6140 +6D13- 8D 41 61 STA $6141 +6D16- C8 INY +6D17- B9 FF 6C LDA $6CFF,Y +6D1A- 99 41 61 STA $6141,Y +6D1D- CC 40 61 CPY $6140 +6D20- D0 F4 BNE $6D16 +6D22- A9 61 LDA #$61 +6D24- 48 PHA +6D25- A9 41 LDA #$41 +6D27- 48 PHA +6D28- A9 02 LDA #$02 +6D2A- 48 PHA +6D2B- A9 04 LDA #$04 +6D2D- 48 PHA +6D2E- A9 FF LDA #$FF +6D30- 48 PHA +6D31- 20 11 77 JSR $7711 +6D34- A9 60 LDA #$60 +6D36- 48 PHA +6D37- A9 40 LDA #$40 +6D39- 48 PHA +6D3A- 20 8F 74 JSR $748F +6D3D- 20 BE 70 JSR $70BE +6D40- A0 8D LDY #$8D +6D42- 8D 8D 00 STA $008D +6D45- 20 DF 70 JSR $70DF +6D48- 20 BE 70 JSR $70BE +6D4B- A0 8D LDY #$8D +6D4D- 8D 8D 8D STA $8D8D +6D50- 8D 00 20 STA $2000 +6D53- BE 70 D4 LDX $D470,Y +6D56- C8 INY +6D57- C5 A0 CMP $A0 +6D59- D3 ??? +6D5A- C4 C5 CPY $C5 +6D5C- CC A0 CD CPY $CDA0 +6D5F- C1 C3 CMP ($C3,X) +6D61- D2 CF CMP ($CF) +6D63- A0 C4 LDY #$C4 +6D65- C5 CC CMP $CC +6D67- C5 D4 CMP $D4 +6D69- C5 D3 CMP $D3 +6D6B- A0 C1 LDY #$C1 +6D6D- A0 D3 LDY #$D3 +6D6F- D5 C2 CMP $C2,X +6D71- D3 ??? +6D72- D4 ??? +6D73- D2 C9 CMP ($C9) +6D75- CE C7 8D DEC $8DC7 +6D78- 00 BRK +6D79- 20 BE 70 JSR $70BE +6D7C- C6 D2 DEC $D2 +6D7E- CF ??? +6D7F- CD A0 D4 CMP $D4A0 +6D82- C8 INY +6D83- C5 A0 CMP $A0 +6D85- C7 ??? +6D86- C9 D6 CMP #$D6 +6D88- C5 CE CMP $CE +6D8A- A0 D3 LDY #$D3 +6D8C- CF ??? +6D8D- D5 D2 CMP $D2,X +6D8F- C3 ??? +6D90- C5 A0 CMP $A0 +6D92- D3 ??? +6D93- D4 ??? +6D94- D2 C9 CMP ($C9) +6D96- CE C7 AE DEC $AEC7 +6D99- A0 CE LDY #$CE +6D9B- CF ??? +6D9C- D4 ??? +6D9D- C5 A0 CMP $A0 +6D9F- 8D 00 20 STA $2000 +6DA2- BE 70 D4 LDX $D470,Y +6DA5- C8 INY +6DA6- C1 D4 CMP ($D4,X) +6DA8- A0 D4 LDY #$D4 +6DAA- C8 INY +6DAB- C5 A0 CMP $A0 +6DAD- D3 ??? +6DAE- CF ??? +6DAF- D5 D2 CMP $D2,X +6DB1- C3 ??? +6DB2- C5 A0 CMP $A0 +6DB4- D3 ??? +6DB5- D4 ??? +6DB6- D2 C9 CMP ($C9) +6DB8- CE C7 A0 DEC $A0C7 +6DBB- CD D5 D3 CMP $D3D5 +6DBE- D4 ??? +6DBF- A0 CE LDY #$CE +6DC1- CF ??? +6DC2- D4 ??? +6DC3- 8D 00 20 STA $2000 +6DC6- BE 70 C2 LDX $C270,Y +6DC9- C5 A0 CMP $A0 +6DCB- C1 A0 CMP ($A0,X) +6DCD- CC C9 D4 CPY $D4C9 +6DD0- C5 D2 CMP $D2 +6DD2- C1 CC CMP ($CC,X) +6DD4- A0 C2 LDY #$C2 +6DD6- C5 C3 CMP $C3 +6DD8- C1 D5 CMP ($D5,X) +6DDA- D3 ??? +6DDB- C5 A0 CMP $A0 +6DDD- D4 ??? +6DDE- C8 INY +6DDF- C9 D3 CMP #$D3 +6DE1- A0 D2 LDY #$D2 +6DE3- CF ??? +6DE4- D5 D4 CMP $D4,X +6DE6- C9 CE CMP #$CE +6DE8- C5 8D CMP $8D +6DEA- 00 BRK +6DEB- 20 BE 70 JSR $70BE +6DEE- C1 CC CMP ($CC,X) +6DF0- D4 ??? +6DF1- C5 D2 CMP $D2 +6DF3- D3 ??? +6DF4- A0 D4 LDY #$D4 +6DF6- C8 INY +6DF7- C5 A0 CMP $A0 +6DF9- D3 ??? +6DFA- D4 ??? +6DFB- D2 C9 CMP ($C9) +6DFD- CE C7 A0 DEC $A0C7 +6E00- D0 C1 BNE $6DC3 +6E02- D3 ??? +6E03- D3 ??? +6E04- C5 C4 CMP $C4 +6E06- A0 D4 LDY #$D4 +6E08- CF ??? +6E09- A0 C9 LDY #$C9 +6E0B- D4 ??? +6E0C- AE 8D 8D LDX $8D8D +6E0F- 00 BRK +6E10- 20 BE 70 JSR $70BE +6E13- C9 C6 CMP #$C6 +6E15- A0 CC LDY #$CC +6E17- D3 ??? +6E18- D4 ??? +6E19- D2 A0 CMP ($A0) +6E1B- C8 INY +6E1C- CF ??? +6E1D- CC C4 D3 CPY $D3C4 +6E20- A0 A7 LDY #$A7 +6E22- D4 ??? +6E23- C8 INY +6E24- C9 D3 CMP #$D3 +6E26- A0 C9 LDY #$C9 +6E28- D3 ??? +6E29- A0 C1 LDY #$C1 +6E2B- A0 D3 LDY #$D3 +6E2D- D4 ??? +6E2E- D2 C9 CMP ($C9) +6E30- CE C7 AE DEC $AEC7 +6E33- A7 ??? +6E34- 8D 00 20 STA $2000 +6E37- BE 70 D4 LDX $D470,Y +6E3A- C8 INY +6E3B- C5 CE CMP $CE +6E3D- A0 D3 LDY #$D3 +6E3F- C4 C5 CPY $C5 +6E41- CC A0 CC CPY $CCA0 +6E44- D3 ??? +6E45- D4 ??? +6E46- D2 BB CMP ($BB) +6E48- A3 ??? +6E49- B1 BB LDA ($BB),Y +6E4B- A3 ??? +6E4C- B7 ??? +6E4D- A0 D2 LDY #$D2 +6E4F- C5 D4 CMP $D4 +6E51- D5 D2 CMP $D2,X +6E53- CE D3 BA DEC $BAD3 +6E56- A0 8D LDY #$8D +6E58- 8D 00 A9 STA $A900 +6E5B- 6F ??? +6E5C- 48 PHA +6E5D- A9 E4 LDA #$E4 +6E5F- 48 PHA +6E60- A9 01 LDA #$01 +6E62- 48 PHA +6E63- A9 07 LDA #$07 +6E65- 48 PHA +6E66- 20 D0 77 JSR $77D0 +6E69- A9 6F LDA #$6F +6E6B- 48 PHA +6E6C- A9 E4 LDA #$E4 +6E6E- 48 PHA +6E6F- 20 8F 74 JSR $748F +6E72- 20 BE 70 JSR $70BE +6E75- A0 8D LDY #$8D +6E77- 8D 8D 8D STA $8D8D +6E7A- 00 BRK +6E7B- 20 DF 70 JSR $70DF +6E7E- 20 BE 70 JSR $70BE +6E81- D4 ??? +6E82- C8 INY +6E83- C5 A0 CMP $A0 +6E85- D3 ??? +6E86- C9 CE CMP #$CE +6E88- D3 ??? +6E89- A0 CD LDY #$CD +6E8B- C1 C3 CMP ($C3,X) +6E8D- D2 CF CMP ($CF) +6E8F- A0 C4 LDY #$C4 +6E91- CF ??? +6E92- C5 D3 CMP $D3 +6E94- A0 D4 LDY #$D4 +6E96- C8 INY +6E97- C5 A0 CMP $A0 +6E99- 8D 00 20 STA $2000 +6E9C- BE 70 CF LDX $CF70,Y +6E9F- D0 D0 BNE $6E71 +6EA1- CF ??? +6EA2- D3 ??? +6EA3- C9 D4 CMP #$D4 +6EA5- C5 A0 CMP $A0 +6EA7- CF ??? +6EA8- C6 A0 DEC $A0 +6EAA- D3 ??? +6EAB- C4 C5 CPY $C5 +6EAD- CC BA A0 CPY $A0BA +6EB0- C9 D4 CMP #$D4 +6EB2- A0 C9 LDY #$C9 +6EB4- CE D3 C5 DEC $C5D3 +6EB7- D2 D4 CMP ($D4) +6EB9- D3 ??? +6EBA- 8D 00 20 STA $2000 +6EBD- BE 70 C1 LDX $C170,Y +6EC0- A0 D3 LDY #$D3 +6EC2- D5 C2 CMP $C2,X +6EC4- D3 ??? +6EC5- D4 ??? +6EC6- D2 C9 CMP ($C9) +6EC8- CE C7 A0 DEC $A0C7 +6ECB- C9 CE CMP #$CE +6ECD- D4 ??? +6ECE- CF ??? +6ECF- A0 C1 LDY #$C1 +6ED1- A0 D0 LDY #$D0 +6ED3- C1 D2 CMP ($D2,X) +6ED5- C5 CE CMP $CE +6ED7- D4 ??? +6ED8- A0 D3 LDY #$D3 +6EDA- D4 ??? +6EDB- D2 C9 CMP ($C9) +6EDD- CE C7 8D DEC $8DC7 +6EE0- 00 BRK +6EE1- 20 BE 70 JSR $70BE +6EE4- C1 D4 CMP ($D4,X) +6EE6- A0 D4 LDY #$D4 +6EE8- C8 INY +6EE9- C5 A0 CMP $A0 +6EEB- C7 ??? +6EEC- C9 D6 CMP #$D6 +6EEE- C5 CE CMP $CE +6EF0- A0 C9 LDY #$C9 +6EF2- CE C4 C5 DEC $C5C4 +6EF5- D8 CLD +6EF6- AE A0 CE LDX $CEA0 +6EF9- CF ??? +6EFA- D4 ??? +6EFB- C5 A0 CMP $A0 +6EFD- D4 ??? +6EFE- C8 INY +6EFF- C1 D4 CMP ($D4,X) +6F01- 8D 00 20 STA $2000 +6F04- BE 70 D7 LDX $D770,Y +6F07- C8 INY +6F08- C9 CC CMP #$CC +6F0A- C5 A0 CMP $A0 +6F0C- D4 ??? +6F0D- C8 INY +6F0E- C5 A0 CMP $A0 +6F10- D0 C1 BNE $6ED3 +6F12- D2 C5 CMP ($C5) +6F14- CE D4 A0 DEC $A0D4 +6F17- D3 ??? +6F18- D4 ??? +6F19- D2 C9 CMP ($C9) +6F1B- CE C7 A0 DEC $A0C7 +6F1E- C3 ??? +6F1F- C1 CE CMP ($CE,X) +6F21- CE CF D4 DEC $D4CF +6F24- A0 C2 LDY #$C2 +6F26- C5 A0 CMP $A0 +6F28- 8D 00 20 STA $2000 +6F2B- BE 70 C1 LDX $C170,Y +6F2E- A0 CC LDY #$CC +6F30- C9 D4 CMP #$D4 +6F32- C5 D2 CMP $D2 +6F34- C1 CC CMP ($CC,X) +6F36- AC A0 D4 LDY $D4A0 +6F39- C8 INY +6F3A- C5 A0 CMP $A0 +6F3C- D3 ??? +6F3D- D5 C2 CMP $C2,X +6F3F- D3 ??? +6F40- D4 ??? +6F41- D2 C9 CMP ($C9) +6F43- CE C7 A0 DEC $A0C7 +6F46- C9 D4 CMP #$D4 +6F48- D3 ??? +6F49- C5 CC CMP $CC +6F4B- C6 A0 DEC $A0 +6F4D- C3 ??? +6F4E- C1 CE CMP ($CE,X) +6F50- A0 C2 LDY #$C2 +6F52- C5 AE CMP $AE +6F54- 8D 8D 00 STA $008D +6F57- 20 BE 70 JSR $70BE +6F5A- D4 ??? +6F5B- C8 INY +6F5C- D5 D3 CMP $D3,X +6F5E- A0 D3 LDY #$D3 +6F60- C9 CE CMP #$CE +6F62- D3 ??? +6F63- A0 CC LDY #$CC +6F65- D3 ??? +6F66- D4 ??? +6F67- D2 BB CMP ($BB) +6F69- A3 ??? +6F6A- B1 BB LDA ($BB),Y +6F6C- A3 ??? +6F6D- B5 B0 LDA $B0,X +6F6F- BB ??? +6F70- A7 ??? +6F71- D4 ??? +6F72- C8 INY +6F73- C9 D3 CMP #$D3 +6F75- A0 C9 LDY #$C9 +6F77- D3 ??? +6F78- A0 CE LDY #$CE +6F7A- CF ??? +6F7B- D4 ??? +6F7C- A7 ??? +6F7D- 8D 00 20 STA $2000 +6F80- BE 70 D2 LDX $D270,Y +6F83- C5 D4 CMP $D4 +6F85- D5 D2 CMP $D2,X +6F87- CE D3 BA DEC $BAD3 +6F8A- A0 8D LDY #$8D +6F8C- 00 BRK +6F8D- A9 6F LDA #$6F +6F8F- 48 PHA +6F90- A9 E4 LDA #$E4 +6F92- 48 PHA +6F93- A9 01 LDA #$01 +6F95- 48 PHA +6F96- A9 32 LDA #$32 +6F98- 48 PHA +6F99- 4C A8 6F JMP $6FA8 +6F9C- 0B ??? +6F9D- D4 ??? +6F9E- C8 INY +6F9F- C9 D3 CMP #$D3 +6FA1- A0 C9 LDY #$C9 +6FA3- D3 ??? +6FA4- A0 CE LDY #$CE +6FA6- CF ??? +6FA7- D4 ??? +6FA8- A0 00 LDY #$00 +6FAA- AD 9C 6F LDA $6F9C +6FAD- 8D 40 61 STA $6140 +6FB0- 8D 41 61 STA $6141 +6FB3- C8 INY +6FB4- B9 9C 6F LDA $6F9C,Y +6FB7- 99 41 61 STA $6141,Y +6FBA- CC 40 61 CPY $6140 +6FBD- D0 F4 BNE $6FB3 +6FBF- A9 61 LDA #$61 +6FC1- 48 PHA +6FC2- A9 41 LDA #$41 +6FC4- 48 PHA +6FC5- 20 60 78 JSR $7860 +6FC8- A9 6F LDA #$6F +6FCA- 48 PHA +6FCB- A9 E4 LDA #$E4 +6FCD- 48 PHA +6FCE- 20 8F 74 JSR $748F +6FD1- 20 BE 70 JSR $70BE +6FD4- A0 8D LDY #$8D +6FD6- 8D 8D 8D STA $8D8D +6FD9- 00 BRK +6FDA- 20 DF 70 JSR $70DF +6FDD- 4C D0 03 JMP $03D0 +6FE0- 01 C1 ORA ($C1,X) +6FE2- 01 C2 ORA ($C2,X) +6FE4- 11 D4 ORA ($D4),Y +6FE6- C8 INY +6FE7- C9 D3 CMP #$D3 +6FE9- A0 C9 LDY #$C9 +6FEB- D3 ??? +6FEC- A0 C1 LDY #$C1 +6FEE- A0 D3 LDY #$D3 +6FF0- D4 ??? +6FF1- D2 C9 CMP ($C9) +6FF3- CE C7 AE DEC $AEC7 +6FF6- A0 FF LDY #$FF +6FF8- 68 PLA +6FF9- 85 06 STA $06 +6FFB- 68 PLA +6FFC- 85 07 STA $07 +6FFE- C8 INY +6FFF- B9 40 60 LDA $6040,Y +7002- 91 06 STA ($06),Y +7004- CC 3F 60 CPY $603F +7007- D0 F5 BNE $6FFE +7009- A5 07 LDA $07 +700B- 48 PHA +700C- A5 06 LDA $06 +700E- 48 PHA +700F- 60 RTS +7010- A0 FF LDY #$FF +7012- 68 PLA +7013- 85 06 STA $06 +7015- 68 PLA +7016- 85 07 STA $07 +7018- C8 INY +7019- B1 06 LDA ($06),Y +701B- 99 41 61 STA $6141,Y +701E- CC 40 61 CPY $6140 +7021- D0 F5 BNE $7018 +7023- A5 07 LDA $07 +7025- 48 PHA +7026- A5 06 LDA $06 +7028- 48 PHA +7029- 60 RTS +702A- 68 PLA +702B- 8D B9 70 STA $70B9 +702E- 68 PLA +702F- 8D BA 70 STA $70BA +7032- 68 PLA +7033- 8D BD 70 STA $70BD 7036- 68 PLA -7037- 85 FE STA $FE +7037- 85 EB STA $EB 7039- 68 PLA -703A- 85 FF STA $FF -703C- 68 PLA -703D- 85 08 STA $08 -703F- 68 PLA -7040- 85 09 STA $09 -7042- 68 PLA -7043- 85 06 STA $06 -7045- 68 PLA -7046- 85 07 STA $07 -7048- A5 FF LDA $FF -704A- 48 PHA -704B- A5 FE LDA $FE -704D- 48 PHA -704E- A0 00 LDY #$00 -7050- B1 06 LDA ($06),Y -7052- F0 5F BEQ $70B3 -7054- 8D BE 70 STA $70BE -7057- B1 08 LDA ($08),Y -7059- F0 58 BEQ $70B3 -705B- 8D BF 70 STA $70BF -705E- AD BF 70 LDA $70BF -7061- CD BE 70 CMP $70BE -7064- F0 02 BEQ $7068 -7066- B0 4B BCS $70B3 -7068- A9 01 LDA #$01 -706A- 8D C0 70 STA $70C0 -706D- AD BE 70 LDA $70BE -7070- 38 SEC -7071- ED BF 70 SBC $70BF -7074- 8D C2 70 STA $70C2 -7077- EE C2 70 INC $70C2 -707A- AD C0 70 LDA $70C0 -707D- 8D C3 70 STA $70C3 -7080- A9 01 LDA #$01 -7082- 8D C1 70 STA $70C1 -7085- AC C3 70 LDY $70C3 -7088- B1 06 LDA ($06),Y -708A- AC C1 70 LDY $70C1 -708D- D1 08 CMP ($08),Y -708F- D0 12 BNE $70A3 -7091- AC C1 70 LDY $70C1 -7094- CC BF 70 CPY $70BF -7097- F0 14 BEQ $70AD -7099- C8 INY -709A- 8C C1 70 STY $70C1 -709D- EE C3 70 INC $70C3 -70A0- 4C 85 70 JMP $7085 -70A3- EE C0 70 INC $70C0 -70A6- CE C2 70 DEC $70C2 -70A9- D0 CF BNE $707A -70AB- F0 06 BEQ $70B3 -70AD- AD C0 70 LDA $70C0 -70B0- 4C B5 70 JMP $70B5 -70B3- A9 00 LDA #$00 -70B5- 8D F2 73 STA $73F2 -70B8- A0 01 LDY #$01 -70BA- 8C F1 73 STY $73F1 -70BD- 60 RTS -70BE- 00 BRK -70BF- 00 BRK -70C0- 00 BRK -70C1- 00 BRK -70C2- 00 BRK -70C3- 00 BRK -70C4- 68 PLA -70C5- 85 FE STA $FE -70C7- 68 PLA -70C8- 85 FF STA $FF -70CA- 68 PLA -70CB- 8D 7F 71 STA $717F -70CE- 68 PLA -70CF- 8D 80 71 STA $7180 -70D2- 8D F1 73 STA $73F1 -70D5- 68 PLA -70D6- 8D 81 71 STA $7181 -70D9- 68 PLA -70DA- 85 06 STA $06 -70DC- 68 PLA -70DD- 85 07 STA $07 -70DF- A9 F2 LDA #$F2 -70E1- 85 08 STA $08 -70E3- A9 73 LDA #$73 -70E5- 85 09 STA $09 -70E7- A5 FF LDA $FF -70E9- 48 PHA -70EA- A5 FE LDA $FE -70EC- 48 PHA -70ED- A9 00 LDA #$00 -70EF- 8D 7E 71 STA $717E -70F2- 8D 82 71 STA $7182 -70F5- AD 80 71 LDA $7180 -70F8- F0 74 BEQ $716E -70FA- AD 7F 71 LDA $717F -70FD- F0 72 BEQ $7171 -70FF- AD 81 71 LDA $7181 -7102- F0 6D BEQ $7171 -7104- A0 00 LDY #$00 -7106- B1 06 LDA ($06),Y -7108- 8D 7D 71 STA $717D -710B- CD 81 71 CMP $7181 -710E- 90 61 BCC $7171 -7110- AD 81 71 LDA $7181 -7113- 18 CLC -7114- 6D 80 71 ADC $7180 -7117- B0 09 BCS $7122 -7119- AA TAX -711A- CA DEX -711B- EC 7D 71 CPX $717D -711E- 90 14 BCC $7134 -7120- F0 12 BEQ $7134 -7122- AD 7D 71 LDA $717D -7125- 38 SEC -7126- ED 81 71 SBC $7181 -7129- 8D 80 71 STA $7180 -712C- EE 80 71 INC $7180 -712F- A9 FF LDA #$FF -7131- 8D 82 71 STA $7182 -7134- AD 80 71 LDA $7180 -7137- CD 7F 71 CMP $717F -713A- 90 0D BCC $7149 -713C- F0 0B BEQ $7149 -713E- AD 7F 71 LDA $717F -7141- 8D 80 71 STA $7180 -7144- A9 FF LDA #$FF -7146- 8D 82 71 STA $7182 -7149- AE 80 71 LDX $7180 -714C- F0 23 BEQ $7171 -714E- A9 01 LDA #$01 -7150- 8D 7E 71 STA $717E -7153- AC 81 71 LDY $7181 -7156- B1 06 LDA ($06),Y -7158- AC 7E 71 LDY $717E -715B- 91 08 STA ($08),Y -715D- EE 81 71 INC $7181 -7160- EE 7E 71 INC $717E -7163- CA DEX -7164- D0 ED BNE $7153 -7166- CE 7E 71 DEC $717E -7169- AD 82 71 LDA $7182 -716C- D0 03 BNE $7171 -716E- 18 CLC -716F- 90 01 BCC $7172 -7171- 38 SEC -7172- AD 7E 71 LDA $717E -7175- A0 00 LDY #$00 -7177- 91 08 STA ($08),Y -7179- 8D F1 73 STA $73F1 -717C- 60 RTS -717D- 00 BRK -717E- 00 BRK -717F- 00 BRK -7180- 00 BRK -7181- 00 BRK -7182- 00 BRK -7183- 68 PLA -7184- A8 TAY -7185- 68 PLA -7186- AA TAX -7187- 68 PLA -7188- 8D 0F 72 STA $720F -718B- 68 PLA -718C- 8D 10 72 STA $7210 -718F- 68 PLA -7190- 85 06 STA $06 -7192- 68 PLA -7193- 85 07 STA $07 -7195- 8A TXA -7196- 48 PHA -7197- 98 TYA -7198- 48 PHA -7199- A0 00 LDY #$00 -719B- 8C 12 72 STY $7212 -719E- B1 06 LDA ($06),Y -71A0- 8D 0E 72 STA $720E -71A3- AD 0F 72 LDA $720F -71A6- F0 5A BEQ $7202 -71A8- AD 10 72 LDA $7210 -71AB- F0 58 BEQ $7205 -71AD- AD 0E 72 LDA $720E -71B0- CD 10 72 CMP $7210 -71B3- 90 50 BCC $7205 -71B5- AD 10 72 LDA $7210 -71B8- 18 CLC -71B9- 6D 0F 72 ADC $720F -71BC- B0 11 BCS $71CF -71BE- 8D 11 72 STA $7211 -71C1- AA TAX -71C2- CA DEX -71C3- EC 0E 72 CPX $720E -71C6- 90 15 BCC $71DD -71C8- F0 05 BEQ $71CF -71CA- A9 FF LDA #$FF -71CC- 8D 12 72 STA $7212 -71CF- AE 10 72 LDX $7210 -71D2- CA DEX -71D3- 8E 0E 72 STX $720E -71D6- AD 12 72 LDA $7212 -71D9- F0 27 BEQ $7202 -71DB- D0 28 BNE $7205 -71DD- AD 0E 72 LDA $720E -71E0- 38 SEC -71E1- ED 11 72 SBC $7211 -71E4- AA TAX -71E5- E8 INX -71E6- F0 1A BEQ $7202 -71E8- AC 11 72 LDY $7211 -71EB- B1 06 LDA ($06),Y -71ED- AC 10 72 LDY $7210 -71F0- 91 06 STA ($06),Y -71F2- EE 10 72 INC $7210 -71F5- EE 11 72 INC $7211 -71F8- CA DEX -71F9- D0 ED BNE $71E8 -71FB- AE 10 72 LDX $7210 -71FE- CA DEX -71FF- 8E 0E 72 STX $720E -7202- 18 CLC -7203- 90 01 BCC $7206 -7205- 38 SEC -7206- AD 0E 72 LDA $720E -7209- A0 00 LDY #$00 -720B- 91 06 STA ($06),Y -720D- 60 RTS -720E- 00 BRK -720F- 00 BRK -7210- 00 BRK -7211- 00 BRK -7212- 00 BRK -7213- 68 PLA -7214- A8 TAY -7215- 68 PLA -7216- AA TAX -7217- 68 PLA -7218- 85 08 STA $08 -721A- 68 PLA -721B- 85 09 STA $09 -721D- 68 PLA -721E- 8D EC 72 STA $72EC -7221- 68 PLA -7222- 8D ED 72 STA $72ED -7225- 68 PLA -7226- 85 06 STA $06 -7228- 68 PLA -7229- 85 07 STA $07 -722B- 8A TXA -722C- 48 PHA -722D- 98 TYA -722E- 48 PHA -722F- A9 00 LDA #$00 -7231- 8D F0 72 STA $72F0 -7234- A0 00 LDY #$00 -7236- B1 06 LDA ($06),Y -7238- 8D E9 72 STA $72E9 -723B- B1 08 LDA ($08),Y -723D- 8D EA 72 STA $72EA -7240- D0 03 BNE $7245 -7242- 4C DD 72 JMP $72DD -7245- AD ED 72 LDA $72ED -7248- D0 03 BNE $724D -724A- 4C E0 72 JMP $72E0 -724D- AD EA 72 LDA $72EA -7250- 18 CLC -7251- 6D E9 72 ADC $72E9 -7254- B0 07 BCS $725D -7256- CD EC 72 CMP $72EC -7259- 90 15 BCC $7270 -725B- F0 13 BEQ $7270 -725D- AD EC 72 LDA $72EC -7260- 38 SEC -7261- ED E9 72 SBC $72E9 -7264- 90 7A BCC $72E0 -7266- F0 78 BEQ $72E0 -7268- 8D EA 72 STA $72EA -726B- A9 FF LDA #$FF -726D- 8D F0 72 STA $72F0 -7270- AD E9 72 LDA $72E9 -7273- CD ED 72 CMP $72ED -7276- B0 19 BCS $7291 -7278- AE E9 72 LDX $72E9 -727B- E8 INX -727C- 8E ED 72 STX $72ED -727F- A9 FF LDA #$FF -7281- 8D F0 72 STA $72F0 -7284- AD E9 72 LDA $72E9 -7287- 18 CLC -7288- 6D EA 72 ADC $72EA -728B- 8D E9 72 STA $72E9 -728E- 4C BD 72 JMP $72BD -7291- AD E9 72 LDA $72E9 -7294- 38 SEC -7295- ED ED 72 SBC $72ED -7298- AA TAX -7299- E8 INX -729A- AD E9 72 LDA $72E9 -729D- 8D EE 72 STA $72EE -72A0- 18 CLC -72A1- 6D EA 72 ADC $72EA -72A4- 8D EF 72 STA $72EF -72A7- 8D E9 72 STA $72E9 -72AA- AC EE 72 LDY $72EE -72AD- B1 06 LDA ($06),Y -72AF- AC EF 72 LDY $72EF -72B2- 91 06 STA ($06),Y -72B4- CE EE 72 DEC $72EE -72B7- CE EF 72 DEC $72EF -72BA- CA DEX -72BB- D0 ED BNE $72AA -72BD- A9 01 LDA #$01 -72BF- 8D EE 72 STA $72EE -72C2- AE EA 72 LDX $72EA -72C5- AC EE 72 LDY $72EE -72C8- B1 08 LDA ($08),Y -72CA- AC ED 72 LDY $72ED -72CD- 91 06 STA ($06),Y -72CF- EE EE 72 INC $72EE -72D2- EE ED 72 INC $72ED -72D5- CA DEX -72D6- D0 ED BNE $72C5 -72D8- AD F0 72 LDA $72F0 -72DB- D0 03 BNE $72E0 -72DD- 18 CLC -72DE- 90 01 BCC $72E1 -72E0- 38 SEC -72E1- AD E9 72 LDA $72E9 -72E4- A0 00 LDY #$00 -72E6- 91 06 STA ($06),Y -72E8- 60 RTS -72E9- 00 BRK -72EA- 00 BRK -72EB- 00 BRK -72EC- 00 BRK -72ED- 00 BRK -72EE- 00 BRK -72EF- 00 BRK -72F0- 00 BRK -72F1- 4C F3 75 JMP $75F3 -72F4- A0 FF LDY #$FF -72F6- 68 PLA -72F7- 85 06 STA $06 +703A- 85 EC STA $EC +703C- A9 8D LDA #$8D +703E- 20 F0 FD JSR $FDF0 F8ROM:COUT1 +7041- A5 EC LDA $EC +7043- 29 F0 AND #$F0 +7045- 4A LSR +7046- 4A LSR +7047- 4A LSR +7048- 4A LSR +7049- AA TAX +704A- BD DC 72 LDA $72DC,X +704D- 20 F0 FD JSR $FDF0 F8ROM:COUT1 +7050- A5 EC LDA $EC +7052- 29 0F AND #$0F +7054- AA TAX +7055- BD DC 72 LDA $72DC,X +7058- 20 F0 FD JSR $FDF0 F8ROM:COUT1 +705B- A5 EB LDA $EB +705D- 29 F0 AND #$F0 +705F- 4A LSR +7060- 4A LSR +7061- 4A LSR +7062- 4A LSR +7063- AA TAX +7064- BD DC 72 LDA $72DC,X +7067- 20 F0 FD JSR $FDF0 F8ROM:COUT1 +706A- A5 EB LDA $EB +706C- 29 0F AND #$0F +706E- AA TAX +706F- BD DC 72 LDA $72DC,X +7072- 20 F0 FD JSR $FDF0 F8ROM:COUT1 +7075- A9 BA LDA #$BA +7077- 20 F0 FD JSR $FDF0 F8ROM:COUT1 +707A- A9 A0 LDA #$A0 +707C- 20 F0 FD JSR $FDF0 F8ROM:COUT1 +707F- A0 00 LDY #$00 +7081- B1 EB LDA ($EB),Y +7083- 29 F0 AND #$F0 +7085- 4A LSR +7086- 4A LSR +7087- 4A LSR +7088- 4A LSR +7089- 8D BC 70 STA $70BC +708C- B1 EB LDA ($EB),Y +708E- 29 0F AND #$0F +7090- 8D BB 70 STA $70BB +7093- AE BC 70 LDX $70BC +7096- BD DC 72 LDA $72DC,X +7099- 20 F0 FD JSR $FDF0 F8ROM:COUT1 +709C- AE BB 70 LDX $70BB +709F- BD DC 72 LDA $72DC,X +70A2- 20 F0 FD JSR $FDF0 F8ROM:COUT1 +70A5- A9 A0 LDA #$A0 +70A7- 20 F0 FD JSR $FDF0 F8ROM:COUT1 +70AA- C8 INY +70AB- CC BD 70 CPY $70BD +70AE- D0 D1 BNE $7081 +70B0- AD BA 70 LDA $70BA +70B3- 48 PHA +70B4- AD B9 70 LDA $70B9 +70B7- 48 PHA +70B8- 60 RTS +70B9- 00 BRK +70BA- 00 BRK +70BB- 00 BRK +70BC- 00 BRK +70BD- 00 BRK +70BE- 68 PLA +70BF- 85 06 STA $06 +70C1- 68 PLA +70C2- 85 07 STA $07 +70C4- A0 01 LDY #$01 +70C6- B1 06 LDA ($06),Y +70C8- F0 06 BEQ $70D0 +70CA- 20 F0 FD JSR $FDF0 F8ROM:COUT1 +70CD- C8 INY +70CE- D0 F6 BNE $70C6 +70D0- 18 CLC +70D1- 98 TYA +70D2- 65 06 ADC $06 +70D4- 85 06 STA $06 +70D6- A5 07 LDA $07 +70D8- 69 00 ADC #$00 +70DA- 48 PHA +70DB- A5 06 LDA $06 +70DD- 48 PHA +70DE- 60 RTS +70DF- 20 0C FD JSR $FD0C F8ROM:RDKEY +70E2- 60 RTS +70E3- 8D 43 62 STA $6243 +70E6- 8E 44 62 STX $6244 +70E9- 8C 45 62 STY $6245 +70EC- 90 11 BCC $70FF +70EE- B0 17 BCS $7107 +70F0- F0 1D BEQ $710F +70F2- D0 23 BNE $7117 +70F4- 30 29 BMI $711F +70F6- 10 2F BPL $7127 +70F8- 50 35 BVC $712F +70FA- 70 3B BVS $7137 +70FC- 4C 3C 71 JMP $713C +70FF- A9 00 LDA #$00 +7101- 8D 46 62 STA $6246 +7104- 4C F0 70 JMP $70F0 +7107- A9 01 LDA #$01 +7109- 8D 46 62 STA $6246 +710C- 4C F0 70 JMP $70F0 +710F- A9 01 LDA #$01 +7111- 8D 48 62 STA $6248 +7114- 4C F4 70 JMP $70F4 +7117- A9 00 LDA #$00 +7119- 8D 48 62 STA $6248 +711C- 4C F4 70 JMP $70F4 +711F- A9 01 LDA #$01 +7121- 8D 47 62 STA $6247 +7124- 4C F8 70 JMP $70F8 +7127- A9 00 LDA #$00 +7129- 8D 47 62 STA $6247 +712C- 4C F8 70 JMP $70F8 +712F- A9 00 LDA #$00 +7131- 8D 49 62 STA $6249 +7134- 4C 3C 71 JMP $713C +7137- A9 01 LDA #$01 +7139- 8D 49 62 STA $6249 +713C- 60 RTS +713D- 20 BE 70 JSR $70BE +7140- A0 8D LDY #$8D +7142- 8D 00 20 STA $2000 +7145- BE 70 D2 LDX $D270,Y +7148- C5 C7 CMP $C7 +714A- C9 D3 CMP #$D3 +714C- D4 ??? +714D- D2 D9 CMP ($D9) +714F- A0 C4 LDY #$C4 +7151- D5 CD CMP $CD,X +7153- D0 8D BNE $70E2 +7155- 00 BRK +7156- 20 BE 70 JSR $70BE +7159- BD BD BD LDA $BDBD,X +715C- BD BD BD LDA $BDBD,X +715F- BD BD BD LDA $BDBD,X +7162- BD BD BD LDA $BDBD,X +7165- BD 8D 00 LDA $008D,X +7168- 20 BE 70 JSR $70BE +716B- C1 BA CMP ($BA,X) +716D- A0 00 LDY #$00 +716F- AD 43 62 LDA $6243 +7172- 29 F0 AND #$F0 +7174- 4A LSR +7175- 4A LSR +7176- 4A LSR +7177- 4A LSR +7178- 8D DA 72 STA $72DA +717B- AD 43 62 LDA $6243 +717E- 29 0F AND #$0F +7180- 8D DB 72 STA $72DB +7183- AE DA 72 LDX $72DA +7186- BD DC 72 LDA $72DC,X +7189- 20 F0 FD JSR $FDF0 F8ROM:COUT1 +718C- AE DB 72 LDX $72DB +718F- BD DC 72 LDA $72DC,X +7192- 20 F0 FD JSR $FDF0 F8ROM:COUT1 +7195- 20 BE 70 JSR $70BE +7198- A0 8D LDY #$8D +719A- 00 BRK +719B- 20 BE 70 JSR $70BE +719E- D8 CLD +719F- BA TSX +71A0- A0 00 LDY #$00 +71A2- AD 44 62 LDA $6244 +71A5- 29 F0 AND #$F0 +71A7- 4A LSR +71A8- 4A LSR +71A9- 4A LSR +71AA- 4A LSR +71AB- 8D DA 72 STA $72DA +71AE- AD 44 62 LDA $6244 +71B1- 29 0F AND #$0F +71B3- 8D DB 72 STA $72DB +71B6- AE DA 72 LDX $72DA +71B9- BD DC 72 LDA $72DC,X +71BC- 20 F0 FD JSR $FDF0 F8ROM:COUT1 +71BF- AE DB 72 LDX $72DB +71C2- BD DC 72 LDA $72DC,X +71C5- 20 F0 FD JSR $FDF0 F8ROM:COUT1 +71C8- 20 BE 70 JSR $70BE +71CB- A0 8D LDY #$8D +71CD- 00 BRK +71CE- 20 BE 70 JSR $70BE +71D1- D9 BA A0 CMP $A0BA,Y +71D4- 00 BRK +71D5- AD 45 62 LDA $6245 +71D8- 29 F0 AND #$F0 +71DA- 4A LSR +71DB- 4A LSR +71DC- 4A LSR +71DD- 4A LSR +71DE- 8D DA 72 STA $72DA +71E1- AD 45 62 LDA $6245 +71E4- 29 0F AND #$0F +71E6- 8D DB 72 STA $72DB +71E9- AE DA 72 LDX $72DA +71EC- BD DC 72 LDA $72DC,X +71EF- 20 F0 FD JSR $FDF0 F8ROM:COUT1 +71F2- AE DB 72 LDX $72DB +71F5- BD DC 72 LDA $72DC,X +71F8- 20 F0 FD JSR $FDF0 F8ROM:COUT1 +71FB- 20 BE 70 JSR $70BE +71FE- A0 8D LDY #$8D +7200- 8D 00 20 STA $2000 +7203- BE 70 D3 LDX $D370,Y +7206- D4 ??? +7207- C1 D4 CMP ($D4,X) +7209- D5 D3 CMP $D3,X +720B- A0 C6 LDY #$C6 +720D- CC C1 C7 CPY $C7C1 +7210- D3 ??? +7211- 8D 00 20 STA $2000 +7214- BE 70 BD LDX $BD70,Y +7217- BD BD BD LDA $BDBD,X +721A- BD BD BD LDA $BDBD,X +721D- BD BD BD LDA $BDBD,X +7220- BD BD 8D LDA $8DBD,X +7223- 8D 00 A9 STA $A900 +7226- 00 BRK +7227- CD 46 62 CMP $6246 +722A- F0 12 BEQ $723E +722C- 20 BE 70 JSR $70BE +722F- C3 ??? +7230- C1 D2 CMP ($D2,X) +7232- D2 D9 CMP ($D9) +7234- BA TSX +7235- A0 D3 LDY #$D3 +7237- C5 D4 CMP $D4 +7239- 8D 00 4C STA $4C00 +723C- 4F ??? +723D- 72 20 ADC ($20) +723F- BE 70 C3 LDX $C370,Y +7242- C1 D2 CMP ($D2,X) +7244- D2 D9 CMP ($D9) +7246- BA TSX +7247- A0 C3 LDY #$C3 +7249- CC C5 C1 CPY $C1C5 +724C- D2 8D CMP ($8D) +724E- 00 BRK +724F- A9 00 LDA #$00 +7251- CD 47 62 CMP $6247 +7254- F0 15 BEQ $726B +7256- 20 BE 70 JSR $70BE +7259- CE C5 C7 DEC $C7C5 +725C- C1 D4 CMP ($D4,X) +725E- C9 D6 CMP #$D6 +7260- C5 BA CMP $BA +7262- A0 D3 LDY #$D3 +7264- C5 D4 CMP $D4 +7266- 8D 00 4C STA $4C00 +7269- 7F ??? +726A- 72 20 ADC ($20) +726C- BE 70 CE LDX $CE70,Y +726F- C5 C7 CMP $C7 +7271- C1 D4 CMP ($D4,X) +7273- C9 D6 CMP #$D6 +7275- C5 BA CMP $BA +7277- A0 C3 LDY #$C3 +7279- CC C5 C1 CPY $C1C5 +727C- D2 8D CMP ($8D) +727E- 00 BRK +727F- A9 00 LDA #$00 +7281- CD 48 62 CMP $6248 +7284- F0 11 BEQ $7297 +7286- 20 BE 70 JSR $70BE +7289- DA PHX +728A- C5 D2 CMP $D2 +728C- CF ??? +728D- BA TSX +728E- A0 D3 LDY #$D3 +7290- C5 D4 CMP $D4 +7292- 8D 00 4C STA $4C00 +7295- A7 ??? +7296- 72 20 ADC ($20) +7298- BE 70 DA LDX $DA70,Y +729B- C5 D2 CMP $D2 +729D- CF ??? +729E- BA TSX +729F- A0 C3 LDY #$C3 +72A1- CC C5 C1 CPY $C1C5 +72A4- D2 8D CMP ($8D) +72A6- 00 BRK +72A7- A9 00 LDA #$00 +72A9- CD 49 62 CMP $6249 +72AC- F0 15 BEQ $72C3 +72AE- 20 BE 70 JSR $70BE +72B1- CF ??? +72B2- D6 C5 DEC $C5,X +72B4- D2 C6 CMP ($C6) +72B6- CC CF D7 CPY $D7CF +72B9- BA TSX +72BA- A0 D3 LDY #$D3 +72BC- C5 D4 CMP $D4 +72BE- 8D 00 4C STA $4C00 +72C1- D9 72 20 CMP $2072,Y +72C4- BE 70 CF LDX $CF70,Y +72C7- D6 C5 DEC $C5,X +72C9- D2 C6 CMP ($C6) +72CB- CC CF D7 CPY $D7CF +72CE- BA TSX +72CF- A0 C3 LDY #$C3 +72D1- CC C5 C1 CPY $C1C5 +72D4- D2 8D CMP ($8D) +72D6- 8D 8D 00 STA $008D +72D9- 60 RTS +72DA- 00 BRK +72DB- 00 BRK +72DC- B0 B1 BCS $728F +72DE- B2 B3 LDA ($B3) +72E0- B4 B5 LDY $B5,X +72E2- B6 B7 LDX $B7,Y +72E4- B8 CLV +72E5- B9 C1 C2 LDA $C2C1,Y +72E8- C3 ??? +72E9- C4 C5 CPY $C5 +72EB- C6 20 DEC $20 +72ED- E3 ??? +72EE- 70 68 BVS $7358 +72F0- 85 FE STA $FE +72F2- 68 PLA +72F3- 85 FF STA $FF +72F5- 68 PLA +72F6- 8D D9 73 STA $73D9 72F9- 68 PLA -72FA- 85 07 STA $07 -72FC- C8 INY -72FD- B9 F2 73 LDA $73F2,Y -7300- 91 06 STA ($06),Y -7302- CC F1 73 CPY $73F1 -7305- D0 F5 BNE $72FC -7307- A5 07 LDA $07 -7309- 48 PHA -730A- A5 06 LDA $06 -730C- 48 PHA -730D- 60 RTS -730E- A0 FF LDY #$FF -7310- 68 PLA -7311- 85 06 STA $06 -7313- 68 PLA -7314- 85 07 STA $07 -7316- C8 INY -7317- B1 06 LDA ($06),Y -7319- 99 F3 74 STA $74F3,Y -731C- CC F2 74 CPY $74F2 -731F- D0 F5 BNE $7316 -7321- A5 07 LDA $07 -7323- 48 PHA -7324- A5 06 LDA $06 -7326- 48 PHA -7327- 60 RTS -7328- 68 PLA -7329- 8D B7 73 STA $73B7 -732C- 68 PLA -732D- 8D B8 73 STA $73B8 -7330- 68 PLA -7331- 8D BB 73 STA $73BB -7334- 68 PLA -7335- 85 EB STA $EB -7337- 68 PLA -7338- 85 EC STA $EC -733A- A9 8D LDA #$8D -733C- 20 F0 FD JSR $FDF0 F8ROM:COUT1 -733F- A5 EC LDA $EC -7341- 29 F0 AND #$F0 -7343- 4A LSR -7344- 4A LSR -7345- 4A LSR -7346- 4A LSR -7347- AA TAX -7348- BD BC 73 LDA $73BC,X -734B- 20 F0 FD JSR $FDF0 F8ROM:COUT1 -734E- A5 EC LDA $EC -7350- 29 0F AND #$0F -7352- AA TAX -7353- BD BC 73 LDA $73BC,X -7356- 20 F0 FD JSR $FDF0 F8ROM:COUT1 -7359- A5 EB LDA $EB -735B- 29 F0 AND #$F0 -735D- 4A LSR -735E- 4A LSR -735F- 4A LSR -7360- 4A LSR -7361- AA TAX -7362- BD BC 73 LDA $73BC,X -7365- 20 F0 FD JSR $FDF0 F8ROM:COUT1 -7368- A5 EB LDA $EB -736A- 29 0F AND #$0F -736C- AA TAX -736D- BD BC 73 LDA $73BC,X -7370- 20 F0 FD JSR $FDF0 F8ROM:COUT1 -7373- A9 BA LDA #$BA -7375- 20 F0 FD JSR $FDF0 F8ROM:COUT1 -7378- A9 A0 LDA #$A0 +72FA- 8D DA 73 STA $73DA +72FD- 68 PLA +72FE- 8D DB 73 STA $73DB +7301- 68 PLA +7302- 8D DC 73 STA $73DC +7305- 68 PLA +7306- 8D DD 73 STA $73DD +7309- 68 PLA +730A- 8D DE 73 STA $73DE +730D- 68 PLA +730E- 8D DF 73 STA $73DF +7311- 68 PLA +7312- 8D E0 73 STA $73E0 +7315- 68 PLA +7316- 8D E1 73 STA $73E1 +7319- 20 BE 70 JSR $70BE +731C- A0 87 LDY #$87 +731E- 87 ??? +731F- 87 ??? +7320- 87 ??? +7321- 87 ??? +7322- 8D 8D 00 STA $008D +7325- 20 BE 70 JSR $70BE +7328- C5 D2 CMP $D2 +732A- D2 CF CMP ($CF) +732C- D2 A1 CMP ($A1) +732E- 8D 8D 00 STA $008D +7331- 20 BE 70 JSR $70BE +7334- D3 ??? +7335- D5 C2 CMP $C2,X +7337- D2 CF CMP ($CF) +7339- D5 D4 CMP $D4,X +733B- C9 CE CMP #$CE +733D- C5 BA CMP $BA +733F- A0 00 LDY #$00 +7341- A0 00 LDY #$00 +7343- AD E0 73 LDA $73E0 +7346- 85 06 STA $06 +7348- AD E1 73 LDA $73E1 +734B- 85 07 STA $07 +734D- B1 06 LDA ($06),Y +734F- F0 06 BEQ $7357 +7351- 20 F0 FD JSR $FDF0 F8ROM:COUT1 +7354- C8 INY +7355- D0 F6 BNE $734D +7357- 20 BE 70 JSR $70BE +735A- A0 8D LDY #$8D +735C- 00 BRK +735D- 20 BE 70 JSR $70BE +7360- CD C5 D3 CMP $D3C5 +7363- D3 ??? +7364- C1 C7 CMP ($C7,X) +7366- C5 BA CMP $BA +7368- A0 00 LDY #$00 +736A- A0 00 LDY #$00 +736C- AD DE 73 LDA $73DE +736F- 85 06 STA $06 +7371- AD DF 73 LDA $73DF +7374- 85 07 STA $07 +7376- B1 06 LDA ($06),Y +7378- F0 06 BEQ $7380 737A- 20 F0 FD JSR $FDF0 F8ROM:COUT1 -737D- A0 00 LDY #$00 -737F- B1 EB LDA ($EB),Y -7381- 29 F0 AND #$F0 -7383- 4A LSR -7384- 4A LSR -7385- 4A LSR -7386- 4A LSR -7387- 8D BA 73 STA $73BA -738A- B1 EB LDA ($EB),Y -738C- 29 0F AND #$0F -738E- 8D B9 73 STA $73B9 -7391- AE BA 73 LDX $73BA -7394- BD BC 73 LDA $73BC,X -7397- 20 F0 FD JSR $FDF0 F8ROM:COUT1 -739A- AE B9 73 LDX $73B9 -739D- BD BC 73 LDA $73BC,X -73A0- 20 F0 FD JSR $FDF0 F8ROM:COUT1 -73A3- A9 A0 LDA #$A0 -73A5- 20 F0 FD JSR $FDF0 F8ROM:COUT1 -73A8- C8 INY -73A9- CC BB 73 CPY $73BB -73AC- D0 D1 BNE $737F -73AE- AD B8 73 LDA $73B8 +737D- C8 INY +737E- D0 F6 BNE $7376 +7380- 20 BE 70 JSR $70BE +7383- A0 8D LDY #$8D +7385- 8D 00 20 STA $2000 +7388- DF ??? +7389- 70 A0 BVS $732B +738B- 00 BRK +738C- AD DC 73 LDA $73DC +738F- 85 06 STA $06 +7391- AD DD 73 LDA $73DD +7394- 85 07 STA $07 +7396- B1 06 LDA ($06),Y +7398- F0 06 BEQ $73A0 +739A- 20 F0 FD JSR $FDF0 F8ROM:COUT1 +739D- C8 INY +739E- D0 F6 BNE $7396 +73A0- 20 BE 70 JSR $70BE +73A3- A0 8D LDY #$8D +73A5- 00 BRK +73A6- AD DB 73 LDA $73DB +73A9- 48 PHA +73AA- AD DA 73 LDA $73DA +73AD- 48 PHA +73AE- AD D9 73 LDA $73D9 73B1- 48 PHA -73B2- AD B7 73 LDA $73B7 -73B5- 48 PHA -73B6- 60 RTS -73B7- 00 BRK -73B8- 00 BRK -73B9- 00 BRK -73BA- 00 BRK -73BB- 00 BRK -73BC- B0 B1 BCS $736F -73BE- B2 B3 LDA ($B3) -73C0- B4 B5 LDY $B5,X -73C2- B6 B7 LDX $B7,Y -73C4- B8 CLV -73C5- B9 C1 C2 LDA $C2C1,Y -73C8- C3 ??? -73C9- C4 C5 CPY $C5 -73CB- C6 68 DEC $68 -73CD- 85 06 STA $06 -73CF- 68 PLA -73D0- 85 07 STA $07 -73D2- A0 01 LDY #$01 -73D4- B1 06 LDA ($06),Y -73D6- F0 06 BEQ $73DE -73D8- 20 F0 FD JSR $FDF0 F8ROM:COUT1 -73DB- C8 INY -73DC- D0 F6 BNE $73D4 -73DE- 18 CLC -73DF- 98 TYA -73E0- 65 06 ADC $06 -73E2- 85 06 STA $06 -73E4- A5 07 LDA $07 -73E6- 69 00 ADC #$00 -73E8- 48 PHA -73E9- A5 06 LDA $06 -73EB- 48 PHA -73EC- 60 RTS -73ED- 20 0C FD JSR $FD0C F8ROM:RDKEY -73F0- 60 RTS -73F1- 00 BRK -73F2- 00 BRK -73F3- 00 BRK -73F4- 00 BRK -73F5- 00 BRK -73F6- 00 BRK -73F7- 00 BRK -73F8- 00 BRK -73F9- 00 BRK -73FA- 00 BRK -73FB- 00 BRK -73FC- 00 BRK -73FD- 00 BRK -73FE- 00 BRK -73FF- 00 BRK -7400- 00 BRK -7401- 00 BRK -7402- 00 BRK -7403- 00 BRK -7404- 00 BRK -7405- 00 BRK -7406- 00 BRK -7407- 00 BRK -7408- 00 BRK -7409- 00 BRK -740A- 00 BRK -740B- 00 BRK -740C- 00 BRK -740D- 00 BRK -740E- 00 BRK -740F- 00 BRK -7410- 00 BRK -7411- 00 BRK -7412- 00 BRK -7413- 00 BRK -7414- 00 BRK -7415- 00 BRK -7416- 00 BRK -7417- 00 BRK -7418- 00 BRK -7419- 00 BRK -741A- 00 BRK -741B- 00 BRK -741C- 00 BRK -741D- 00 BRK -741E- 00 BRK -741F- 00 BRK -7420- 00 BRK -7421- 00 BRK -7422- 00 BRK -7423- 00 BRK -7424- 00 BRK -7425- 00 BRK -7426- 00 BRK -7427- 00 BRK -7428- 00 BRK -7429- 00 BRK -742A- 00 BRK -742B- 00 BRK -742C- 00 BRK -742D- 00 BRK -742E- 00 BRK -742F- 00 BRK -7430- 00 BRK -7431- 00 BRK -7432- 00 BRK -7433- 00 BRK -7434- 00 BRK -7435- 00 BRK -7436- 00 BRK -7437- 00 BRK -7438- 00 BRK -7439- 00 BRK -743A- 00 BRK -743B- 00 BRK -743C- 00 BRK -743D- 00 BRK -743E- 00 BRK -743F- 00 BRK -7440- 00 BRK -7441- 00 BRK -7442- 00 BRK -7443- 00 BRK -7444- 00 BRK -7445- 00 BRK -7446- 00 BRK -7447- 00 BRK -7448- 00 BRK -7449- 00 BRK -744A- 00 BRK -744B- 00 BRK -744C- 00 BRK -744D- 00 BRK -744E- 00 BRK -744F- 00 BRK -7450- 00 BRK -7451- 00 BRK -7452- 00 BRK -7453- 00 BRK -7454- 00 BRK -7455- 00 BRK -7456- 00 BRK -7457- 00 BRK -7458- 00 BRK -7459- 00 BRK -745A- 00 BRK -745B- 00 BRK -745C- 00 BRK -745D- 00 BRK -745E- 00 BRK -745F- 00 BRK -7460- 00 BRK -7461- 00 BRK -7462- 00 BRK -7463- 00 BRK -7464- 00 BRK -7465- 00 BRK -7466- 00 BRK -7467- 00 BRK -7468- 00 BRK -7469- 00 BRK -746A- 00 BRK -746B- 00 BRK -746C- 00 BRK -746D- 00 BRK -746E- 00 BRK -746F- 00 BRK -7470- 00 BRK -7471- 00 BRK -7472- 00 BRK -7473- 00 BRK -7474- 00 BRK -7475- 00 BRK -7476- 00 BRK -7477- 00 BRK -7478- 00 BRK -7479- 00 BRK -747A- 00 BRK -747B- 00 BRK -747C- 00 BRK -747D- 00 BRK -747E- 00 BRK -747F- 00 BRK -7480- 00 BRK -7481- 00 BRK -7482- 00 BRK -7483- 00 BRK -7484- 00 BRK -7485- 00 BRK -7486- 00 BRK -7487- 00 BRK -7488- 00 BRK -7489- 00 BRK +73B2- 20 2A 70 JSR $702A +73B5- 20 DF 70 JSR $70DF +73B8- A5 FF LDA $FF +73BA- 48 PHA +73BB- A5 FE LDA $FE +73BD- 48 PHA +73BE- 20 BE 70 JSR $70BE +73C1- A0 8D LDY #$8D +73C3- 8D 00 20 STA $2000 +73C6- DF ??? +73C7- 70 20 BVS $73E9 +73C9- 3D 71 20 AND $2071,X +73CC- DF ??? +73CD- 70 AD BVS $737C +73CF- 41 62 EOR ($62,X) +73D1- C9 01 CMP #$01 +73D3- F0 01 BEQ $73D6 +73D5- 60 RTS +73D6- 4C D0 03 JMP $03D0 +73D9- 00 BRK +73DA- 00 BRK +73DB- 00 BRK +73DC- 00 BRK +73DD- 00 BRK +73DE- 00 BRK +73DF- 00 BRK +73E0- 00 BRK +73E1- 00 BRK +73E2- 68 PLA +73E3- 85 FE STA $FE +73E5- 68 PLA +73E6- 85 FF STA $FF +73E8- 68 PLA +73E9- 8D 8B 74 STA $748B +73EC- 68 PLA +73ED- 8D 8C 74 STA $748C +73F0- 8D 8A 74 STA $748A +73F3- 10 11 BPL $7406 +73F5- A9 00 LDA #$00 +73F7- 38 SEC +73F8- ED 8B 74 SBC $748B +73FB- 8D 8B 74 STA $748B +73FE- A9 00 LDA #$00 +7400- ED 8C 74 SBC $748C +7403- 8D 8C 74 STA $748C +7406- A9 40 LDA #$40 +7408- 85 06 STA $06 +740A- A9 60 LDA #$60 +740C- 85 07 STA $07 +740E- A9 00 LDA #$00 +7410- A0 00 LDY #$00 +7412- 91 06 STA ($06),Y +7414- A9 00 LDA #$00 +7416- 8D 8D 74 STA $748D +7419- 8D 8E 74 STA $748E +741C- A2 10 LDX #$10 +741E- 18 CLC +741F- 2E 8B 74 ROL $748B +7422- 2E 8C 74 ROL $748C +7425- 2E 8D 74 ROL $748D +7428- 2E 8E 74 ROL $748E +742B- 38 SEC +742C- AD 8D 74 LDA $748D +742F- E9 0A SBC #$0A +7431- A8 TAY +7432- AD 8E 74 LDA $748E +7435- E9 00 SBC #$00 +7437- 90 06 BCC $743F +7439- 8C 8D 74 STY $748D +743C- 8D 8E 74 STA $748E +743F- CA DEX +7440- D0 DD BNE $741F +7442- 2E 8B 74 ROL $748B +7445- 2E 8C 74 ROL $748C +7448- AD 8D 74 LDA $748D +744B- 18 CLC +744C- 69 B0 ADC #$B0 +744E- 20 6A 74 JSR $746A +7451- AD 8B 74 LDA $748B +7454- 0D 8C 74 ORA $748C +7457- D0 BB BNE $7414 +7459- AD 8A 74 LDA $748A +745C- 10 05 BPL $7463 +745E- A9 AD LDA #$AD +7460- 20 6A 74 JSR $746A +7463- A5 FF LDA $FF +7465- 48 PHA +7466- A5 FE LDA $FE +7468- 48 PHA +7469- 60 RTS +746A- 48 PHA +746B- A0 00 LDY #$00 +746D- B1 06 LDA ($06),Y +746F- A8 TAY +7470- F0 09 BEQ $747B +7472- B1 06 LDA ($06),Y +7474- C8 INY +7475- 91 06 STA ($06),Y +7477- 88 DEY +7478- 88 DEY +7479- D0 F7 BNE $7472 +747B- 68 PLA +747C- A0 01 LDY #$01 +747E- 91 06 STA ($06),Y +7480- A0 00 LDY #$00 +7482- B1 06 LDA ($06),Y +7484- 18 CLC +7485- 69 01 ADC #$01 +7487- 91 06 STA ($06),Y +7489- 60 RTS 748A- 00 BRK 748B- 00 BRK 748C- 00 BRK 748D- 00 BRK 748E- 00 BRK -748F- 00 BRK -7490- 00 BRK -7491- 00 BRK -7492- 00 BRK -7493- 00 BRK -7494- 00 BRK -7495- 00 BRK -7496- 00 BRK -7497- 00 BRK -7498- 00 BRK -7499- 00 BRK -749A- 00 BRK -749B- 00 BRK -749C- 00 BRK -749D- 00 BRK -749E- 00 BRK -749F- 00 BRK -74A0- 00 BRK -74A1- 00 BRK -74A2- 00 BRK -74A3- 00 BRK -74A4- 00 BRK -74A5- 00 BRK -74A6- 00 BRK -74A7- 00 BRK -74A8- 00 BRK -74A9- 00 BRK -74AA- 00 BRK -74AB- 00 BRK -74AC- 00 BRK -74AD- 00 BRK -74AE- 00 BRK -74AF- 00 BRK -74B0- 00 BRK -74B1- 00 BRK -74B2- 00 BRK -74B3- 00 BRK -74B4- 00 BRK -74B5- 00 BRK -74B6- 00 BRK -74B7- 00 BRK -74B8- 00 BRK -74B9- 00 BRK -74BA- 00 BRK -74BB- 00 BRK -74BC- 00 BRK -74BD- 00 BRK -74BE- 00 BRK -74BF- 00 BRK +748F- 68 PLA +7490- 85 FE STA $FE +7492- 68 PLA +7493- 85 FF STA $FF +7495- 68 PLA +7496- 85 06 STA $06 +7498- 68 PLA +7499- 85 07 STA $07 +749B- A0 00 LDY #$00 +749D- B1 06 LDA ($06),Y +749F- 8D C0 74 STA $74C0 +74A2- C8 INY +74A3- B1 06 LDA ($06),Y +74A5- 20 F0 FD JSR $FDF0 F8ROM:COUT1 +74A8- CC C0 74 CPY $74C0 +74AB- D0 F5 BNE $74A2 +74AD- A0 00 LDY #$00 +74AF- B1 06 LDA ($06),Y +74B1- A5 FF LDA $FF +74B3- 48 PHA +74B4- A5 FE LDA $FE +74B6- 48 PHA +74B7- A0 00 LDY #$00 +74B9- B1 06 LDA ($06),Y +74BB- A4 06 LDY $06 +74BD- A6 07 LDX $07 +74BF- 60 RTS 74C0- 00 BRK -74C1- 00 BRK -74C2- 00 BRK -74C3- 00 BRK -74C4- 00 BRK -74C5- 00 BRK -74C6- 00 BRK -74C7- 00 BRK -74C8- 00 BRK -74C9- 00 BRK -74CA- 00 BRK -74CB- 00 BRK -74CC- 00 BRK -74CD- 00 BRK -74CE- 00 BRK -74CF- 00 BRK -74D0- 00 BRK -74D1- 00 BRK -74D2- 00 BRK -74D3- 00 BRK -74D4- 00 BRK -74D5- 00 BRK -74D6- 00 BRK -74D7- 00 BRK -74D8- 00 BRK -74D9- 00 BRK -74DA- 00 BRK -74DB- 00 BRK -74DC- 00 BRK -74DD- 00 BRK -74DE- 00 BRK -74DF- 00 BRK -74E0- 00 BRK -74E1- 00 BRK -74E2- 00 BRK -74E3- 00 BRK -74E4- 00 BRK -74E5- 00 BRK -74E6- 00 BRK -74E7- 00 BRK -74E8- 00 BRK -74E9- 00 BRK -74EA- 00 BRK -74EB- 00 BRK -74EC- 00 BRK -74ED- 00 BRK -74EE- 00 BRK -74EF- 00 BRK -74F0- 00 BRK -74F1- 00 BRK -74F2- 00 BRK -74F3- 00 BRK -74F4- 00 BRK -74F5- 00 BRK -74F6- 00 BRK -74F7- 00 BRK -74F8- 00 BRK -74F9- 00 BRK -74FA- 00 BRK -74FB- 00 BRK -74FC- 00 BRK -74FD- 00 BRK -74FE- 00 BRK -74FF- 00 BRK -7500- 00 BRK -7501- 00 BRK -7502- 00 BRK -7503- 00 BRK -7504- 00 BRK -7505- 00 BRK -7506- 00 BRK -7507- 00 BRK -7508- 00 BRK -7509- 00 BRK -750A- 00 BRK -750B- 00 BRK -750C- 00 BRK -750D- 00 BRK -750E- 00 BRK -750F- 00 BRK -7510- 00 BRK -7511- 00 BRK -7512- 00 BRK -7513- 00 BRK -7514- 00 BRK -7515- 00 BRK -7516- 00 BRK -7517- 00 BRK -7518- 00 BRK -7519- 00 BRK -751A- 00 BRK -751B- 00 BRK -751C- 00 BRK -751D- 00 BRK -751E- 00 BRK -751F- 00 BRK -7520- 00 BRK -7521- 00 BRK -7522- 00 BRK -7523- 00 BRK -7524- 00 BRK -7525- 00 BRK -7526- 00 BRK -7527- 00 BRK -7528- 00 BRK -7529- 00 BRK -752A- 00 BRK -752B- 00 BRK -752C- 00 BRK -752D- 00 BRK -752E- 00 BRK -752F- 00 BRK -7530- 00 BRK -7531- 00 BRK -7532- 00 BRK -7533- 00 BRK -7534- 00 BRK -7535- 00 BRK -7536- 00 BRK -7537- 00 BRK -7538- 00 BRK -7539- 00 BRK -753A- 00 BRK -753B- 00 BRK -753C- 00 BRK -753D- 00 BRK -753E- 00 BRK -753F- 00 BRK -7540- 00 BRK -7541- 00 BRK -7542- 00 BRK -7543- 00 BRK -7544- 00 BRK -7545- 00 BRK -7546- 00 BRK -7547- 00 BRK -7548- 00 BRK -7549- 00 BRK -754A- 00 BRK -754B- 00 BRK -754C- 00 BRK -754D- 00 BRK -754E- 00 BRK -754F- 00 BRK -7550- 00 BRK -7551- 00 BRK -7552- 00 BRK -7553- 00 BRK -7554- 00 BRK -7555- 00 BRK -7556- 00 BRK -7557- 00 BRK -7558- 00 BRK -7559- 00 BRK -755A- 00 BRK -755B- 00 BRK -755C- 00 BRK -755D- 00 BRK -755E- 00 BRK -755F- 00 BRK -7560- 00 BRK -7561- 00 BRK -7562- 00 BRK -7563- 00 BRK -7564- 00 BRK -7565- 00 BRK -7566- 00 BRK -7567- 00 BRK -7568- 00 BRK -7569- 00 BRK -756A- 00 BRK -756B- 00 BRK -756C- 00 BRK -756D- 00 BRK -756E- 00 BRK -756F- 00 BRK -7570- 00 BRK -7571- 00 BRK -7572- 00 BRK +74C1- 68 PLA +74C2- 85 FE STA $FE +74C4- 68 PLA +74C5- 85 FF STA $FF +74C7- 68 PLA +74C8- 8D 78 75 STA $7578 +74CB- 68 PLA +74CC- 85 08 STA $08 +74CE- 68 PLA +74CF- 85 09 STA $09 +74D1- 68 PLA +74D2- 85 06 STA $06 +74D4- 68 PLA +74D5- 85 07 STA $07 +74D7- A0 00 LDY #$00 +74D9- B1 06 LDA ($06),Y +74DB- 8D 74 75 STA $7574 +74DE- 8D 75 75 STA $7575 +74E1- EE 75 75 INC $7575 +74E4- B1 08 LDA ($08),Y +74E6- 8D 76 75 STA $7576 +74E9- A9 01 LDA #$01 +74EB- 8D 77 75 STA $7577 +74EE- AD 76 75 LDA $7576 +74F1- 18 CLC +74F2- 6D 74 75 ADC $7574 +74F5- 8D 73 75 STA $7573 +74F8- B0 07 BCS $7501 +74FA- CD 78 75 CMP $7578 +74FD- F0 1C BEQ $751B +74FF- 90 1A BCC $751B +7501- A9 FF LDA #$FF +7503- 8D 7A 75 STA $757A +7506- AD 78 75 LDA $7578 +7509- 38 SEC +750A- ED 74 75 SBC $7574 +750D- 90 34 BCC $7543 +750F- 8D 79 75 STA $7579 +7512- AD 78 75 LDA $7578 +7515- 8D 74 75 STA $7574 +7518- 4C 29 75 JMP $7529 +751B- 8D 74 75 STA $7574 +751E- A9 00 LDA #$00 +7520- 8D 7A 75 STA $757A +7523- AD 76 75 LDA $7576 +7526- 8D 79 75 STA $7579 +7529- AD 79 75 LDA $7579 +752C- F0 15 BEQ $7543 +752E- AC 77 75 LDY $7577 +7531- B1 08 LDA ($08),Y +7533- AC 75 75 LDY $7575 +7536- 91 06 STA ($06),Y +7538- EE 75 75 INC $7575 +753B- EE 77 75 INC $7577 +753E- CE 79 75 DEC $7579 +7541- D0 EB BNE $752E +7543- AD 74 75 LDA $7574 +7546- A0 00 LDY #$00 +7548- 91 06 STA ($06),Y +754A- AD 7A 75 LDA $757A +754D- 6A ROR +754E- A5 FF LDA $FF +7550- 48 PHA +7551- A5 FE LDA $FE +7553- 48 PHA +7554- A0 00 LDY #$00 +7556- B1 06 LDA ($06),Y +7558- 8D 3F 60 STA $603F +755B- A9 01 LDA #$01 +755D- B1 06 LDA ($06),Y +755F- 99 40 60 STA $6040,Y +7562- CC 3F 60 CPY $603F +7565- C8 INY +7566- D0 F5 BNE $755D +7568- AD 3F 60 LDA $603F +756B- A0 00 LDY #$00 +756D- 91 06 STA ($06),Y +756F- AE 73 75 LDX $7573 +7572- 60 RTS 7573- 00 BRK 7574- 00 BRK 7575- 00 BRK @@ -3013,135 +3096,550 @@ 7578- 00 BRK 7579- 00 BRK 757A- 00 BRK -757B- 00 BRK -757C- 00 BRK -757D- 00 BRK -757E- 00 BRK -757F- 00 BRK -7580- 00 BRK -7581- 00 BRK -7582- 00 BRK -7583- 00 BRK -7584- 00 BRK -7585- 00 BRK -7586- 00 BRK -7587- 00 BRK -7588- 00 BRK -7589- 00 BRK -758A- 00 BRK -758B- 00 BRK -758C- 00 BRK -758D- 00 BRK -758E- 00 BRK -758F- 00 BRK -7590- 00 BRK -7591- 00 BRK -7592- 00 BRK -7593- 00 BRK -7594- 00 BRK -7595- 00 BRK -7596- 00 BRK -7597- 00 BRK -7598- 00 BRK -7599- 00 BRK -759A- 00 BRK -759B- 00 BRK -759C- 00 BRK -759D- 00 BRK -759E- 00 BRK -759F- 00 BRK -75A0- 00 BRK -75A1- 00 BRK -75A2- 00 BRK -75A3- 00 BRK -75A4- 00 BRK -75A5- 00 BRK -75A6- 00 BRK -75A7- 00 BRK -75A8- 00 BRK -75A9- 00 BRK -75AA- 00 BRK -75AB- 00 BRK -75AC- 00 BRK -75AD- 00 BRK -75AE- 00 BRK -75AF- 00 BRK -75B0- 00 BRK -75B1- 00 BRK -75B2- 00 BRK -75B3- 00 BRK -75B4- 00 BRK -75B5- 00 BRK -75B6- 00 BRK -75B7- 00 BRK -75B8- 00 BRK -75B9- 00 BRK -75BA- 00 BRK -75BB- 00 BRK -75BC- 00 BRK -75BD- 00 BRK -75BE- 00 BRK -75BF- 00 BRK -75C0- 00 BRK -75C1- 00 BRK -75C2- 00 BRK -75C3- 00 BRK -75C4- 00 BRK -75C5- 00 BRK -75C6- 00 BRK -75C7- 00 BRK -75C8- 00 BRK -75C9- 00 BRK -75CA- 00 BRK -75CB- 00 BRK -75CC- 00 BRK -75CD- 00 BRK -75CE- 00 BRK -75CF- 00 BRK -75D0- 00 BRK -75D1- 00 BRK -75D2- 00 BRK -75D3- 00 BRK -75D4- 00 BRK -75D5- 00 BRK -75D6- 00 BRK -75D7- 00 BRK -75D8- 00 BRK -75D9- 00 BRK -75DA- 00 BRK -75DB- 00 BRK -75DC- 00 BRK -75DD- 00 BRK -75DE- 00 BRK -75DF- 00 BRK -75E0- 00 BRK -75E1- 00 BRK -75E2- 00 BRK -75E3- 00 BRK -75E4- 00 BRK -75E5- 00 BRK -75E6- 00 BRK -75E7- 00 BRK -75E8- 00 BRK -75E9- 00 BRK -75EA- 00 BRK -75EB- 00 BRK -75EC- 00 BRK -75ED- 00 BRK -75EE- 00 BRK -75EF- 00 BRK -75F0- 00 BRK -75F1- 00 BRK -75F2- 00 BRK -75F3- 01 C1 ORA ($C1,X) -75F5- 01 C2 ORA ($C2,X) -75F7- 11 D4 ORA ($D4),Y -75F9- C8 INY -75FA- C9 D3 CMP #$D3 -75FC- A0 C9 LDY #$C9 -75FE- D3 ??? -75FF- A0 C1 LDY #$C1 -7601- A0 D3 LDY #$D3 -7603- D4 ??? -7604- D2 C9 CMP ($C9) -7606- CE C7 AE DEC $AEC7 +757B- 68 PLA +757C- 85 FE STA $FE +757E- 68 PLA +757F- 85 FF STA $FF +7581- 68 PLA +7582- 85 08 STA $08 +7584- 68 PLA +7585- 85 09 STA $09 +7587- 68 PLA +7588- 85 06 STA $06 +758A- 68 PLA +758B- 85 07 STA $07 +758D- A0 00 LDY #$00 +758F- B1 06 LDA ($06),Y +7591- D1 08 CMP ($08),Y +7593- 90 02 BCC $7597 +7595- B1 08 LDA ($08),Y +7597- AA TAX +7598- F0 0C BEQ $75A6 +759A- A0 01 LDY #$01 +759C- B1 06 LDA ($06),Y +759E- D1 08 CMP ($08),Y +75A0- D0 0A BNE $75AC +75A2- C8 INY +75A3- CA DEX +75A4- D0 F6 BNE $759C +75A6- A0 00 LDY #$00 +75A8- B1 06 LDA ($06),Y +75AA- D1 08 CMP ($08),Y +75AC- A5 FF LDA $FF +75AE- 48 PHA +75AF- A5 FE LDA $FE +75B1- 48 PHA +75B2- A0 00 LDY #$00 +75B4- B1 06 LDA ($06),Y +75B6- AA TAX +75B7- B1 08 LDA ($08),Y +75B9- A8 TAY +75BA- 60 RTS +75BB- 68 PLA +75BC- 85 FE STA $FE +75BE- 68 PLA +75BF- 85 FF STA $FF +75C1- 68 PLA +75C2- 85 06 STA $06 +75C4- 68 PLA +75C5- 85 07 STA $07 +75C7- A0 00 LDY #$00 +75C9- B1 06 LDA ($06),Y +75CB- AA TAX +75CC- A9 01 LDA #$01 +75CE- 8D AD 76 STA $76AD +75D1- A9 00 LDA #$00 +75D3- 8D AA 76 STA $76AA +75D6- 8D AB 76 STA $76AB +75D9- 8D AC 76 STA $76AC +75DC- 8A TXA +75DD- D0 03 BNE $75E2 +75DF- 4C 66 76 JMP $7666 +75E2- AC AD 76 LDY $76AD +75E5- B1 06 LDA ($06),Y +75E7- C9 AD CMP #$AD +75E9- D0 0E BNE $75F9 +75EB- A9 FF LDA #$FF +75ED- 8D AC 76 STA $76AC +75F0- EE AD 76 INC $76AD +75F3- CA DEX +75F4- F0 70 BEQ $7666 +75F6- 4C 03 76 JMP $7603 +75F9- C9 2B CMP #$2B +75FB- D0 0B BNE $7608 +75FD- EE AD 76 INC $76AD +7600- CA DEX +7601- F0 63 BEQ $7666 +7603- AC AD 76 LDY $76AD +7606- B1 06 LDA ($06),Y +7608- C9 B0 CMP #$B0 +760A- 30 5A BMI $7666 +760C- C9 BA CMP #$BA +760E- 10 56 BPL $7666 +7610- 48 PHA +7611- 0E AA 76 ASL $76AA +7614- 2E AB 76 ROL $76AB +7617- AD AA 76 LDA $76AA +761A- AC AB 76 LDY $76AB +761D- 0E AA 76 ASL $76AA +7620- 2E AB 76 ROL $76AB +7623- 0E AA 76 ASL $76AA +7626- 2E AB 76 ROL $76AB +7629- 18 CLC +762A- 6D AA 76 ADC $76AA +762D- 8D AA 76 STA $76AA +7630- 98 TYA +7631- 6D AB 76 ADC $76AB +7634- 8D AB 76 STA $76AB +7637- 68 PLA +7638- 38 SEC +7639- E9 B0 SBC #$B0 +763B- 18 CLC +763C- 6D AA 76 ADC $76AA +763F- 8D AA 76 STA $76AA +7642- 90 03 BCC $7647 +7644- EE AB 76 INC $76AB +7647- EE AD 76 INC $76AD +764A- CA DEX +764B- D0 B6 BNE $7603 +764D- AD AC 76 LDA $76AC +7650- 10 11 BPL $7663 +7652- A9 00 LDA #$00 +7654- 38 SEC +7655- ED AA 76 SBC $76AA +7658- 8D AA 76 STA $76AA +765B- A9 00 LDA #$00 +765D- ED AB 76 SBC $76AB +7660- 8D AB 76 STA $76AB +7663- 18 CLC +7664- 90 29 BCC $768F +7666- 38 SEC +7667- AD 42 62 LDA $6242 +766A- C9 01 CMP #$01 +766C- F0 03 BEQ $7671 +766E- 4C 8F 76 JMP $768F +7671- A9 76 LDA #$76 +7673- 48 PHA +7674- A9 AE LDA #$AE +7676- 48 PHA +7677- A9 76 LDA #$76 +7679- 48 PHA +767A- A9 C2 LDA #$C2 +767C- 48 PHA +767D- A9 76 LDA #$76 +767F- 48 PHA +7680- A9 E7 LDA #$E7 +7682- 48 PHA +7683- A9 76 LDA #$76 +7685- 48 PHA +7686- A9 AA LDA #$AA +7688- 48 PHA +7689- A9 04 LDA #$04 +768B- 48 PHA +768C- 20 EC 72 JSR $72EC +768F- A5 FF LDA $FF +7691- 48 PHA +7692- A5 FE LDA $FE +7694- 48 PHA +7695- AE AB 76 LDX $76AB +7698- AC AA 76 LDY $76AA +769B- 8C 40 60 STY $6040 +769E- 8E 41 60 STX $6041 +76A1- A9 02 LDA #$02 +76A3- 8D 3F 60 STA $603F +76A6- AD AD 76 LDA $76AD +76A9- 60 RTS +76AA- 00 BRK +76AB- 00 BRK +76AC- 00 BRK +76AD- 00 BRK +76AE- D3 ??? +76AF- D4 ??? +76B0- D2 B2 CMP ($B2) +76B2- CE D5 CD DEC $CDD5 +76B5- A0 A8 LDY #$A8 +76B7- D3 ??? +76B8- B2 CE LDA ($CE) +76BA- A0 CD LDY #$CD +76BC- C1 C3 CMP ($C3,X) +76BE- D2 CF CMP ($CF) +76C0- A9 00 LDA #$00 +76C2- C5 D2 CMP $D2 +76C4- D2 A1 CMP ($A1) +76C6- A0 CE LDY #$CE +76C8- CF ??? +76C9- A0 C4 LDY #$C4 +76CB- C1 D4 CMP ($D4,X) +76CD- C1 AC CMP ($AC,X) +76CF- A0 CF LDY #$CF +76D1- D2 A0 CMP ($A0) +76D3- CE CF D4 DEC $D4CF +76D6- A0 C1 LDY #$C1 +76D8- A0 CE LDY #$CE +76DA- D5 CD CMP $CD,X +76DC- C5 D2 CMP $D2 +76DE- C1 CC CMP ($CC,X) +76E0- A0 D6 LDY #$D6 +76E2- C1 CC CMP ($CC,X) +76E4- D5 C5 CMP $C5,X +76E6- 00 BRK +76E7- C4 D5 CPY $D5 +76E9- CD D0 C9 CMP $C9D0 +76EC- CE C7 A0 DEC $A0C7 +76EF- BA TSX +76F0- CE C1 C3 DEC $C3C1 +76F3- C3 ??? +76F4- D5 CD CMP $CD,X +76F6- A8 TAY +76F7- B2 A9 LDA ($A9) +76F9- A0 BA LDY #$BA +76FB- D3 ??? +76FC- CE C7 C6 DEC $C6C7 +76FF- CC C1 C7 CPY $C7C1 +7702- A8 TAY +7703- B1 A9 LDA ($A9),Y +7705- A0 BA LDY #$BA +7707- CE C9 CE DEC $CEC9 +770A- C4 C5 CPY $C5 +770C- D8 CLD +770D- A8 TAY +770E- B1 A9 LDA ($A9),Y +7710- 00 BRK +7711- 68 PLA +7712- 85 FE STA $FE +7714- 68 PLA +7715- 85 FF STA $FF +7717- 68 PLA +7718- 8D CC 77 STA $77CC +771B- 68 PLA +771C- 8D CD 77 STA $77CD +771F- 8D 3F 60 STA $603F +7722- 68 PLA +7723- 8D CE 77 STA $77CE +7726- 68 PLA +7727- 85 06 STA $06 +7729- 68 PLA +772A- 85 07 STA $07 +772C- A9 40 LDA #$40 +772E- 85 08 STA $08 +7730- A9 60 LDA #$60 +7732- 85 09 STA $09 +7734- A5 FF LDA $FF +7736- 48 PHA +7737- A5 FE LDA $FE +7739- 48 PHA +773A- A9 00 LDA #$00 +773C- 8D CB 77 STA $77CB +773F- 8D CF 77 STA $77CF +7742- AD CD 77 LDA $77CD +7745- F0 74 BEQ $77BB +7747- AD CC 77 LDA $77CC +774A- F0 72 BEQ $77BE +774C- AD CE 77 LDA $77CE +774F- F0 6D BEQ $77BE +7751- A0 00 LDY #$00 +7753- B1 06 LDA ($06),Y +7755- 8D CA 77 STA $77CA +7758- CD CE 77 CMP $77CE +775B- 90 61 BCC $77BE +775D- AD CE 77 LDA $77CE +7760- 18 CLC +7761- 6D CD 77 ADC $77CD +7764- B0 09 BCS $776F +7766- AA TAX +7767- CA DEX +7768- EC CA 77 CPX $77CA +776B- 90 14 BCC $7781 +776D- F0 12 BEQ $7781 +776F- AD CA 77 LDA $77CA +7772- 38 SEC +7773- ED CE 77 SBC $77CE +7776- 8D CD 77 STA $77CD +7779- EE CD 77 INC $77CD +777C- A9 FF LDA #$FF +777E- 8D CF 77 STA $77CF +7781- AD CD 77 LDA $77CD +7784- CD CC 77 CMP $77CC +7787- 90 0D BCC $7796 +7789- F0 0B BEQ $7796 +778B- AD CC 77 LDA $77CC +778E- 8D CD 77 STA $77CD +7791- A9 FF LDA #$FF +7793- 8D CF 77 STA $77CF +7796- AE CD 77 LDX $77CD +7799- F0 23 BEQ $77BE +779B- A9 01 LDA #$01 +779D- 8D CB 77 STA $77CB +77A0- AC CE 77 LDY $77CE +77A3- B1 06 LDA ($06),Y +77A5- AC CB 77 LDY $77CB +77A8- 91 08 STA ($08),Y +77AA- EE CE 77 INC $77CE +77AD- EE CB 77 INC $77CB +77B0- CA DEX +77B1- D0 ED BNE $77A0 +77B3- CE CB 77 DEC $77CB +77B6- AD CF 77 LDA $77CF +77B9- D0 03 BNE $77BE +77BB- 18 CLC +77BC- 90 01 BCC $77BF +77BE- 38 SEC +77BF- AD CB 77 LDA $77CB +77C2- A0 00 LDY #$00 +77C4- 91 08 STA ($08),Y +77C6- 8D 3F 60 STA $603F +77C9- 60 RTS +77CA- 00 BRK +77CB- 00 BRK +77CC- 00 BRK +77CD- 00 BRK +77CE- 00 BRK +77CF- 00 BRK +77D0- 68 PLA +77D1- A8 TAY +77D2- 68 PLA +77D3- AA TAX +77D4- 68 PLA +77D5- 8D 5C 78 STA $785C +77D8- 68 PLA +77D9- 8D 5D 78 STA $785D +77DC- 68 PLA +77DD- 85 06 STA $06 +77DF- 68 PLA +77E0- 85 07 STA $07 +77E2- 8A TXA +77E3- 48 PHA +77E4- 98 TYA +77E5- 48 PHA +77E6- A0 00 LDY #$00 +77E8- 8C 5F 78 STY $785F +77EB- B1 06 LDA ($06),Y +77ED- 8D 5B 78 STA $785B +77F0- AD 5C 78 LDA $785C +77F3- F0 5A BEQ $784F +77F5- AD 5D 78 LDA $785D +77F8- F0 58 BEQ $7852 +77FA- AD 5B 78 LDA $785B +77FD- CD 5D 78 CMP $785D +7800- 90 50 BCC $7852 +7802- AD 5D 78 LDA $785D +7805- 18 CLC +7806- 6D 5C 78 ADC $785C +7809- B0 11 BCS $781C +780B- 8D 5E 78 STA $785E +780E- AA TAX +780F- CA DEX +7810- EC 5B 78 CPX $785B +7813- 90 15 BCC $782A +7815- F0 05 BEQ $781C +7817- A9 FF LDA #$FF +7819- 8D 5F 78 STA $785F +781C- AE 5D 78 LDX $785D +781F- CA DEX +7820- 8E 5B 78 STX $785B +7823- AD 5F 78 LDA $785F +7826- F0 27 BEQ $784F +7828- D0 28 BNE $7852 +782A- AD 5B 78 LDA $785B +782D- 38 SEC +782E- ED 5E 78 SBC $785E +7831- AA TAX +7832- E8 INX +7833- F0 1A BEQ $784F +7835- AC 5E 78 LDY $785E +7838- B1 06 LDA ($06),Y +783A- AC 5D 78 LDY $785D +783D- 91 06 STA ($06),Y +783F- EE 5D 78 INC $785D +7842- EE 5E 78 INC $785E +7845- CA DEX +7846- D0 ED BNE $7835 +7848- AE 5D 78 LDX $785D +784B- CA DEX +784C- 8E 5B 78 STX $785B +784F- 18 CLC +7850- 90 01 BCC $7853 +7852- 38 SEC +7853- AD 5B 78 LDA $785B +7856- A0 00 LDY #$00 +7858- 91 06 STA ($06),Y +785A- 60 RTS +785B- 00 BRK +785C- 00 BRK +785D- 00 BRK +785E- 00 BRK +785F- 00 BRK +7860- 68 PLA +7861- A8 TAY +7862- 68 PLA +7863- AA TAX +7864- 68 PLA +7865- 85 08 STA $08 +7867- 68 PLA +7868- 85 09 STA $09 +786A- 68 PLA +786B- 8D 39 79 STA $7939 +786E- 68 PLA +786F- 8D 3A 79 STA $793A +7872- 68 PLA +7873- 85 06 STA $06 +7875- 68 PLA +7876- 85 07 STA $07 +7878- 8A TXA +7879- 48 PHA +787A- 98 TYA +787B- 48 PHA +787C- A9 00 LDA #$00 +787E- 8D 3D 79 STA $793D +7881- A0 00 LDY #$00 +7883- B1 06 LDA ($06),Y +7885- 8D 36 79 STA $7936 +7888- B1 08 LDA ($08),Y +788A- 8D 37 79 STA $7937 +788D- D0 03 BNE $7892 +788F- 4C 2A 79 JMP $792A +7892- AD 3A 79 LDA $793A +7895- D0 03 BNE $789A +7897- 4C 2D 79 JMP $792D +789A- AD 37 79 LDA $7937 +789D- 18 CLC +789E- 6D 36 79 ADC $7936 +78A1- B0 07 BCS $78AA +78A3- CD 39 79 CMP $7939 +78A6- 90 15 BCC $78BD +78A8- F0 13 BEQ $78BD +78AA- AD 39 79 LDA $7939 +78AD- 38 SEC +78AE- ED 36 79 SBC $7936 +78B1- 90 7A BCC $792D +78B3- F0 78 BEQ $792D +78B5- 8D 37 79 STA $7937 +78B8- A9 FF LDA #$FF +78BA- 8D 3D 79 STA $793D +78BD- AD 36 79 LDA $7936 +78C0- CD 3A 79 CMP $793A +78C3- B0 19 BCS $78DE +78C5- AE 36 79 LDX $7936 +78C8- E8 INX +78C9- 8E 3A 79 STX $793A +78CC- A9 FF LDA #$FF +78CE- 8D 3D 79 STA $793D +78D1- AD 36 79 LDA $7936 +78D4- 18 CLC +78D5- 6D 37 79 ADC $7937 +78D8- 8D 36 79 STA $7936 +78DB- 4C 0A 79 JMP $790A +78DE- AD 36 79 LDA $7936 +78E1- 38 SEC +78E2- ED 3A 79 SBC $793A +78E5- AA TAX +78E6- E8 INX +78E7- AD 36 79 LDA $7936 +78EA- 8D 3B 79 STA $793B +78ED- 18 CLC +78EE- 6D 37 79 ADC $7937 +78F1- 8D 3C 79 STA $793C +78F4- 8D 36 79 STA $7936 +78F7- AC 3B 79 LDY $793B +78FA- B1 06 LDA ($06),Y +78FC- AC 3C 79 LDY $793C +78FF- 91 06 STA ($06),Y +7901- CE 3B 79 DEC $793B +7904- CE 3C 79 DEC $793C +7907- CA DEX +7908- D0 ED BNE $78F7 +790A- A9 01 LDA #$01 +790C- 8D 3B 79 STA $793B +790F- AE 37 79 LDX $7937 +7912- AC 3B 79 LDY $793B +7915- B1 08 LDA ($08),Y +7917- AC 3A 79 LDY $793A +791A- 91 06 STA ($06),Y +791C- EE 3B 79 INC $793B +791F- EE 3A 79 INC $793A +7922- CA DEX +7923- D0 ED BNE $7912 +7925- AD 3D 79 LDA $793D +7928- D0 03 BNE $792D +792A- 18 CLC +792B- 90 01 BCC $792E +792D- 38 SEC +792E- AD 36 79 LDA $7936 +7931- A0 00 LDY #$00 +7933- 91 06 STA ($06),Y +7935- 60 RTS +7936- 00 BRK +7937- 00 BRK +7938- 00 BRK +7939- 00 BRK +793A- 00 BRK +793B- 00 BRK +793C- 00 BRK +793D- 00 BRK +793E- 68 PLA +793F- 85 FE STA $FE +7941- 68 PLA +7942- 85 FF STA $FF +7944- 68 PLA +7945- 85 08 STA $08 +7947- 68 PLA +7948- 85 09 STA $09 +794A- 68 PLA +794B- 85 06 STA $06 +794D- 68 PLA +794E- 85 07 STA $07 +7950- A5 FF LDA $FF +7952- 48 PHA +7953- A5 FE LDA $FE +7955- 48 PHA +7956- A0 00 LDY #$00 +7958- B1 06 LDA ($06),Y +795A- F0 5F BEQ $79BB +795C- 8D C6 79 STA $79C6 +795F- B1 08 LDA ($08),Y +7961- F0 58 BEQ $79BB +7963- 8D C7 79 STA $79C7 +7966- AD C7 79 LDA $79C7 +7969- CD C6 79 CMP $79C6 +796C- F0 02 BEQ $7970 +796E- B0 4B BCS $79BB +7970- A9 01 LDA #$01 +7972- 8D C8 79 STA $79C8 +7975- AD C6 79 LDA $79C6 +7978- 38 SEC +7979- ED C7 79 SBC $79C7 +797C- 8D CA 79 STA $79CA +797F- EE CA 79 INC $79CA +7982- AD C8 79 LDA $79C8 +7985- 8D CB 79 STA $79CB +7988- A9 01 LDA #$01 +798A- 8D C9 79 STA $79C9 +798D- AC CB 79 LDY $79CB +7990- B1 06 LDA ($06),Y +7992- AC C9 79 LDY $79C9 +7995- D1 08 CMP ($08),Y +7997- D0 12 BNE $79AB +7999- AC C9 79 LDY $79C9 +799C- CC C7 79 CPY $79C7 +799F- F0 14 BEQ $79B5 +79A1- C8 INY +79A2- 8C C9 79 STY $79C9 +79A5- EE CB 79 INC $79CB +79A8- 4C 8D 79 JMP $798D +79AB- EE C8 79 INC $79C8 +79AE- CE CA 79 DEC $79CA +79B1- D0 CF BNE $7982 +79B3- F0 06 BEQ $79BB +79B5- AD C8 79 LDA $79C8 +79B8- 4C BD 79 JMP $79BD +79BB- A9 00 LDA #$00 +79BD- 8D 40 60 STA $6040 +79C0- A0 01 LDY #$01 +79C2- 8C 3F 60 STY $603F +79C5- 60 RTS +79C6- 00 BRK +79C7- 00 BRK +79C8- 00 BRK +79C9- 00 BRK +79CA- 00 BRK +79CB- 00 BRK diff --git a/disks/disk5_strings/STRINGS.DEMO.S b/disks/disk5_strings/STRINGS.DEMO.S index 89bd50e..9f8b58a 100644 --- a/disks/disk5_strings/STRINGS.DEMO.S +++ b/disks/disk5_strings/STRINGS.DEMO.S @@ -72,7 +72,7 @@ 0993- C9 CF CMP #$CF 0995- CE 20 B0 DEC $B020 0998- B0 AE BCS $0948 -099A- B0 B2 BCS $094E +099A- B0 B3 BCS $094F 099C- AE B0 B0 LDX $B0B0 099F- 20 20 20 JSR $2020 09A2- 20 20 20 JSR $2020 @@ -93,11 +93,11 @@ 09CB- 20 20 20 JSR $2020 09CE- 20 20 20 JSR $2020 09D1- 20 20 B2 JSR $B220 -09D4- B1 AD LDA ($AD),Y -09D6- C4 C5 CPY $C5 -09D8- C3 ??? +09D4- B0 AD BCS $0983 +09D6- CA DEX +09D7- C1 CE CMP ($CE,X) 09D9- AD B2 B0 LDA $B0B2 -09DC- B1 B8 LDA ($B8),Y +09DC- B1 B9 LDA ($B9),Y 09DE- 20 20 20 JSR $2020 09E1- 20 20 20 JSR $2020 09E4- 20 20 20 JSR $2020 @@ -248,2441 +248,2576 @@ 0AEF- D9 C3 A0 CMP $A0C3,Y 0AF2- C1 D6 CMP ($D6,X) 0AF4- C5 8D CMP $8D -0AF6- A0 C5 LDY #$C5 -0AF8- D8 CLD -0AF9- D0 A0 BNE $0A9B -0AFB- CF ??? -0AFC- CE CC D9 DEC $D9CC -0AFF- 8D A0 C4 STA $C4A0 -0B02- D3 ??? -0B03- CB ??? -0B04- A0 D3 LDY #$D3 -0B06- D4 ??? -0B07- D2 C9 CMP ($C9) -0B09- CE C7 D3 DEC $D3C7 -0B0C- AE C4 C5 LDX $C5C4 -0B0F- CD CF 8D CMP $8DCF -0B12- AA TAX -0B13- 8D A0 CF STA $CFA0 -0B16- C2 ??? -0B17- CA DEX -0B18- A0 A4 LDY #$A4 -0B1A- C2 ??? -0B1B- C6 C5 DEC $C5 -0B1D- B0 8D BCS $0AAC -0B1F- A0 CF LDY #$CF -0B21- D2 C7 CMP ($C7) -0B23- A0 A4 LDY #$A4 -0B25- B6 B0 LDX $B0,Y -0B27- B0 B0 BCS $0AD9 -0B29- 8D AA 8D STA $8DAA -0B2C- AA TAX -0B2D- E0 E0 CPX #$E0 -0B2F- E0 E0 CPX #$E0 -0B31- E0 E0 CPX #$E0 -0B33- E0 E0 CPX #$E0 -0B35- E0 E0 CPX #$E0 -0B37- E0 E0 CPX #$E0 -0B39- E0 E0 CPX #$E0 -0B3B- E0 E0 CPX #$E0 -0B3D- E0 E0 CPX #$E0 -0B3F- E0 E0 CPX #$E0 -0B41- E0 E0 CPX #$E0 -0B43- E0 E0 CPX #$E0 -0B45- E0 E0 CPX #$E0 -0B47- E0 E0 CPX #$E0 -0B49- E0 E0 CPX #$E0 -0B4B- AA TAX -0B4C- 8D AA 20 STA $20AA -0B4F- 20 D4 CF JSR $CFD4 -0B52- D0 20 BNE $0B74 -0B54- C9 CE CMP #$CE -0B56- C3 ??? -0B57- CC D5 C4 CPY $C4D5 -0B5A- C5 D3 CMP $D3 -0B5C- 20 A8 D0 JSR $D0A8 -0B5F- D5 D4 CMP $D4,X -0B61- D3 ??? -0B62- AC 20 CD LDY $CD20 -0B65- C1 C3 CMP ($C3,X) -0B67- D2 CF CMP ($CF) -0B69- D3 ??? -0B6A- A9 20 LDA #$20 -0B6C- AA TAX -0B6D- 8D AA AC STA $ACAA -0B70- AC AC AC LDY $ACAC -0B73- AC AC AC LDY $ACAC -0B76- AC AC AC LDY $ACAC -0B79- AC AC AC LDY $ACAC -0B7C- AC AC AC LDY $ACAC -0B7F- AC AC AC LDY $ACAC -0B82- AC AC AC LDY $ACAC -0B85- AC AC AC LDY $ACAC -0B88- AC AC AC LDY $ACAC -0B8B- AC AC AA LDY $AAAC -0B8E- 8D AA 8D STA $8DAA -0B91- A0 D5 LDY #$D5 -0B93- D3 ??? -0B94- C5 A0 CMP $A0 -0B96- D2 C5 CMP ($C5) -0B98- D1 D5 CMP ($D5),Y -0B9A- C9 D2 CMP #$D2 -0B9C- C5 C4 CMP $C4 -0B9E- AE CD C1 LDX $C1CD -0BA1- C3 ??? -0BA2- 8D A0 D0 STA $D0A0 -0BA5- D5 D4 CMP $D4,X -0BA7- A0 D2 LDY #$D2 -0BA9- C5 D1 CMP $D1 -0BAB- D5 C9 CMP $C9,X -0BAD- D2 C5 CMP ($C5) -0BAF- C4 AE CPY $AE -0BB1- C8 INY -0BB2- CF ??? -0BB3- CF ??? -0BB4- CB ??? -0BB5- D3 ??? -0BB6- 8D AA 8D STA $8DAA -0BB9- A0 D5 LDY #$D5 -0BBB- D3 ??? -0BBC- C5 A0 CMP $A0 -0BBE- D3 ??? -0BBF- D4 ??? -0BC0- D2 C9 CMP ($C9) -0BC2- CE C7 D3 DEC $D3C7 -0BC5- AE CD C1 LDX $C1CD -0BC8- C3 ??? -0BC9- 8D A0 D0 STA $D0A0 -0BCC- D5 D4 CMP $D4,X -0BCE- A0 D3 LDY #$D3 -0BD0- D4 ??? -0BD1- D2 C9 CMP ($C9) -0BD3- CE C7 D3 DEC $D3C7 -0BD6- AE C8 CF LDX $CFC8 -0BD9- CF ??? -0BDA- CB ??? -0BDB- D3 ??? -0BDC- 8D AA 8D STA $8DAA -0BDF- AA TAX -0BE0- 8D AA E0 STA $E0AA -0BE3- E0 E0 CPX #$E0 -0BE5- E0 E0 CPX #$E0 -0BE7- E0 E0 CPX #$E0 -0BE9- E0 E0 CPX #$E0 -0BEB- E0 E0 CPX #$E0 -0BED- E0 E0 CPX #$E0 -0BEF- E0 E0 CPX #$E0 -0BF1- E0 E0 CPX #$E0 -0BF3- E0 E0 CPX #$E0 -0BF5- E0 E0 CPX #$E0 -0BF7- E0 E0 CPX #$E0 -0BF9- E0 E0 CPX #$E0 -0BFB- E0 E0 CPX #$E0 -0BFD- E0 E0 CPX #$E0 -0BFF- E0 AA CPX #$AA -0C01- 8D AA 20 STA $20AA -0C04- 20 20 20 JSR $2020 -0C07- 20 20 D0 JSR $D020 -0C0A- D2 CF CMP ($CF) -0C0C- C7 ??? -0C0D- D2 C1 CMP ($C1) -0C0F- CD 20 CD CMP $CD20 -0C12- C1 C9 CMP ($C9,X) -0C14- CE 20 C2 DEC $C220 -0C17- CF ??? -0C18- C4 D9 CPY $D9 -0C1A- 20 20 20 JSR $2020 -0C1D- 20 20 20 JSR $2020 -0C20- 20 AA 8D JSR $8DAA -0C23- AA TAX -0C24- AC AC AC LDY $ACAC -0C27- AC AC AC LDY $ACAC -0C2A- AC AC AC LDY $ACAC -0C2D- AC AC AC LDY $ACAC -0C30- AC AC AC LDY $ACAC -0C33- AC AC AC LDY $ACAC -0C36- AC AC AC LDY $ACAC -0C39- AC AC AC LDY $ACAC -0C3C- AC AC AC LDY $ACAC -0C3F- AC AC AC LDY $ACAC -0C42- AA TAX -0C43- 8D AA 8D STA $8DAA -0C46- A0 DF LDY #$DF -0C48- D0 D2 BNE $0C1C -0C4A- CE D4 A0 DEC $A0D4 -0C4D- A2 20 LDX #$20 -0C4F- A2 AC LDX #$AC -0C51- B8 CLV -0C52- C4 B8 CPY $B8 -0C54- C4 B8 CPY $B8 -0C56- C4 B8 CPY $B8 -0C58- C4 8D CPY $8D -0C5A- A0 DF LDY #$DF -0C5C- D0 D2 BNE $0C30 -0C5E- CE D4 A0 DEC $A0D4 -0C61- A2 D3 LDX #$D3 -0C63- D4 ??? -0C64- D2 C9 CMP ($C9) -0C66- CE C7 D3 DEC $D3C7 -0C69- 20 CC C9 JSR $C9CC -0C6C- C2 ??? -0C6D- D2 C1 CMP ($C1) -0C6F- D2 D9 CMP ($D9) -0C71- 20 C4 C5 JSR $C5C4 -0C74- CD CF A2 CMP $A2CF -0C77- AC B8 C4 LDY $C4B8 -0C7A- 8D A0 DF STA $DFA0 -0C7D- D0 D2 BNE $0C51 -0C7F- CE D4 A0 DEC $A0D4 -0C82- A2 AD LDX #$AD -0C84- AD AD AD LDA $ADAD -0C87- AD AD AD LDA $ADAD -0C8A- AD AD AD LDA $ADAD -0C8D- AD AD AD LDA $ADAD -0C90- AD AD AD LDA $ADAD -0C93- AD AD AD LDA $ADAD -0C96- AD A2 AC LDA $ACA2 -0C99- B8 CLV -0C9A- C4 8D CPY $8D -0C9C- A0 DF LDY #$DF -0C9E- D0 D2 BNE $0C72 -0CA0- CE D4 A0 DEC $A0D4 -0CA3- A2 20 LDX #$20 -0CA5- A2 AC LDX #$AC -0CA7- B8 CLV -0CA8- C4 8D CPY $8D -0CAA- A0 DF LDY #$DF -0CAC- D0 D2 BNE $0C80 -0CAE- CE D4 A0 DEC $A0D4 -0CB1- A2 D4 LDX #$D4 -0CB3- C8 INY -0CB4- C5 20 CMP $20 -0CB6- D3 ??? -0CB7- C3 ??? -0CB8- CD D0 20 CMP $20D0 -0CBB- CD C1 C3 CMP $C3C1 -0CBE- D2 CF CMP ($CF) -0CC0- 20 C3 CF JSR $CFC3 -0CC3- CD D0 C1 CMP $C1D0 -0CC6- D2 C5 CMP ($C5) -0CC8- D3 ??? -0CC9- 20 D4 D7 JSR $D7D4 -0CCC- CF ??? -0CCD- 20 A2 AC JSR $ACA2 -0CD0- B8 CLV -0CD1- C4 8D CPY $8D -0CD3- A0 DF LDY #$DF -0CD5- D0 D2 BNE $0CA9 -0CD7- CE D4 A0 DEC $A0D4 -0CDA- A2 D3 LDX #$D3 -0CDC- D4 ??? -0CDD- D2 C9 CMP ($C9) -0CDF- CE C7 D3 DEC $D3C7 -0CE2- 20 C1 CE JSR $CEC1 -0CE5- C4 20 CPY $20 -0CE7- D3 ??? -0CE8- C5 D4 CMP $D4 +0AF6- A0 D4 LDY #$D4 +0AF8- D2 A0 CMP ($A0) +0AFA- CF ??? +0AFB- CE 8D A0 DEC $A08D +0AFE- C5 D8 CMP $D8 +0B00- D0 A0 BNE $0AA2 +0B02- CF ??? +0B03- CE CC D9 DEC $D9CC +0B06- 8D A0 C4 STA $C4A0 +0B09- D3 ??? +0B0A- CB ??? +0B0B- A0 D3 LDY #$D3 +0B0D- D4 ??? +0B0E- D2 C9 CMP ($C9) +0B10- CE C7 D3 DEC $D3C7 +0B13- AE C4 C5 LDX $C5C4 +0B16- CD CF 8D CMP $8DCF +0B19- A0 CF LDY #$CF +0B1B- C2 ??? +0B1C- CA DEX +0B1D- A0 A4 LDY #$A4 +0B1F- C2 ??? +0B20- C6 C5 DEC $C5 +0B22- B0 8D BCS $0AB1 +0B24- A0 CF LDY #$CF +0B26- D2 C7 CMP ($C7) +0B28- A0 A4 LDY #$A4 +0B2A- B6 B0 LDX $B0,Y +0B2C- B0 B0 BCS $0ADE +0B2E- 8D AA 8D STA $8DAA +0B31- AA TAX +0B32- E0 E0 CPX #$E0 +0B34- E0 E0 CPX #$E0 +0B36- E0 E0 CPX #$E0 +0B38- E0 E0 CPX #$E0 +0B3A- E0 E0 CPX #$E0 +0B3C- E0 E0 CPX #$E0 +0B3E- E0 E0 CPX #$E0 +0B40- E0 E0 CPX #$E0 +0B42- E0 E0 CPX #$E0 +0B44- E0 E0 CPX #$E0 +0B46- E0 E0 CPX #$E0 +0B48- E0 E0 CPX #$E0 +0B4A- E0 E0 CPX #$E0 +0B4C- E0 E0 CPX #$E0 +0B4E- E0 E0 CPX #$E0 +0B50- AA TAX +0B51- 8D AA 20 STA $20AA +0B54- 20 D4 CF JSR $CFD4 +0B57- D0 20 BNE $0B79 +0B59- C9 CE CMP #$CE +0B5B- C3 ??? +0B5C- CC D5 C4 CPY $C4D5 +0B5F- C5 D3 CMP $D3 +0B61- 20 A8 D0 JSR $D0A8 +0B64- D5 D4 CMP $D4,X +0B66- D3 ??? +0B67- AC 20 CD LDY $CD20 +0B6A- C1 C3 CMP ($C3,X) +0B6C- D2 CF CMP ($CF) +0B6E- D3 ??? +0B6F- A9 20 LDA #$20 +0B71- AA TAX +0B72- 8D AA AC STA $ACAA +0B75- AC AC AC LDY $ACAC +0B78- AC AC AC LDY $ACAC +0B7B- AC AC AC LDY $ACAC +0B7E- AC AC AC LDY $ACAC +0B81- AC AC AC LDY $ACAC +0B84- AC AC AC LDY $ACAC +0B87- AC AC AC LDY $ACAC +0B8A- AC AC AC LDY $ACAC +0B8D- AC AC AC LDY $ACAC +0B90- AC AC AA LDY $AAAC +0B93- 8D AA 8D STA $8DAA +0B96- A0 D0 LDY #$D0 +0B98- D5 D4 CMP $D4,X +0B9A- A0 D2 LDY #$D2 +0B9C- C5 D1 CMP $D1 +0B9E- D5 C9 CMP $C9,X +0BA0- D2 C5 CMP ($C5) +0BA2- C4 AE CPY $AE +0BA4- D6 C1 DEC $C1,X +0BA6- D2 D3 CMP ($D3) +0BA8- 8D A0 D5 STA $D5A0 +0BAB- D3 ??? +0BAC- C5 A0 CMP $A0 +0BAE- D2 C5 CMP ($C5) +0BB0- D1 D5 CMP ($D5),Y +0BB2- C9 D2 CMP #$D2 +0BB4- C5 C4 CMP $C4 +0BB6- AE CD C1 LDX $C1CD +0BB9- C3 ??? +0BBA- AE CD C9 LDX $C9CD +0BBD- CE 8D A0 DEC $A08D +0BC0- D0 D5 BNE $0B97 +0BC2- D4 ??? +0BC3- A0 D2 LDY #$D2 +0BC5- C5 D1 CMP $D1 +0BC7- D5 C9 CMP $C9,X +0BC9- D2 C5 CMP ($C5) +0BCB- C4 AE CPY $AE +0BCD- C8 INY +0BCE- CF ??? +0BCF- CF ??? +0BD0- CB ??? +0BD1- D3 ??? +0BD2- AE CD C9 LDX $C9CD +0BD5- CE 8D A0 DEC $A08D +0BD8- D5 D3 CMP $D3,X +0BDA- C5 A0 CMP $A0 +0BDC- D3 ??? +0BDD- D4 ??? +0BDE- D2 C9 CMP ($C9) +0BE0- CE C7 D3 DEC $D3C7 +0BE3- AE CD C1 LDX $C1CD +0BE6- C3 ??? +0BE7- AE CD C9 LDX $C9CD +0BEA- CE 8D A0 DEC $A08D +0BED- D0 D5 BNE $0BC4 +0BEF- D4 ??? +0BF0- A0 D3 LDY #$D3 +0BF2- D4 ??? +0BF3- D2 C9 CMP ($C9) +0BF5- CE C7 D3 DEC $D3C7 +0BF8- AE C8 CF LDX $CFC8 +0BFB- CF ??? +0BFC- CB ??? +0BFD- D3 ??? +0BFE- 8D AA 8D STA $8DAA +0C01- AA TAX +0C02- 8D AA E0 STA $E0AA +0C05- E0 E0 CPX #$E0 +0C07- E0 E0 CPX #$E0 +0C09- E0 E0 CPX #$E0 +0C0B- E0 E0 CPX #$E0 +0C0D- E0 E0 CPX #$E0 +0C0F- E0 E0 CPX #$E0 +0C11- E0 E0 CPX #$E0 +0C13- E0 E0 CPX #$E0 +0C15- E0 E0 CPX #$E0 +0C17- E0 E0 CPX #$E0 +0C19- E0 E0 CPX #$E0 +0C1B- E0 E0 CPX #$E0 +0C1D- E0 E0 CPX #$E0 +0C1F- E0 E0 CPX #$E0 +0C21- E0 AA CPX #$AA +0C23- 8D AA 20 STA $20AA +0C26- 20 20 20 JSR $2020 +0C29- 20 20 D0 JSR $D020 +0C2C- D2 CF CMP ($CF) +0C2E- C7 ??? +0C2F- D2 C1 CMP ($C1) +0C31- CD 20 CD CMP $CD20 +0C34- C1 C9 CMP ($C9,X) +0C36- CE 20 C2 DEC $C220 +0C39- CF ??? +0C3A- C4 D9 CPY $D9 +0C3C- 20 20 20 JSR $2020 +0C3F- 20 20 20 JSR $2020 +0C42- 20 AA 8D JSR $8DAA +0C45- AA TAX +0C46- AC AC AC LDY $ACAC +0C49- AC AC AC LDY $ACAC +0C4C- AC AC AC LDY $ACAC +0C4F- AC AC AC LDY $ACAC +0C52- AC AC AC LDY $ACAC +0C55- AC AC AC LDY $ACAC +0C58- AC AC AC LDY $ACAC +0C5B- AC AC AC LDY $ACAC +0C5E- AC AC AC LDY $ACAC +0C61- AC AC AC LDY $ACAC +0C64- AA TAX +0C65- 8D AA 8D STA $8DAA +0C68- A0 DF LDY #$DF +0C6A- D0 D2 BNE $0C3E +0C6C- CE D4 A0 DEC $A0D4 +0C6F- A2 20 LDX #$20 +0C71- A2 AC LDX #$AC +0C73- B8 CLV +0C74- C4 B8 CPY $B8 +0C76- C4 B8 CPY $B8 +0C78- C4 B8 CPY $B8 +0C7A- C4 8D CPY $8D +0C7C- A0 DF LDY #$DF +0C7E- D0 D2 BNE $0C52 +0C80- CE D4 A0 DEC $A0D4 +0C83- A2 D3 LDX #$D3 +0C85- D4 ??? +0C86- D2 C9 CMP ($C9) +0C88- CE C7 D3 DEC $D3C7 +0C8B- 20 CC C9 JSR $C9CC +0C8E- C2 ??? +0C8F- D2 C1 CMP ($C1) +0C91- D2 D9 CMP ($D9) +0C93- 20 C4 C5 JSR $C5C4 +0C96- CD CF A2 CMP $A2CF +0C99- AC B8 C4 LDY $C4B8 +0C9C- 8D A0 DF STA $DFA0 +0C9F- D0 D2 BNE $0C73 +0CA1- CE D4 A0 DEC $A0D4 +0CA4- A2 AD LDX #$AD +0CA6- AD AD AD LDA $ADAD +0CA9- AD AD AD LDA $ADAD +0CAC- AD AD AD LDA $ADAD +0CAF- AD AD AD LDA $ADAD +0CB2- AD AD AD LDA $ADAD +0CB5- AD AD AD LDA $ADAD +0CB8- AD A2 AC LDA $ACA2 +0CBB- B8 CLV +0CBC- C4 8D CPY $8D +0CBE- A0 DF LDY #$DF +0CC0- D0 D2 BNE $0C94 +0CC2- CE D4 A0 DEC $A0D4 +0CC5- A2 20 LDX #$20 +0CC7- A2 AC LDX #$AC +0CC9- B8 CLV +0CCA- C4 8D CPY $8D +0CCC- A0 DF LDY #$DF +0CCE- D0 D2 BNE $0CA2 +0CD0- CE D4 A0 DEC $A0D4 +0CD3- A2 D4 LDX #$D4 +0CD5- C8 INY +0CD6- C5 20 CMP $20 +0CD8- D3 ??? +0CD9- C3 ??? +0CDA- CD D0 20 CMP $20D0 +0CDD- CD C1 C3 CMP $C3C1 +0CE0- D2 CF CMP ($CF) +0CE2- 20 C3 CF JSR $CFC3 +0CE5- CD D0 C1 CMP $C1D0 +0CE8- D2 C5 CMP ($C5) 0CEA- D3 ??? -0CEB- 20 D4 C8 JSR $C8D4 -0CEE- C5 20 CMP $20 -0CF0- C6 CC DEC $CC -0CF2- C1 C7 CMP ($C7,X) -0CF4- D3 ??? -0CF5- A2 AC LDX #$AC -0CF7- B8 CLV -0CF8- C4 8D CPY $8D -0CFA- A0 DF LDY #$DF -0CFC- D0 D2 BNE $0CD0 -0CFE- CE D4 A0 DEC $A0D4 -0D01- A2 C1 LDX #$C1 -0D03- C3 ??? -0D04- C3 ??? -0D05- CF ??? -0D06- D2 C4 CMP ($C4) -0D08- C9 CE CMP #$CE -0D0A- C7 ??? -0D0B- CC D9 AE CPY $AED9 -0D0E- 20 C9 C6 JSR $C6C9 -0D11- 20 D4 C8 JSR $C8D4 -0D14- C5 20 CMP $20 -0D16- D4 ??? -0D17- D7 ??? -0D18- CF ??? -0D19- 20 C1 D2 JSR $D2C1 -0D1C- C5 20 CMP $20 -0D1E- C5 D1 CMP $D1 -0D20- D5 C1 CMP $C1,X -0D22- CC AC A2 CPY $A2AC -0D25- AC B8 C4 LDY $C4B8 -0D28- 8D A0 DF STA $DFA0 -0D2B- D0 D2 BNE $0CFF -0D2D- CE D4 A0 DEC $A0D4 -0D30- A2 D4 LDX #$D4 -0D32- C8 INY -0D33- C5 CE CMP $CE -0D35- 20 AE DA JSR $DAAE -0D38- 20 C9 D3 JSR $D3C9 -0D3B- 20 D3 C5 JSR $C5D3 -0D3E- D4 ??? -0D3F- 20 D4 CF JSR $CFD4 -0D42- 20 DA C5 JSR $C5DA -0D45- D2 CF CMP ($CF) -0D47- BB ??? -0D48- 20 C9 C6 JSR $C6C9 -0D4B- 20 CE CF JSR $CFCE -0D4E- D4 ??? -0D4F- AC 20 B1 LDY $B120 -0D52- AE A2 AC LDX $ACA2 -0D55- B8 CLV -0D56- C4 B8 CPY $B8 -0D58- C4 8D CPY $8D -0D5A- A0 DF LDY #$DF -0D5C- D0 D2 BNE $0D30 -0D5E- CE D4 A0 DEC $A0D4 -0D61- A2 C9 LDX #$C9 -0D63- C6 20 DEC $20 -0D65- D3 ??? -0D66- D4 ??? -0D67- D2 C9 CMP ($C9) -0D69- CE C7 B1 DEC $B1C7 -0D6C- 20 CC C5 JSR $C5CC -0D6F- CE C7 D4 DEC $D4C7 -0D72- C8 INY -0D73- 20 BE 20 JSR $20BE -0D76- D3 ??? -0D77- D4 ??? -0D78- D2 C9 CMP ($C9) -0D7A- CE C7 B2 DEC $B2C7 -0D7D- 20 CC C5 JSR $C5CC -0D80- CE C7 D4 DEC $D4C7 -0D83- C8 INY -0D84- AC A2 AC LDY $ACA2 -0D87- B8 CLV -0D88- C4 8D CPY $8D -0D8A- A0 DF LDY #$DF -0D8C- D0 D2 BNE $0D60 -0D8E- CE D4 A0 DEC $A0D4 -0D91- A2 AE LDX #$AE -0D93- C3 ??? -0D94- A8 TAY -0D95- C1 D2 CMP ($D2,X) -0D97- D2 D9 CMP ($D9) -0D99- A9 20 LDA #$20 -0D9B- BD 20 B0 LDA $B020,X -0D9E- BB ??? -0D9F- 20 C5 CC JSR $CCC5 -0DA2- D3 ??? -0DA3- C5 AC CMP $AC -0DA5- 20 AE C3 JSR $C3AE -0DA8- 20 BD 20 JSR $20BD -0DAB- B1 AE LDA ($AE),Y -0DAD- A2 AC LDX #$AC -0DAF- B8 CLV -0DB0- C4 B8 CPY $B8 -0DB2- C4 8D CPY $8D -0DB4- A0 DF LDY #$DF -0DB6- D0 D2 BNE $0D8A -0DB8- CE D4 A0 DEC $A0D4 -0DBB- A2 D3 LDX #$D3 -0DBD- CF ??? -0DBE- AC 20 D7 LDY $D720 -0DC1- C5 20 CMP $20 -0DC3- C3 ??? -0DC4- C1 CE CMP ($CE,X) -0DC6- 20 C3 CF JSR $CFC3 -0DC9- CD D0 C1 CMP $C1D0 -0DCC- D2 C5 CMP ($C5) -0DCE- 20 D4 C8 JSR $C8D4 -0DD1- C5 20 CMP $20 -0DD3- CC C9 D4 CPY $D4C9 -0DD6- C5 D2 CMP $D2 -0DD8- C1 CC CMP ($CC,X) -0DDA- 20 A7 C1 JSR $C1A7 -0DDD- A7 ??? -0DDE- A2 AC LDX #$AC -0DE0- B8 CLV -0DE1- C4 8D CPY $8D -0DE3- A0 DF LDY #$DF -0DE5- D0 D2 BNE $0DB9 -0DE7- CE D4 A0 DEC $A0D4 -0DEA- A2 D4 LDX #$D4 -0DEC- CF ??? -0DED- 20 D4 C8 JSR $C8D4 -0DF0- C5 20 CMP $20 -0DF2- D6 C1 DEC $C1,X -0DF4- CC D5 C5 CPY $C5D5 -0DF7- 20 D3 D4 JSR $D4D3 -0DFA- CF ??? -0DFB- D2 C5 CMP ($C5) -0DFD- C4 20 CPY $20 -0DFF- C9 CE CMP #$CE -0E01- 20 C1 D3 JSR $D3C1 -0E04- D4 ??? -0E05- D2 AC CMP ($AC) -0E07- 20 D7 C8 JSR $C8D7 -0E0A- C9 C3 CMP #$C3 -0E0C- C8 INY -0E0D- A2 AC LDX #$AC -0E0F- B8 CLV -0E10- C4 8D CPY $8D -0E12- A0 DF LDY #$DF -0E14- D0 D2 BNE $0DE8 -0E16- CE D4 A0 DEC $A0D4 -0E19- A2 C8 LDX #$C8 -0E1B- CF ??? -0E1C- CC C4 D3 CPY $D3C4 -0E1F- 20 D4 C8 JSR $C8D4 -0E22- C5 20 CMP $20 -0E24- D3 ??? -0E25- C1 CD CMP ($CD,X) -0E27- C5 20 CMP $20 -0E29- D3 ??? -0E2A- D4 ??? -0E2B- D2 C9 CMP ($C9) -0E2D- CE C7 AC DEC $ACC7 -0E30- 20 D4 C8 JSR $C8D4 -0E33- C5 CE CMP $CE -0E35- 20 D5 D3 JSR $D3D5 -0E38- C5 20 CMP $20 -0E3A- C2 ??? -0E3B- CE C5 20 DEC $20C5 -0E3E- D4 ??? -0E3F- CF ??? -0E40- A2 AC LDX #$AC -0E42- B8 CLV -0E43- C4 8D CPY $8D -0E45- A0 DF LDY #$DF -0E47- D0 D2 BNE $0E1B -0E49- CE D4 A0 DEC $A0D4 -0E4C- A2 D4 LDX #$D4 -0E4E- C5 D3 CMP $D3 -0E50- D4 ??? -0E51- 20 C9 C6 JSR $C6C9 -0E54- 20 D4 C8 JSR $C8D4 -0E57- C5 D9 CMP $D9 -0E59- 20 C1 D2 JSR $D2C1 -0E5C- C5 20 CMP $20 -0E5E- C5 D1 CMP $D1 -0E60- D5 C1 CMP $C1,X -0E62- CC AE A2 CPY $A2AE -0E65- AC B8 C4 LDY $C4B8 -0E68- B8 CLV -0E69- C4 8D CPY $8D -0E6B- A0 D3 LDY #$D3 -0E6D- C3 ??? -0E6E- CD D0 A0 CMP $A0D0 -0E71- A2 C1 LDX #$C1 -0E73- A2 BB LDX #$BB -0E75- C1 D3 CMP ($D3,X) -0E77- D4 ??? -0E78- D2 8D CMP ($8D) -0E7A- A0 C2 LDY #$C2 -0E7C- CE C5 A0 DEC $A0C5 -0E7F- D0 C5 BNE $0E46 -0E81- A0 BB LDY #$BB -0E83- 20 C9 D3 JSR $D3C9 -0E86- 20 DA C5 JSR $C5DA -0E89- D2 CF CMP ($CF) -0E8B- 20 C6 CC JSR $CCC6 -0E8E- C1 C7 CMP ($C7,X) -0E90- 20 B1 BF JSR $BFB1 -0E93- 20 C2 D2 JSR $D2C2 -0E96- C1 CE CMP ($CE,X) -0E98- C3 ??? -0E99- C8 INY -0E9A- 20 C9 C6 JSR $C6C9 -0E9D- 20 D3 CF JSR $CFD3 -0EA0- 8D A0 CA STA $CAA0 -0EA3- CD D0 A0 CMP $A0D0 -0EA6- C3 ??? -0EA7- CF ??? -0EA8- CE D4 8D DEC $8DD4 -0EAB- D0 C5 BNE $0E72 -0EAD- 8D A0 DF STA $DFA0 -0EB0- D0 D2 BNE $0E84 -0EB2- CE D4 A0 DEC $A0D4 -0EB5- A2 D4 LDX #$D4 -0EB7- C8 INY -0EB8- C5 20 CMP $20 -0EBA- CC C9 D4 CPY $D4C9 -0EBD- C5 D2 CMP $D2 -0EBF- C1 CC CMP ($CC,X) -0EC1- 20 C1 20 JSR $20C1 -0EC4- C1 CE CMP ($CE,X) -0EC6- C4 20 CPY $20 -0EC8- D4 ??? -0EC9- C8 INY -0ECA- C5 20 CMP $20 -0ECC- C1 20 CMP ($20,X) -0ECE- D3 ??? -0ECF- D4 ??? -0ED0- D2 C9 CMP ($C9) -0ED2- CE C7 20 DEC $20C7 -0ED5- C1 D2 CMP ($D2,X) -0ED7- C5 A2 CMP $A2 -0ED9- AC B8 C4 LDY $C4B8 -0EDC- 8D A0 DF STA $DFA0 -0EDF- D0 D2 BNE $0EB3 -0EE1- CE D4 A0 DEC $A0D4 -0EE4- A2 C5 LDX #$C5 -0EE6- D1 D5 CMP ($D5),Y -0EE8- C1 CC CMP ($CC,X) -0EEA- AE A2 AC LDX $ACA2 -0EED- B8 CLV -0EEE- C4 B8 CPY $B8 -0EF0- C4 B8 CPY $B8 -0EF2- C4 8D CPY $8D -0EF4- C3 ??? -0EF5- CF ??? -0EF6- CE D4 8D DEC $8DD4 -0EF9- A0 DF LDY #$DF -0EFB- D7 ??? -0EFC- C1 C9 CMP ($C9,X) -0EFE- D4 ??? -0EFF- 8D A0 DF STA $DFA0 -0F02- D0 D2 BNE $0ED6 -0F04- CE D4 A0 DEC $A0D4 -0F07- A2 CE LDX #$CE -0F09- CF ??? -0F0A- D4 ??? -0F0B- C5 20 CMP $20 -0F0D- D4 ??? -0F0E- C8 INY -0F0F- C1 D4 CMP ($D4,X) -0F11- 20 CF CE JSR $CECF -0F14- CC D9 20 CPY $20D9 -0F17- C1 20 CMP ($20,X) -0F19- D3 ??? -0F1A- C9 CE CMP #$CE -0F1C- C7 ??? -0F1D- CC C5 20 CPY $20C5 -0F20- D0 C1 BNE $0EE3 -0F22- D2 C1 CMP ($C1) -0F24- CD C5 D4 CMP $D4C5 -0F27- C5 D2 CMP $D2 -0F29- A2 AC LDX #$AC -0F2B- B8 CLV -0F2C- C4 8D CPY $8D -0F2E- A0 DF LDY #$DF -0F30- D0 D2 BNE $0F04 -0F32- CE D4 A0 DEC $A0D4 -0F35- A2 CD LDX #$CD -0F37- C1 D9 CMP ($D9,X) -0F39- 20 C2 C5 JSR $C5C2 -0F3C- 20 C1 20 JSR $20C1 -0F3F- CC C9 D4 CPY $D4C9 -0F42- C5 D2 CMP $D2 -0F44- C1 CC CMP ($CC,X) -0F46- 20 D3 D4 JSR $D4D3 -0F49- D2 C9 CMP ($C9) -0F4B- CE C7 20 DEC $20C7 -0F4E- C9 CE CMP #$CE -0F50- 20 D3 C3 JSR $C3D3 -0F53- CD D0 BB CMP $BBD0 -0F56- A2 AC LDX #$AC -0F58- B8 CLV -0F59- C4 8D CPY $8D -0F5B- A0 DF LDY #$DF -0F5D- D0 D2 BNE $0F31 -0F5F- CE D4 A0 DEC $A0D4 -0F62- A2 D4 LDX #$D4 -0F64- C8 INY -0F65- C9 D3 CMP #$D3 -0F67- 20 D3 C1 JSR $C1D3 -0F6A- CD C5 20 CMP $20C5 -0F6D- D2 D5 CMP ($D5) -0F6F- CC C5 20 CPY $20C5 -0F72- C1 D0 CMP ($D0,X) -0F74- D0 CC BNE $0F42 -0F76- C9 C5 CMP #$C5 -0F78- D3 ??? -0F79- 20 D4 CF JSR $CFD4 -0F7C- 20 C1 CC JSR $CCC1 -0F7F- CC 20 CD CPY $CD20 -0F82- C1 C3 CMP ($C3,X) -0F84- D2 CF CMP ($CF) -0F86- D3 ??? -0F87- A2 AC LDX #$AC -0F89- B8 CLV -0F8A- C4 8D CPY $8D -0F8C- A0 DF LDY #$DF -0F8E- D0 D2 BNE $0F62 -0F90- CE D4 A0 DEC $A0D4 -0F93- A2 D4 LDX #$D4 -0F95- C8 INY -0F96- C1 D4 CMP ($D4,X) -0F98- 20 C1 C3 JSR $C3C1 -0F9B- C3 ??? -0F9C- C5 D0 CMP $D0 -0F9E- D4 ??? -0F9F- 20 D3 D4 JSR $D4D3 -0FA2- D2 C9 CMP ($C9) -0FA4- CE C7 D3 DEC $D3C7 -0FA7- 20 C1 D3 JSR $D3C1 -0FAA- 20 D0 C1 JSR $C1D0 -0FAD- D2 C1 CMP ($C1) -0FAF- CD C5 D4 CMP $D4C5 -0FB2- C5 D2 CMP $D2 -0FB4- D3 ??? -0FB5- AE A2 AC LDX $ACA2 -0FB8- B8 CLV -0FB9- C4 B8 CPY $B8 -0FBB- C4 8D CPY $8D -0FBD- A0 DF LDY #$DF -0FBF- D0 D2 BNE $0F93 -0FC1- CE D4 A0 DEC $A0D4 -0FC4- A2 D9 LDX #$D9 -0FC6- CF ??? -0FC7- D5 20 CMP $20,X -0FC9- C3 ??? -0FCA- C1 CE CMP ($CE,X) -0FCC- 20 C1 CC JSR $CCC1 -0FCF- D3 ??? -0FD0- CF ??? -0FD1- 20 D5 D3 JSR $D3D5 -0FD4- C5 20 CMP $20 +0CEB- 20 D4 D7 JSR $D7D4 +0CEE- CF ??? +0CEF- 20 A2 AC JSR $ACA2 +0CF2- B8 CLV +0CF3- C4 8D CPY $8D +0CF5- A0 DF LDY #$DF +0CF7- D0 D2 BNE $0CCB +0CF9- CE D4 A0 DEC $A0D4 +0CFC- A2 D3 LDX #$D3 +0CFE- D4 ??? +0CFF- D2 C9 CMP ($C9) +0D01- CE C7 D3 DEC $D3C7 +0D04- 20 C1 CE JSR $CEC1 +0D07- C4 20 CPY $20 +0D09- D3 ??? +0D0A- C5 D4 CMP $D4 +0D0C- D3 ??? +0D0D- 20 D4 C8 JSR $C8D4 +0D10- C5 20 CMP $20 +0D12- C6 CC DEC $CC +0D14- C1 C7 CMP ($C7,X) +0D16- D3 ??? +0D17- A2 AC LDX #$AC +0D19- B8 CLV +0D1A- C4 8D CPY $8D +0D1C- A0 DF LDY #$DF +0D1E- D0 D2 BNE $0CF2 +0D20- CE D4 A0 DEC $A0D4 +0D23- A2 C1 LDX #$C1 +0D25- C3 ??? +0D26- C3 ??? +0D27- CF ??? +0D28- D2 C4 CMP ($C4) +0D2A- C9 CE CMP #$CE +0D2C- C7 ??? +0D2D- CC D9 AE CPY $AED9 +0D30- 20 C9 C6 JSR $C6C9 +0D33- 20 D4 C8 JSR $C8D4 +0D36- C5 20 CMP $20 +0D38- D4 ??? +0D39- D7 ??? +0D3A- CF ??? +0D3B- 20 C1 D2 JSR $D2C1 +0D3E- C5 20 CMP $20 +0D40- C5 D1 CMP $D1 +0D42- D5 C1 CMP $C1,X +0D44- CC AC A2 CPY $A2AC +0D47- AC B8 C4 LDY $C4B8 +0D4A- 8D A0 DF STA $DFA0 +0D4D- D0 D2 BNE $0D21 +0D4F- CE D4 A0 DEC $A0D4 +0D52- A2 D4 LDX #$D4 +0D54- C8 INY +0D55- C5 CE CMP $CE +0D57- 20 AE DA JSR $DAAE +0D5A- 20 C9 D3 JSR $D3C9 +0D5D- 20 D3 C5 JSR $C5D3 +0D60- D4 ??? +0D61- 20 D4 CF JSR $CFD4 +0D64- 20 DA C5 JSR $C5DA +0D67- D2 CF CMP ($CF) +0D69- BB ??? +0D6A- 20 C9 C6 JSR $C6C9 +0D6D- 20 CE CF JSR $CFCE +0D70- D4 ??? +0D71- AC 20 B1 LDY $B120 +0D74- AE A2 AC LDX $ACA2 +0D77- B8 CLV +0D78- C4 B8 CPY $B8 +0D7A- C4 8D CPY $8D +0D7C- A0 DF LDY #$DF +0D7E- D0 D2 BNE $0D52 +0D80- CE D4 A0 DEC $A0D4 +0D83- A2 C9 LDX #$C9 +0D85- C6 20 DEC $20 +0D87- D3 ??? +0D88- D4 ??? +0D89- D2 C9 CMP ($C9) +0D8B- CE C7 B1 DEC $B1C7 +0D8E- 20 CC C5 JSR $C5CC +0D91- CE C7 D4 DEC $D4C7 +0D94- C8 INY +0D95- 20 BE 20 JSR $20BE +0D98- D3 ??? +0D99- D4 ??? +0D9A- D2 C9 CMP ($C9) +0D9C- CE C7 B2 DEC $B2C7 +0D9F- 20 CC C5 JSR $C5CC +0DA2- CE C7 D4 DEC $D4C7 +0DA5- C8 INY +0DA6- AC A2 AC LDY $ACA2 +0DA9- B8 CLV +0DAA- C4 8D CPY $8D +0DAC- A0 DF LDY #$DF +0DAE- D0 D2 BNE $0D82 +0DB0- CE D4 A0 DEC $A0D4 +0DB3- A2 AE LDX #$AE +0DB5- C3 ??? +0DB6- A8 TAY +0DB7- C1 D2 CMP ($D2,X) +0DB9- D2 D9 CMP ($D9) +0DBB- A9 20 LDA #$20 +0DBD- BD 20 B0 LDA $B020,X +0DC0- BB ??? +0DC1- 20 C5 CC JSR $CCC5 +0DC4- D3 ??? +0DC5- C5 AC CMP $AC +0DC7- 20 AE C3 JSR $C3AE +0DCA- 20 BD 20 JSR $20BD +0DCD- B1 AE LDA ($AE),Y +0DCF- A2 AC LDX #$AC +0DD1- B8 CLV +0DD2- C4 B8 CPY $B8 +0DD4- C4 8D CPY $8D +0DD6- A0 DF LDY #$DF +0DD8- D0 D2 BNE $0DAC +0DDA- CE D4 A0 DEC $A0D4 +0DDD- A2 D3 LDX #$D3 +0DDF- CF ??? +0DE0- AC 20 D7 LDY $D720 +0DE3- C5 20 CMP $20 +0DE5- C3 ??? +0DE6- C1 CE CMP ($CE,X) +0DE8- 20 C3 CF JSR $CFC3 +0DEB- CD D0 C1 CMP $C1D0 +0DEE- D2 C5 CMP ($C5) +0DF0- 20 D4 C8 JSR $C8D4 +0DF3- C5 20 CMP $20 +0DF5- CC C9 D4 CPY $D4C9 +0DF8- C5 D2 CMP $D2 +0DFA- C1 CC CMP ($CC,X) +0DFC- 20 A7 C1 JSR $C1A7 +0DFF- A7 ??? +0E00- A2 AC LDX #$AC +0E02- B8 CLV +0E03- C4 8D CPY $8D +0E05- A0 DF LDY #$DF +0E07- D0 D2 BNE $0DDB +0E09- CE D4 A0 DEC $A0D4 +0E0C- A2 D4 LDX #$D4 +0E0E- CF ??? +0E0F- 20 D4 C8 JSR $C8D4 +0E12- C5 20 CMP $20 +0E14- D6 C1 DEC $C1,X +0E16- CC D5 C5 CPY $C5D5 +0E19- 20 D3 D4 JSR $D4D3 +0E1C- CF ??? +0E1D- D2 C5 CMP ($C5) +0E1F- C4 20 CPY $20 +0E21- C9 CE CMP #$CE +0E23- 20 C1 D3 JSR $D3C1 +0E26- D4 ??? +0E27- D2 AC CMP ($AC) +0E29- 20 D7 C8 JSR $C8D7 +0E2C- C9 C3 CMP #$C3 +0E2E- C8 INY +0E2F- A2 AC LDX #$AC +0E31- B8 CLV +0E32- C4 8D CPY $8D +0E34- A0 DF LDY #$DF +0E36- D0 D2 BNE $0E0A +0E38- CE D4 A0 DEC $A0D4 +0E3B- A2 C8 LDX #$C8 +0E3D- CF ??? +0E3E- CC C4 D3 CPY $D3C4 +0E41- 20 D4 C8 JSR $C8D4 +0E44- C5 20 CMP $20 +0E46- D3 ??? +0E47- C1 CD CMP ($CD,X) +0E49- C5 20 CMP $20 +0E4B- D3 ??? +0E4C- D4 ??? +0E4D- D2 C9 CMP ($C9) +0E4F- CE C7 AC DEC $ACC7 +0E52- 20 D4 C8 JSR $C8D4 +0E55- C5 CE CMP $CE +0E57- 20 D5 D3 JSR $D3D5 +0E5A- C5 20 CMP $20 +0E5C- C2 ??? +0E5D- CE C5 20 DEC $20C5 +0E60- D4 ??? +0E61- CF ??? +0E62- A2 AC LDX #$AC +0E64- B8 CLV +0E65- C4 8D CPY $8D +0E67- A0 DF LDY #$DF +0E69- D0 D2 BNE $0E3D +0E6B- CE D4 A0 DEC $A0D4 +0E6E- A2 D4 LDX #$D4 +0E70- C5 D3 CMP $D3 +0E72- D4 ??? +0E73- 20 C9 C6 JSR $C6C9 +0E76- 20 D4 C8 JSR $C8D4 +0E79- C5 D9 CMP $D9 +0E7B- 20 C1 D2 JSR $D2C1 +0E7E- C5 20 CMP $20 +0E80- C5 D1 CMP $D1 +0E82- D5 C1 CMP $C1,X +0E84- CC AE A2 CPY $A2AE +0E87- AC B8 C4 LDY $C4B8 +0E8A- B8 CLV +0E8B- C4 8D CPY $8D +0E8D- A0 D3 LDY #$D3 +0E8F- C3 ??? +0E90- CD D0 A0 CMP $A0D0 +0E93- A2 C1 LDX #$C1 +0E95- A2 BB LDX #$BB +0E97- C1 D3 CMP ($D3,X) +0E99- D4 ??? +0E9A- D2 8D CMP ($8D) +0E9C- A0 C2 LDY #$C2 +0E9E- CE C5 A0 DEC $A0C5 +0EA1- D0 C5 BNE $0E68 +0EA3- A0 BB LDY #$BB +0EA5- 20 C9 D3 JSR $D3C9 +0EA8- 20 DA C5 JSR $C5DA +0EAB- D2 CF CMP ($CF) +0EAD- 20 C6 CC JSR $CCC6 +0EB0- C1 C7 CMP ($C7,X) +0EB2- 20 B1 BF JSR $BFB1 +0EB5- 20 C2 D2 JSR $D2C2 +0EB8- C1 CE CMP ($CE,X) +0EBA- C3 ??? +0EBB- C8 INY +0EBC- 20 C9 C6 JSR $C6C9 +0EBF- 20 D3 CF JSR $CFD3 +0EC2- 8D A0 CA STA $CAA0 +0EC5- CD D0 A0 CMP $A0D0 +0EC8- C3 ??? +0EC9- CF ??? +0ECA- CE D4 8D DEC $8DD4 +0ECD- D0 C5 BNE $0E94 +0ECF- 8D A0 DF STA $DFA0 +0ED2- D0 D2 BNE $0EA6 +0ED4- CE D4 A0 DEC $A0D4 +0ED7- A2 D4 LDX #$D4 +0ED9- C8 INY +0EDA- C5 20 CMP $20 +0EDC- CC C9 D4 CPY $D4C9 +0EDF- C5 D2 CMP $D2 +0EE1- C1 CC CMP ($CC,X) +0EE3- 20 C1 20 JSR $20C1 +0EE6- C1 CE CMP ($CE,X) +0EE8- C4 20 CPY $20 +0EEA- D4 ??? +0EEB- C8 INY +0EEC- C5 20 CMP $20 +0EEE- C1 20 CMP ($20,X) +0EF0- D3 ??? +0EF1- D4 ??? +0EF2- D2 C9 CMP ($C9) +0EF4- CE C7 20 DEC $20C7 +0EF7- C1 D2 CMP ($D2,X) +0EF9- C5 A2 CMP $A2 +0EFB- AC B8 C4 LDY $C4B8 +0EFE- 8D A0 DF STA $DFA0 +0F01- D0 D2 BNE $0ED5 +0F03- CE D4 A0 DEC $A0D4 +0F06- A2 C5 LDX #$C5 +0F08- D1 D5 CMP ($D5),Y +0F0A- C1 CC CMP ($CC,X) +0F0C- AE A2 AC LDX $ACA2 +0F0F- B8 CLV +0F10- C4 B8 CPY $B8 +0F12- C4 B8 CPY $B8 +0F14- C4 8D CPY $8D +0F16- C3 ??? +0F17- CF ??? +0F18- CE D4 8D DEC $8DD4 +0F1B- A0 DF LDY #$DF +0F1D- D7 ??? +0F1E- C1 C9 CMP ($C9,X) +0F20- D4 ??? +0F21- 8D A0 DF STA $DFA0 +0F24- D0 D2 BNE $0EF8 +0F26- CE D4 A0 DEC $A0D4 +0F29- A2 CE LDX #$CE +0F2B- CF ??? +0F2C- D4 ??? +0F2D- C5 20 CMP $20 +0F2F- D4 ??? +0F30- C8 INY +0F31- C1 D4 CMP ($D4,X) +0F33- 20 CF CE JSR $CECF +0F36- CC D9 20 CPY $20D9 +0F39- C1 20 CMP ($20,X) +0F3B- D3 ??? +0F3C- C9 CE CMP #$CE +0F3E- C7 ??? +0F3F- CC C5 20 CPY $20C5 +0F42- D0 C1 BNE $0F05 +0F44- D2 C1 CMP ($C1) +0F46- CD C5 D4 CMP $D4C5 +0F49- C5 D2 CMP $D2 +0F4B- A2 AC LDX #$AC +0F4D- B8 CLV +0F4E- C4 8D CPY $8D +0F50- A0 DF LDY #$DF +0F52- D0 D2 BNE $0F26 +0F54- CE D4 A0 DEC $A0D4 +0F57- A2 CD LDX #$CD +0F59- C1 D9 CMP ($D9,X) +0F5B- 20 C2 C5 JSR $C5C2 +0F5E- 20 C1 20 JSR $20C1 +0F61- CC C9 D4 CPY $D4C9 +0F64- C5 D2 CMP $D2 +0F66- C1 CC CMP ($CC,X) +0F68- 20 D3 D4 JSR $D4D3 +0F6B- D2 C9 CMP ($C9) +0F6D- CE C7 20 DEC $20C7 +0F70- C9 CE CMP #$CE +0F72- 20 D3 C3 JSR $C3D3 +0F75- CD D0 BB CMP $BBD0 +0F78- A2 AC LDX #$AC +0F7A- B8 CLV +0F7B- C4 8D CPY $8D +0F7D- A0 DF LDY #$DF +0F7F- D0 D2 BNE $0F53 +0F81- CE D4 A0 DEC $A0D4 +0F84- A2 D4 LDX #$D4 +0F86- C8 INY +0F87- C9 D3 CMP #$D3 +0F89- 20 D3 C1 JSR $C1D3 +0F8C- CD C5 20 CMP $20C5 +0F8F- D2 D5 CMP ($D5) +0F91- CC C5 20 CPY $20C5 +0F94- C1 D0 CMP ($D0,X) +0F96- D0 CC BNE $0F64 +0F98- C9 C5 CMP #$C5 +0F9A- D3 ??? +0F9B- 20 D4 CF JSR $CFD4 +0F9E- 20 C1 CC JSR $CCC1 +0FA1- CC 20 CD CPY $CD20 +0FA4- C1 C3 CMP ($C3,X) +0FA6- D2 CF CMP ($CF) +0FA8- D3 ??? +0FA9- A2 AC LDX #$AC +0FAB- B8 CLV +0FAC- C4 8D CPY $8D +0FAE- A0 DF LDY #$DF +0FB0- D0 D2 BNE $0F84 +0FB2- CE D4 A0 DEC $A0D4 +0FB5- A2 D4 LDX #$D4 +0FB7- C8 INY +0FB8- C1 D4 CMP ($D4,X) +0FBA- 20 C1 C3 JSR $C3C1 +0FBD- C3 ??? +0FBE- C5 D0 CMP $D0 +0FC0- D4 ??? +0FC1- 20 D3 D4 JSR $D4D3 +0FC4- D2 C9 CMP ($C9) +0FC6- CE C7 D3 DEC $D3C7 +0FC9- 20 C1 D3 JSR $D3C1 +0FCC- 20 D0 C1 JSR $C1D0 +0FCF- D2 C1 CMP ($C1) +0FD1- CD C5 D4 CMP $D4C5 +0FD4- C5 D2 CMP $D2 0FD6- D3 ??? -0FD7- C3 ??? -0FD8- CD D0 20 CMP $20D0 -0FDB- D4 ??? -0FDC- CF ??? -0FDD- 20 C3 CF JSR $CFC3 -0FE0- CD D0 C1 CMP $C1D0 -0FE3- D2 C5 CMP ($C5) -0FE5- A2 AC LDX #$AC -0FE7- B8 CLV -0FE8- C4 8D CPY $8D -0FEA- A0 DF LDY #$DF -0FEC- D0 D2 BNE $0FC0 -0FEE- CE D4 A0 DEC $A0D4 -0FF1- A2 D4 LDX #$D4 -0FF3- C8 INY -0FF4- C5 20 CMP $20 -0FF6- CC C5 CE CPY $CEC5 -0FF9- C7 ??? -0FFA- D4 ??? -0FFB- C8 INY -0FFC- D3 ??? -0FFD- 20 CF C6 JSR $C6CF -1000- 20 D4 D7 JSR $D7D4 -1003- CF ??? -1004- 20 C4 C9 JSR $C9C4 -1007- C6 C6 DEC $C6 -1009- C5 D2 CMP $D2 -100B- C5 CE CMP $CE -100D- D4 ??? -100E- 20 D3 D4 JSR $D4D3 -1011- D2 C9 CMP ($C9) -1013- CE C7 D3 DEC $D3C7 -1016- AE A2 AC LDX $ACA2 -1019- B8 CLV -101A- C4 B8 CPY $B8 -101C- C4 8D CPY $8D -101E- A0 DF LDY #$DF -1020- D0 D2 BNE $0FF4 -1022- CE D4 A0 DEC $A0D4 -1025- A2 D4 LDX #$D4 -1027- C8 INY -1028- C5 20 CMP $20 -102A- C3 ??? -102B- C1 D2 CMP ($D2,X) -102D- D2 D9 CMP ($D9) -102F- 20 C6 CC JSR $CCC6 -1032- C1 C7 CMP ($C7,X) -1034- 20 C9 D3 JSR $D3C9 -1037- 20 D3 C5 JSR $C5D3 -103A- D4 ??? -103B- 20 D4 CF JSR $CFD4 -103E- 20 B0 20 JSR $20B0 -1041- C9 C6 CMP #$C6 -1043- 20 D4 C8 JSR $C8D4 -1046- C5 A2 CMP $A2 -1048- AC B8 C4 LDY $C4B8 -104B- 8D A0 DF STA $DFA0 -104E- D0 D2 BNE $1022 -1050- CE D4 A0 DEC $A0D4 -1053- A2 C6 LDX #$C6 -1055- C9 D2 CMP #$D2 -1057- D3 ??? -1058- D4 ??? -1059- 20 D3 D4 JSR $D4D3 -105C- D2 C9 CMP ($C9) -105E- CE C7 20 DEC $20C7 -1061- C8 INY -1062- C1 D3 CMP ($D3,X) -1064- 20 C1 20 JSR $20C1 -1067- CC C5 CE CPY $CEC5 -106A- C7 ??? -106B- D4 ??? -106C- C8 INY -106D- 20 BE 20 JSR $20BE -1070- D4 ??? -1071- C8 INY -1072- C1 CE CMP ($CE,X) -1074- 20 D4 C8 JSR $C8D4 -1077- C5 20 CMP $20 -1079- A2 AC LDX #$AC -107B- B8 CLV -107C- C4 8D CPY $8D -107E- A0 DF LDY #$DF -1080- D0 D2 BNE $1054 -1082- CE D4 A0 DEC $A0D4 -1085- A2 D3 LDX #$D3 -1087- C5 C3 CMP $C3 -1089- CF ??? -108A- CE C4 20 DEC $20C4 -108D- D3 ??? -108E- D4 ??? -108F- D2 C9 CMP ($C9) -1091- CE C7 A7 DEC $A7C7 -1094- D3 ??? -1095- 20 CC C5 JSR $C5CC -1098- CE C7 D4 DEC $D4C7 -109B- C8 INY -109C- AE 20 D4 LDX $D420 -109F- C8 INY -10A0- C9 D3 CMP #$D3 -10A2- 20 C3 C1 JSR $C1C3 -10A5- CE 20 D4 DEC $D420 -10A8- C8 INY -10A9- C5 CE CMP $CE -10AB- A2 AC LDX #$AC -10AD- B8 CLV -10AE- C4 8D CPY $8D -10B0- A0 DF LDY #$DF -10B2- D0 D2 BNE $1086 -10B4- CE D4 A0 DEC $A0D4 -10B7- A2 C2 LDX #$C2 -10B9- C5 20 CMP $20 -10BB- D4 ??? -10BC- C5 D3 CMP $D3 -10BE- D4 ??? -10BF- C5 C4 CMP $C4 -10C1- 20 D7 C9 JSR $C9D7 -10C4- D4 ??? -10C5- C8 INY -10C6- 20 C2 C3 JSR $C3C2 -10C9- D3 ??? -10CA- AE A2 AC LDX $ACA2 -10CD- B8 CLV -10CE- C4 B8 CPY $B8 +0FD7- AE A2 AC LDX $ACA2 +0FDA- B8 CLV +0FDB- C4 B8 CPY $B8 +0FDD- C4 8D CPY $8D +0FDF- A0 DF LDY #$DF +0FE1- D0 D2 BNE $0FB5 +0FE3- CE D4 A0 DEC $A0D4 +0FE6- A2 D9 LDX #$D9 +0FE8- CF ??? +0FE9- D5 20 CMP $20,X +0FEB- C3 ??? +0FEC- C1 CE CMP ($CE,X) +0FEE- 20 C1 CC JSR $CCC1 +0FF1- D3 ??? +0FF2- CF ??? +0FF3- 20 D5 D3 JSR $D3D5 +0FF6- C5 20 CMP $20 +0FF8- D3 ??? +0FF9- C3 ??? +0FFA- CD D0 20 CMP $20D0 +0FFD- D4 ??? +0FFE- CF ??? +0FFF- 20 C3 CF JSR $CFC3 +1002- CD D0 C1 CMP $C1D0 +1005- D2 C5 CMP ($C5) +1007- A2 AC LDX #$AC +1009- B8 CLV +100A- C4 8D CPY $8D +100C- A0 DF LDY #$DF +100E- D0 D2 BNE $0FE2 +1010- CE D4 A0 DEC $A0D4 +1013- A2 D4 LDX #$D4 +1015- C8 INY +1016- C5 20 CMP $20 +1018- CC C5 CE CPY $CEC5 +101B- C7 ??? +101C- D4 ??? +101D- C8 INY +101E- D3 ??? +101F- 20 CF C6 JSR $C6CF +1022- 20 D4 D7 JSR $D7D4 +1025- CF ??? +1026- 20 C4 C9 JSR $C9C4 +1029- C6 C6 DEC $C6 +102B- C5 D2 CMP $D2 +102D- C5 CE CMP $CE +102F- D4 ??? +1030- 20 D3 D4 JSR $D4D3 +1033- D2 C9 CMP ($C9) +1035- CE C7 D3 DEC $D3C7 +1038- AE A2 AC LDX $ACA2 +103B- B8 CLV +103C- C4 B8 CPY $B8 +103E- C4 8D CPY $8D +1040- A0 DF LDY #$DF +1042- D0 D2 BNE $1016 +1044- CE D4 A0 DEC $A0D4 +1047- A2 D4 LDX #$D4 +1049- C8 INY +104A- C5 20 CMP $20 +104C- C3 ??? +104D- C1 D2 CMP ($D2,X) +104F- D2 D9 CMP ($D9) +1051- 20 C6 CC JSR $CCC6 +1054- C1 C7 CMP ($C7,X) +1056- 20 C9 D3 JSR $D3C9 +1059- 20 D3 C5 JSR $C5D3 +105C- D4 ??? +105D- 20 D4 CF JSR $CFD4 +1060- 20 B0 20 JSR $20B0 +1063- C9 C6 CMP #$C6 +1065- 20 D4 C8 JSR $C8D4 +1068- C5 A2 CMP $A2 +106A- AC B8 C4 LDY $C4B8 +106D- 8D A0 DF STA $DFA0 +1070- D0 D2 BNE $1044 +1072- CE D4 A0 DEC $A0D4 +1075- A2 C6 LDX #$C6 +1077- C9 D2 CMP #$D2 +1079- D3 ??? +107A- D4 ??? +107B- 20 D3 D4 JSR $D4D3 +107E- D2 C9 CMP ($C9) +1080- CE C7 20 DEC $20C7 +1083- C8 INY +1084- C1 D3 CMP ($D3,X) +1086- 20 C1 20 JSR $20C1 +1089- CC C5 CE CPY $CEC5 +108C- C7 ??? +108D- D4 ??? +108E- C8 INY +108F- 20 BE 20 JSR $20BE +1092- D4 ??? +1093- C8 INY +1094- C1 CE CMP ($CE,X) +1096- 20 D4 C8 JSR $C8D4 +1099- C5 20 CMP $20 +109B- A2 AC LDX #$AC +109D- B8 CLV +109E- C4 8D CPY $8D +10A0- A0 DF LDY #$DF +10A2- D0 D2 BNE $1076 +10A4- CE D4 A0 DEC $A0D4 +10A7- A2 D3 LDX #$D3 +10A9- C5 C3 CMP $C3 +10AB- CF ??? +10AC- CE C4 20 DEC $20C4 +10AF- D3 ??? +10B0- D4 ??? +10B1- D2 C9 CMP ($C9) +10B3- CE C7 A7 DEC $A7C7 +10B6- D3 ??? +10B7- 20 CC C5 JSR $C5CC +10BA- CE C7 D4 DEC $D4C7 +10BD- C8 INY +10BE- AE 20 D4 LDX $D420 +10C1- C8 INY +10C2- C9 D3 CMP #$D3 +10C4- 20 C3 C1 JSR $C1C3 +10C7- CE 20 D4 DEC $D420 +10CA- C8 INY +10CB- C5 CE CMP $CE +10CD- A2 AC LDX #$AC +10CF- B8 CLV 10D0- C4 8D CPY $8D 10D2- A0 DF LDY #$DF 10D4- D0 D2 BNE $10A8 10D6- CE D4 A0 DEC $A0D4 -10D9- A2 D3 LDX #$D3 -10DB- CF ??? -10DC- 20 C9 C6 JSR $C6C9 -10DF- 20 D7 C5 JSR $C5D7 -10E2- 20 C3 CF JSR $CFC3 -10E5- CD D0 C1 CMP $C1D0 -10E8- D2 C5 CMP ($C5) -10EA- 20 D4 C8 JSR $C8D4 -10ED- C5 20 CMP $20 -10EF- CC C9 D4 CPY $D4C9 -10F2- C5 D2 CMP $D2 -10F4- C1 CC CMP ($CC,X) -10F6- 20 A7 C1 JSR $C1A7 -10F9- C1 A7 CMP ($A7,X) -10FB- 20 A2 AC JSR $ACA2 -10FE- B8 CLV -10FF- C4 8D CPY $8D -1101- A0 DF LDY #$DF -1103- D0 D2 BNE $10D7 -1105- CE D4 A0 DEC $A0D4 -1108- A2 D4 LDX #$D4 -110A- CF ??? -110B- 20 D4 C8 JSR $C8D4 -110E- C5 20 CMP $20 -1110- D3 ??? -1111- C1 CD CMP ($CD,X) -1113- C5 20 CMP $20 -1115- C1 D3 CMP ($D3,X) -1117- D4 ??? -1118- D2 AC CMP ($AC) -111A- 20 D7 C5 JSR $C5D7 -111D- 20 D7 C9 JSR $C9D7 -1120- CC CC 20 CPY $20CC -1123- C6 C9 DEC $C9 -1125- CE C4 20 DEC $20C4 -1128- D4 ??? -1129- C8 INY -112A- C1 D4 CMP ($D4,X) -112C- A2 AC LDX #$AC -112E- B8 CLV -112F- C4 8D CPY $8D -1131- A0 DF LDY #$DF -1133- D0 D2 BNE $1107 -1135- CE D4 A0 DEC $A0D4 -1138- A2 D4 LDX #$D4 -113A- C8 INY -113B- C5 20 CMP $20 -113D- CC C9 D4 CPY $D4C9 -1140- C5 D2 CMP $D2 -1142- C1 CC CMP ($CC,X) -1144- 20 C8 C1 JSR $C1C8 -1147- D3 ??? -1148- 20 C1 20 JSR $20C1 -114B- C7 ??? -114C- D2 C5 CMP ($C5) -114E- C1 D4 CMP ($D4,X) -1150- C5 D2 CMP $D2 -1152- 20 CC C5 JSR $C5CC -1155- CE C7 D4 DEC $D4C7 -1158- C8 INY -1159- AE A2 AC LDX $ACA2 -115C- B8 CLV -115D- C4 B8 CPY $B8 -115F- C4 8D CPY $8D -1161- AA TAX -1162- 8D A0 D3 STA $D3A0 -1165- C3 ??? -1166- CD D0 A0 CMP $A0D0 -1169- A2 C1 LDX #$C1 -116B- C1 A2 CMP ($A2,X) -116D- BB ??? -116E- C1 D3 CMP ($D3,X) -1170- D4 ??? -1171- D2 8D CMP ($8D) -1173- A0 C2 LDY #$C2 -1175- C3 ??? -1176- D3 ??? -1177- A0 CC LDY #$CC -1179- C5 8D CMP $8D -117B- A0 CA LDY #$CA -117D- CD D0 A0 CMP $A0D0 -1180- C3 ??? -1181- CF ??? -1182- CE D4 B2 DEC $B2D4 -1185- 8D CC C5 STA $C5CC -1188- 8D A0 DF STA $DFA0 -118B- D0 D2 BNE $115F -118D- CE D4 A0 DEC $A0D4 -1190- A2 D4 LDX #$D4 -1192- C8 INY -1193- C5 20 CMP $20 -1195- CC C9 D4 CPY $D4C9 -1198- C5 D2 CMP $D2 -119A- C1 CC CMP ($CC,X) -119C- 20 A7 C1 JSR $C1A7 -119F- C1 A7 CMP ($A7,X) -11A1- 20 C9 D3 JSR $D3C9 -11A4- 20 C7 D2 JSR $D2C7 -11A7- C5 C1 CMP $C1 -11A9- D4 ??? -11AA- C5 D2 CMP $D2 -11AC- 20 D4 C8 JSR $C8D4 -11AF- C1 CE CMP ($CE,X) -11B1- 20 A2 AC JSR $ACA2 -11B4- B8 CLV -11B5- C4 8D CPY $8D -11B7- A0 DF LDY #$DF -11B9- D0 D2 BNE $118D -11BB- CE D4 A0 DEC $A0D4 -11BE- A2 C1 LDX #$C1 -11C0- D3 ??? -11C1- D4 ??? -11C2- D2 AC CMP ($AC) -11C4- 20 D7 C8 JSR $C8D7 -11C7- C9 C3 CMP #$C3 -11C9- C8 INY -11CA- 20 C8 CF JSR $CFC8 -11CD- CC C4 D3 CPY $D3C4 -11D0- 20 A7 C1 JSR $C1A7 -11D3- A7 ??? -11D4- AE A2 AC LDX $ACA2 -11D7- B8 CLV -11D8- C4 B8 CPY $B8 -11DA- C4 B8 CPY $B8 -11DC- C4 8D CPY $8D -11DE- C3 ??? -11DF- CF ??? -11E0- CE D4 B2 DEC $B2D4 -11E3- 8D A0 DF STA $DFA0 -11E6- D7 ??? -11E7- C1 C9 CMP ($C9,X) -11E9- D4 ??? -11EA- 8D AA 8D STA $8DAA -11ED- A0 DF LDY #$DF -11EF- D0 D2 BNE $11C3 -11F1- CE D4 A0 DEC $A0D4 -11F4- A2 20 LDX #$20 -11F6- A2 AC LDX #$AC -11F8- B8 CLV -11F9- C4 B8 CPY $B8 -11FB- C4 B8 CPY $B8 -11FD- C4 B8 CPY $B8 -11FF- C4 8D CPY $8D -1201- A0 DF LDY #$DF -1203- D0 D2 BNE $11D7 -1205- CE D4 A0 DEC $A0D4 -1208- A2 D4 LDX #$D4 -120A- C8 INY -120B- C5 20 CMP $20 -120D- D3 ??? -120E- C3 ??? -120F- C1 D4 CMP ($D4,X) -1211- 20 CD C1 JSR $C1CD -1214- C3 ??? -1215- D2 CF CMP ($CF) -1217- 20 C3 CF JSR $CFC3 -121A- CE C3 C1 DEC $C1C3 -121D- D4 ??? -121E- C5 CE CMP $CE -1220- C1 D4 CMP ($D4,X) -1222- C5 D3 CMP $D3 -1224- A2 AC LDX #$AC -1226- B8 CLV -1227- C4 8D CPY $8D -1229- A0 DF LDY #$DF -122B- D0 D2 BNE $11FF -122D- CE D4 A0 DEC $A0D4 -1230- A2 C1 LDX #$C1 -1232- 20 D3 C5 JSR $C5D3 -1235- C3 ??? -1236- CF ??? -1237- CE C4 20 DEC $20C4 -123A- C7 ??? -123B- C9 D6 CMP #$D6 -123D- C5 CE CMP $CE -123F- 20 D3 D4 JSR $D4D3 -1242- D2 C9 CMP ($C9) -1244- CE C7 20 DEC $20C7 -1247- D4 ??? -1248- CF ??? -1249- 20 C1 20 JSR $20C1 -124C- A2 AC LDX #$AC -124E- B8 CLV -124F- C4 8D CPY $8D -1251- A0 DF LDY #$DF -1253- D0 D2 BNE $1227 -1255- CE D4 A0 DEC $A0D4 -1258- A2 C6 LDX #$C6 -125A- C9 D2 CMP #$D2 -125C- D3 ??? -125D- D4 ??? -125E- 20 C7 C9 JSR $C9C7 -1261- D6 C5 DEC $C5,X -1263- CE 20 D3 DEC $D320 -1266- D4 ??? -1267- D2 C9 CMP ($C9) -1269- CE C7 AE DEC $AEC7 -126C- 20 C5 C9 JSR $C9C5 -126F- D4 ??? -1270- C8 INY -1271- C5 D2 CMP $D2 -1273- 20 D0 C1 JSR $C1D0 -1276- D2 C1 CMP ($C1) -1278- CD C5 D4 CMP $D4C5 -127B- C5 D2 CMP $D2 -127D- A2 AC LDX #$AC -127F- B8 CLV -1280- C4 8D CPY $8D -1282- A0 DF LDY #$DF -1284- D0 D2 BNE $1258 -1286- CE D4 A0 DEC $A0D4 -1289- A2 CD LDX #$CD -128B- C1 D9 CMP ($D9,X) -128D- 20 C2 C5 JSR $C5C2 -1290- 20 C1 20 JSR $20C1 -1293- CC C9 D4 CPY $D4C9 -1296- C5 D2 CMP $D2 -1298- C1 CC CMP ($CC,X) -129A- 20 D3 D4 JSR $D4D3 -129D- D2 C9 CMP ($C9) -129F- CE C7 AC DEC $ACC7 -12A2- 20 C2 D5 JSR $D5C2 -12A5- D4 ??? -12A6- 20 CE C5 JSR $C5CE -12A9- D6 C5 DEC $C5,X -12AB- D2 20 CMP ($20) -12AD- C2 ??? -12AE- CF ??? -12AF- D4 ??? -12B0- C8 INY -12B1- AE A2 AC LDX $ACA2 -12B4- B8 CLV -12B5- C4 B8 CPY $B8 -12B7- C4 8D CPY $8D -12B9- A0 DF LDY #$DF -12BB- D0 D2 BNE $128F -12BD- CE D4 A0 DEC $A0D4 -12C0- A2 D3 LDX #$D3 -12C2- C3 ??? -12C3- C1 D4 CMP ($D4,X) -12C5- 20 A7 D7 JSR $D7A7 -12C8- D4 ??? -12C9- C6 20 DEC $20 -12CB- C9 D3 CMP #$D3 -12CD- 20 A7 BB JSR $BBA7 -12D0- C1 D3 CMP ($D3,X) -12D2- D4 ??? -12D3- D2 BB CMP ($BB) -12D5- A3 ??? -12D6- B5 B0 LDA $B0,X -12D8- 20 D2 C5 JSR $C5D2 -12DB- D4 ??? -12DC- D5 D2 CMP $D2,X -12DE- CE D3 BA DEC $BAD3 -12E1- 20 A2 AC JSR $ACA2 -12E4- B8 CLV -12E5- C4 B8 CPY $B8 -12E7- C4 8D CPY $8D -12E9- A0 D3 LDY #$D3 -12EB- C3 ??? -12EC- C1 D4 CMP ($D4,X) -12EE- A0 A2 LDY #$A2 -12F0- D7 ??? -12F1- D4 ??? -12F2- C6 20 DEC $20 -12F4- C9 D3 CMP #$D3 -12F6- 20 A2 BB JSR $BBA2 -12F9- C1 D3 CMP ($D3,X) -12FB- D4 ??? -12FC- D2 BB CMP ($BB) -12FE- A3 ??? -12FF- B5 B0 LDA $B0,X -1301- 8D A0 D3 STA $D3A0 -1304- D0 D2 BNE $12D8 -1306- CE A0 D2 DEC $D2A0 -1309- C5 D4 CMP $D4 -130B- D5 D2 CMP $D2,X -130D- CE 8D A0 DEC $A08D -1310- DF ??? -1311- D0 D2 BNE $12E5 -1313- CE D4 A0 DEC $A0D4 -1316- A2 20 LDX #$20 -1318- A2 AC LDX #$AC -131A- B8 CLV -131B- C4 B8 CPY $B8 -131D- C4 B8 CPY $B8 -131F- C4 8D CPY $8D -1321- A0 DF LDY #$DF -1323- D7 ??? -1324- C1 C9 CMP ($C9,X) -1326- D4 ??? -1327- 8D AA 8D STA $8DAA -132A- A0 DF LDY #$DF -132C- D0 D2 BNE $1300 -132E- CE D4 A0 DEC $A0D4 -1331- A2 D4 LDX #$D4 -1333- CF ??? -1334- 20 D3 C8 JSR $C8D3 -1337- CF ??? -1338- D7 ??? -1339- 20 D4 C8 JSR $C8D4 -133C- C5 20 CMP $20 -133E- D2 C5 CMP ($C5) -1340- D3 ??? -1341- D5 CC CMP $CC,X -1343- D4 ??? -1344- 20 CF C6 JSR $C6CF -1347- 20 D3 C3 JSR $C3D3 -134A- C1 D4 CMP ($D4,X) -134C- AC A2 AC LDY $ACA2 -134F- B8 CLV -1350- C4 8D CPY $8D -1352- A0 DF LDY #$DF -1354- D0 D2 BNE $1328 -1356- CE D4 A0 DEC $A0D4 -1359- A2 D7 LDX #$D7 -135B- C5 20 CMP $20 -135D- D5 D3 CMP $D3,X -135F- C5 C4 CMP $C4 -1361- 20 D4 C8 JSR $C8D4 -1364- C5 20 CMP $20 -1366- D3 ??? -1367- D0 D2 BNE $133B -1369- CE 20 CD DEC $CD20 -136C- C1 C3 CMP ($C3,X) -136E- D2 CF CMP ($CF) -1370- AC 20 D7 LDY $D720 -1373- C8 INY -1374- C9 C3 CMP #$C3 -1376- C8 INY -1377- A2 AC LDX #$AC -1379- B8 CLV -137A- C4 8D CPY $8D -137C- A0 DF LDY #$DF -137E- D0 D2 BNE $1352 -1380- CE D4 A0 DEC $A0D4 -1383- A2 D3 LDX #$D3 -1385- C9 CD CMP #$CD -1387- D0 CC BNE $1355 -1389- D9 20 D0 CMP $D020,Y -138C- D2 C9 CMP ($C9) -138E- CE D4 D3 DEC $D3D4 -1391- 20 C1 20 JSR $20C1 -1394- D3 ??? -1395- D4 ??? -1396- D2 C9 CMP ($C9) -1398- CE C7 AE DEC $AEC7 -139B- 20 D4 C8 JSR $C8D4 -139E- C9 D3 CMP #$D3 -13A0- A2 AC LDX #$AC -13A2- B8 CLV -13A3- C4 8D CPY $8D -13A5- A0 DF LDY #$DF -13A7- D0 D2 BNE $137B -13A9- CE D4 A0 DEC $A0D4 -13AC- A2 D7 LDX #$D7 -13AE- CF ??? -13AF- D2 CB CMP ($CB) -13B1- D3 ??? -13B2- 20 C4 C9 JSR $C9C4 -13B5- C6 C6 DEC $C6 -13B7- C5 D2 CMP $D2 -13B9- C5 CE CMP $CE -13BB- D4 ??? -13BC- CC D9 20 CPY $20D9 -13BF- D4 ??? -13C0- C8 INY -13C1- C1 CE CMP ($CE,X) -13C3- 20 D4 C8 JSR $C8D4 -13C6- C5 20 CMP $20 -13C8- D0 D2 BNE $139C -13CA- C9 CE CMP #$CE -13CC- D4 ??? -13CD- A2 AC LDX #$AC -13CF- B8 CLV -13D0- C4 8D CPY $8D -13D2- A0 DF LDY #$DF -13D4- D0 D2 BNE $13A8 -13D6- CE D4 A0 DEC $A0D4 -13D9- A2 D2 LDX #$D2 -13DB- CF ??? -13DC- D5 D4 CMP $D4,X -13DE- C9 CE CMP #$CE -13E0- C5 D3 CMP $D3 -13E2- 20 C9 CE JSR $CEC9 -13E5- 20 D3 D4 JSR $D4D3 -13E8- C4 C9 CPY $C9 -13EA- CF ??? -13EB- 20 CF D2 JSR $D2CF -13EE- 20 D4 C8 JSR $C8D4 -13F1- C5 20 CMP $20 -13F3- DF ??? -13F4- D0 D2 BNE $13C8 -13F6- CE D4 A2 DEC $A2D4 -13F9- AC B8 C4 LDY $C4B8 -13FC- 8D A0 DF STA $DFA0 -13FF- D0 D2 BNE $13D3 -1401- CE D4 A0 DEC $A0D4 -1404- A2 D2 LDX #$D2 -1406- CF ??? -1407- D5 D4 CMP $D4,X -1409- C9 CE CMP #$CE -140B- C5 AC CMP $AC -140D- 20 C1 D3 JSR $D3C1 -1410- 20 C9 D4 JSR $D4C9 -1413- 20 C3 C1 JSR $C1C3 -1416- CE 20 CF DEC $CF20 -1419- CE CC D9 DEC $D9CC -141C- 20 C8 C1 JSR $C1C8 -141F- CE C4 CC DEC $CCC4 -1422- C5 A2 CMP $A2 -1424- AC B8 C4 LDY $C4B8 -1427- 8D A0 DF STA $DFA0 -142A- D0 D2 BNE $13FE -142C- CE D4 A0 DEC $A0D4 -142F- A2 C1 LDX #$C1 -1431- 20 D3 D4 JSR $D4D3 -1434- D2 C9 CMP ($C9) -1436- CE C7 20 DEC $20C7 -1439- C1 C4 CMP ($C4,X) -143B- C4 D2 CPY $D2 -143D- C5 D3 CMP $D3 -143F- D3 ??? -1440- AE A2 AC LDX $ACA2 -1443- B8 CLV -1444- C4 B8 CPY $B8 -1446- C4 8D CPY $8D -1448- A0 DF LDY #$DF -144A- D0 D2 BNE $141E -144C- CE D4 A0 DEC $A0D4 -144F- A2 D3 LDX #$D3 -1451- D0 D2 BNE $1425 -1453- CE 20 C2 DEC $C220 -1456- D3 ??? -1457- D4 ??? -1458- D2 20 CMP ($20) -145A- D2 C5 CMP ($C5) -145C- D4 ??? -145D- D5 D2 CMP $D2,X -145F- CE D3 BA DEC $BAD3 -1462- 20 A2 8D JSR $8DA2 -1465- A0 D3 LDY #$D3 -1467- D0 D2 BNE $143B -1469- CE A0 C2 DEC $C2A0 -146C- D3 ??? -146D- D4 ??? -146E- D2 8D CMP ($8D) -1470- A0 DF LDY #$DF -1472- D0 D2 BNE $1446 -1474- CE D4 A0 DEC $A0D4 -1477- A2 20 LDX #$20 -1479- A2 AC LDX #$AC -147B- B8 CLV -147C- C4 B8 CPY $B8 -147E- C4 B8 CPY $B8 -1480- C4 8D CPY $8D -1482- A0 DF LDY #$DF -1484- D7 ??? -1485- C1 C9 CMP ($C9,X) -1487- D4 ??? -1488- 8D A0 DF STA $DFA0 -148B- D0 D2 BNE $145F -148D- CE D4 A0 DEC $A0D4 -1490- A2 20 LDX #$20 -1492- A2 AC LDX #$AC -1494- B8 CLV -1495- C4 B8 CPY $B8 -1497- C4 B8 CPY $B8 -1499- C4 8D CPY $8D -149B- A0 DF LDY #$DF -149D- D0 D2 BNE $1471 -149F- CE D4 A0 DEC $A0D4 -14A2- A2 D4 LDX #$D4 -14A4- CF ??? -14A5- D3 ??? -14A6- D4 ??? -14A7- D2 20 CMP ($20) -14A9- C3 ??? -14AA- CF ??? -14AB- CE D6 C5 DEC $C5D6 -14AE- D2 D4 CMP ($D4) -14B0- D3 ??? -14B1- 20 C1 20 JSR $20C1 -14B4- B1 B6 LDA ($B6),Y -14B6- AD C2 C9 LDA $C9C2 -14B9- D4 ??? -14BA- 20 C9 CE JSR $CEC9 -14BD- D4 ??? -14BE- C5 C7 CMP $C7 -14C0- C5 D2 CMP $D2 -14C2- 20 C9 CE JSR $CEC9 -14C5- D4 ??? +10D9- A2 C2 LDX #$C2 +10DB- C5 20 CMP $20 +10DD- D4 ??? +10DE- C5 D3 CMP $D3 +10E0- D4 ??? +10E1- C5 C4 CMP $C4 +10E3- 20 D7 C9 JSR $C9D7 +10E6- D4 ??? +10E7- C8 INY +10E8- 20 C2 C3 JSR $C3C2 +10EB- D3 ??? +10EC- AE A2 AC LDX $ACA2 +10EF- B8 CLV +10F0- C4 B8 CPY $B8 +10F2- C4 8D CPY $8D +10F4- A0 DF LDY #$DF +10F6- D0 D2 BNE $10CA +10F8- CE D4 A0 DEC $A0D4 +10FB- A2 D3 LDX #$D3 +10FD- CF ??? +10FE- 20 C9 C6 JSR $C6C9 +1101- 20 D7 C5 JSR $C5D7 +1104- 20 C3 CF JSR $CFC3 +1107- CD D0 C1 CMP $C1D0 +110A- D2 C5 CMP ($C5) +110C- 20 D4 C8 JSR $C8D4 +110F- C5 20 CMP $20 +1111- CC C9 D4 CPY $D4C9 +1114- C5 D2 CMP $D2 +1116- C1 CC CMP ($CC,X) +1118- 20 A7 C1 JSR $C1A7 +111B- C1 A7 CMP ($A7,X) +111D- 20 A2 AC JSR $ACA2 +1120- B8 CLV +1121- C4 8D CPY $8D +1123- A0 DF LDY #$DF +1125- D0 D2 BNE $10F9 +1127- CE D4 A0 DEC $A0D4 +112A- A2 D4 LDX #$D4 +112C- CF ??? +112D- 20 D4 C8 JSR $C8D4 +1130- C5 20 CMP $20 +1132- D3 ??? +1133- C1 CD CMP ($CD,X) +1135- C5 20 CMP $20 +1137- C1 D3 CMP ($D3,X) +1139- D4 ??? +113A- D2 AC CMP ($AC) +113C- 20 D7 C5 JSR $C5D7 +113F- 20 D7 C9 JSR $C9D7 +1142- CC CC 20 CPY $20CC +1145- C6 C9 DEC $C9 +1147- CE C4 20 DEC $20C4 +114A- D4 ??? +114B- C8 INY +114C- C1 D4 CMP ($D4,X) +114E- A2 AC LDX #$AC +1150- B8 CLV +1151- C4 8D CPY $8D +1153- A0 DF LDY #$DF +1155- D0 D2 BNE $1129 +1157- CE D4 A0 DEC $A0D4 +115A- A2 D4 LDX #$D4 +115C- C8 INY +115D- C5 20 CMP $20 +115F- CC C9 D4 CPY $D4C9 +1162- C5 D2 CMP $D2 +1164- C1 CC CMP ($CC,X) +1166- 20 C8 C1 JSR $C1C8 +1169- D3 ??? +116A- 20 C1 20 JSR $20C1 +116D- C7 ??? +116E- D2 C5 CMP ($C5) +1170- C1 D4 CMP ($D4,X) +1172- C5 D2 CMP $D2 +1174- 20 CC C5 JSR $C5CC +1177- CE C7 D4 DEC $D4C7 +117A- C8 INY +117B- AE A2 AC LDX $ACA2 +117E- B8 CLV +117F- C4 B8 CPY $B8 +1181- C4 8D CPY $8D +1183- AA TAX +1184- 8D A0 D3 STA $D3A0 +1187- C3 ??? +1188- CD D0 A0 CMP $A0D0 +118B- A2 C1 LDX #$C1 +118D- C1 A2 CMP ($A2,X) +118F- BB ??? +1190- C1 D3 CMP ($D3,X) +1192- D4 ??? +1193- D2 8D CMP ($8D) +1195- A0 C2 LDY #$C2 +1197- C3 ??? +1198- D3 ??? +1199- A0 CC LDY #$CC +119B- C5 8D CMP $8D +119D- A0 CA LDY #$CA +119F- CD D0 A0 CMP $A0D0 +11A2- C3 ??? +11A3- CF ??? +11A4- CE D4 B2 DEC $B2D4 +11A7- 8D CC C5 STA $C5CC +11AA- 8D A0 DF STA $DFA0 +11AD- D0 D2 BNE $1181 +11AF- CE D4 A0 DEC $A0D4 +11B2- A2 D4 LDX #$D4 +11B4- C8 INY +11B5- C5 20 CMP $20 +11B7- CC C9 D4 CPY $D4C9 +11BA- C5 D2 CMP $D2 +11BC- C1 CC CMP ($CC,X) +11BE- 20 A7 C1 JSR $C1A7 +11C1- C1 A7 CMP ($A7,X) +11C3- 20 C9 D3 JSR $D3C9 +11C6- 20 C7 D2 JSR $D2C7 +11C9- C5 C1 CMP $C1 +11CB- D4 ??? +11CC- C5 D2 CMP $D2 +11CE- 20 D4 C8 JSR $C8D4 +11D1- C1 CE CMP ($CE,X) +11D3- 20 A2 AC JSR $ACA2 +11D6- B8 CLV +11D7- C4 8D CPY $8D +11D9- A0 DF LDY #$DF +11DB- D0 D2 BNE $11AF +11DD- CE D4 A0 DEC $A0D4 +11E0- A2 C1 LDX #$C1 +11E2- D3 ??? +11E3- D4 ??? +11E4- D2 AC CMP ($AC) +11E6- 20 D7 C8 JSR $C8D7 +11E9- C9 C3 CMP #$C3 +11EB- C8 INY +11EC- 20 C8 CF JSR $CFC8 +11EF- CC C4 D3 CPY $D3C4 +11F2- 20 A7 C1 JSR $C1A7 +11F5- A7 ??? +11F6- AE A2 AC LDX $ACA2 +11F9- B8 CLV +11FA- C4 B8 CPY $B8 +11FC- C4 B8 CPY $B8 +11FE- C4 8D CPY $8D +1200- C3 ??? +1201- CF ??? +1202- CE D4 B2 DEC $B2D4 +1205- 8D A0 DF STA $DFA0 +1208- D7 ??? +1209- C1 C9 CMP ($C9,X) +120B- D4 ??? +120C- 8D AA 8D STA $8DAA +120F- A0 DF LDY #$DF +1211- D0 D2 BNE $11E5 +1213- CE D4 A0 DEC $A0D4 +1216- A2 20 LDX #$20 +1218- A2 AC LDX #$AC +121A- B8 CLV +121B- C4 B8 CPY $B8 +121D- C4 B8 CPY $B8 +121F- C4 B8 CPY $B8 +1221- C4 8D CPY $8D +1223- A0 DF LDY #$DF +1225- D0 D2 BNE $11F9 +1227- CE D4 A0 DEC $A0D4 +122A- A2 D4 LDX #$D4 +122C- C8 INY +122D- C5 20 CMP $20 +122F- D3 ??? +1230- C3 ??? +1231- C1 D4 CMP ($D4,X) +1233- 20 CD C1 JSR $C1CD +1236- C3 ??? +1237- D2 CF CMP ($CF) +1239- 20 C3 CF JSR $CFC3 +123C- CE C3 C1 DEC $C1C3 +123F- D4 ??? +1240- C5 CE CMP $CE +1242- C1 D4 CMP ($D4,X) +1244- C5 D3 CMP $D3 +1246- A2 AC LDX #$AC +1248- B8 CLV +1249- C4 8D CPY $8D +124B- A0 DF LDY #$DF +124D- D0 D2 BNE $1221 +124F- CE D4 A0 DEC $A0D4 +1252- A2 C1 LDX #$C1 +1254- 20 D3 C5 JSR $C5D3 +1257- C3 ??? +1258- CF ??? +1259- CE C4 20 DEC $20C4 +125C- C7 ??? +125D- C9 D6 CMP #$D6 +125F- C5 CE CMP $CE +1261- 20 D3 D4 JSR $D4D3 +1264- D2 C9 CMP ($C9) +1266- CE C7 20 DEC $20C7 +1269- D4 ??? +126A- CF ??? +126B- 20 C1 20 JSR $20C1 +126E- A2 AC LDX #$AC +1270- B8 CLV +1271- C4 8D CPY $8D +1273- A0 DF LDY #$DF +1275- D0 D2 BNE $1249 +1277- CE D4 A0 DEC $A0D4 +127A- A2 C6 LDX #$C6 +127C- C9 D2 CMP #$D2 +127E- D3 ??? +127F- D4 ??? +1280- 20 C7 C9 JSR $C9C7 +1283- D6 C5 DEC $C5,X +1285- CE 20 D3 DEC $D320 +1288- D4 ??? +1289- D2 C9 CMP ($C9) +128B- CE C7 AE DEC $AEC7 +128E- 20 C5 C9 JSR $C9C5 +1291- D4 ??? +1292- C8 INY +1293- C5 D2 CMP $D2 +1295- 20 D0 C1 JSR $C1D0 +1298- D2 C1 CMP ($C1) +129A- CD C5 D4 CMP $D4C5 +129D- C5 D2 CMP $D2 +129F- A2 AC LDX #$AC +12A1- B8 CLV +12A2- C4 8D CPY $8D +12A4- A0 DF LDY #$DF +12A6- D0 D2 BNE $127A +12A8- CE D4 A0 DEC $A0D4 +12AB- A2 CD LDX #$CD +12AD- C1 D9 CMP ($D9,X) +12AF- 20 C2 C5 JSR $C5C2 +12B2- 20 C1 20 JSR $20C1 +12B5- CC C9 D4 CPY $D4C9 +12B8- C5 D2 CMP $D2 +12BA- C1 CC CMP ($CC,X) +12BC- 20 D3 D4 JSR $D4D3 +12BF- D2 C9 CMP ($C9) +12C1- CE C7 AC DEC $ACC7 +12C4- 20 C2 D5 JSR $D5C2 +12C7- D4 ??? +12C8- 20 CE C5 JSR $C5CE +12CB- D6 C5 DEC $C5,X +12CD- D2 20 CMP ($20) +12CF- C2 ??? +12D0- CF ??? +12D1- D4 ??? +12D2- C8 INY +12D3- AE A2 AC LDX $ACA2 +12D6- B8 CLV +12D7- C4 B8 CPY $B8 +12D9- C4 8D CPY $8D +12DB- A0 DF LDY #$DF +12DD- D0 D2 BNE $12B1 +12DF- CE D4 A0 DEC $A0D4 +12E2- A2 D3 LDX #$D3 +12E4- C3 ??? +12E5- C1 D4 CMP ($D4,X) +12E7- 20 A7 D7 JSR $D7A7 +12EA- D4 ??? +12EB- C6 20 DEC $20 +12ED- C9 D3 CMP #$D3 +12EF- 20 A7 BB JSR $BBA7 +12F2- C1 D3 CMP ($D3,X) +12F4- D4 ??? +12F5- D2 BB CMP ($BB) +12F7- A3 ??? +12F8- B5 B0 LDA $B0,X +12FA- 20 D2 C5 JSR $C5D2 +12FD- D4 ??? +12FE- D5 D2 CMP $D2,X +1300- CE D3 BA DEC $BAD3 +1303- 20 A2 AC JSR $ACA2 +1306- B8 CLV +1307- C4 B8 CPY $B8 +1309- C4 8D CPY $8D +130B- A0 D3 LDY #$D3 +130D- C3 ??? +130E- C1 D4 CMP ($D4,X) +1310- A0 A2 LDY #$A2 +1312- D7 ??? +1313- D4 ??? +1314- C6 20 DEC $20 +1316- C9 D3 CMP #$D3 +1318- 20 A2 BB JSR $BBA2 +131B- C1 D3 CMP ($D3,X) +131D- D4 ??? +131E- D2 BB CMP ($BB) +1320- A3 ??? +1321- B5 B0 LDA $B0,X +1323- 8D A0 D3 STA $D3A0 +1326- D0 D2 BNE $12FA +1328- CE A0 D2 DEC $D2A0 +132B- C5 D4 CMP $D4 +132D- D5 D2 CMP $D2,X +132F- CE 8D A0 DEC $A08D +1332- DF ??? +1333- D0 D2 BNE $1307 +1335- CE D4 A0 DEC $A0D4 +1338- A2 20 LDX #$20 +133A- A2 AC LDX #$AC +133C- B8 CLV +133D- C4 B8 CPY $B8 +133F- C4 B8 CPY $B8 +1341- C4 8D CPY $8D +1343- A0 DF LDY #$DF +1345- D7 ??? +1346- C1 C9 CMP ($C9,X) +1348- D4 ??? +1349- 8D AA 8D STA $8DAA +134C- A0 DF LDY #$DF +134E- D0 D2 BNE $1322 +1350- CE D4 A0 DEC $A0D4 +1353- A2 D4 LDX #$D4 +1355- CF ??? +1356- 20 D3 C8 JSR $C8D3 +1359- CF ??? +135A- D7 ??? +135B- 20 D4 C8 JSR $C8D4 +135E- C5 20 CMP $20 +1360- D2 C5 CMP ($C5) +1362- D3 ??? +1363- D5 CC CMP $CC,X +1365- D4 ??? +1366- 20 CF C6 JSR $C6CF +1369- 20 D3 C3 JSR $C3D3 +136C- C1 D4 CMP ($D4,X) +136E- AC A2 AC LDY $ACA2 +1371- B8 CLV +1372- C4 8D CPY $8D +1374- A0 DF LDY #$DF +1376- D0 D2 BNE $134A +1378- CE D4 A0 DEC $A0D4 +137B- A2 D7 LDX #$D7 +137D- C5 20 CMP $20 +137F- D5 D3 CMP $D3,X +1381- C5 C4 CMP $C4 +1383- 20 D4 C8 JSR $C8D4 +1386- C5 20 CMP $20 +1388- D3 ??? +1389- D0 D2 BNE $135D +138B- CE 20 CD DEC $CD20 +138E- C1 C3 CMP ($C3,X) +1390- D2 CF CMP ($CF) +1392- AC 20 D7 LDY $D720 +1395- C8 INY +1396- C9 C3 CMP #$C3 +1398- C8 INY +1399- A2 AC LDX #$AC +139B- B8 CLV +139C- C4 8D CPY $8D +139E- A0 DF LDY #$DF +13A0- D0 D2 BNE $1374 +13A2- CE D4 A0 DEC $A0D4 +13A5- A2 D3 LDX #$D3 +13A7- C9 CD CMP #$CD +13A9- D0 CC BNE $1377 +13AB- D9 20 D0 CMP $D020,Y +13AE- D2 C9 CMP ($C9) +13B0- CE D4 D3 DEC $D3D4 +13B3- 20 C1 20 JSR $20C1 +13B6- D3 ??? +13B7- D4 ??? +13B8- D2 C9 CMP ($C9) +13BA- CE C7 AE DEC $AEC7 +13BD- 20 D4 C8 JSR $C8D4 +13C0- C9 D3 CMP #$D3 +13C2- A2 AC LDX #$AC +13C4- B8 CLV +13C5- C4 8D CPY $8D +13C7- A0 DF LDY #$DF +13C9- D0 D2 BNE $139D +13CB- CE D4 A0 DEC $A0D4 +13CE- A2 D7 LDX #$D7 +13D0- CF ??? +13D1- D2 CB CMP ($CB) +13D3- D3 ??? +13D4- 20 C4 C9 JSR $C9C4 +13D7- C6 C6 DEC $C6 +13D9- C5 D2 CMP $D2 +13DB- C5 CE CMP $CE +13DD- D4 ??? +13DE- CC D9 20 CPY $20D9 +13E1- D4 ??? +13E2- C8 INY +13E3- C1 CE CMP ($CE,X) +13E5- 20 D4 C8 JSR $C8D4 +13E8- C5 20 CMP $20 +13EA- D0 D2 BNE $13BE +13EC- C9 CE CMP #$CE +13EE- D4 ??? +13EF- A2 AC LDX #$AC +13F1- B8 CLV +13F2- C4 8D CPY $8D +13F4- A0 DF LDY #$DF +13F6- D0 D2 BNE $13CA +13F8- CE D4 A0 DEC $A0D4 +13FB- A2 D2 LDX #$D2 +13FD- CF ??? +13FE- D5 D4 CMP $D4,X +1400- C9 CE CMP #$CE +1402- C5 D3 CMP $D3 +1404- 20 C9 CE JSR $CEC9 +1407- 20 D3 D4 JSR $D4D3 +140A- C4 C9 CPY $C9 +140C- CF ??? +140D- 20 CF D2 JSR $D2CF +1410- 20 D4 C8 JSR $C8D4 +1413- C5 20 CMP $20 +1415- DF ??? +1416- D0 D2 BNE $13EA +1418- CE D4 A2 DEC $A2D4 +141B- AC B8 C4 LDY $C4B8 +141E- 8D A0 DF STA $DFA0 +1421- D0 D2 BNE $13F5 +1423- CE D4 A0 DEC $A0D4 +1426- A2 D2 LDX #$D2 +1428- CF ??? +1429- D5 D4 CMP $D4,X +142B- C9 CE CMP #$CE +142D- C5 AC CMP $AC +142F- 20 C1 D3 JSR $D3C1 +1432- 20 C9 D4 JSR $D4C9 +1435- 20 C3 C1 JSR $C1C3 +1438- CE 20 CF DEC $CF20 +143B- CE CC D9 DEC $D9CC +143E- 20 C8 C1 JSR $C1C8 +1441- CE C4 CC DEC $CCC4 +1444- C5 A2 CMP $A2 +1446- AC B8 C4 LDY $C4B8 +1449- 8D A0 DF STA $DFA0 +144C- D0 D2 BNE $1420 +144E- CE D4 A0 DEC $A0D4 +1451- A2 C1 LDX #$C1 +1453- 20 D3 D4 JSR $D4D3 +1456- D2 C9 CMP ($C9) +1458- CE C7 20 DEC $20C7 +145B- C1 C4 CMP ($C4,X) +145D- C4 D2 CPY $D2 +145F- C5 D3 CMP $D3 +1461- D3 ??? +1462- AE A2 AC LDX $ACA2 +1465- B8 CLV +1466- C4 B8 CPY $B8 +1468- C4 8D CPY $8D +146A- A0 DF LDY #$DF +146C- D0 D2 BNE $1440 +146E- CE D4 A0 DEC $A0D4 +1471- A2 D3 LDX #$D3 +1473- D0 D2 BNE $1447 +1475- CE 20 C2 DEC $C220 +1478- D3 ??? +1479- D4 ??? +147A- D2 20 CMP ($20) +147C- D2 C5 CMP ($C5) +147E- D4 ??? +147F- D5 D2 CMP $D2,X +1481- CE D3 BA DEC $BAD3 +1484- 20 A2 8D JSR $8DA2 +1487- A0 D3 LDY #$D3 +1489- D0 D2 BNE $145D +148B- CE A0 C2 DEC $C2A0 +148E- D3 ??? +148F- D4 ??? +1490- D2 8D CMP ($8D) +1492- A0 DF LDY #$DF +1494- D0 D2 BNE $1468 +1496- CE D4 A0 DEC $A0D4 +1499- A2 20 LDX #$20 +149B- A2 AC LDX #$AC +149D- B8 CLV +149E- C4 B8 CPY $B8 +14A0- C4 B8 CPY $B8 +14A2- C4 8D CPY $8D +14A4- A0 DF LDY #$DF +14A6- D7 ??? +14A7- C1 C9 CMP ($C9,X) +14A9- D4 ??? +14AA- 8D A0 DF STA $DFA0 +14AD- D0 D2 BNE $1481 +14AF- CE D4 A0 DEC $A0D4 +14B2- A2 20 LDX #$20 +14B4- A2 AC LDX #$AC +14B6- B8 CLV +14B7- C4 B8 CPY $B8 +14B9- C4 B8 CPY $B8 +14BB- C4 8D CPY $8D +14BD- A0 DF LDY #$DF +14BF- D0 D2 BNE $1493 +14C1- CE D4 A0 DEC $A0D4 +14C4- A2 D4 LDX #$D4 14C6- CF ??? -14C7- A2 AC LDX #$AC -14C9- B8 CLV -14CA- C4 8D CPY $8D -14CC- A0 DF LDY #$DF -14CE- D0 D2 BNE $14A2 -14D0- CE D4 A0 DEC $A0D4 -14D3- A2 C9 LDX #$C9 -14D5- D4 ??? -14D6- D3 ??? -14D7- 20 D3 D4 JSR $D4D3 -14DA- D2 C9 CMP ($C9) -14DC- CE C7 20 DEC $20C7 -14DF- C5 D1 CMP $D1 -14E1- D5 C9 CMP $C9,X -14E3- D6 C1 DEC $C1,X -14E5- CC C5 CE CPY $CEC5 -14E8- D4 ??? -14E9- AE 20 D4 LDX $D420 -14EC- C8 INY -14ED- C9 D3 CMP #$D3 -14EF- 20 C3 C1 JSR $C1C3 -14F2- CE A2 AC DEC $ACA2 -14F5- B8 CLV -14F6- C4 8D CPY $8D -14F8- A0 DF LDY #$DF -14FA- D0 D2 BNE $14CE -14FC- CE D4 A0 DEC $A0D4 -14FF- A2 C5 LDX #$C5 -1501- C9 D4 CMP #$D4 -1503- C8 INY -1504- C5 D2 CMP $D2 -1506- 20 C2 C5 JSR $C5C2 -1509- 20 C1 20 JSR $20C1 -150C- CC C9 D4 CPY $D4C9 -150F- C5 D2 CMP $D2 -1511- C1 CC CMP ($CC,X) -1513- 20 CF D2 JSR $D2CF -1516- 20 C1 CE JSR $CEC1 -1519- 20 C1 C4 JSR $C4C1 -151C- C4 D2 CPY $D2 -151E- C5 D3 CMP $D3 -1520- D3 ??? -1521- AE A2 8D LDX $8DA2 -1524- A0 DF LDY #$DF -1526- D0 D2 BNE $14FA -1528- CE D4 A0 DEC $A0D4 -152B- A2 20 LDX #$20 -152D- A2 AC LDX #$AC -152F- B8 CLV -1530- C4 B8 CPY $B8 -1532- C4 8D CPY $8D -1534- A0 DF LDY #$DF -1536- D0 D2 BNE $150A -1538- CE D4 A0 DEC $A0D4 -153B- A2 D4 LDX #$D4 -153D- CF ??? -153E- D3 ??? -153F- D4 ??? -1540- D2 20 CMP ($20) -1542- A3 ??? -1543- B5 B0 LDA $B0,X -1545- B0 B0 BCS $14F7 -1547- 20 D2 C5 JSR $C5D2 -154A- D4 ??? -154B- D5 D2 CMP $D2,X -154D- CE D3 BA DEC $BAD3 -1550- 20 A2 8D JSR $8DA2 -1553- A0 D4 LDY #$D4 -1555- CF ??? -1556- D3 ??? -1557- D4 ??? -1558- D2 A0 CMP ($A0) -155A- A3 ??? -155B- B5 B0 LDA $B0,X -155D- B0 B0 BCS $150F -155F- 8D A0 D3 STA $D3A0 -1562- D0 D2 BNE $1536 -1564- CE A0 D2 DEC $D2A0 -1567- C5 D4 CMP $D4 -1569- D5 D2 CMP $D2,X -156B- CE 8D A0 DEC $A08D -156E- DF ??? -156F- D0 D2 BNE $1543 -1571- CE D4 A0 DEC $A0D4 -1574- A2 20 LDX #$20 -1576- A2 AC LDX #$AC -1578- B8 CLV -1579- C4 B8 CPY $B8 -157B- C4 8D CPY $8D -157D- A0 DF LDY #$DF -157F- D0 D2 BNE $1553 -1581- CE D4 A0 DEC $A0D4 -1584- A2 D4 LDX #$D4 -1586- CF ??? -1587- D3 ??? -1588- D4 ??? -1589- D2 20 CMP ($20) -158B- A4 B3 LDY $B3 -158D- B0 B0 BCS $153F -158F- 20 D2 C5 JSR $C5D2 -1592- D4 ??? -1593- D5 D2 CMP $D2,X -1595- CE D3 20 DEC $20D3 -1598- A2 8D LDX #$8D -159A- A0 CC LDY #$CC -159C- C4 C1 CPY $C1 -159E- A0 A3 LDY #$A3 -15A0- A4 C6 LDY $C6 -15A2- C6 8D DEC $8D -15A4- A0 D3 LDY #$D3 -15A6- D4 ??? -15A7- C1 A0 CMP ($A0,X) -15A9- A4 B3 LDY $B3 -15AB- B0 B0 BCS $155D -15AD- 8D A0 D3 STA $D3A0 -15B0- D4 ??? -15B1- C1 A0 CMP ($A0,X) -15B3- A4 B3 LDY $B3 -15B5- B0 B1 BCS $1568 -15B7- 8D A0 D4 STA $D4A0 -15BA- CF ??? -15BB- D3 ??? -15BC- D4 ??? -15BD- D2 A0 CMP ($A0) -15BF- A4 B3 LDY $B3 -15C1- B0 B0 BCS $1573 -15C3- 8D A0 D3 STA $D3A0 -15C6- D0 D2 BNE $159A -15C8- CE A0 D2 DEC $D2A0 -15CB- C5 D4 CMP $D4 -15CD- D5 D2 CMP $D2,X -15CF- CE 8D A0 DEC $A08D -15D2- DF ??? -15D3- D0 D2 BNE $15A7 -15D5- CE D4 A0 DEC $A0D4 -15D8- A2 20 LDX #$20 -15DA- A2 AC LDX #$AC -15DC- B8 CLV -15DD- C4 B8 CPY $B8 -15DF- C4 8D CPY $8D -15E1- A0 DF LDY #$DF -15E3- D0 D2 BNE $15B7 -15E5- CE D4 A0 DEC $A0D4 -15E8- A2 CE LDX #$CE -15EA- CF ??? -15EB- D4 ??? -15EC- C5 20 CMP $20 -15EE- D4 ??? -15EF- C8 INY -15F0- C1 D4 CMP ($D4,X) -15F2- 20 A4 C6 JSR $C6A4 -15F5- C6 C6 DEC $C6 -15F7- C6 20 DEC $20 -15F9- D2 C5 CMP ($C5) -15FB- D4 ??? -15FC- D5 D2 CMP $D2,X -15FE- CE D3 20 DEC $20D3 -1601- AD B1 20 LDA $20B1 -1604- C2 ??? -1605- C5 C3 CMP $C3 -1607- C1 D5 CMP ($D5,X) -1609- D3 ??? -160A- C5 A2 CMP $A2 -160C- AC B8 C4 LDY $C4B8 -160F- 8D A0 DF STA $DFA0 -1612- D0 D2 BNE $15E6 -1614- CE D4 A0 DEC $A0D4 -1617- A2 D4 LDX #$D4 -1619- C8 INY -161A- C5 20 CMP $20 -161C- D4 ??? -161D- CF ??? -161E- D3 ??? -161F- D4 ??? -1620- D2 20 CMP ($20) -1622- D2 CF CMP ($CF) -1624- D5 D4 CMP $D4,X -1626- C9 CE CMP #$CE -1628- C5 20 CMP $20 -162A- C1 D3 CMP ($D3,X) -162C- D3 ??? -162D- D5 CD CMP $CD,X -162F- C5 D3 CMP $D3 -1631- 20 C1 20 JSR $20C1 -1634- A2 AC LDX #$AC -1636- B8 CLV -1637- C4 8D CPY $8D -1639- A0 DF LDY #$DF -163B- D0 D2 BNE $160F -163D- CE D4 A0 DEC $A0D4 -1640- A2 D3 LDX #$D3 -1642- C9 C7 CMP #$C7 -1644- CE C5 C4 DEC $C4C5 -1647- 20 D6 C1 JSR $C1D6 -164A- CC D5 C5 CPY $C5D5 -164D- AE 20 A2 LDX $A220 -1650- 8D A0 DF STA $DFA0 -1653- D0 D2 BNE $1627 -1655- CE D4 A0 DEC $A0D4 -1658- A2 20 LDX #$20 -165A- A2 AC LDX #$AC -165C- B8 CLV -165D- C4 B8 CPY $B8 -165F- C4 B8 CPY $B8 -1661- C4 8D CPY $8D -1663- A0 DF LDY #$DF -1665- D7 ??? -1666- C1 C9 CMP ($C9,X) -1668- D4 ??? -1669- 8D AA 8D STA $8DAA -166C- A0 DF LDY #$DF -166E- D0 D2 BNE $1642 -1670- CE D4 A0 DEC $A0D4 -1673- A2 20 LDX #$20 -1675- A2 AC LDX #$AC -1677- B8 CLV -1678- C4 B8 CPY $B8 -167A- C4 B8 CPY $B8 -167C- C4 8D CPY $8D -167E- A0 DF LDY #$DF -1680- D0 D2 BNE $1654 -1682- CE D4 A0 DEC $A0D4 -1685- A2 C1 LDX #$C1 -1687- CE C4 20 DEC $20C4 +14C7- D3 ??? +14C8- D4 ??? +14C9- D2 20 CMP ($20) +14CB- C3 ??? +14CC- CF ??? +14CD- CE D6 C5 DEC $C5D6 +14D0- D2 D4 CMP ($D4) +14D2- D3 ??? +14D3- 20 C1 20 JSR $20C1 +14D6- B1 B6 LDA ($B6),Y +14D8- AD C2 C9 LDA $C9C2 +14DB- D4 ??? +14DC- 20 C9 CE JSR $CEC9 +14DF- D4 ??? +14E0- C5 C7 CMP $C7 +14E2- C5 D2 CMP $D2 +14E4- 20 C9 CE JSR $CEC9 +14E7- D4 ??? +14E8- CF ??? +14E9- A2 AC LDX #$AC +14EB- B8 CLV +14EC- C4 8D CPY $8D +14EE- A0 DF LDY #$DF +14F0- D0 D2 BNE $14C4 +14F2- CE D4 A0 DEC $A0D4 +14F5- A2 C9 LDX #$C9 +14F7- D4 ??? +14F8- D3 ??? +14F9- 20 D3 D4 JSR $D4D3 +14FC- D2 C9 CMP ($C9) +14FE- CE C7 20 DEC $20C7 +1501- C5 D1 CMP $D1 +1503- D5 C9 CMP $C9,X +1505- D6 C1 DEC $C1,X +1507- CC C5 CE CPY $CEC5 +150A- D4 ??? +150B- AE 20 D4 LDX $D420 +150E- C8 INY +150F- C9 D3 CMP #$D3 +1511- 20 C3 C1 JSR $C1C3 +1514- CE A2 AC DEC $ACA2 +1517- B8 CLV +1518- C4 8D CPY $8D +151A- A0 DF LDY #$DF +151C- D0 D2 BNE $14F0 +151E- CE D4 A0 DEC $A0D4 +1521- A2 C5 LDX #$C5 +1523- C9 D4 CMP #$D4 +1525- C8 INY +1526- C5 D2 CMP $D2 +1528- 20 C2 C5 JSR $C5C2 +152B- 20 C1 20 JSR $20C1 +152E- CC C9 D4 CPY $D4C9 +1531- C5 D2 CMP $D2 +1533- C1 CC CMP ($CC,X) +1535- 20 CF D2 JSR $D2CF +1538- 20 C1 CE JSR $CEC1 +153B- 20 C1 C4 JSR $C4C1 +153E- C4 D2 CPY $D2 +1540- C5 D3 CMP $D3 +1542- D3 ??? +1543- AE A2 8D LDX $8DA2 +1546- A0 DF LDY #$DF +1548- D0 D2 BNE $151C +154A- CE D4 A0 DEC $A0D4 +154D- A2 20 LDX #$20 +154F- A2 AC LDX #$AC +1551- B8 CLV +1552- C4 B8 CPY $B8 +1554- C4 8D CPY $8D +1556- A0 DF LDY #$DF +1558- D0 D2 BNE $152C +155A- CE D4 A0 DEC $A0D4 +155D- A2 D4 LDX #$D4 +155F- CF ??? +1560- D3 ??? +1561- D4 ??? +1562- D2 20 CMP ($20) +1564- A3 ??? +1565- B5 B0 LDA $B0,X +1567- B0 B0 BCS $1519 +1569- 20 D2 C5 JSR $C5D2 +156C- D4 ??? +156D- D5 D2 CMP $D2,X +156F- CE D3 BA DEC $BAD3 +1572- 20 A2 8D JSR $8DA2 +1575- A0 D4 LDY #$D4 +1577- CF ??? +1578- D3 ??? +1579- D4 ??? +157A- D2 A0 CMP ($A0) +157C- A3 ??? +157D- B5 B0 LDA $B0,X +157F- B0 B0 BCS $1531 +1581- 8D A0 D3 STA $D3A0 +1584- D0 D2 BNE $1558 +1586- CE A0 D2 DEC $D2A0 +1589- C5 D4 CMP $D4 +158B- D5 D2 CMP $D2,X +158D- CE 8D A0 DEC $A08D +1590- DF ??? +1591- D0 D2 BNE $1565 +1593- CE D4 A0 DEC $A0D4 +1596- A2 20 LDX #$20 +1598- A2 AC LDX #$AC +159A- B8 CLV +159B- C4 B8 CPY $B8 +159D- C4 8D CPY $8D +159F- A0 DF LDY #$DF +15A1- D0 D2 BNE $1575 +15A3- CE D4 A0 DEC $A0D4 +15A6- A2 D4 LDX #$D4 +15A8- CF ??? +15A9- D3 ??? +15AA- D4 ??? +15AB- D2 20 CMP ($20) +15AD- A4 B3 LDY $B3 +15AF- B0 B0 BCS $1561 +15B1- 20 D2 C5 JSR $C5D2 +15B4- D4 ??? +15B5- D5 D2 CMP $D2,X +15B7- CE D3 20 DEC $20D3 +15BA- A2 8D LDX #$8D +15BC- A0 CC LDY #$CC +15BE- C4 C1 CPY $C1 +15C0- A0 A3 LDY #$A3 +15C2- A4 C6 LDY $C6 +15C4- C6 8D DEC $8D +15C6- A0 D3 LDY #$D3 +15C8- D4 ??? +15C9- C1 A0 CMP ($A0,X) +15CB- A4 B3 LDY $B3 +15CD- B0 B0 BCS $157F +15CF- 8D A0 D3 STA $D3A0 +15D2- D4 ??? +15D3- C1 A0 CMP ($A0,X) +15D5- A4 B3 LDY $B3 +15D7- B0 B1 BCS $158A +15D9- 8D A0 D4 STA $D4A0 +15DC- CF ??? +15DD- D3 ??? +15DE- D4 ??? +15DF- D2 A0 CMP ($A0) +15E1- A4 B3 LDY $B3 +15E3- B0 B0 BCS $1595 +15E5- 8D A0 D3 STA $D3A0 +15E8- D0 D2 BNE $15BC +15EA- CE A0 D2 DEC $D2A0 +15ED- C5 D4 CMP $D4 +15EF- D5 D2 CMP $D2,X +15F1- CE 8D A0 DEC $A08D +15F4- DF ??? +15F5- D0 D2 BNE $15C9 +15F7- CE D4 A0 DEC $A0D4 +15FA- A2 20 LDX #$20 +15FC- A2 AC LDX #$AC +15FE- B8 CLV +15FF- C4 B8 CPY $B8 +1601- C4 8D CPY $8D +1603- A0 DF LDY #$DF +1605- D0 D2 BNE $15D9 +1607- CE D4 A0 DEC $A0D4 +160A- A2 CE LDX #$CE +160C- CF ??? +160D- D4 ??? +160E- C5 20 CMP $20 +1610- D4 ??? +1611- C8 INY +1612- C1 D4 CMP ($D4,X) +1614- 20 A4 C6 JSR $C6A4 +1617- C6 C6 DEC $C6 +1619- C6 20 DEC $20 +161B- D2 C5 CMP ($C5) +161D- D4 ??? +161E- D5 D2 CMP $D2,X +1620- CE D3 20 DEC $20D3 +1623- AD B1 20 LDA $20B1 +1626- C2 ??? +1627- C5 C3 CMP $C3 +1629- C1 D5 CMP ($D5,X) +162B- D3 ??? +162C- C5 A2 CMP $A2 +162E- AC B8 C4 LDY $C4B8 +1631- 8D A0 DF STA $DFA0 +1634- D0 D2 BNE $1608 +1636- CE D4 A0 DEC $A0D4 +1639- A2 D4 LDX #$D4 +163B- C8 INY +163C- C5 20 CMP $20 +163E- D4 ??? +163F- CF ??? +1640- D3 ??? +1641- D4 ??? +1642- D2 20 CMP ($20) +1644- D2 CF CMP ($CF) +1646- D5 D4 CMP $D4,X +1648- C9 CE CMP #$CE +164A- C5 20 CMP $20 +164C- C1 D3 CMP ($D3,X) +164E- D3 ??? +164F- D5 CD CMP $CD,X +1651- C5 D3 CMP $D3 +1653- 20 C1 20 JSR $20C1 +1656- A2 AC LDX #$AC +1658- B8 CLV +1659- C4 8D CPY $8D +165B- A0 DF LDY #$DF +165D- D0 D2 BNE $1631 +165F- CE D4 A0 DEC $A0D4 +1662- A2 D3 LDX #$D3 +1664- C9 C7 CMP #$C7 +1666- CE C5 C4 DEC $C4C5 +1669- 20 D6 C1 JSR $C1D6 +166C- CC D5 C5 CPY $C5D5 +166F- AE 20 A2 LDX $A220 +1672- 8D A0 DF STA $DFA0 +1675- D0 D2 BNE $1649 +1677- CE D4 A0 DEC $A0D4 +167A- A2 20 LDX #$20 +167C- A2 AC LDX #$AC +167E- B8 CLV +167F- C4 B8 CPY $B8 +1681- C4 B8 CPY $B8 +1683- C4 8D CPY $8D +1685- A0 DF LDY #$DF +1687- D7 ??? +1688- C1 C9 CMP ($C9,X) 168A- D4 ??? -168B- C8 INY -168C- C5 20 CMP $20 -168E- D4 ??? -168F- CF ??? -1690- CE D5 CD DEC $CDD5 -1693- 20 CD C1 JSR $C1CD -1696- C3 ??? -1697- D2 CF CMP ($CF) -1699- 20 C4 CF JSR $CFC4 -169C- C5 D3 CMP $D3 -169E- 20 D4 C8 JSR $C8D4 -16A1- C5 A2 CMP $A2 -16A3- AC B8 C4 LDY $C4B8 -16A6- 8D A0 DF STA $DFA0 -16A9- D0 D2 BNE $167D -16AB- CE D4 A0 DEC $A0D4 -16AE- A2 CF LDX #$CF -16B0- D0 D0 BNE $1682 -16B2- CF ??? -16B3- D3 ??? -16B4- C9 D4 CMP #$D4 -16B6- C5 BA CMP $BA -16B8- 20 C9 D4 JSR $D4C9 -16BB- 20 D2 C5 JSR $C5D2 -16BE- D4 ??? -16BF- D5 D2 CMP $D2,X -16C1- CE D3 20 DEC $20D3 -16C4- C1 20 CMP ($20,X) -16C6- B1 B6 LDA ($B6),Y -16C8- AD C2 C9 LDA $C9C2 -16CB- D4 ??? -16CC- 20 A2 AC JSR $ACA2 -16CF- B8 CLV -16D0- C4 8D CPY $8D -16D2- A0 DF LDY #$DF -16D4- D0 D2 BNE $16A8 -16D6- CE D4 A0 DEC $A0D4 -16D9- A2 C9 LDX #$C9 -16DB- CE D4 C5 DEC $C5D4 -16DE- C7 ??? -16DF- C5 D2 CMP $D2 -16E1- 20 D6 C1 JSR $C1D6 -16E4- CC D5 C5 CPY $C5D5 -16E7- 20 C3 CF JSR $CFC3 -16EA- CE C5 D2 DEC $D2C5 +168B- 8D AA 8D STA $8DAA +168E- A0 DF LDY #$DF +1690- D0 D2 BNE $1664 +1692- CE D4 A0 DEC $A0D4 +1695- A2 20 LDX #$20 +1697- A2 AC LDX #$AC +1699- B8 CLV +169A- C4 B8 CPY $B8 +169C- C4 B8 CPY $B8 +169E- C4 8D CPY $8D +16A0- A0 DF LDY #$DF +16A2- D0 D2 BNE $1676 +16A4- CE D4 A0 DEC $A0D4 +16A7- A2 C1 LDX #$C1 +16A9- CE C4 20 DEC $20C4 +16AC- D4 ??? +16AD- C8 INY +16AE- C5 20 CMP $20 +16B0- D4 ??? +16B1- CF ??? +16B2- CE D5 CD DEC $CDD5 +16B5- 20 CD C1 JSR $C1CD +16B8- C3 ??? +16B9- D2 CF CMP ($CF) +16BB- 20 C4 CF JSR $CFC4 +16BE- C5 D3 CMP $D3 +16C0- 20 D4 C8 JSR $C8D4 +16C3- C5 A2 CMP $A2 +16C5- AC B8 C4 LDY $C4B8 +16C8- 8D A0 DF STA $DFA0 +16CB- D0 D2 BNE $169F +16CD- CE D4 A0 DEC $A0D4 +16D0- A2 CF LDX #$CF +16D2- D0 D0 BNE $16A4 +16D4- CF ??? +16D5- D3 ??? +16D6- C9 D4 CMP #$D4 +16D8- C5 BA CMP $BA +16DA- 20 C9 D4 JSR $D4C9 +16DD- 20 D2 C5 JSR $C5D2 +16E0- D4 ??? +16E1- D5 D2 CMP $D2,X +16E3- CE D3 20 DEC $20D3 +16E6- C1 20 CMP ($20,X) +16E8- B1 B6 LDA ($B6),Y +16EA- AD C2 C9 LDA $C9C2 16ED- D4 ??? -16EE- C5 C4 CMP $C4 -16F0- 20 C6 D2 JSR $D2C6 -16F3- CF ??? -16F4- CD 20 C9 CMP $C920 -16F7- D4 ??? -16F8- D3 ??? -16F9- A2 AC LDX #$AC -16FB- B8 CLV -16FC- C4 8D CPY $8D -16FE- A0 DF LDY #$DF -1700- D0 D2 BNE $16D4 -1702- CE D4 A0 DEC $A0D4 -1705- A2 D3 LDX #$D3 -1707- D4 ??? -1708- D2 C9 CMP ($C9) -170A- CE C7 20 DEC $20C7 -170D- C5 D1 CMP $D1 -170F- D5 C9 CMP $C9,X -1711- D6 C1 DEC $C1,X -1713- CC C5 CE CPY $CEC5 -1716- D4 ??? -1717- AE 20 D4 LDX $D420 -171A- C8 INY -171B- D5 D3 CMP $D3,X -171D- BA TSX -171E- A2 AC LDX #$AC -1720- B8 CLV -1721- C4 B8 CPY $B8 -1723- C4 8D CPY $8D -1725- A0 DF LDY #$DF -1727- D0 D2 BNE $16FB -1729- CE D4 A0 DEC $A0D4 -172C- A2 D4 LDX #$D4 -172E- CF ??? -172F- CE D5 CD DEC $CDD5 -1732- 20 A7 B2 JSR $B2A7 -1735- B5 B5 LDA $B5,X -1737- A7 ??? -1738- 20 D2 C5 JSR $C5D2 -173B- D4 ??? -173C- D5 D2 CMP $D2,X -173E- CE D3 BA DEC $BAD3 -1741- A2 AC LDX #$AC -1743- B8 CLV -1744- C4 8D CPY $8D -1746- A0 D4 LDY #$D4 -1748- CF ??? -1749- CE D5 CD DEC $CDD5 -174C- A0 A2 LDY #$A2 -174E- B2 B5 LDA ($B5) -1750- B5 A2 LDA $A2,X -1752- 8D A0 DF STA $DFA0 -1755- C4 D5 CPY $D5 -1757- CD D0 A0 CMP $A0D0 -175A- D2 C5 CMP ($C5) -175C- D4 ??? -175D- D5 D2 CMP $D2,X -175F- CE BB D2 DEC $D2BB -1762- C5 D4 CMP $D4 -1764- CC C5 CE CPY $CEC5 -1767- 8D A0 DF STA $DFA0 -176A- D0 D2 BNE $173E -176C- CE D4 A0 DEC $A0D4 -176F- A2 20 LDX #$20 -1771- A2 AC LDX #$AC -1773- B8 CLV -1774- C4 B8 CPY $B8 -1776- C4 B8 CPY $B8 -1778- C4 8D CPY $8D -177A- A0 DF LDY #$DF -177C- D7 ??? -177D- C1 C9 CMP ($C9,X) -177F- D4 ??? -1780- 8D AA 8D STA $8DAA -1783- A0 DF LDY #$DF -1785- D0 D2 BNE $1759 -1787- CE D4 A0 DEC $A0D4 -178A- A2 20 LDX #$20 -178C- A2 AC LDX #$AC -178E- B8 CLV -178F- C4 B8 CPY $B8 -1791- C4 B8 CPY $B8 -1793- C4 B8 CPY $B8 -1795- C4 8D CPY $8D -1797- A0 DF LDY #$DF -1799- D0 D2 BNE $176D -179B- CE D4 A0 DEC $A0D4 -179E- A2 D3 LDX #$D3 -17A0- D5 C2 CMP $C2,X -17A2- D3 ??? -17A3- D4 ??? -17A4- D2 C9 CMP ($C9) -17A6- CE C7 20 DEC $20C7 -17A9- D2 CF CMP ($CF) -17AB- D5 D4 CMP $D4,X -17AD- C9 CE CMP #$CE -17AF- C5 D3 CMP $D3 -17B1- AF ??? -17B2- CD C1 C3 CMP $C3C1 -17B5- D2 CF CMP ($CF) -17B7- D3 ??? -17B8- A2 AC LDX #$AC -17BA- B8 CLV -17BB- C4 8D CPY $8D -17BD- A0 DF LDY #$DF -17BF- D0 D2 BNE $1793 -17C1- CE D4 A0 DEC $A0D4 -17C4- A2 AD LDX #$AD -17C6- AD AD AD LDA $ADAD -17C9- AD AD AD LDA $ADAD -17CC- AD AD AD LDA $ADAD -17CF- AD AD AD LDA $ADAD -17D2- AD AD AD LDA $ADAD -17D5- AD AD AD LDA $ADAD -17D8- AD AD AD LDA $ADAD -17DB- AD AD AD LDA $ADAD -17DE- A2 AC LDX #$AC -17E0- B8 CLV -17E1- C4 B8 CPY $B8 -17E3- C4 8D CPY $8D -17E5- A0 DF LDY #$DF -17E7- D0 D2 BNE $17BB -17E9- CE D4 A0 DEC $A0D4 -17EC- A2 D3 LDX #$D3 -17EE- D0 CF BNE $17BF -17F0- D3 ??? -17F1- 20 C6 C9 JSR $C9C6 -17F4- CE C4 D3 DEC $D3C4 -17F7- 20 D4 C8 JSR $C8D4 -17FA- C5 20 CMP $20 -17FC- D0 CF BNE $17CD -17FE- D3 ??? -17FF- C9 D4 CMP #$D4 -1801- C9 CF CMP #$CF -1803- CE 20 CF DEC $CF20 -1806- C6 A2 DEC $A2 -1808- AC B8 C4 LDY $C4B8 -180B- 8D A0 DF STA $DFA0 -180E- D0 D2 BNE $17E2 -1810- CE D4 A0 DEC $A0D4 -1813- A2 C1 LDX #$C1 -1815- 20 D3 D5 JSR $D5D3 -1818- C2 ??? -1819- D3 ??? -181A- D4 ??? -181B- D2 C9 CMP ($C9) -181D- CE C7 20 DEC $20C7 -1820- D7 ??? +16EE- 20 A2 AC JSR $ACA2 +16F1- B8 CLV +16F2- C4 8D CPY $8D +16F4- A0 DF LDY #$DF +16F6- D0 D2 BNE $16CA +16F8- CE D4 A0 DEC $A0D4 +16FB- A2 C9 LDX #$C9 +16FD- CE D4 C5 DEC $C5D4 +1700- C7 ??? +1701- C5 D2 CMP $D2 +1703- 20 D6 C1 JSR $C1D6 +1706- CC D5 C5 CPY $C5D5 +1709- 20 C3 CF JSR $CFC3 +170C- CE C5 D2 DEC $D2C5 +170F- D4 ??? +1710- C5 C4 CMP $C4 +1712- 20 C6 D2 JSR $D2C6 +1715- CF ??? +1716- CD 20 C9 CMP $C920 +1719- D4 ??? +171A- D3 ??? +171B- A2 AC LDX #$AC +171D- B8 CLV +171E- C4 8D CPY $8D +1720- A0 DF LDY #$DF +1722- D0 D2 BNE $16F6 +1724- CE D4 A0 DEC $A0D4 +1727- A2 D3 LDX #$D3 +1729- D4 ??? +172A- D2 C9 CMP ($C9) +172C- CE C7 20 DEC $20C7 +172F- C5 D1 CMP $D1 +1731- D5 C9 CMP $C9,X +1733- D6 C1 DEC $C1,X +1735- CC C5 CE CPY $CEC5 +1738- D4 ??? +1739- AE 20 D4 LDX $D420 +173C- C8 INY +173D- D5 D3 CMP $D3,X +173F- BA TSX +1740- A2 AC LDX #$AC +1742- B8 CLV +1743- C4 B8 CPY $B8 +1745- C4 8D CPY $8D +1747- A0 DF LDY #$DF +1749- D0 D2 BNE $171D +174B- CE D4 A0 DEC $A0D4 +174E- A2 D4 LDX #$D4 +1750- CF ??? +1751- CE D5 CD DEC $CDD5 +1754- 20 A7 B2 JSR $B2A7 +1757- B5 B5 LDA $B5,X +1759- A7 ??? +175A- 20 D2 C5 JSR $C5D2 +175D- D4 ??? +175E- D5 D2 CMP $D2,X +1760- CE D3 BA DEC $BAD3 +1763- A2 AC LDX #$AC +1765- B8 CLV +1766- C4 8D CPY $8D +1768- A0 D4 LDY #$D4 +176A- CF ??? +176B- CE D5 CD DEC $CDD5 +176E- A0 A2 LDY #$A2 +1770- B2 B5 LDA ($B5) +1772- B5 A2 LDA $A2,X +1774- 8D A0 DF STA $DFA0 +1777- C4 D5 CPY $D5 +1779- CD D0 A0 CMP $A0D0 +177C- D2 C5 CMP ($C5) +177E- D4 ??? +177F- D5 D2 CMP $D2,X +1781- CE BB D2 DEC $D2BB +1784- C5 D4 CMP $D4 +1786- CC C5 CE CPY $CEC5 +1789- 8D A0 DF STA $DFA0 +178C- D0 D2 BNE $1760 +178E- CE D4 A0 DEC $A0D4 +1791- A2 20 LDX #$20 +1793- A2 AC LDX #$AC +1795- B8 CLV +1796- C4 B8 CPY $B8 +1798- C4 B8 CPY $B8 +179A- C4 8D CPY $8D +179C- A0 DF LDY #$DF +179E- D7 ??? +179F- C1 C9 CMP ($C9,X) +17A1- D4 ??? +17A2- 8D AA 8D STA $8DAA +17A5- A0 DF LDY #$DF +17A7- D0 D2 BNE $177B +17A9- CE D4 A0 DEC $A0D4 +17AC- A2 20 LDX #$20 +17AE- A2 AC LDX #$AC +17B0- B8 CLV +17B1- C4 B8 CPY $B8 +17B3- C4 B8 CPY $B8 +17B5- C4 B8 CPY $B8 +17B7- C4 8D CPY $8D +17B9- A0 DF LDY #$DF +17BB- D0 D2 BNE $178F +17BD- CE D4 A0 DEC $A0D4 +17C0- A2 D3 LDX #$D3 +17C2- D5 C2 CMP $C2,X +17C4- D3 ??? +17C5- D4 ??? +17C6- D2 C9 CMP ($C9) +17C8- CE C7 20 DEC $20C7 +17CB- D2 CF CMP ($CF) +17CD- D5 D4 CMP $D4,X +17CF- C9 CE CMP #$CE +17D1- C5 D3 CMP $D3 +17D3- AF ??? +17D4- CD C1 C3 CMP $C3C1 +17D7- D2 CF CMP ($CF) +17D9- D3 ??? +17DA- A2 AC LDX #$AC +17DC- B8 CLV +17DD- C4 8D CPY $8D +17DF- A0 DF LDY #$DF +17E1- D0 D2 BNE $17B5 +17E3- CE D4 A0 DEC $A0D4 +17E6- A2 AD LDX #$AD +17E8- AD AD AD LDA $ADAD +17EB- AD AD AD LDA $ADAD +17EE- AD AD AD LDA $ADAD +17F1- AD AD AD LDA $ADAD +17F4- AD AD AD LDA $ADAD +17F7- AD AD AD LDA $ADAD +17FA- AD AD AD LDA $ADAD +17FD- AD AD AD LDA $ADAD +1800- A2 AC LDX #$AC +1802- B8 CLV +1803- C4 B8 CPY $B8 +1805- C4 8D CPY $8D +1807- A0 DF LDY #$DF +1809- D0 D2 BNE $17DD +180B- CE D4 A0 DEC $A0D4 +180E- A2 D3 LDX #$D3 +1810- D0 CF BNE $17E1 +1812- D3 ??? +1813- 20 C6 C9 JSR $C9C6 +1816- CE C4 D3 DEC $D3C4 +1819- 20 D4 C8 JSR $C8D4 +181C- C5 20 CMP $20 +181E- D0 CF BNE $17EF +1820- D3 ??? 1821- C9 D4 CMP #$D4 -1823- C8 INY -1824- C9 CE CMP #$CE -1826- 20 C1 CE JSR $CEC1 -1829- CF ??? -182A- D4 ??? -182B- C8 INY -182C- C5 D2 CMP $D2 -182E- A2 AC LDX #$AC -1830- B8 CLV -1831- C4 8D CPY $8D -1833- A0 DF LDY #$DF -1835- D0 D2 BNE $1809 -1837- CE D4 A0 DEC $A0D4 -183A- A2 D3 LDX #$D3 +1823- C9 CF CMP #$CF +1825- CE 20 CF DEC $CF20 +1828- C6 A2 DEC $A2 +182A- AC B8 C4 LDY $C4B8 +182D- 8D A0 DF STA $DFA0 +1830- D0 D2 BNE $1804 +1832- CE D4 A0 DEC $A0D4 +1835- A2 C1 LDX #$C1 +1837- 20 D3 D5 JSR $D5D3 +183A- C2 ??? +183B- D3 ??? 183C- D4 ??? 183D- D2 C9 CMP ($C9) -183F- CE C7 AE DEC $AEC7 -1842- A2 AC LDX #$AC -1844- B8 CLV -1845- C4 B8 CPY $B8 -1847- C4 8D CPY $8D -1849- A0 DF LDY #$DF -184B- D0 D2 BNE $181F -184D- CE D4 A0 DEC $A0D4 -1850- A2 D3 LDX #$D3 -1852- D0 CF BNE $1823 -1854- D3 ??? -1855- 20 A7 D4 JSR $D4A7 -1858- C8 INY -1859- C9 D3 CMP #$D3 -185B- 20 C9 D3 JSR $D3C9 -185E- 20 C1 20 JSR $20C1 -1861- D3 ??? -1862- D4 ??? -1863- D2 C9 CMP ($C9) -1865- CE C7 A7 DEC $A7C7 -1868- BB ??? -1869- C1 D3 CMP ($D3,X) -186B- D4 ??? -186C- D2 20 CMP ($20) -186E- D2 C5 CMP ($C5) -1870- D4 ??? -1871- D5 D2 CMP $D2,X -1873- CE D3 BA DEC $BAD3 -1876- 20 A2 8D JSR $8DA2 -1879- A0 D3 LDY #$D3 -187B- D0 CF BNE $184C -187D- D3 ??? -187E- A0 A2 LDY #$A2 -1880- D4 ??? -1881- C8 INY -1882- C9 D3 CMP #$D3 -1884- 20 C9 D3 JSR $D3C9 -1887- 20 C1 20 JSR $20C1 -188A- D3 ??? -188B- D4 ??? -188C- D2 C9 CMP ($C9) -188E- CE C7 A2 DEC $A2C7 -1891- BB ??? -1892- C1 D3 CMP ($D3,X) -1894- D4 ??? -1895- D2 8D CMP ($8D) -1897- A0 D3 LDY #$D3 -1899- D4 ??? -189A- C1 A0 CMP ($A0,X) -189C- A4 B3 LDY $B3 -189E- B0 B0 BCS $1850 -18A0- 8D A0 CC STA $CCA0 -18A3- C4 C1 CPY $C1 -18A5- A0 A3 LDY #$A3 -18A7- B0 8D BCS $1836 -18A9- A0 D3 LDY #$D3 -18AB- D4 ??? -18AC- C1 A0 CMP ($A0,X) -18AE- A4 B3 LDY $B3 -18B0- B0 B1 BCS $1863 -18B2- A0 BB LDY #$BB -18B4- 20 C3 CC JSR $CCC3 -18B7- C5 C1 CMP $C1 -18B9- D2 20 CMP ($20) -18BB- C8 INY -18BC- C9 20 CMP #$20 -18BE- C2 ??? -18BF- D9 D4 C5 CMP $C5D4,Y -18C2- 8D A0 D4 STA $D4A0 -18C5- CF ??? -18C6- D3 ??? -18C7- D4 ??? -18C8- D2 A0 CMP ($A0) -18CA- A4 B3 LDY $B3 -18CC- B0 B0 BCS $187E -18CE- 8D A0 D3 STA $D3A0 -18D1- D0 D2 BNE $18A5 -18D3- CE A0 D2 DEC $D2A0 -18D6- C5 D4 CMP $D4 -18D8- D5 D2 CMP $D2,X -18DA- CE 8D A0 DEC $A08D -18DD- DF ??? -18DE- D0 D2 BNE $18B2 -18E0- CE D4 A0 DEC $A0D4 -18E3- A2 20 LDX #$20 -18E5- A2 AC LDX #$AC -18E7- B8 CLV -18E8- C4 B8 CPY $B8 -18EA- C4 B8 CPY $B8 -18EC- C4 8D CPY $8D -18EE- AA TAX -18EF- 8D A0 DF STA $DFA0 -18F2- D0 D2 BNE $18C6 -18F4- CE D4 A0 DEC $A0D4 -18F7- A2 20 LDX #$20 -18F9- A2 AC LDX #$AC -18FB- B8 CLV -18FC- C4 B8 CPY $B8 -18FE- C4 B8 CPY $B8 -1900- C4 8D CPY $8D -1902- A0 DF LDY #$DF -1904- D0 D2 BNE $18D8 -1906- CE D4 A0 DEC $A0D4 -1909- A2 D4 LDX #$D4 -190B- C8 INY -190C- C5 20 CMP $20 -190E- D3 ??? -190F- C3 ??? -1910- D0 D9 BNE $18EB -1912- 20 CD C1 JSR $C1CD -1915- C3 ??? -1916- D2 CF CMP ($CF) -1918- 20 C3 CF JSR $CFC3 -191B- D0 C9 BNE $18E6 -191D- C5 D3 CMP $D3 -191F- 20 C1 20 JSR $20C1 -1922- A2 AC LDX #$AC -1924- B8 CLV -1925- C4 8D CPY $8D -1927- A0 DF LDY #$DF -1929- D0 D2 BNE $18FD -192B- CE D4 A0 DEC $A0D4 -192E- A2 D3 LDX #$D3 -1930- D5 C2 CMP $C2,X -1932- D3 ??? -1933- D4 ??? -1934- D2 C9 CMP ($C9) -1936- CE C7 20 DEC $20C7 -1939- C6 D2 DEC $D2 -193B- CF ??? -193C- CD 20 C1 CMP $C120 -193F- CE CF D4 DEC $D4CF -1942- C8 INY -1943- C5 D2 CMP $D2 -1945- 20 D3 D4 JSR $D4D3 -1948- D2 C9 CMP ($C9) -194A- CE C7 A2 DEC $A2C7 -194D- AC B8 C4 LDY $C4B8 -1950- 8D A0 DF STA $DFA0 -1953- D0 D2 BNE $1927 -1955- CE D4 A0 DEC $A0D4 -1958- A2 C1 LDX #$C1 -195A- D4 ??? -195B- 20 D4 C8 JSR $C8D4 -195E- C5 20 CMP $20 -1960- D3 ??? -1961- D0 C5 BNE $1928 -1963- C3 ??? -1964- C9 C6 CMP #$C6 -1966- C9 C5 CMP #$C5 -1968- C4 20 CPY $20 -196A- C9 CE CMP #$CE -196C- C4 C5 CPY $C5 -196E- D8 CLD -196F- AC 20 C8 LDY $C820 -1972- CF ??? -1973- CC C4 C9 CPY $C9C4 -1976- CE C7 A2 DEC $A2C7 -1979- AC B8 C4 LDY $C4B8 -197C- 8D A0 DF STA $DFA0 -197F- D0 D2 BNE $1953 -1981- CE D4 A0 DEC $A0D4 -1984- A2 D4 LDX #$D4 -1986- C8 INY -1987- C5 20 CMP $20 -1989- D3 ??? -198A- D5 C2 CMP $C2,X -198C- D3 ??? -198D- D4 ??? -198E- D2 C9 CMP ($C9) -1990- CE C7 20 DEC $20C7 -1993- C9 CE CMP #$CE -1995- 20 DB D2 JSR $D2DB -1998- C5 D4 CMP $D4 -199A- D5 D2 CMP $D2,X -199C- CE DD AE DEC $AEDD -199F- A2 AC LDX #$AC -19A1- B8 CLV -19A2- C4 B8 CPY $B8 -19A4- C4 8D CPY $8D -19A6- A0 DF LDY #$DF -19A8- D0 D2 BNE $197C -19AA- CE D4 A0 DEC $A0D4 -19AD- A2 D3 LDX #$D3 -19AF- C3 ??? -19B0- D0 D9 BNE $198B -19B2- 20 A7 C1 JSR $C1A7 -19B5- C2 ??? -19B6- C3 ??? -19B7- C4 C5 CPY $C5 -19B9- C6 C7 DEC $C7 -19BB- C8 INY -19BC- C9 CA CMP #$CA -19BE- CB ??? -19BF- A7 ??? -19C0- BB ??? -19C1- A3 ??? -19C2- B2 BB LDA ($BB) -19C4- A3 ??? -19C5- B4 BB LDY $BB,X -19C7- A3 ??? -19C8- B5 B0 LDA $B0,X -19CA- 20 D2 C5 JSR $C5D2 -19CD- D4 ??? -19CE- D5 D2 CMP $D2,X -19D0- CE D3 BA DEC $BAD3 -19D3- 20 A2 8D JSR $8DA2 -19D6- A0 D3 LDY #$D3 +183F- CE C7 20 DEC $20C7 +1842- D7 ??? +1843- C9 D4 CMP #$D4 +1845- C8 INY +1846- C9 CE CMP #$CE +1848- 20 C1 CE JSR $CEC1 +184B- CF ??? +184C- D4 ??? +184D- C8 INY +184E- C5 D2 CMP $D2 +1850- A2 AC LDX #$AC +1852- B8 CLV +1853- C4 8D CPY $8D +1855- A0 DF LDY #$DF +1857- D0 D2 BNE $182B +1859- CE D4 A0 DEC $A0D4 +185C- A2 D3 LDX #$D3 +185E- D4 ??? +185F- D2 C9 CMP ($C9) +1861- CE C7 AE DEC $AEC7 +1864- A2 AC LDX #$AC +1866- B8 CLV +1867- C4 B8 CPY $B8 +1869- C4 8D CPY $8D +186B- A0 DF LDY #$DF +186D- D0 D2 BNE $1841 +186F- CE D4 A0 DEC $A0D4 +1872- A2 D3 LDX #$D3 +1874- D0 CF BNE $1845 +1876- D3 ??? +1877- 20 A7 D4 JSR $D4A7 +187A- C8 INY +187B- C9 D3 CMP #$D3 +187D- 20 C9 D3 JSR $D3C9 +1880- 20 C1 20 JSR $20C1 +1883- D3 ??? +1884- D4 ??? +1885- D2 C9 CMP ($C9) +1887- CE C7 A7 DEC $A7C7 +188A- BB ??? +188B- C1 D3 CMP ($D3,X) +188D- D4 ??? +188E- D2 20 CMP ($20) +1890- D2 C5 CMP ($C5) +1892- D4 ??? +1893- D5 D2 CMP $D2,X +1895- CE D3 BA DEC $BAD3 +1898- 20 A2 8D JSR $8DA2 +189B- A0 D3 LDY #$D3 +189D- D0 CF BNE $186E +189F- D3 ??? +18A0- A0 A2 LDY #$A2 +18A2- D4 ??? +18A3- C8 INY +18A4- C9 D3 CMP #$D3 +18A6- 20 C9 D3 JSR $D3C9 +18A9- 20 C1 20 JSR $20C1 +18AC- D3 ??? +18AD- D4 ??? +18AE- D2 C9 CMP ($C9) +18B0- CE C7 A2 DEC $A2C7 +18B3- BB ??? +18B4- C1 D3 CMP ($D3,X) +18B6- D4 ??? +18B7- D2 8D CMP ($8D) +18B9- A0 D3 LDY #$D3 +18BB- D4 ??? +18BC- C1 A0 CMP ($A0,X) +18BE- A4 B3 LDY $B3 +18C0- B0 B0 BCS $1872 +18C2- 8D A0 CC STA $CCA0 +18C5- C4 C1 CPY $C1 +18C7- A0 A3 LDY #$A3 +18C9- B0 8D BCS $1858 +18CB- A0 D3 LDY #$D3 +18CD- D4 ??? +18CE- C1 A0 CMP ($A0,X) +18D0- A4 B3 LDY $B3 +18D2- B0 B1 BCS $1885 +18D4- A0 BB LDY #$BB +18D6- 20 C3 CC JSR $CCC3 +18D9- C5 C1 CMP $C1 +18DB- D2 20 CMP ($20) +18DD- C8 INY +18DE- C9 20 CMP #$20 +18E0- C2 ??? +18E1- D9 D4 C5 CMP $C5D4,Y +18E4- 8D A0 D4 STA $D4A0 +18E7- CF ??? +18E8- D3 ??? +18E9- D4 ??? +18EA- D2 A0 CMP ($A0) +18EC- A4 B3 LDY $B3 +18EE- B0 B0 BCS $18A0 +18F0- 8D A0 D3 STA $D3A0 +18F3- D0 D2 BNE $18C7 +18F5- CE A0 D2 DEC $D2A0 +18F8- C5 D4 CMP $D4 +18FA- D5 D2 CMP $D2,X +18FC- CE 8D A0 DEC $A08D +18FF- DF ??? +1900- D0 D2 BNE $18D4 +1902- CE D4 A0 DEC $A0D4 +1905- A2 20 LDX #$20 +1907- A2 AC LDX #$AC +1909- B8 CLV +190A- C4 B8 CPY $B8 +190C- C4 B8 CPY $B8 +190E- C4 8D CPY $8D +1910- AA TAX +1911- 8D A0 DF STA $DFA0 +1914- D0 D2 BNE $18E8 +1916- CE D4 A0 DEC $A0D4 +1919- A2 20 LDX #$20 +191B- A2 AC LDX #$AC +191D- B8 CLV +191E- C4 B8 CPY $B8 +1920- C4 B8 CPY $B8 +1922- C4 8D CPY $8D +1924- A0 DF LDY #$DF +1926- D0 D2 BNE $18FA +1928- CE D4 A0 DEC $A0D4 +192B- A2 D4 LDX #$D4 +192D- C8 INY +192E- C5 20 CMP $20 +1930- D3 ??? +1931- C3 ??? +1932- D0 D9 BNE $190D +1934- 20 CD C1 JSR $C1CD +1937- C3 ??? +1938- D2 CF CMP ($CF) +193A- 20 C3 CF JSR $CFC3 +193D- D0 C9 BNE $1908 +193F- C5 D3 CMP $D3 +1941- 20 C1 20 JSR $20C1 +1944- A2 AC LDX #$AC +1946- B8 CLV +1947- C4 8D CPY $8D +1949- A0 DF LDY #$DF +194B- D0 D2 BNE $191F +194D- CE D4 A0 DEC $A0D4 +1950- A2 D3 LDX #$D3 +1952- D5 C2 CMP $C2,X +1954- D3 ??? +1955- D4 ??? +1956- D2 C9 CMP ($C9) +1958- CE C7 20 DEC $20C7 +195B- C6 D2 DEC $D2 +195D- CF ??? +195E- CD 20 C1 CMP $C120 +1961- CE CF D4 DEC $D4CF +1964- C8 INY +1965- C5 D2 CMP $D2 +1967- 20 D3 D4 JSR $D4D3 +196A- D2 C9 CMP ($C9) +196C- CE C7 A2 DEC $A2C7 +196F- AC B8 C4 LDY $C4B8 +1972- 8D A0 DF STA $DFA0 +1975- D0 D2 BNE $1949 +1977- CE D4 A0 DEC $A0D4 +197A- A2 C1 LDX #$C1 +197C- D4 ??? +197D- 20 D4 C8 JSR $C8D4 +1980- C5 20 CMP $20 +1982- D3 ??? +1983- D0 C5 BNE $194A +1985- C3 ??? +1986- C9 C6 CMP #$C6 +1988- C9 C5 CMP #$C5 +198A- C4 20 CPY $20 +198C- C9 CE CMP #$CE +198E- C4 C5 CPY $C5 +1990- D8 CLD +1991- AC 20 C8 LDY $C820 +1994- CF ??? +1995- CC C4 C9 CPY $C9C4 +1998- CE C7 A2 DEC $A2C7 +199B- AC B8 C4 LDY $C4B8 +199E- 8D A0 DF STA $DFA0 +19A1- D0 D2 BNE $1975 +19A3- CE D4 A0 DEC $A0D4 +19A6- A2 D4 LDX #$D4 +19A8- C8 INY +19A9- C5 20 CMP $20 +19AB- D3 ??? +19AC- D5 C2 CMP $C2,X +19AE- D3 ??? +19AF- D4 ??? +19B0- D2 C9 CMP ($C9) +19B2- CE C7 20 DEC $20C7 +19B5- C9 CE CMP #$CE +19B7- 20 DB D2 JSR $D2DB +19BA- C5 D4 CMP $D4 +19BC- D5 D2 CMP $D2,X +19BE- CE DD AE DEC $AEDD +19C1- A2 AC LDX #$AC +19C3- B8 CLV +19C4- C4 B8 CPY $B8 +19C6- C4 8D CPY $8D +19C8- A0 DF LDY #$DF +19CA- D0 D2 BNE $199E +19CC- CE D4 A0 DEC $A0D4 +19CF- A2 D3 LDX #$D3 +19D1- C3 ??? +19D2- D0 D9 BNE $19AD +19D4- 20 A7 C1 JSR $C1A7 +19D7- C2 ??? 19D8- C3 ??? -19D9- D0 D9 BNE $19B4 -19DB- A0 A2 LDY #$A2 -19DD- C1 C2 CMP ($C2,X) -19DF- C3 ??? -19E0- C4 C5 CPY $C5 -19E2- C6 C7 DEC $C7 -19E4- C8 INY -19E5- C9 CA CMP #$CA -19E7- CB ??? -19E8- A2 BB LDX #$BB -19EA- A3 ??? -19EB- B2 BB LDA ($BB) -19ED- A3 ??? -19EE- B4 BB LDY $BB,X -19F0- A3 ??? -19F1- A4 C6 LDY $C6 -19F3- C6 8D DEC $8D -19F5- A0 D3 LDY #$D3 -19F7- D0 D2 BNE $19CB -19F9- CE A0 D2 DEC $D2A0 -19FC- C5 D4 CMP $D4 -19FE- D5 D2 CMP $D2,X -1A00- CE 8D A0 DEC $A08D -1A03- DF ??? -1A04- D0 D2 BNE $19D8 -1A06- CE D4 A0 DEC $A0D4 -1A09- A2 20 LDX #$20 -1A0B- A2 AC LDX #$AC -1A0D- B8 CLV -1A0E- C4 B8 CPY $B8 -1A10- C4 B8 CPY $B8 -1A12- C4 8D CPY $8D -1A14- A0 DF LDY #$DF -1A16- D7 ??? -1A17- C1 C9 CMP ($C9,X) -1A19- D4 ??? -1A1A- 8D AA 8D STA $8DAA -1A1D- A0 DF LDY #$DF -1A1F- D0 D2 BNE $19F3 -1A21- CE D4 A0 DEC $A0D4 -1A24- A2 20 LDX #$20 -1A26- A2 AC LDX #$AC -1A28- B8 CLV -1A29- C4 B8 CPY $B8 -1A2B- C4 B8 CPY $B8 -1A2D- C4 B8 CPY $B8 -1A2F- C4 B8 CPY $B8 -1A31- C4 8D CPY $8D -1A33- A0 DF LDY #$DF -1A35- D0 D2 BNE $1A09 -1A37- CE D4 A0 DEC $A0D4 -1A3A- A2 D4 LDX #$D4 -1A3C- C8 INY -1A3D- C5 20 CMP $20 -1A3F- D3 ??? -1A40- C4 C5 CPY $C5 -1A42- CC 20 CD CPY $CD20 -1A45- C1 C3 CMP ($C3,X) -1A47- D2 CF CMP ($CF) -1A49- 20 C4 C5 JSR $C5C4 -1A4C- CC C5 D4 CPY $D4C5 -1A4F- C5 D3 CMP $D3 -1A51- 20 C1 20 JSR $20C1 -1A54- D3 ??? -1A55- D5 C2 CMP $C2,X -1A57- D3 ??? -1A58- D4 ??? -1A59- D2 C9 CMP ($C9) -1A5B- CE C7 A2 DEC $A2C7 -1A5E- AC B8 C4 LDY $C4B8 -1A61- 8D A0 DF STA $DFA0 -1A64- D0 D2 BNE $1A38 -1A66- CE D4 A0 DEC $A0D4 -1A69- A2 C6 LDX #$C6 -1A6B- D2 CF CMP ($CF) -1A6D- CD 20 D4 CMP $D420 -1A70- C8 INY -1A71- C5 20 CMP $20 -1A73- C7 ??? -1A74- C9 D6 CMP #$D6 -1A76- C5 CE CMP $CE -1A78- 20 D3 CF JSR $CFD3 -1A7B- D5 D2 CMP $D2,X -1A7D- C3 ??? -1A7E- C5 20 CMP $20 -1A80- D3 ??? -1A81- D4 ??? -1A82- D2 C9 CMP ($C9) -1A84- CE C7 AE DEC $AEC7 -1A87- 20 CE CF JSR $CFCE -1A8A- D4 ??? -1A8B- C5 20 CMP $20 -1A8D- A2 AC LDX #$AC -1A8F- B8 CLV -1A90- C4 8D CPY $8D -1A92- A0 DF LDY #$DF -1A94- D0 D2 BNE $1A68 -1A96- CE D4 A0 DEC $A0D4 -1A99- A2 D4 LDX #$D4 -1A9B- C8 INY -1A9C- C1 D4 CMP ($D4,X) -1A9E- 20 D4 C8 JSR $C8D4 -1AA1- C5 20 CMP $20 -1AA3- D3 ??? -1AA4- CF ??? -1AA5- D5 D2 CMP $D2,X -1AA7- C3 ??? -1AA8- C5 20 CMP $20 -1AAA- D3 ??? -1AAB- D4 ??? -1AAC- D2 C9 CMP ($C9) -1AAE- CE C7 20 DEC $20C7 -1AB1- CD D5 D3 CMP $D3D5 -1AB4- D4 ??? -1AB5- 20 CE CF JSR $CFCE -1AB8- D4 ??? -1AB9- A2 AC LDX #$AC -1ABB- B8 CLV -1ABC- C4 8D CPY $8D -1ABE- A0 DF LDY #$DF -1AC0- D0 D2 BNE $1A94 -1AC2- CE D4 A0 DEC $A0D4 -1AC5- A2 C2 LDX #$C2 -1AC7- C5 20 CMP $20 -1AC9- C1 20 CMP ($20,X) -1ACB- CC C9 D4 CPY $D4C9 -1ACE- C5 D2 CMP $D2 -1AD0- C1 CC CMP ($CC,X) -1AD2- 20 C2 C5 JSR $C5C2 -1AD5- C3 ??? -1AD6- C1 D5 CMP ($D5,X) -1AD8- D3 ??? -1AD9- C5 20 CMP $20 -1ADB- D4 ??? -1ADC- C8 INY -1ADD- C9 D3 CMP #$D3 -1ADF- 20 D2 CF JSR $CFD2 -1AE2- D5 D4 CMP $D4,X -1AE4- C9 CE CMP #$CE -1AE6- C5 A2 CMP $A2 -1AE8- AC B8 C4 LDY $C4B8 -1AEB- 8D A0 DF STA $DFA0 -1AEE- D0 D2 BNE $1AC2 -1AF0- CE D4 A0 DEC $A0D4 -1AF3- A2 C1 LDX #$C1 -1AF5- CC D4 C5 CPY $C5D4 -1AF8- D2 D3 CMP ($D3) -1AFA- 20 D4 C8 JSR $C8D4 -1AFD- C5 20 CMP $20 -1AFF- D3 ??? -1B00- D4 ??? -1B01- D2 C9 CMP ($C9) -1B03- CE C7 20 DEC $20C7 -1B06- D0 C1 BNE $1AC9 -1B08- D3 ??? -1B09- D3 ??? -1B0A- C5 C4 CMP $C4 -1B0C- 20 D4 CF JSR $CFD4 -1B0F- 20 C9 D4 JSR $D4C9 -1B12- AE A2 AC LDX $ACA2 -1B15- B8 CLV -1B16- C4 B8 CPY $B8 -1B18- C4 8D CPY $8D -1B1A- A0 DF LDY #$DF -1B1C- D0 D2 BNE $1AF0 -1B1E- CE D4 A0 DEC $A0D4 -1B21- A2 C9 LDX #$C9 -1B23- C6 20 DEC $20 -1B25- CC D3 D4 CPY $D4D3 -1B28- D2 20 CMP ($20) -1B2A- C8 INY -1B2B- CF ??? -1B2C- CC C4 D3 CPY $D3C4 -1B2F- 20 A7 D4 JSR $D4A7 -1B32- C8 INY -1B33- C9 D3 CMP #$D3 -1B35- 20 C9 D3 JSR $D3C9 -1B38- 20 C1 20 JSR $20C1 -1B3B- D3 ??? -1B3C- D4 ??? -1B3D- D2 C9 CMP ($C9) -1B3F- CE C7 AE DEC $AEC7 -1B42- A7 ??? -1B43- A2 AC LDX #$AC -1B45- B8 CLV -1B46- C4 8D CPY $8D -1B48- A0 DF LDY #$DF -1B4A- D0 D2 BNE $1B1E -1B4C- CE D4 A0 DEC $A0D4 -1B4F- A2 D4 LDX #$D4 -1B51- C8 INY -1B52- C5 CE CMP $CE -1B54- 20 D3 C4 JSR $C4D3 -1B57- C5 CC CMP $CC -1B59- 20 CC D3 JSR $D3CC -1B5C- D4 ??? -1B5D- D2 BB CMP ($BB) -1B5F- A3 ??? -1B60- B1 BB LDA ($BB),Y -1B62- A3 ??? -1B63- B7 ??? -1B64- 20 D2 C5 JSR $C5D2 -1B67- D4 ??? -1B68- D5 D2 CMP $D2,X -1B6A- CE D3 BA DEC $BAD3 -1B6D- 20 A2 AC JSR $ACA2 -1B70- B8 CLV -1B71- C4 B8 CPY $B8 -1B73- C4 8D CPY $8D -1B75- A0 D3 LDY #$D3 -1B77- C4 C5 CPY $C5 -1B79- CC A0 CC CPY $CCA0 -1B7C- D3 ??? -1B7D- D4 ??? -1B7E- D2 BB CMP ($BB) -1B80- A3 ??? -1B81- B1 BB LDA ($BB),Y -1B83- A3 ??? -1B84- B7 ??? -1B85- 8D A0 D3 STA $D3A0 -1B88- D0 D2 BNE $1B5C -1B8A- CE A0 CC DEC $CCA0 -1B8D- D3 ??? -1B8E- D4 ??? -1B8F- D2 8D CMP ($8D) -1B91- A0 DF LDY #$DF -1B93- D0 D2 BNE $1B67 -1B95- CE D4 A0 DEC $A0D4 -1B98- A2 20 LDX #$20 -1B9A- A2 AC LDX #$AC -1B9C- B8 CLV -1B9D- C4 B8 CPY $B8 -1B9F- C4 B8 CPY $B8 -1BA1- C4 B8 CPY $B8 -1BA3- C4 8D CPY $8D -1BA5- A0 DF LDY #$DF -1BA7- D7 ??? -1BA8- C1 C9 CMP ($C9,X) -1BAA- D4 ??? -1BAB- 8D AA 8D STA $8DAA -1BAE- A0 DF LDY #$DF -1BB0- D0 D2 BNE $1B84 -1BB2- CE D4 A0 DEC $A0D4 -1BB5- A2 D4 LDX #$D4 -1BB7- C8 INY -1BB8- C5 20 CMP $20 -1BBA- D3 ??? -1BBB- C9 CE CMP #$CE -1BBD- D3 ??? -1BBE- 20 CD C1 JSR $C1CD -1BC1- C3 ??? -1BC2- D2 CF CMP ($CF) -1BC4- 20 C4 CF JSR $CFC4 -1BC7- C5 D3 CMP $D3 -1BC9- 20 D4 C8 JSR $C8D4 -1BCC- C5 20 CMP $20 -1BCE- A2 AC LDX #$AC -1BD0- B8 CLV -1BD1- C4 8D CPY $8D -1BD3- A0 DF LDY #$DF -1BD5- D0 D2 BNE $1BA9 -1BD7- CE D4 A0 DEC $A0D4 -1BDA- A2 CF LDX #$CF -1BDC- D0 D0 BNE $1BAE -1BDE- CF ??? +19D9- C4 C5 CPY $C5 +19DB- C6 C7 DEC $C7 +19DD- C8 INY +19DE- C9 CA CMP #$CA +19E0- CB ??? +19E1- A7 ??? +19E2- BB ??? +19E3- A3 ??? +19E4- B2 BB LDA ($BB) +19E6- A3 ??? +19E7- B4 BB LDY $BB,X +19E9- A3 ??? +19EA- B5 B0 LDA $B0,X +19EC- 20 D2 C5 JSR $C5D2 +19EF- D4 ??? +19F0- D5 D2 CMP $D2,X +19F2- CE D3 BA DEC $BAD3 +19F5- 20 A2 8D JSR $8DA2 +19F8- A0 D3 LDY #$D3 +19FA- C3 ??? +19FB- D0 D9 BNE $19D6 +19FD- A0 A2 LDY #$A2 +19FF- C1 C2 CMP ($C2,X) +1A01- C3 ??? +1A02- C4 C5 CPY $C5 +1A04- C6 C7 DEC $C7 +1A06- C8 INY +1A07- C9 CA CMP #$CA +1A09- CB ??? +1A0A- A2 BB LDX #$BB +1A0C- A3 ??? +1A0D- B2 BB LDA ($BB) +1A0F- A3 ??? +1A10- B4 BB LDY $BB,X +1A12- A3 ??? +1A13- A4 C6 LDY $C6 +1A15- C6 8D DEC $8D +1A17- A0 D3 LDY #$D3 +1A19- D0 D2 BNE $19ED +1A1B- CE A0 D2 DEC $D2A0 +1A1E- C5 D4 CMP $D4 +1A20- D5 D2 CMP $D2,X +1A22- CE 8D A0 DEC $A08D +1A25- DF ??? +1A26- D0 D2 BNE $19FA +1A28- CE D4 A0 DEC $A0D4 +1A2B- A2 20 LDX #$20 +1A2D- A2 AC LDX #$AC +1A2F- B8 CLV +1A30- C4 B8 CPY $B8 +1A32- C4 B8 CPY $B8 +1A34- C4 8D CPY $8D +1A36- A0 DF LDY #$DF +1A38- D7 ??? +1A39- C1 C9 CMP ($C9,X) +1A3B- D4 ??? +1A3C- 8D AA 8D STA $8DAA +1A3F- A0 DF LDY #$DF +1A41- D0 D2 BNE $1A15 +1A43- CE D4 A0 DEC $A0D4 +1A46- A2 20 LDX #$20 +1A48- A2 AC LDX #$AC +1A4A- B8 CLV +1A4B- C4 B8 CPY $B8 +1A4D- C4 B8 CPY $B8 +1A4F- C4 B8 CPY $B8 +1A51- C4 B8 CPY $B8 +1A53- C4 8D CPY $8D +1A55- A0 DF LDY #$DF +1A57- D0 D2 BNE $1A2B +1A59- CE D4 A0 DEC $A0D4 +1A5C- A2 D4 LDX #$D4 +1A5E- C8 INY +1A5F- C5 20 CMP $20 +1A61- D3 ??? +1A62- C4 C5 CPY $C5 +1A64- CC 20 CD CPY $CD20 +1A67- C1 C3 CMP ($C3,X) +1A69- D2 CF CMP ($CF) +1A6B- 20 C4 C5 JSR $C5C4 +1A6E- CC C5 D4 CPY $D4C5 +1A71- C5 D3 CMP $D3 +1A73- 20 C1 20 JSR $20C1 +1A76- D3 ??? +1A77- D5 C2 CMP $C2,X +1A79- D3 ??? +1A7A- D4 ??? +1A7B- D2 C9 CMP ($C9) +1A7D- CE C7 A2 DEC $A2C7 +1A80- AC B8 C4 LDY $C4B8 +1A83- 8D A0 DF STA $DFA0 +1A86- D0 D2 BNE $1A5A +1A88- CE D4 A0 DEC $A0D4 +1A8B- A2 C6 LDX #$C6 +1A8D- D2 CF CMP ($CF) +1A8F- CD 20 D4 CMP $D420 +1A92- C8 INY +1A93- C5 20 CMP $20 +1A95- C7 ??? +1A96- C9 D6 CMP #$D6 +1A98- C5 CE CMP $CE +1A9A- 20 D3 CF JSR $CFD3 +1A9D- D5 D2 CMP $D2,X +1A9F- C3 ??? +1AA0- C5 20 CMP $20 +1AA2- D3 ??? +1AA3- D4 ??? +1AA4- D2 C9 CMP ($C9) +1AA6- CE C7 AE DEC $AEC7 +1AA9- 20 CE CF JSR $CFCE +1AAC- D4 ??? +1AAD- C5 20 CMP $20 +1AAF- A2 AC LDX #$AC +1AB1- B8 CLV +1AB2- C4 8D CPY $8D +1AB4- A0 DF LDY #$DF +1AB6- D0 D2 BNE $1A8A +1AB8- CE D4 A0 DEC $A0D4 +1ABB- A2 D4 LDX #$D4 +1ABD- C8 INY +1ABE- C1 D4 CMP ($D4,X) +1AC0- 20 D4 C8 JSR $C8D4 +1AC3- C5 20 CMP $20 +1AC5- D3 ??? +1AC6- CF ??? +1AC7- D5 D2 CMP $D2,X +1AC9- C3 ??? +1ACA- C5 20 CMP $20 +1ACC- D3 ??? +1ACD- D4 ??? +1ACE- D2 C9 CMP ($C9) +1AD0- CE C7 20 DEC $20C7 +1AD3- CD D5 D3 CMP $D3D5 +1AD6- D4 ??? +1AD7- 20 CE CF JSR $CFCE +1ADA- D4 ??? +1ADB- A2 AC LDX #$AC +1ADD- B8 CLV +1ADE- C4 8D CPY $8D +1AE0- A0 DF LDY #$DF +1AE2- D0 D2 BNE $1AB6 +1AE4- CE D4 A0 DEC $A0D4 +1AE7- A2 C2 LDX #$C2 +1AE9- C5 20 CMP $20 +1AEB- C1 20 CMP ($20,X) +1AED- CC C9 D4 CPY $D4C9 +1AF0- C5 D2 CMP $D2 +1AF2- C1 CC CMP ($CC,X) +1AF4- 20 C2 C5 JSR $C5C2 +1AF7- C3 ??? +1AF8- C1 D5 CMP ($D5,X) +1AFA- D3 ??? +1AFB- C5 20 CMP $20 +1AFD- D4 ??? +1AFE- C8 INY +1AFF- C9 D3 CMP #$D3 +1B01- 20 D2 CF JSR $CFD2 +1B04- D5 D4 CMP $D4,X +1B06- C9 CE CMP #$CE +1B08- C5 A2 CMP $A2 +1B0A- AC B8 C4 LDY $C4B8 +1B0D- 8D A0 DF STA $DFA0 +1B10- D0 D2 BNE $1AE4 +1B12- CE D4 A0 DEC $A0D4 +1B15- A2 C1 LDX #$C1 +1B17- CC D4 C5 CPY $C5D4 +1B1A- D2 D3 CMP ($D3) +1B1C- 20 D4 C8 JSR $C8D4 +1B1F- C5 20 CMP $20 +1B21- D3 ??? +1B22- D4 ??? +1B23- D2 C9 CMP ($C9) +1B25- CE C7 20 DEC $20C7 +1B28- D0 C1 BNE $1AEB +1B2A- D3 ??? +1B2B- D3 ??? +1B2C- C5 C4 CMP $C4 +1B2E- 20 D4 CF JSR $CFD4 +1B31- 20 C9 D4 JSR $D4C9 +1B34- AE A2 AC LDX $ACA2 +1B37- B8 CLV +1B38- C4 B8 CPY $B8 +1B3A- C4 8D CPY $8D +1B3C- A0 DF LDY #$DF +1B3E- D0 D2 BNE $1B12 +1B40- CE D4 A0 DEC $A0D4 +1B43- A2 C9 LDX #$C9 +1B45- C6 20 DEC $20 +1B47- CC D3 D4 CPY $D4D3 +1B4A- D2 20 CMP ($20) +1B4C- C8 INY +1B4D- CF ??? +1B4E- CC C4 D3 CPY $D3C4 +1B51- 20 A7 D4 JSR $D4A7 +1B54- C8 INY +1B55- C9 D3 CMP #$D3 +1B57- 20 C9 D3 JSR $D3C9 +1B5A- 20 C1 20 JSR $20C1 +1B5D- D3 ??? +1B5E- D4 ??? +1B5F- D2 C9 CMP ($C9) +1B61- CE C7 AE DEC $AEC7 +1B64- A7 ??? +1B65- A2 AC LDX #$AC +1B67- B8 CLV +1B68- C4 8D CPY $8D +1B6A- A0 DF LDY #$DF +1B6C- D0 D2 BNE $1B40 +1B6E- CE D4 A0 DEC $A0D4 +1B71- A2 D4 LDX #$D4 +1B73- C8 INY +1B74- C5 CE CMP $CE +1B76- 20 D3 C4 JSR $C4D3 +1B79- C5 CC CMP $CC +1B7B- 20 CC D3 JSR $D3CC +1B7E- D4 ??? +1B7F- D2 BB CMP ($BB) +1B81- A3 ??? +1B82- B1 BB LDA ($BB),Y +1B84- A3 ??? +1B85- B7 ??? +1B86- 20 D2 C5 JSR $C5D2 +1B89- D4 ??? +1B8A- D5 D2 CMP $D2,X +1B8C- CE D3 BA DEC $BAD3 +1B8F- 20 A2 AC JSR $ACA2 +1B92- B8 CLV +1B93- C4 B8 CPY $B8 +1B95- C4 8D CPY $8D +1B97- A0 D3 LDY #$D3 +1B99- C4 C5 CPY $C5 +1B9B- CC A0 CC CPY $CCA0 +1B9E- D3 ??? +1B9F- D4 ??? +1BA0- D2 BB CMP ($BB) +1BA2- A3 ??? +1BA3- B1 BB LDA ($BB),Y +1BA5- A3 ??? +1BA6- B7 ??? +1BA7- 8D A0 D3 STA $D3A0 +1BAA- D0 D2 BNE $1B7E +1BAC- CE A0 CC DEC $CCA0 +1BAF- D3 ??? +1BB0- D4 ??? +1BB1- D2 8D CMP ($8D) +1BB3- A0 DF LDY #$DF +1BB5- D0 D2 BNE $1B89 +1BB7- CE D4 A0 DEC $A0D4 +1BBA- A2 20 LDX #$20 +1BBC- A2 AC LDX #$AC +1BBE- B8 CLV +1BBF- C4 B8 CPY $B8 +1BC1- C4 B8 CPY $B8 +1BC3- C4 B8 CPY $B8 +1BC5- C4 8D CPY $8D +1BC7- A0 DF LDY #$DF +1BC9- D7 ??? +1BCA- C1 C9 CMP ($C9,X) +1BCC- D4 ??? +1BCD- 8D AA 8D STA $8DAA +1BD0- A0 DF LDY #$DF +1BD2- D0 D2 BNE $1BA6 +1BD4- CE D4 A0 DEC $A0D4 +1BD7- A2 D4 LDX #$D4 +1BD9- C8 INY +1BDA- C5 20 CMP $20 +1BDC- D3 ??? +1BDD- C9 CE CMP #$CE 1BDF- D3 ??? -1BE0- C9 D4 CMP #$D4 -1BE2- C5 20 CMP $20 -1BE4- CF ??? -1BE5- C6 20 DEC $20 -1BE7- D3 ??? -1BE8- C4 C5 CPY $C5 -1BEA- CC BA 20 CPY $20BA -1BED- C9 D4 CMP #$D4 -1BEF- 20 C9 CE JSR $CEC9 -1BF2- D3 ??? -1BF3- C5 D2 CMP $D2 -1BF5- D4 ??? -1BF6- D3 ??? -1BF7- A2 AC LDX #$AC -1BF9- B8 CLV -1BFA- C4 8D CPY $8D -1BFC- A0 DF LDY #$DF -1BFE- D0 D2 BNE $1BD2 -1C00- CE D4 A0 DEC $A0D4 -1C03- A2 C1 LDX #$C1 -1C05- 20 D3 D5 JSR $D5D3 -1C08- C2 ??? +1BE0- 20 CD C1 JSR $C1CD +1BE3- C3 ??? +1BE4- D2 CF CMP ($CF) +1BE6- 20 C4 CF JSR $CFC4 +1BE9- C5 D3 CMP $D3 +1BEB- 20 D4 C8 JSR $C8D4 +1BEE- C5 20 CMP $20 +1BF0- A2 AC LDX #$AC +1BF2- B8 CLV +1BF3- C4 8D CPY $8D +1BF5- A0 DF LDY #$DF +1BF7- D0 D2 BNE $1BCB +1BF9- CE D4 A0 DEC $A0D4 +1BFC- A2 CF LDX #$CF +1BFE- D0 D0 BNE $1BD0 +1C00- CF ??? +1C01- D3 ??? +1C02- C9 D4 CMP #$D4 +1C04- C5 20 CMP $20 +1C06- CF ??? +1C07- C6 20 DEC $20 1C09- D3 ??? -1C0A- D4 ??? -1C0B- D2 C9 CMP ($C9) -1C0D- CE C7 20 DEC $20C7 -1C10- C9 CE CMP #$CE -1C12- D4 ??? -1C13- CF ??? -1C14- 20 C1 20 JSR $20C1 -1C17- D0 C1 BNE $1BDA -1C19- D2 C5 CMP ($C5) -1C1B- CE D4 20 DEC $20D4 -1C1E- D3 ??? -1C1F- D4 ??? -1C20- D2 C9 CMP ($C9) -1C22- CE C7 A2 DEC $A2C7 -1C25- AC B8 C4 LDY $C4B8 -1C28- 8D A0 DF STA $DFA0 -1C2B- D0 D2 BNE $1BFF -1C2D- CE D4 A0 DEC $A0D4 -1C30- A2 C1 LDX #$C1 -1C32- D4 ??? -1C33- 20 D4 C8 JSR $C8D4 -1C36- C5 20 CMP $20 -1C38- C7 ??? -1C39- C9 D6 CMP #$D6 -1C3B- C5 CE CMP $CE -1C3D- 20 C9 CE JSR $CEC9 -1C40- C4 C5 CPY $C5 -1C42- D8 CLD -1C43- AE 20 CE LDX $CE20 -1C46- CF ??? -1C47- D4 ??? -1C48- C5 20 CMP $20 -1C4A- D4 ??? -1C4B- C8 INY -1C4C- C1 D4 CMP ($D4,X) -1C4E- A2 AC LDX #$AC -1C50- B8 CLV -1C51- C4 8D CPY $8D -1C53- A0 DF LDY #$DF -1C55- D0 D2 BNE $1C29 -1C57- CE D4 A0 DEC $A0D4 -1C5A- A2 D7 LDX #$D7 -1C5C- C8 INY -1C5D- C9 CC CMP #$CC -1C5F- C5 20 CMP $20 -1C61- D4 ??? -1C62- C8 INY -1C63- C5 20 CMP $20 -1C65- D0 C1 BNE $1C28 -1C67- D2 C5 CMP ($C5) -1C69- CE D4 20 DEC $20D4 -1C6C- D3 ??? -1C6D- D4 ??? -1C6E- D2 C9 CMP ($C9) -1C70- CE C7 20 DEC $20C7 -1C73- C3 ??? -1C74- C1 CE CMP ($CE,X) -1C76- CE CF D4 DEC $D4CF -1C79- 20 C2 C5 JSR $C5C2 -1C7C- 20 A2 AC JSR $ACA2 -1C7F- B8 CLV -1C80- C4 8D CPY $8D -1C82- A0 DF LDY #$DF -1C84- D0 D2 BNE $1C58 -1C86- CE D4 A0 DEC $A0D4 -1C89- A2 C1 LDX #$C1 -1C8B- 20 CC C9 JSR $C9CC -1C8E- D4 ??? -1C8F- C5 D2 CMP $D2 -1C91- C1 CC CMP ($CC,X) -1C93- AC 20 D4 LDY $D420 -1C96- C8 INY -1C97- C5 20 CMP $20 -1C99- D3 ??? -1C9A- D5 C2 CMP $C2,X -1C9C- D3 ??? -1C9D- D4 ??? -1C9E- D2 C9 CMP ($C9) -1CA0- CE C7 20 DEC $20C7 -1CA3- C9 D4 CMP #$D4 -1CA5- D3 ??? -1CA6- C5 CC CMP $CC -1CA8- C6 20 DEC $20 -1CAA- C3 ??? -1CAB- C1 CE CMP ($CE,X) -1CAD- 20 C2 C5 JSR $C5C2 -1CB0- AE A2 AC LDX $ACA2 -1CB3- B8 CLV -1CB4- C4 B8 CPY $B8 -1CB6- C4 8D CPY $8D -1CB8- A0 DF LDY #$DF -1CBA- D0 D2 BNE $1C8E -1CBC- CE D4 A0 DEC $A0D4 -1CBF- A2 D4 LDX #$D4 -1CC1- C8 INY -1CC2- D5 D3 CMP $D3,X -1CC4- 20 D3 C9 JSR $C9D3 -1CC7- CE D3 20 DEC $20D3 -1CCA- CC D3 D4 CPY $D4D3 -1CCD- D2 BB CMP ($BB) -1CCF- A3 ??? -1CD0- B1 BB LDA ($BB),Y -1CD2- A3 ??? -1CD3- B5 B0 LDA $B0,X -1CD5- BB ??? -1CD6- A7 ??? -1CD7- D4 ??? -1CD8- C8 INY -1CD9- C9 D3 CMP #$D3 -1CDB- 20 C9 D3 JSR $D3C9 -1CDE- 20 CE CF JSR $CFCE -1CE1- D4 ??? -1CE2- A7 ??? -1CE3- A2 AC LDX #$AC -1CE5- B8 CLV -1CE6- C4 8D CPY $8D -1CE8- A0 DF LDY #$DF -1CEA- D0 D2 BNE $1CBE -1CEC- CE D4 A0 DEC $A0D4 -1CEF- A2 D2 LDX #$D2 -1CF1- C5 D4 CMP $D4 -1CF3- D5 D2 CMP $D2,X -1CF5- CE D3 BA DEC $BAD3 -1CF8- 20 A2 AC JSR $ACA2 -1CFB- B8 CLV -1CFC- C4 8D CPY $8D -1CFE- A0 D3 LDY #$D3 -1D00- C9 CE CMP #$CE -1D02- D3 ??? -1D03- A0 CC LDY #$CC -1D05- D3 ??? -1D06- D4 ??? -1D07- D2 BB CMP ($BB) -1D09- A3 ??? -1D0A- B1 BB LDA ($BB),Y -1D0C- A3 ??? -1D0D- B5 B0 LDA $B0,X -1D0F- BB ??? -1D10- A2 D4 LDX #$D4 -1D12- C8 INY -1D13- C9 D3 CMP #$D3 -1D15- A0 C9 LDY #$C9 -1D17- D3 ??? -1D18- A0 CE LDY #$CE -1D1A- CF ??? -1D1B- D4 ??? -1D1C- A2 8D LDX #$8D -1D1E- A0 D3 LDY #$D3 -1D20- D0 D2 BNE $1CF4 -1D22- CE A0 CC DEC $CCA0 -1D25- D3 ??? -1D26- D4 ??? -1D27- D2 8D CMP ($8D) -1D29- A0 DF LDY #$DF -1D2B- D0 D2 BNE $1CFF -1D2D- CE D4 A0 DEC $A0D4 -1D30- A2 20 LDX #$20 -1D32- A2 AC LDX #$AC -1D34- B8 CLV -1D35- C4 B8 CPY $B8 -1D37- C4 B8 CPY $B8 -1D39- C4 B8 CPY $B8 -1D3B- C4 8D CPY $8D -1D3D- A0 DF LDY #$DF -1D3F- D7 ??? -1D40- C1 C9 CMP ($C9,X) -1D42- D4 ??? -1D43- 8D 8D AA STA $AA8D -1D46- 8D A0 CA STA $CAA0 -1D49- CD D0 A0 CMP $A0D0 -1D4C- D2 C5 CMP ($C5) -1D4E- C5 CE CMP $CE -1D50- D4 ??? -1D51- D2 D9 CMP ($D9) -1D53- 8D AA 8D STA $8DAA -1D56- AA TAX -1D57- E0 E0 CPX #$E0 -1D59- E0 E0 CPX #$E0 -1D5B- E0 E0 CPX #$E0 -1D5D- E0 E0 CPX #$E0 -1D5F- E0 E0 CPX #$E0 -1D61- E0 E0 CPX #$E0 -1D63- E0 E0 CPX #$E0 -1D65- E0 E0 CPX #$E0 -1D67- E0 E0 CPX #$E0 -1D69- E0 E0 CPX #$E0 -1D6B- E0 E0 CPX #$E0 -1D6D- E0 E0 CPX #$E0 -1D6F- E0 E0 CPX #$E0 -1D71- E0 E0 CPX #$E0 -1D73- E0 E0 CPX #$E0 -1D75- AA TAX -1D76- 8D AA 20 STA $20AA -1D79- 20 20 20 JSR $2020 -1D7C- 20 20 20 JSR $2020 -1D7F- 20 C2 CF JSR $CFC2 -1D82- D4 ??? -1D83- D4 ??? -1D84- CF ??? -1D85- CD 20 C9 CMP $C920 -1D88- CE C3 CC DEC $CCC3 -1D8B- D5 C4 CMP $C4,X -1D8D- C5 D3 CMP $D3 -1D8F- 20 20 20 JSR $2020 -1D92- 20 20 20 JSR $2020 -1D95- 20 AA 8D JSR $8DAA -1D98- AA TAX -1D99- AC AC AC LDY $ACAC -1D9C- AC AC AC LDY $ACAC -1D9F- AC AC AC LDY $ACAC -1DA2- AC AC AC LDY $ACAC -1DA5- AC AC AC LDY $ACAC -1DA8- AC AC AC LDY $ACAC -1DAB- AC AC AC LDY $ACAC -1DAE- AC AC AC LDY $ACAC -1DB1- AC AC AC LDY $ACAC -1DB4- AC AC AC LDY $ACAC -1DB7- AA TAX -1DB8- 8D AA 8D STA $8DAA -1DBB- AA TAX -1DBC- AA TAX -1DBD- 20 C2 CF JSR $CFC2 -1DC0- D4 ??? -1DC1- D4 ??? -1DC2- CF ??? -1DC3- CD 20 C9 CMP $C920 -1DC6- CE C3 CC DEC $CCC3 -1DC9- D5 C4 CMP $C4,X -1DCB- C5 D3 CMP $D3 -1DCD- 8D AA 8D STA $8DAA -1DD0- A0 D0 LDY #$D0 -1DD2- D5 D4 CMP $D4,X -1DD4- A0 D3 LDY #$D3 -1DD6- D4 ??? -1DD7- D2 C9 CMP ($C9) -1DD9- CE C7 D3 DEC $D3C7 -1DDC- AE CC C9 LDX $C9CC -1DDF- C2 ??? -1DE0- 8D A0 D0 STA $D0A0 -1DE3- D5 D4 CMP $D4,X -1DE5- A0 D3 LDY #$D3 -1DE7- D5 C2 CMP $C2,X -1DE9- D3 ??? -1DEA- D4 ??? -1DEB- D2 C9 CMP ($C9) -1DED- CE C7 D3 DEC $D3C7 -1DF0- AE CC C9 LDX $C9CC -1DF3- C2 ??? -1DF4- 8D A0 D0 STA $D0A0 -1DF7- D5 D4 CMP $D4,X -1DF9- A0 D2 LDY #$D2 -1DFB- C5 D1 CMP $D1 -1DFD- D5 C9 CMP $C9,X -1DFF- D2 C5 CMP ($C5) -1E01- C4 AE CPY $AE -1E03- CC C9 C2 CPY $C2C9 -1E06- 8D AA 8D STA $8DAA -1E09- C1 D3 CMP ($D3,X) -1E0B- D4 ??? -1E0C- D2 A0 CMP ($A0) -1E0E- D3 ??? -1E0F- D4 ??? -1E10- D2 A0 CMP ($A0) -1E12- A2 C1 LDX #$C1 -1E14- A2 8D LDX #$8D -1E16- C2 ??? -1E17- D3 ??? -1E18- D4 ??? -1E19- D2 A0 CMP ($A0) -1E1B- D3 ??? +1C0A- C4 C5 CPY $C5 +1C0C- CC BA 20 CPY $20BA +1C0F- C9 D4 CMP #$D4 +1C11- 20 C9 CE JSR $CEC9 +1C14- D3 ??? +1C15- C5 D2 CMP $D2 +1C17- D4 ??? +1C18- D3 ??? +1C19- A2 AC LDX #$AC +1C1B- B8 CLV +1C1C- C4 8D CPY $8D +1C1E- A0 DF LDY #$DF +1C20- D0 D2 BNE $1BF4 +1C22- CE D4 A0 DEC $A0D4 +1C25- A2 C1 LDX #$C1 +1C27- 20 D3 D5 JSR $D5D3 +1C2A- C2 ??? +1C2B- D3 ??? +1C2C- D4 ??? +1C2D- D2 C9 CMP ($C9) +1C2F- CE C7 20 DEC $20C7 +1C32- C9 CE CMP #$CE +1C34- D4 ??? +1C35- CF ??? +1C36- 20 C1 20 JSR $20C1 +1C39- D0 C1 BNE $1BFC +1C3B- D2 C5 CMP ($C5) +1C3D- CE D4 20 DEC $20D4 +1C40- D3 ??? +1C41- D4 ??? +1C42- D2 C9 CMP ($C9) +1C44- CE C7 A2 DEC $A2C7 +1C47- AC B8 C4 LDY $C4B8 +1C4A- 8D A0 DF STA $DFA0 +1C4D- D0 D2 BNE $1C21 +1C4F- CE D4 A0 DEC $A0D4 +1C52- A2 C1 LDX #$C1 +1C54- D4 ??? +1C55- 20 D4 C8 JSR $C8D4 +1C58- C5 20 CMP $20 +1C5A- C7 ??? +1C5B- C9 D6 CMP #$D6 +1C5D- C5 CE CMP $CE +1C5F- 20 C9 CE JSR $CEC9 +1C62- C4 C5 CPY $C5 +1C64- D8 CLD +1C65- AE 20 CE LDX $CE20 +1C68- CF ??? +1C69- D4 ??? +1C6A- C5 20 CMP $20 +1C6C- D4 ??? +1C6D- C8 INY +1C6E- C1 D4 CMP ($D4,X) +1C70- A2 AC LDX #$AC +1C72- B8 CLV +1C73- C4 8D CPY $8D +1C75- A0 DF LDY #$DF +1C77- D0 D2 BNE $1C4B +1C79- CE D4 A0 DEC $A0D4 +1C7C- A2 D7 LDX #$D7 +1C7E- C8 INY +1C7F- C9 CC CMP #$CC +1C81- C5 20 CMP $20 +1C83- D4 ??? +1C84- C8 INY +1C85- C5 20 CMP $20 +1C87- D0 C1 BNE $1C4A +1C89- D2 C5 CMP ($C5) +1C8B- CE D4 20 DEC $20D4 +1C8E- D3 ??? +1C8F- D4 ??? +1C90- D2 C9 CMP ($C9) +1C92- CE C7 20 DEC $20C7 +1C95- C3 ??? +1C96- C1 CE CMP ($CE,X) +1C98- CE CF D4 DEC $D4CF +1C9B- 20 C2 C5 JSR $C5C2 +1C9E- 20 A2 AC JSR $ACA2 +1CA1- B8 CLV +1CA2- C4 8D CPY $8D +1CA4- A0 DF LDY #$DF +1CA6- D0 D2 BNE $1C7A +1CA8- CE D4 A0 DEC $A0D4 +1CAB- A2 C1 LDX #$C1 +1CAD- 20 CC C9 JSR $C9CC +1CB0- D4 ??? +1CB1- C5 D2 CMP $D2 +1CB3- C1 CC CMP ($CC,X) +1CB5- AC 20 D4 LDY $D420 +1CB8- C8 INY +1CB9- C5 20 CMP $20 +1CBB- D3 ??? +1CBC- D5 C2 CMP $C2,X +1CBE- D3 ??? +1CBF- D4 ??? +1CC0- D2 C9 CMP ($C9) +1CC2- CE C7 20 DEC $20C7 +1CC5- C9 D4 CMP #$D4 +1CC7- D3 ??? +1CC8- C5 CC CMP $CC +1CCA- C6 20 DEC $20 +1CCC- C3 ??? +1CCD- C1 CE CMP ($CE,X) +1CCF- 20 C2 C5 JSR $C5C2 +1CD2- AE A2 AC LDX $ACA2 +1CD5- B8 CLV +1CD6- C4 B8 CPY $B8 +1CD8- C4 8D CPY $8D +1CDA- A0 DF LDY #$DF +1CDC- D0 D2 BNE $1CB0 +1CDE- CE D4 A0 DEC $A0D4 +1CE1- A2 D4 LDX #$D4 +1CE3- C8 INY +1CE4- D5 D3 CMP $D3,X +1CE6- 20 D3 C9 JSR $C9D3 +1CE9- CE D3 20 DEC $20D3 +1CEC- CC D3 D4 CPY $D4D3 +1CEF- D2 BB CMP ($BB) +1CF1- A3 ??? +1CF2- B1 BB LDA ($BB),Y +1CF4- A3 ??? +1CF5- B5 B0 LDA $B0,X +1CF7- BB ??? +1CF8- A7 ??? +1CF9- D4 ??? +1CFA- C8 INY +1CFB- C9 D3 CMP #$D3 +1CFD- 20 C9 D3 JSR $D3C9 +1D00- 20 CE CF JSR $CFCE +1D03- D4 ??? +1D04- A7 ??? +1D05- A2 AC LDX #$AC +1D07- B8 CLV +1D08- C4 8D CPY $8D +1D0A- A0 DF LDY #$DF +1D0C- D0 D2 BNE $1CE0 +1D0E- CE D4 A0 DEC $A0D4 +1D11- A2 D2 LDX #$D2 +1D13- C5 D4 CMP $D4 +1D15- D5 D2 CMP $D2,X +1D17- CE D3 BA DEC $BAD3 +1D1A- 20 A2 AC JSR $ACA2 +1D1D- B8 CLV +1D1E- C4 8D CPY $8D +1D20- A0 D3 LDY #$D3 +1D22- C9 CE CMP #$CE +1D24- D3 ??? +1D25- A0 CC LDY #$CC +1D27- D3 ??? +1D28- D4 ??? +1D29- D2 BB CMP ($BB) +1D2B- A3 ??? +1D2C- B1 BB LDA ($BB),Y +1D2E- A3 ??? +1D2F- B5 B0 LDA $B0,X +1D31- BB ??? +1D32- A2 D4 LDX #$D4 +1D34- C8 INY +1D35- C9 D3 CMP #$D3 +1D37- A0 C9 LDY #$C9 +1D39- D3 ??? +1D3A- A0 CE LDY #$CE +1D3C- CF ??? +1D3D- D4 ??? +1D3E- A2 8D LDX #$8D +1D40- A0 D3 LDY #$D3 +1D42- D0 D2 BNE $1D16 +1D44- CE A0 CC DEC $CCA0 +1D47- D3 ??? +1D48- D4 ??? +1D49- D2 8D CMP ($8D) +1D4B- A0 DF LDY #$DF +1D4D- D0 D2 BNE $1D21 +1D4F- CE D4 A0 DEC $A0D4 +1D52- A2 20 LDX #$20 +1D54- A2 AC LDX #$AC +1D56- B8 CLV +1D57- C4 B8 CPY $B8 +1D59- C4 B8 CPY $B8 +1D5B- C4 B8 CPY $B8 +1D5D- C4 8D CPY $8D +1D5F- A0 DF LDY #$DF +1D61- D7 ??? +1D62- C1 C9 CMP ($C9,X) +1D64- D4 ??? +1D65- 8D 8D AA STA $AA8D +1D68- 8D A0 CA STA $CAA0 +1D6B- CD D0 A0 CMP $A0D0 +1D6E- D2 C5 CMP ($C5) +1D70- C5 CE CMP $CE +1D72- D4 ??? +1D73- D2 D9 CMP ($D9) +1D75- 8D AA 8D STA $8DAA +1D78- C1 D3 CMP ($D3,X) +1D7A- D4 ??? +1D7B- D2 A0 CMP ($A0) +1D7D- D3 ??? +1D7E- D4 ??? +1D7F- D2 A0 CMP ($A0) +1D81- A2 C1 LDX #$C1 +1D83- A2 8D LDX #$8D +1D85- C2 ??? +1D86- D3 ??? +1D87- D4 ??? +1D88- D2 A0 CMP ($A0) +1D8A- D3 ??? +1D8B- D4 ??? +1D8C- D2 A0 CMP ($A0) +1D8E- A2 C2 LDX #$C2 +1D90- A2 8D LDX #$8D +1D92- CC D3 D4 CPY $D4D3 +1D95- D2 A0 CMP ($A0) +1D97- D3 ??? +1D98- D4 ??? +1D99- D2 A0 CMP ($A0) +1D9B- A2 D4 LDX #$D4 +1D9D- C8 INY +1D9E- C9 D3 CMP #$D3 +1DA0- 20 C9 D3 JSR $D3C9 +1DA3- 20 C1 20 JSR $20C1 +1DA6- D3 ??? +1DA7- D4 ??? +1DA8- D2 C9 CMP ($C9) +1DAA- CE C7 AE DEC $AEC7 +1DAD- A2 8D LDX #$8D +1DAF- AA TAX +1DB0- 8D AA E0 STA $E0AA +1DB3- E0 E0 CPX #$E0 +1DB5- E0 E0 CPX #$E0 +1DB7- E0 E0 CPX #$E0 +1DB9- E0 E0 CPX #$E0 +1DBB- E0 E0 CPX #$E0 +1DBD- E0 E0 CPX #$E0 +1DBF- E0 E0 CPX #$E0 +1DC1- E0 E0 CPX #$E0 +1DC3- E0 E0 CPX #$E0 +1DC5- E0 E0 CPX #$E0 +1DC7- E0 E0 CPX #$E0 +1DC9- E0 E0 CPX #$E0 +1DCB- E0 E0 CPX #$E0 +1DCD- E0 E0 CPX #$E0 +1DCF- E0 AA CPX #$AA +1DD1- 8D AA 20 STA $20AA +1DD4- 20 20 20 JSR $2020 +1DD7- 20 20 20 JSR $2020 +1DDA- 20 C2 CF JSR $CFC2 +1DDD- D4 ??? +1DDE- D4 ??? +1DDF- CF ??? +1DE0- CD 20 C9 CMP $C920 +1DE3- CE C3 CC DEC $CCC3 +1DE6- D5 C4 CMP $C4,X +1DE8- C5 D3 CMP $D3 +1DEA- 20 20 20 JSR $2020 +1DED- 20 20 20 JSR $2020 +1DF0- 20 AA 8D JSR $8DAA +1DF3- AA TAX +1DF4- AC AC AC LDY $ACAC +1DF7- AC AC AC LDY $ACAC +1DFA- AC AC AC LDY $ACAC +1DFD- AC AC AC LDY $ACAC +1E00- AC AC AC LDY $ACAC +1E03- AC AC AC LDY $ACAC +1E06- AC AC AC LDY $ACAC +1E09- AC AC AC LDY $ACAC +1E0C- AC AC AC LDY $ACAC +1E0F- AC AC AC LDY $ACAC +1E12- AA TAX +1E13- 8D AA 8D STA $8DAA +1E16- AA TAX +1E17- AA TAX +1E18- 20 C2 CF JSR $CFC2 +1E1B- D4 ??? 1E1C- D4 ??? -1E1D- D2 A0 CMP ($A0) -1E1F- A2 C2 LDX #$C2 -1E21- A2 8D LDX #$8D -1E23- CC D3 D4 CPY $D4D3 -1E26- D2 A0 CMP ($A0) -1E28- D3 ??? -1E29- D4 ??? -1E2A- D2 A0 CMP ($A0) -1E2C- A2 D4 LDX #$D4 -1E2E- C8 INY -1E2F- C9 D3 CMP #$D3 -1E31- 20 C9 D3 JSR $D3C9 -1E34- 20 C1 20 JSR $20C1 -1E37- D3 ??? -1E38- D4 ??? -1E39- D2 C9 CMP ($C9) -1E3B- CE C7 AE DEC $AEC7 -1E3E- A2 8D LDX #$8D +1E1D- CF ??? +1E1E- CD 20 C9 CMP $C920 +1E21- CE C3 CC DEC $CCC3 +1E24- D5 C4 CMP $C4,X +1E26- C5 D3 CMP $D3 +1E28- 8D AA 8D STA $8DAA +1E2B- A0 D0 LDY #$D0 +1E2D- D5 D4 CMP $D4,X +1E2F- A0 D2 LDY #$D2 +1E31- C5 D1 CMP $D1 +1E33- D5 C9 CMP $C9,X +1E35- D2 C5 CMP ($C5) +1E37- C4 AE CPY $AE +1E39- CC C9 C2 CPY $C2C9 +1E3C- AE CD C9 LDX $C9CD +1E3F- CE 8D AA DEC $AA8D +1E42- 8D AA AA STA $AAAA +1E45- 20 C9 CE JSR $CEC9 +1E48- C4 C9 CPY $C9 +1E4A- D6 C9 DEC $C9,X +1E4C- C4 D5 CPY $D5 +1E4E- C1 CC CMP ($CC,X) +1E50- 20 D3 D5 JSR $D5D3 +1E53- C2 ??? +1E54- D2 CF CMP ($CF) +1E56- D5 D4 CMP $D4,X +1E58- C9 CE CMP #$CE +1E5A- C5 20 CMP $20 +1E5C- C9 CE CMP #$CE +1E5E- C3 ??? +1E5F- CC D5 C4 CPY $C4D5 +1E62- C5 D3 CMP $D3 +1E64- 8D AA 8D STA $8DAA +1E67- AA TAX +1E68- AA TAX +1E69- 20 D3 D4 JSR $D4D3 +1E6C- D2 C9 CMP ($C9) +1E6E- CE C7 20 DEC $20C7 +1E71- D3 ??? +1E72- D5 C2 CMP $C2,X +1E74- D2 CF CMP ($CF) +1E76- D5 D4 CMP $D4,X +1E78- C9 CE CMP #$CE +1E7A- C5 D3 CMP $D3 +1E7C- 8D AA 8D STA $8DAA +1E7F- A0 D0 LDY #$D0 +1E81- D5 D4 CMP $D4,X +1E83- A0 CE LDY #$CE +1E85- D5 CD CMP $CD,X +1E87- B2 D3 LDA ($D3) +1E89- D4 ??? +1E8A- D2 AE CMP ($AE) +1E8C- D3 ??? +1E8D- D5 C2 CMP $C2,X +1E8F- AE CD C9 LDX $C9CD +1E92- CE 8D A0 DEC $A08D +1E95- D0 D5 BNE $1E6C +1E97- D4 ??? +1E98- A0 D0 LDY #$D0 +1E9A- D2 CE CMP ($CE) +1E9C- D3 ??? +1E9D- D4 ??? +1E9E- D2 AE CMP ($AE) +1EA0- D3 ??? +1EA1- D5 C2 CMP $C2,X +1EA3- AE CD C9 LDX $C9CD +1EA6- CE 8D A0 DEC $A08D +1EA9- D0 D5 BNE $1E80 +1EAB- D4 ??? +1EAC- A0 D3 LDY #$D3 +1EAE- D4 ??? +1EAF- D2 C3 CMP ($C3) +1EB1- C1 D4 CMP ($D4,X) +1EB3- AE D3 D5 LDX $D5D3 +1EB6- C2 ??? +1EB7- AE CD C9 LDX $C9CD +1EBA- CE 8D A0 DEC $A08D +1EBD- D0 D5 BNE $1E94 +1EBF- D4 ??? +1EC0- A0 D3 LDY #$D3 +1EC2- D4 ??? +1EC3- D2 C3 CMP ($C3) +1EC5- CF ??? +1EC6- CD D0 AE CMP $AED0 +1EC9- D3 ??? +1ECA- D5 C2 CMP $C2,X +1ECC- AE CD C9 LDX $C9CD +1ECF- CE 8D A0 DEC $A08D +1ED2- D0 D5 BNE $1EA9 +1ED4- D4 ??? +1ED5- A0 D3 LDY #$D3 +1ED7- D4 ??? +1ED8- D2 B2 CMP ($B2) +1EDA- CE D5 CD DEC $CDD5 +1EDD- AE D3 D5 LDX $D5D3 +1EE0- C2 ??? +1EE1- AE CD C9 LDX $C9CD +1EE4- CE 8D AA DEC $AA8D +1EE7- 8D AA AA STA $AAAA +1EEA- 20 D3 D5 JSR $D5D3 +1EED- C2 ??? +1EEE- D3 ??? +1EEF- D4 ??? +1EF0- D2 C9 CMP ($C9) +1EF2- CE C7 20 DEC $20C7 +1EF5- D3 ??? +1EF6- D5 C2 CMP $C2,X +1EF8- D2 CF CMP ($CF) +1EFA- D5 D4 CMP $D4,X +1EFC- C9 CE CMP #$CE +1EFE- C5 D3 CMP $D3 +1F00- 8D AA 8D STA $8DAA +1F03- A0 D0 LDY #$D0 +1F05- D5 D4 CMP $D4,X +1F07- A0 D3 LDY #$D3 +1F09- D5 C2 CMP $C2,X +1F0B- C3 ??? +1F0C- CF ??? +1F0D- D0 D9 BNE $1EE8 +1F0F- AE D3 D5 LDX $D5D3 +1F12- C2 ??? +1F13- AE CD C9 LDX $C9CD +1F16- CE 8D A0 DEC $A08D +1F19- D0 D5 BNE $1EF0 +1F1B- D4 ??? +1F1C- A0 D3 LDY #$D3 +1F1E- D5 C2 CMP $C2,X +1F20- C4 C5 CPY $C5 +1F22- CC AE D3 CPY $D3AE +1F25- D5 C2 CMP $C2,X +1F27- AE CD C9 LDX $C9CD +1F2A- CE 8D A0 DEC $A08D +1F2D- D0 D5 BNE $1F04 +1F2F- D4 ??? +1F30- A0 D3 LDY #$D3 +1F32- D5 C2 CMP $C2,X +1F34- C9 CE CMP #$CE +1F36- D3 ??? +1F37- AE D3 D5 LDX $D5D3 +1F3A- C2 ??? +1F3B- AE CD C9 LDX $C9CD +1F3E- CE 8D A0 DEC $A08D +1F41- D0 D5 BNE $1F18 +1F43- D4 ??? +1F44- A0 D3 LDY #$D3 +1F46- D5 C2 CMP $C2,X +1F48- D0 CF BNE $1F19 +1F4A- D3 ??? +1F4B- AE D3 D5 LDX $D5D3 +1F4E- C2 ??? +1F4F- AE CD C9 LDX $C9CD +1F52- CE 8D AA DEC $AA8D +1F55- 8D 00 00 STA $0000 diff --git a/disks/disk5_strings/T.NUM2STR.MIN b/disks/disk5_strings/T.NUM2STR.MIN deleted file mode 100644 index c48c0f5..0000000 --- a/disks/disk5_strings/T.NUM2STR.MIN +++ /dev/null @@ -1,98 +0,0 @@ -* -NUM2STR -* - PLA - STA RETADR - PLA - STA RETADR+1 - PLA - STA :VALSTR - PLA - STA :VALSTR+1 - STA :NGFLAG - BPL :GETBP - LDA #0 - SEC - SBC :VALSTR - STA :VALSTR - LDA #0 - SBC :VALSTR+1 - STA :VALSTR+1 -:GETBP - LDA #RETURN+1 - STA ADDR1+1 - LDA #0 - LDY #0 - STA (ADDR1),Y -:CNVERT - LDA #0 - STA :MOD10 - STA :MOD10+1 - LDX #16 - CLC -:DVLOOP - ROL :VALSTR - ROL :VALSTR+1 - ROL :MOD10 - ROL :MOD10+1 - SEC - LDA :MOD10 - SBC #10 - TAY - LDA :MOD10+1 - SBC #0 - BCC :DECCNT - STY :MOD10 - STA :MOD10+1 -:DECCNT - DEX - BNE :DVLOOP - ROL :VALSTR - ROL :VALSTR+1 -:CONCH - LDA :MOD10 - CLC - ADC #$B0 - JSR :CONCAT - LDA :VALSTR - ORA :VALSTR+1 - BNE :CNVERT -:EXIT - LDA :NGFLAG - BPL :POS - LDA #173 - JSR :CONCAT -:POS - LDA RETADR+1 - PHA - LDA RETADR - PHA - RTS -:CONCAT - PHA - LDY #0 - LDA (ADDR1),Y - TAY - BEQ :EXITMR -:MVELP - LDA (ADDR1),Y - INY - STA (ADDR1),Y - DEY - DEY - BNE :MVELP -:EXITMR - PLA - LDY #1 - STA (ADDR1),Y - LDY #0 - LDA (ADDR1),Y - CLC - ADC #1 - STA (ADDR1),Y - RTS -:NGFLAG DS 1 -:VALSTR DS 2 -:MOD10 DS 2 diff --git a/disks/disk5_strings/T.NUM2STR b/disks/disk5_strings/T.NUM2STR.SUB similarity index 99% rename from disks/disk5_strings/T.NUM2STR rename to disks/disk5_strings/T.NUM2STR.SUB index 4025930..ba46c25 100644 --- a/disks/disk5_strings/T.NUM2STR +++ b/disks/disk5_strings/T.NUM2STR.SUB @@ -1,4 +1,3 @@ -* *``````````````````````````````* * NUM2STR :: NUMBER TO STRING * *- -* diff --git a/disks/disk5_strings/T.NUM2STR.SUB.MIN b/disks/disk5_strings/T.NUM2STR.SUB.MIN new file mode 100644 index 0000000..b93f1e9 --- /dev/null +++ b/disks/disk5_strings/T.NUM2STR.SUB.MIN @@ -0,0 +1,97 @@ +NUM2STR + PLA + STA RETADR + PLA + STA RETADR+1 + PLA + STA :VALSTR + PLA + STA :VALSTR+1 + STA :NGFLAG + BPL :GETBP ; BR IF VAL IS POS + LDA #0 + SEC + SBC :VALSTR + STA :VALSTR + LDA #0 + SBC :VALSTR+1 + STA :VALSTR+1 +:GETBP + LDA #RETURN+1 + STA ADDR1+1 + LDA #0 ; SET BUFFER TO EMPTY + LDY #0 + STA (ADDR1),Y ; BUFFER(0) = 0 +:CNVERT + LDA #0 + STA :MOD10 + STA :MOD10+1 + LDX #16 + CLC ; CLEAR CARRY +:DVLOOP + ROL :VALSTR ; SHIFT CARRY INTO DIVBIT 0 + ROL :VALSTR+1 ; WHICH WILL BE THE QUOTIENT + ROL :MOD10 ; + SHIFT DIV AT SAME TIME + ROL :MOD10+1 + SEC + LDA :MOD10 + SBC #10 + TAY ; SAVE LOWB IN REG Y + LDA :MOD10+1 + SBC #0 ; SUBTRACT CARRY + BCC :DECCNT ; BR IF DEND < DIVISOR + STY :MOD10 ; ELSE + STA :MOD10+1 ; NXT BIT OF Q IS A ONE AND SET + ; DIVIDEND = DEND - DIVISOR +:DECCNT + DEX + BNE :DVLOOP + ROL :VALSTR ; SHIFT IN LAST CARRY FOR Q + ROL :VALSTR+1 +:CONCH + LDA :MOD10 + CLC + ADC #$B0 + JSR :CONCAT + LDA :VALSTR + ORA :VALSTR+1 + BNE :CNVERT ; BR IF VALUE != 0 +:EXIT + LDA :NGFLAG + BPL :POS ; BR IF ORIG VAL POS + LDA #173 ; ELSE + JSR :CONCAT ; PUT A MINUS SIGN IN FRONT +:POS + LDA RETADR+1 + PHA + LDA RETADR + PHA + RTS ; RETURN +:CONCAT + PHA ; SAVE CHAR ON STACK + LDY #0 + LDA (ADDR1),Y ; GET CURRENT LENGTH + TAY + BEQ :EXITMR ; BR IF LENGTH=0 +:MVELP + LDA (ADDR1),Y ; GET NEXT CHAR + INY + STA (ADDR1),Y ; STORE IT + DEY + DEY + BNE :MVELP ; CONT UNTIL DONE +:EXITMR + PLA ; GET CHAR BACK FROM STACK + LDY #1 + STA (ADDR1),Y ; STORE THE CHAR + LDY #0 + LDA (ADDR1),Y ; GET LENGTH BYTE + CLC + ADC #1 ; INC LENGTH BY ONE + STA (ADDR1),Y ; UPDATE LENGTH + RTS +:NGFLAG DS 1 +:VALSTR DS 2 +:MOD10 DS 2 diff --git a/disks/disk5_strings/T.PRNSTR b/disks/disk5_strings/T.PRNSTR.SUB similarity index 99% rename from disks/disk5_strings/T.PRNSTR rename to disks/disk5_strings/T.PRNSTR.SUB index 1d9dc2e..b58df23 100644 --- a/disks/disk5_strings/T.PRNSTR +++ b/disks/disk5_strings/T.PRNSTR.SUB @@ -1,4 +1,3 @@ -* *``````````````````````````````* * PRNSTR :: PRINT INDEXED STR * *- -* diff --git a/disks/disk5_strings/T.PRNSTR.MIN b/disks/disk5_strings/T.PRNSTR.SUB.MIN similarity index 51% rename from disks/disk5_strings/T.PRNSTR.MIN rename to disks/disk5_strings/T.PRNSTR.SUB.MIN index 3d5143c..c3998cc 100644 --- a/disks/disk5_strings/T.PRNSTR.MIN +++ b/disks/disk5_strings/T.PRNSTR.SUB.MIN @@ -1,23 +1,22 @@ -* PRNSTR -* PLA STA RETADR PLA STA RETADR+1 PLA - STA ADDR1 + STA ADDR1 ; ADDRESS OF STRING PLA STA ADDR1+1 LDY #0 - LDA (ADDR1),Y + LDA (ADDR1),Y ; GET STRING LENGTH STA :S1LEN :LP INY - LDA (ADDR1),Y - JSR SCOUT1 - CPY :S1LEN + LDA (ADDR1),Y ; GET CHARACTER + JSR SCOUT1 ; PRINT CHARACTER TO SCREEN + CPY :S1LEN ; IF Y < LENGTH BNE :LP + ; LOOP; ELSE LDY #0 LDA (ADDR1),Y LDA RETADR+1 @@ -25,8 +24,8 @@ PRNSTR LDA RETADR PHA LDY #0 - LDA (ADDR1),Y + LDA (ADDR1),Y ; STRING LENGTH IN A LDY ADDR1 - LDX ADDR1+1 + LDX ADDR1+1 ; ADDRESS IN Y,X RTS :S1LEN DS 1 diff --git a/disks/disk5_strings/T.REQUIRED.HOOKS b/disks/disk5_strings/T.REQUIRED.HOOKS deleted file mode 100644 index d4589e1..0000000 --- a/disks/disk5_strings/T.REQUIRED.HOOKS +++ /dev/null @@ -1,46 +0,0 @@ -* -*``````````````````````````````* -* DECLARATIONS.PUT * -*- -* -* USED IN CONJUNCTION WITH * -* OTHER PUT FILES. DEFINES * -* BASIC DECLARATIONS USED * -* ACROSS DIFFERENT ROUTINES * -*,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,* -* -** ADDRESS STORAGE LOCATIONS FOR -** INDIRECT ADDRESSING. -* -ADDR1 EQU $06 -ADDR2 EQU $08 -ADDR3 EQU $EB -ADDR4 EQU $ED -* -** SCRATCHPAD ZERO PAGE LOCATIONS AND -** DEDICATED ZERO PAGE ADDRESS TO HOLD -** A RETURN ADDRESS PASSED VIA THE STACK -* -SCRATCH EQU $19 -SCRATCH2 EQU $1E -RETADR EQU $FE -* -** ZERO PAGE ADDRESSES DEDICATED TO PASSING -** BACK RESULTS WHEN THERE ARE MORE THAN -** THREE BYTES BEING PASSED (AXY) AND THE -** USE OF THE STACK IS IMPRACTICAL OR TOO SLOW -* -RESULT EQU $FA -RESULT2 EQU $FC -* -** VARIOUS HOOKS USED BY ALL ROUTINES -* -REENTRY EQU $3D0 -* -** ERROR HANDLING MEMORY LOCATIONS -* -** THIS DESIGNATES A 16-BYTE BLOCK OF MEMORY -** THAT HOLDS DATA RELATED TO IDENTIFYING -** RUNTIME VALUES FOR DEBUGGING. -* -ERRLOC EQU $0C00 -* diff --git a/disks/disk5_strings/T.REQUIRED.HOOKS.MIN b/disks/disk5_strings/T.REQUIRED.HOOKS.MIN new file mode 100644 index 0000000..aad849f --- /dev/null +++ b/disks/disk5_strings/T.REQUIRED.HOOKS.MIN @@ -0,0 +1,10 @@ +ADDR1 EQU $06 +ADDR2 EQU $08 +ADDR3 EQU $EB +ADDR4 EQU $ED +SCRATCH EQU $19 +SCRATCH2 EQU $1E +RETADR EQU $FE +RESULT EQU $FA +RESULT2 EQU $FC +REENTRY EQU $3D0 diff --git a/disks/disk5_strings/T.REQUIRED.LIB b/disks/disk5_strings/T.REQUIRED.LIB deleted file mode 100644 index 1112060..0000000 --- a/disks/disk5_strings/T.REQUIRED.LIB +++ /dev/null @@ -1,235 +0,0 @@ -* - JMP ENDVARS -* -*``````````````````````````````* -* REQUIRED.LIB * -*- -* -* GLOBAL ROUTINES AND * -* VARIABLES EITHER USED BY THE * -* LIBRARY OR PROVIDED FOR DEMO * -* USE OR DEBUGGING PURPOSES. * -*,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,* -* -******************************** -* * -* GLOBAL ROUTINES * -* * -******************************** -* -*``````````````````````````````* -* __GETRET: GET RETURN * -*- -* -* COPIES THE DATA IN [RETURN] * -* TO THE SPECIFIED LOCATION. * -* LENGTH IS DETERMINED BY * -* VALUE OF RETLEN. * -*,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,* -* -__GETRET -* - LDY #255 - PLA - STA ADDR1 - PLA - STA ADDR1+1 -* -:LP - INY - LDA RETURN,Y - STA (ADDR1),Y - CPY RETLEN - BNE :LP - LDA ADDR1+1 - PHA - LDA ADDR1 - PHA - RTS -* -*``````````````````````````````* -* __SETPARM: SET PARAMETER * -*- -* -* COPIES DATA FROM SPECIFIED * -* ADDRESS TO THE [PARAM] * -* LOCATION FOR PASSING TO * -* A ROUTINE. * -*,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,* -* -__SETPARM -* - LDY #255 - PLA - STA ADDR1 - PLA - STA ADDR1+1 -* -:LP - INY - LDA (ADDR1),Y - STA PARAM,Y - CPY PARLEN - BNE :LP - LDA ADDR1+1 - PHA - LDA ADDR1 - PHA - RTS -* -*``````````````````````````````* -* __DUMP: DUMP DATA * -*- -* -* OUTPUTS DATA LOCATED AT THE * -* SPECIFIED ADDRESS IN HEX * -* FORMAT FOR SPECIFIED NUMBER * -* OF BYTES. * -*,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,* -* -__DUMP -* - PLA - STA :RET - PLA - STA :RET+1 - PLA - STA :LENGTH - PLA - STA ADDR3 - PLA - STA ADDR3+1 -* - LDA #$8D - JSR $FDF0 - LDA ADDR3+1 - AND #$F0 - LSR - LSR - LSR - LSR - TAX - LDA :HEXTAB,X - JSR $FDF0 - LDA ADDR3+1 - AND #$0F - TAX - LDA :HEXTAB,X - JSR $FDF0 - LDA ADDR3 - AND #$F0 - LSR - LSR - LSR - LSR - TAX - LDA :HEXTAB,X - JSR $FDF0 - LDA ADDR3 - AND #$0F - TAX - LDA :HEXTAB,X - JSR $FDF0 - LDA #186 ; : - JSR $FDF0 - LDA #160 ; SPC - JSR $FDF0 -* - LDY #0 -:LP - LDA (ADDR3),Y - AND #$F0 ; MASK RIGHT - LSR - LSR - LSR - LSR - STA :LEFT - LDA (ADDR3),Y - AND #$0F ; MASK LEFT - STA :RIGHT - LDX :LEFT - LDA :HEXTAB,X - JSR $FDF0 - LDX :RIGHT - LDA :HEXTAB,X - JSR $FDF0 - LDA #160 - JSR $FDF0 - INY - CPY :LENGTH - BNE :LP -* -*LDA #$8D -*JSR $FDF0 - LDA :RET+1 - PHA - LDA :RET - PHA -* - RTS -* -:RET DS 2 -:RIGHT DS 1 -:LEFT DS 1 -:LENGTH DS 1 -:HEXTAB ASC "0123456789ABCDEF" -* -*``````````````````````````````* -* __P: PRINT FOLLOWING ASC * -*- -* -* THIS IS THE XPRINT ROUTINE * -* FROM STDIO.LIB, BUT STRIPPED * -* OF COMMENTS. FOR DEBUG. * -*,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,* -* -__P - PLA - STA ADDR1 - PLA - STA ADDR1+1 - LDY #1 -:LP LDA (ADDR1),Y - BEQ :DONE - JSR $FDF0 - INY - BNE :LP -:DONE CLC - TYA - ADC ADDR1 - STA ADDR1 - LDA ADDR1+1 - ADC #0 - PHA - LDA ADDR1 - PHA - RTS -* -*``````````````````````````````* -* __W: WAIT FOR KEYPRESS * -*,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,* -* -__W - JSR $FD0C - RTS -* -******************************** -* * -* GLOBAL VARIABLES * -* * -******************************** -* -** 256 BYTES DEDICATED TO RETURN -** VALUES OF VARIABLE LENGTH; CAN BE -** MODIFIED TO SUIT SMALLER OR LARGER -** NEEDS. -* -* -RETLEN DS 1 ; RETURN VALUE BYTE LENGTH -RETURN DS 256 -* -** 256 BYTE VALUE DEDICATED TO LARGE -** OR VARIABLE LENGTH PARAMETERS. THIS -** CAN ALSO BE CHANGED TO FIT SMALLER OR -** LARGER BOUNDS. -* -PARLEN DS 1 -PARAM DS 256 -* -ENDVARS -* diff --git a/disks/disk5_strings/T.REQUIRED.LIB.MIN b/disks/disk5_strings/T.REQUIRED.LIB.MIN new file mode 100644 index 0000000..1267342 --- /dev/null +++ b/disks/disk5_strings/T.REQUIRED.LIB.MIN @@ -0,0 +1,358 @@ +__GETRET + LDY #255 + PLA + STA ADDR1 + PLA + STA ADDR1+1 +:LP + INY + LDA RETURN,Y + STA (ADDR1),Y + CPY RETLEN + BNE :LP + LDA ADDR1+1 + PHA + LDA ADDR1 + PHA + RTS +__SETPARM + LDY #255 + PLA + STA ADDR1 + PLA + STA ADDR1+1 +:LP + INY + LDA (ADDR1),Y + STA PARAM,Y + CPY PARLEN + BNE :LP + LDA ADDR1+1 + PHA + LDA ADDR1 + PHA + RTS +__DUMP + PLA + STA :RET + PLA + STA :RET+1 + PLA + STA :LENGTH + PLA + STA ADDR3 + PLA + STA ADDR3+1 + LDA #$8D + JSR $FDF0 + LDA ADDR3+1 + AND #$F0 + LSR + LSR + LSR + LSR + TAX + LDA HEXTAB,X + JSR $FDF0 + LDA ADDR3+1 + AND #$0F + TAX + LDA HEXTAB,X + JSR $FDF0 + LDA ADDR3 + AND #$F0 + LSR + LSR + LSR + LSR + TAX + LDA HEXTAB,X + JSR $FDF0 + LDA ADDR3 + AND #$0F + TAX + LDA HEXTAB,X + JSR $FDF0 + LDA #186 ; : + JSR $FDF0 + LDA #160 ; SPC + JSR $FDF0 + LDY #0 +:LP + LDA (ADDR3),Y + AND #$F0 ; MASK RIGHT + LSR + LSR + LSR + LSR + STA :LEFT + LDA (ADDR3),Y + AND #$0F ; MASK LEFT + STA :RIGHT + LDX :LEFT + LDA HEXTAB,X + JSR $FDF0 + LDX :RIGHT + LDA HEXTAB,X + JSR $FDF0 + LDA #160 + JSR $FDF0 + INY + CPY :LENGTH + BNE :LP + LDA :RET+1 + PHA + LDA :RET + PHA + RTS +:RET DS 2 +:RIGHT DS 1 +:LEFT DS 1 +:LENGTH DS 1 +__P + PLA + STA ADDR1 + PLA + STA ADDR1+1 + LDY #1 +:LP LDA (ADDR1),Y + BEQ :DONE + JSR $FDF0 + INY + BNE :LP +:DONE CLC + TYA + ADC ADDR1 + STA ADDR1 + LDA ADDR1+1 + ADC #0 + PHA + LDA ADDR1 + PHA + RTS +__W + JSR $FD0C + RTS +__RSAV + STA ERRA + STX ERRX + STY ERRY +:C BCC :C0 + BCS :C1 +:Z BEQ :Z1 + BNE :Z0 +:N BMI :N1 + BPL :N0 +:O BVC :O0 + BVS :O1 + JMP :EXIT +:C0 LDA #0 + STA ERRCARRY + JMP :Z +:C1 LDA #1 + STA ERRCARRY + JMP :Z +:Z1 LDA #1 + STA ERRZERO + JMP :N +:Z0 LDA #0 + STA ERRZERO + JMP :N +:N1 LDA #1 + STA ERRNEG + JMP :O +:N0 LDA #0 + STA ERRNEG + JMP :O +:O0 LDA #0 + STA ERROVF + JMP :EXIT +:O1 LDA #1 + STA ERROVF +:EXIT + RTS +__RDMP + _PRNT " ",8D8D + _PRNT "REGISTRY DUMP",8D + _PRNT "=============",8D + _PRNT "A: " + LDA ERRA + AND #$F0 ; MASK RIGHT + LSR + LSR + LSR + LSR + STA :LEFT + LDA ERRA + AND #$0F ; MASK LEFT + STA :RIGHT + LDX :LEFT + LDA HEXTAB,X + JSR $FDF0 + LDX :RIGHT + LDA HEXTAB,X + JSR $FDF0 + _PRNT " ",8D + _PRNT "X: " + LDA ERRX + AND #$F0 ; MASK RIGHT + LSR + LSR + LSR + LSR + STA :LEFT + LDA ERRX + AND #$0F ; MASK LEFT + STA :RIGHT + LDX :LEFT + LDA HEXTAB,X + JSR $FDF0 + LDX :RIGHT + LDA HEXTAB,X + JSR $FDF0 + _PRNT " ",8D + _PRNT "Y: " + LDA ERRY + AND #$F0 ; MASK RIGHT + LSR + LSR + LSR + LSR + STA :LEFT + LDA ERRY + AND #$0F ; MASK LEFT + STA :RIGHT + LDX :LEFT + LDA HEXTAB,X + JSR $FDF0 + LDX :RIGHT + LDA HEXTAB,X + JSR $FDF0 + _PRNT " ",8D8D + _PRNT "STATUS FLAGS",8D + _PRNT "============",8D8D + LDA #0 + CMP ERRCARRY + BEQ :CARCLR + _PRNT "CARRY: SET",8D + JMP :TESTN +:CARCLR _PRNT "CARRY: CLEAR",8D +:TESTN LDA #0 + CMP ERRNEG + BEQ :NEGCLR + _PRNT "NEGATIVE: SET",8D + JMP :TESTZ +:NEGCLR _PRNT "NEGATIVE: CLEAR",8D +:TESTZ LDA #0 + CMP ERRZERO + BEQ :ZCLR + _PRNT "ZERO: SET",8D + JMP :TESTO +:ZCLR _PRNT "ZERO: CLEAR",8D +:TESTO + LDA #0 + CMP ERROVF + BEQ :OCLR + _PRNT "OVERFLOW: SET",8D + JMP :FIN +:OCLR _PRNT "OVERFLOW: CLEAR",8D8D8D +:FIN + RTS +:LEFT DS 1 +:RIGHT DS 1 +HEXTAB ASC "0123456789ABCDEF" +__ERR + JSR __RSAV + PLA + STA RETADR + PLA + STA RETADR+1 + PLA + STA :DUMPLEN ; LENGTH OF DUMP + PLA + STA :DUMP ; DUMP ADDRESS LO + PLA + STA :DUMP+1 ; DUMP HI + PLA + STA :DMPMSG + PLA + STA :DMPMSG+1 + PLA + STA :MESG ; ERROR MESSAGE ADDR LO + PLA + STA :MESG+1 ; HI + PLA + STA :SRID ; SUBROUTINE ID ADDR LO + PLA + STA :SRID+1 ; SUB ID HI + _PRNT " ",87878787878D8D + _PRNT "ERROR!",8D8D + _PRNT "SUBROUTINE: " + LDY #0 + LDA :SRID + STA ADDR1 + LDA :SRID+1 + STA ADDR1+1 +:LP1 + LDA (ADDR1),Y + BEQ :LPX1 + JSR $FDF0 + INY + BNE :LP1 +:LPX1 + _PRNT " ",8D + _PRNT "MESSAGE: " + LDY #0 + LDA :MESG + STA ADDR1 + LDA :MESG+1 + STA ADDR1+1 +:LP2 + LDA (ADDR1),Y + BEQ :LPX2 + JSR $FDF0 + INY + BNE :LP2 +:LPX2 + _PRNT " ",8D8D + _WAIT + LDY #0 + LDA :DMPMSG + STA ADDR1 + LDA :DMPMSG+1 + STA ADDR1+1 +:LP3 + LDA (ADDR1),Y + BEQ :LPX3 + JSR $FDF0 + INY + BNE :LP3 +:LPX3 + _PRNT " ",8D + LDA :DUMP+1 + PHA + LDA :DUMP + PHA + LDA :DUMPLEN + PHA + JSR __DUMP + _WAIT + LDA RETADR+1 + PHA + LDA RETADR + PHA + _PRNT " ",8D8D + _WAIT + _RDUMP + _WAIT + LDA ERRSTOP + CMP #1 + BEQ :KILL + RTS +:KILL + JMP $3D0 +:DUMPLEN DS 1 +:DUMP DS 2 +:DMPMSG DS 2 +:MESG DS 2 +:SRID DS 2 diff --git a/disks/disk5_strings/T.REQUIRED.MAC b/disks/disk5_strings/T.REQUIRED.MAC deleted file mode 100644 index 3af5953..0000000 --- a/disks/disk5_strings/T.REQUIRED.MAC +++ /dev/null @@ -1,134 +0,0 @@ -******************************** -* * -******************************** -* -*``````````````````````````````* -* REQUIRED.MAC * -*- -* -* MACROS USED FOR CORE UTILS * -* AND LIBRARY ROUTINES. NOTE * -* THAT THE LIBRARIES DO NOT * -* USE THESE MACROS, BUT MAY * -* USE THE ROUTINES. THESE ARE * -* MERELY PROVIDED FOR THE SAKE * -* OF CONVENIENCE. * -*,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,* -* -*``````````````````````````````* -* _ISLIT: DETERMINES WHETHER A * -* PARAM IS LITERAL OR * -* NOT, AND CHANGES * -* APPROPRIATELY. FOR * -* MACRO USE ONLY. * -*,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,* -* -_ISLIT MAC - IF #=]1 ; IF ]1 IS A LITERAL - LDA ]1/$100 ; GET HI - PHA - LDA ]1 ; GET LO - PHA - ELSE ; ]1 IS ADDRESS - LDA ]1+1 ; SO GET HIGH VAL FROM ADDR - PHA - LDA ]1 ; THEN LO VAL - PHA - FIN - <<< -* -*``````````````````````````````* -* _ISSTR: DETERMINES WHETHER A * -* PARAM IS A STRING OR * -* NOT, AND CHANGES * -* APPROPRIATELY. FOR * -* MACRO USE ONLY. * -*,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,* -* -_ISSTR MAC - IF "=]1 ; IF ]1 IS A STRING -* -** STORE STRING AT TEMP ADDRESS, THEN -** PUSH TEMP ADDRESS -* - JMP STRCONT -]STRTMP STR ]1 -STRCONT - LDY #0 - LDA ]STRTMP - STA PARLEN - STA PARAM -]STRLP1 - INY - LDA ]STRTMP,Y - STA PARAM,Y - CPY PARLEN - BNE ]STRLP1 -* - LDA #>PARAM ; GET HI - PHA - LDA #]1 ; SO GET HIBYTE OF ADDR - PHA - LDA #<]1 ; THEN LOBYTE - PHA - FIN - <<< -* -*``````````````````````````````* -* _GRET: GET RETURN VALUE * -*,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,* -* -_GRET MAC - LDA #>]1 - PHA - LDA #<]1 - PHA - JSR __GETRET - <<< -* -*``````````````````````````````* -* _SPAR: SET PARAMETER * -*,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,* -* -_SPAR MAC - LDA #>]1 - PHA - LDA #<]1 - PHA - JSR __SETPARM - <<< -* -*``````````````````````````````* -* _DUMP: DUMP DATA * -*,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,* -* -_DUMP MAC - LDA #>]1 - PHA - LDA #<]1 - PHA - LDA ]2 - PHA - JSR __DUMP - <<< -* -*``````````````````````````````* -* _PRNT: PRINT STRING * -*,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,* -* -_PRNT MAC - JSR __P - ASC ]1 - HEX 00 - <<< -* -*``````````````````````````````* -* _WAIT: WAIT FOR KEYPRESS * -*,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,* -* -_WAIT MAC - JSR __W - <<< -* diff --git a/disks/disk5_strings/T.REQUIRED.MAC.MIN b/disks/disk5_strings/T.REQUIRED.MAC.MIN new file mode 100644 index 0000000..1df52ed --- /dev/null +++ b/disks/disk5_strings/T.REQUIRED.MAC.MIN @@ -0,0 +1,94 @@ +_ISLIT MAC + IF #=]1 ; IF ]1 IS A LITERAL + LDA ]1/$100 ; GET HI + PHA + LDA ]1 ; GET LO + PHA + ELSE ; ]1 IS ADDRESS + LDA ]1+1 ; SO GET HIGH VAL FROM ADDR + PHA + LDA ]1 ; THEN LO VAL + PHA + FIN + <<< +_ISSTR MAC + IF "=]1 ; IF ]1 IS A STRING + JMP STRCONT +]STRTMP STR ]1 +STRCONT + LDY #0 + LDA ]STRTMP + STA PARLEN + STA PARAM +]STRLP1 + INY + LDA ]STRTMP,Y + STA PARAM,Y + CPY PARLEN + BNE ]STRLP1 + LDA #>PARAM ; GET HI + PHA + LDA #]1 ; SO GET HIBYTE OF ADDR + PHA + LDA #<]1 ; THEN LOBYTE + PHA + FIN + <<< +_GRET MAC + LDA #>]1 + PHA + LDA #<]1 + PHA + JSR __GETRET + <<< +_SPAR MAC + LDA #>]1 + PHA + LDA #<]1 + PHA + JSR __SETPARM + <<< +_DUMP MAC + LDA #>]1 + PHA + LDA #<]1 + PHA + LDA ]2 + PHA + JSR __DUMP + <<< +_PRNT MAC + JSR __P + ASC ]1 + HEX 00 + <<< +_WAIT MAC + JSR __W + <<< +_RDUMP MAC + JSR __RDMP + <<< +_ERR MAC + LDA #>]1 + PHA + LDA #<]1 + PHA + LDA #>]2 + PHA + LDA #<]2 + PHA + LDA #>]3 + PHA + LDA #<]3 + PHA + LDA #>]4 + PHA + LDA #<]4 + PHA + LDA ]5 + PHA + JSR __ERR + <<< diff --git a/disks/disk5_strings/T.REQUIRED.VARS b/disks/disk5_strings/T.REQUIRED.VARS new file mode 100644 index 0000000..ae2759a --- /dev/null +++ b/disks/disk5_strings/T.REQUIRED.VARS @@ -0,0 +1,72 @@ +* +******************************** +* * +* VARIABLES AND SETTINGS * +* * +******************************** +* +* VARIABLE DECLARATIONS ******** +* +** JUMP TABLE SETUP. THIS IS FOR LOADING +** SUBROUTINES INTO MEMORY FOR ACCESS BY +** EXTERNAL EXECUTIONS. NOTE THAT THIS +** SHOULD ALWAYS BE THE VERY FIRST BIT OF +** CODE IN THE PROGRAM SO THAT ITS +** LOCATION IN MEMORY IS EASILY KNOWN. +* +JUMPTBL JMP MAIN_START ; ** ALWAYS ** START WITH + ; JUMP TO MAIN_START + DS 60 ; 20 MORE ENTRIES +* +** 256 BYTES DEDICATED TO RETURN +** VALUES OF VARIABLE LENGTH; CAN BE +** MODIFIED TO SUIT SMALLER OR LARGER +** NEEDS. +* +RETLEN DS 1 ; RETURN VALUE BYTE LENGTH +RETURN DS 256 +* +** 256 BYTE VALUE DEDICATED TO LARGE +** OR VARIABLE LENGTH PARAMETERS. THIS +** CAN ALSO BE CHANGED TO FIT SMALLER OR +** LARGER BOUNDS. +* +PARLEN DS 1 +PARAM DS 256 +* +** ERROR HANDLING +* +ERRSTOP DS 1 +ERRCTRL DS 1 +ERRA DS 1 +ERRX DS 1 +ERRY DS 1 +ERRCARRY DS 1 +ERRNEG DS 1 +ERRZERO DS 1 +ERROVF DS 1 +* +* SETTINGS ********************* +* +MAIN_START +* +** ERROR HANDLING +* +** SET ERRSTOP TO 1 IF YOU WANT THE PROGRAM TO +** HALT WHEN AN ERROR IS CAUGHT +* + LDA #1 + STA ERRSTOP +* +** SET ERRCTRL TO 1 IF YOU WANT ERROR CATCHING ON +** IN THE FIRST PLACE. HAVING THIS TURNED OFF WILL +** SAVE A FEW CYCLES, BUT POSSIBLY AT THE EXPENSE +** OF YOUR FRUSTRATION. CAN BE TURNED ON LATER THOUGH. +* + LDA #1 + STA ERRCTRL +* +* +* +* +* diff --git a/disks/disk5_strings/T.STR2NUM.MIN b/disks/disk5_strings/T.STR2NUM.MIN deleted file mode 100644 index eda9761..0000000 --- a/disks/disk5_strings/T.STR2NUM.MIN +++ /dev/null @@ -1,105 +0,0 @@ -* -STR2NUM -* - PLA - STA RETADR - PLA - STA RETADR+1 - PLA - STA ADDR1 - PLA - STA ADDR1+1 - LDY #0 - LDA (ADDR1),Y - TAX - LDA #1 - STA :NINDEX - LDA #0 - STA :NACCUM - STA :NACCUM+1 - STA :SNGFLAG - TXA - BNE :INIT1 - JMP :EREXIT -:INIT1 - LDY :NINDEX - LDA (ADDR1),Y - CMP #173 - BNE :PLUS - LDA #$0FF - STA :SNGFLAG - INC :NINDEX - DEX - BEQ :EREXIT - JMP :CNVERT -:PLUS - CMP #'+' - BNE :CHKDIG - INC :NINDEX - DEX - BEQ :EREXIT -:CNVERT - LDY :NINDEX - LDA (ADDR1),Y -:CHKDIG - CMP #$B0 ; "0" - BMI :EREXIT - CMP #$BA - BPL :EREXIT - PHA - ASL :NACCUM - ROL :NACCUM+1 - LDA :NACCUM - LDY :NACCUM+1 - ASL :NACCUM - ROL :NACCUM+1 - ASL :NACCUM - ROL :NACCUM+1 - CLC - ADC :NACCUM - STA :NACCUM - TYA - ADC :NACCUM+1 - STA :NACCUM+1 - PLA - SEC - SBC #$B0 - CLC - ADC :NACCUM - STA :NACCUM - BCC :D2B1 - INC :NACCUM+1 -:D2B1 - INC :NINDEX - DEX - BNE :CNVERT - LDA :SNGFLAG - BPL :OKEXIT - LDA #0 - SEC - SBC :NACCUM - STA :NACCUM - LDA #0 - SBC :NACCUM+1 - STA :NACCUM+1 -:OKEXIT - CLC - BCC :EXIT -:EREXIT - SEC -:EXIT - LDA RETADR+1 - PHA - LDA RETADR - PHA - LDX :NACCUM+1 - LDY :NACCUM - STY RETURN - STX RETURN+1 - LDA #2 - STA RETLEN - LDA :NINDEX - RTS -:NACCUM DS 2 -:SNGFLAG DS 1 -:NINDEX DS 1 diff --git a/disks/disk5_strings/T.STR2NUM b/disks/disk5_strings/T.STR2NUM.SUB similarity index 91% rename from disks/disk5_strings/T.STR2NUM rename to disks/disk5_strings/T.STR2NUM.SUB index c57e3c6..ca5c238 100644 --- a/disks/disk5_strings/T.STR2NUM +++ b/disks/disk5_strings/T.STR2NUM.SUB @@ -1,4 +1,3 @@ -* *``````````````````````````````* * STR2NUM :: STRING TO NUMBER * *- -* @@ -166,6 +165,26 @@ STR2NUM BCC :EXIT :EREXIT SEC +* +******************************** +* +* ERROR CONTROL +* +******************************** +* + LDA ERRCTRL + CMP #1 + BEQ :CHKERR + JMP :ERREND +:CHKERR + _ERR :E_SID;:E_MSG;:E_DUMP;:NACCUM;#4 +* +******************************** +* +:ERREND +* +******************************** +* :EXIT * ** RESTORE RETURN ADDRESS @@ -191,3 +210,6 @@ STR2NUM :SNGFLAG DS 1 :NINDEX DS 1 * +:E_SID ASC "STR2NUM (S2N MACRO)",00 +:E_MSG ASC "ERR! NO DATA, OR NOT A NUMERAL VALUE",00 +:E_DUMP ASC "DUMPING :NACCUM(2) :SNGFLAG(1) :NINDEX(1)",00 diff --git a/disks/disk5_strings/T.STR2NUM.SUB.MIN b/disks/disk5_strings/T.STR2NUM.SUB.MIN new file mode 100644 index 0000000..04c0912 --- /dev/null +++ b/disks/disk5_strings/T.STR2NUM.SUB.MIN @@ -0,0 +1,118 @@ +STR2NUM + PLA + STA RETADR + PLA + STA RETADR+1 + PLA + STA ADDR1 ; ADRESS OF STRING + PLA ; TO CNVERT + STA ADDR1+1 + LDY #0 + LDA (ADDR1),Y + TAX ; GET LENGITH; TO REGX + LDA #1 + STA :NINDEX ; INDEX = 1 + LDA #0 + STA :NACCUM ; ACCUM = 0 + STA :NACCUM+1 + STA :SNGFLAG ; SIGN IS POSITIVE + TXA + BNE :INIT1 ; EXIT WITH ACCUM = 0 + ; IF BUFFER IS EMPTY + JMP :EREXIT ; ERROR EXIT IF NOTHING + ; IN BUFFER +:INIT1 + LDY :NINDEX + LDA (ADDR1),Y + CMP #173 + BNE :PLUS ; BR IF NOT - + LDA #$0FF + STA :SNGFLAG ; ELSE SIGN IS NEGATIVE + INC :NINDEX + DEX ; DECREMENT COUNT + BEQ :EREXIT ; ERROR EXIT IF ONLY + ; - IN BUFFER + JMP :CNVERT +:PLUS + CMP #'+' + BNE :CHKDIG ; START CONVERSION IF 1ST + INC :NINDEX + DEX ; DEC COUNT; IGNORE + SIGN + BEQ :EREXIT ; ERROR EXIT IF ONLY + ; + IN THE BUFFER +:CNVERT + LDY :NINDEX + LDA (ADDR1),Y + ; GET NEXT CHAR +:CHKDIG + CMP #$B0 ; "0" + BMI :EREXIT ; ERROR IF NOT A NUMERAL + CMP #$BA ; '9'+1; TECHNICALLY : + BPL :EREXIT ; ERR IF > 9 (NOT NUMERAL) + PHA ; PUSH DIGIT TO STACK + ASL :NACCUM + ROL :NACCUM+1 ; TIMES 2 + LDA :NACCUM + LDY :NACCUM+1 ; SAVE ACCUM * 2 + ASL :NACCUM + ROL :NACCUM+1 + ASL :NACCUM + ROL :NACCUM+1 ; TIMES 8 + CLC + ADC :NACCUM ; SUM WITH * 2 + STA :NACCUM + TYA + ADC :NACCUM+1 + STA :NACCUM+1 ; ACCUM=ACCUM * 10 + PLA ; GET THE DIGIT NACK + SEC + SBC #$B0 + CLC ; CONVERT STR TO BIN + ADC :NACCUM + STA :NACCUM + BCC :D2B1 ; BRANCH IF NO CARRY TO HBYTE + INC :NACCUM+1 ; ELSE INC HIGH BYTE +:D2B1 + INC :NINDEX ;INC TO NEXT CHARACTER + DEX + BNE :CNVERT ; CONTINUE CONVERSION + LDA :SNGFLAG + BPL :OKEXIT ; BR IF VAL IS POSITIVE + LDA #0 ; ELSE REPLACE WITH -RESULT + SEC + SBC :NACCUM + STA :NACCUM + LDA #0 + SBC :NACCUM+1 + STA :NACCUM+1 +:OKEXIT + CLC + BCC :EXIT +:EREXIT + SEC + LDA ERRCTRL + CMP #1 + BEQ :CHKERR + JMP :ERREND +:CHKERR + _ERR :E_SID;:E_MSG;:E_DUMP;:NACCUM;#4 +:ERREND +:EXIT + LDA RETADR+1 + PHA + LDA RETADR + PHA + LDX :NACCUM+1 + LDY :NACCUM + STY RETURN + STX RETURN+1 + LDA #2 + STA RETLEN + LDA :NINDEX + RTS +:NACCUM DS 2 +:SNGFLAG DS 1 +:NINDEX DS 1 +:E_SID ASC "STR2NUM (S2N MACRO)",00 +:E_MSG ASC "ERR! NO DATA, OR NOT A NUMERAL VALUE",00 +:E_DUMP ASC "DUMPING :NACCUM(2) :SNGFLAG(1) :NINDEX(1)",00 diff --git a/disks/disk5_strings/T.STRCAT.MIN b/disks/disk5_strings/T.STRCAT.MIN deleted file mode 100644 index 96f8b77..0000000 --- a/disks/disk5_strings/T.STRCAT.MIN +++ /dev/null @@ -1,96 +0,0 @@ -* -STRCAT -* - PLA - STA RETADR - PLA - STA RETADR+1 - PLA - STA :MLEN - PLA - STA ADDR2 - PLA - STA ADDR2+1 - PLA - STA ADDR1 - PLA - STA ADDR1+1 - LDY #0 - LDA (ADDR1),Y - STA :S1LEN - STA :S1IND - INC :S1IND - LDA (ADDR2),Y - STA :S2LEN - LDA #1 - STA :S2IND - LDA :S2LEN - CLC - ADC :S1LEN - STA :S3LEN - BCS :TOOLONG - CMP :MLEN - BEQ :LENOK - BCC :LENOK -:TOOLONG - LDA #$0FF - STA :SOVF - LDA :MLEN - SEC - SBC :S1LEN - BCC :EXIT - STA :SCNT - LDA :MLEN - STA :S1LEN - JMP :DOCAT -:LENOK - STA :S1LEN - LDA #0 - STA :SOVF - LDA :S2LEN - STA :SCNT -:DOCAT - LDA :SCNT - BEQ :EXIT -:CATLP - LDY :S2IND - LDA (ADDR2),Y - LDY :S1IND - STA (ADDR1),Y - INC :S1IND - INC :S2IND - DEC :SCNT - BNE :CATLP -:EXIT - LDA :S1LEN - LDY #0 - STA (ADDR1),Y - LDA :SOVF - ROR A - LDA RETADR+1 - PHA - LDA RETADR - PHA - LDY #0 - LDA (ADDR1),Y - STA RETLEN - LDA #1 -:RLP - LDA (ADDR1),Y - STA RETURN,Y - CPY RETLEN - INY - BNE :RLP - LDA RETLEN - LDY #0 - STA (ADDR1),Y - LDX :S3LEN - RTS -:S3LEN DS 1 -:S1LEN DS 1 -:S1IND DS 1 -:S2LEN DS 1 -:S2IND DS 1 -:MLEN DS 1 -:SCNT DS 1 -:SOVF DS 1 diff --git a/disks/disk5_strings/T.STRCAT b/disks/disk5_strings/T.STRCAT.SUB similarity index 99% rename from disks/disk5_strings/T.STRCAT rename to disks/disk5_strings/T.STRCAT.SUB index be76a11..f17fa10 100644 --- a/disks/disk5_strings/T.STRCAT +++ b/disks/disk5_strings/T.STRCAT.SUB @@ -1,4 +1,3 @@ -* *``````````````````````````````* * STRCAT :: STRING CONCATENATE * *- -* diff --git a/disks/disk5_strings/T.STRCAT.SUB.MIN b/disks/disk5_strings/T.STRCAT.SUB.MIN new file mode 100644 index 0000000..c3dc7d4 --- /dev/null +++ b/disks/disk5_strings/T.STRCAT.SUB.MIN @@ -0,0 +1,94 @@ +STRCAT + PLA + STA RETADR + PLA + STA RETADR+1 + PLA + STA :MLEN ; MAXIMUM CONCAT LENGTH + PLA + STA ADDR2 ; STRING 1 ADDRESS + PLA ; IN ZERO PAGE + STA ADDR2+1 + PLA + STA ADDR1 ; STRING 2 ADDRESS + PLA ; IN ZERO PAGE + STA ADDR1+1 + LDY #0 + LDA (ADDR1),Y ; GET CUR LGTH OF S1, STORE + STA :S1LEN + STA :S1IND + INC :S1IND ; START CONCAT AT END OF S1 + LDA (ADDR2),Y ; GET LENGTH OF S2, STORE + STA :S2LEN + LDA #1 + STA :S2IND ; START CONCAT AT BEGIN OF S2 + LDA :S2LEN ; GET S2 LENGTH + CLC + ADC :S1LEN ; ADD TO LENGTH OF S1 + STA :S3LEN ; STORE CONCAT LENGTH + BCS :TOOLONG ; BR IF LENGTH > 255 + CMP :MLEN ; CHECK AGAINST MAX LENGTH + BEQ :LENOK ; BR IF LENGTH < MAX + BCC :LENOK +:TOOLONG + LDA #$0FF + STA :SOVF ; INDICATE OVERFLOW + LDA :MLEN + SEC + SBC :S1LEN + BCC :EXIT + STA :SCNT ; ORIG STR WAS TOO LONG + LDA :MLEN + STA :S1LEN ; SET STR1 LENGTH TO MAX + JMP :DOCAT +:LENOK + STA :S1LEN + LDA #0 ; SAVE SUM OF 2 LENGTHS + STA :SOVF ; INDICATE NO OVERFLOW + LDA :S2LEN + STA :SCNT ; COUNT = LENGTH OF STRING 2 +:DOCAT + LDA :SCNT + BEQ :EXIT ; EXIT IF NO BYTES LEFT +:CATLP + LDY :S2IND + LDA (ADDR2),Y ; GET NEXT BYTE FROM S2 + LDY :S1IND + STA (ADDR1),Y ; MOVE IT TO END OF STR 1 + INC :S1IND ;INC STRING 1 INDEX + INC :S2IND ; INC STRING 2 INDEX + DEC :SCNT ; DECREMENT COUNTER + BNE :CATLP ; CONT UNTIL __SCNT = 0 +:EXIT + LDA :S1LEN + LDY #0 + STA (ADDR1),Y + LDA :SOVF + ROR A + LDA RETADR+1 + PHA + LDA RETADR + PHA + LDY #0 + LDA (ADDR1),Y ; LENGTH OF STRING + STA RETLEN + LDA #1 +:RLP + LDA (ADDR1),Y + STA RETURN,Y + CPY RETLEN + INY + BNE :RLP + LDA RETLEN + LDY #0 + STA (ADDR1),Y + LDX :S3LEN ; RETURN FINAL LENGTH + RTS +:S3LEN DS 1 +:S1LEN DS 1 +:S1IND DS 1 +:S2LEN DS 1 +:S2IND DS 1 +:MLEN DS 1 +:SCNT DS 1 +:SOVF DS 1 diff --git a/disks/disk5_strings/T.STRCMP.MIN b/disks/disk5_strings/T.STRCMP.MIN deleted file mode 100644 index edbcd04..0000000 --- a/disks/disk5_strings/T.STRCMP.MIN +++ /dev/null @@ -1,46 +0,0 @@ -* -STRCMP -* - PLA - STA RETADR - PLA - STA RETADR+1 - PLA - STA ADDR2 - PLA - STA ADDR2+1 - PLA - STA ADDR1 - PLA - STA ADDR1+1 - LDY #0 - LDA (ADDR1),Y - CMP (ADDR2),Y - BCC :BEGCMP - LDA (ADDR2),Y -:BEGCMP - TAX - BEQ :TSTLEN - LDY #1 -:CMPLP - LDA (ADDR1),Y - CMP (ADDR2),Y - BNE :EXIT - INY - DEX - BNE :CMPLP -:TSTLEN - LDY #0 - LDA (ADDR1),Y - CMP (ADDR2),Y -:EXIT - LDA RETADR+1 - PHA - LDA RETADR - PHA - LDY #0 - LDA (ADDR1),Y - TAX - LDA (ADDR2),Y - TAY - RTS diff --git a/disks/disk5_strings/T.STRCMP b/disks/disk5_strings/T.STRCOMP.SUB similarity index 99% rename from disks/disk5_strings/T.STRCMP rename to disks/disk5_strings/T.STRCOMP.SUB index e2827c2..b57c279 100644 --- a/disks/disk5_strings/T.STRCMP +++ b/disks/disk5_strings/T.STRCOMP.SUB @@ -1,4 +1,3 @@ -* *``````````````````````````````* * STRCMP :: STRING COMPARE * *- -* diff --git a/disks/disk5_strings/T.STRCOMP.SUB.MIN b/disks/disk5_strings/T.STRCOMP.SUB.MIN new file mode 100644 index 0000000..48bb0ae --- /dev/null +++ b/disks/disk5_strings/T.STRCOMP.SUB.MIN @@ -0,0 +1,47 @@ +STRCMP + PLA + STA RETADR + PLA + STA RETADR+1 + PLA + STA ADDR2 + PLA + STA ADDR2+1 + PLA + STA ADDR1 + PLA + STA ADDR1+1 + LDY #0 + LDA (ADDR1),Y ; GET LENGTH OF STRING 1 + CMP (ADDR2),Y + BCC :BEGCMP ; IF STRING 2 IS SHORTER THEN + LDA (ADDR2),Y ; USE ITS LENGTH INSTEAD +:BEGCMP + TAX ; X IS LENGTH OF SHORTER STRING + BEQ :TSTLEN ; BR IF LENGTH IS 0 + LDY #1 ; POINT AT FIRST CHAR OF STRINGS +:CMPLP + LDA (ADDR1),Y + CMP (ADDR2),Y + BNE :EXIT ; BR IF CHARS NOT EQUAL + ; Z,C WILL BE PROPERLY SET + ; OR CLEARED + ; ELSE + INY ; NEXT CHAR + DEX ; DECREMENT COUNTER + BNE :CMPLP ; CONTINUE UNTIL ALL BYTES PAIRED +:TSTLEN + LDY #0 ; COMPARE LENGTHS + LDA (ADDR1),Y + CMP (ADDR2),Y ; SET OR CLEAR THE FLAGS +:EXIT + LDA RETADR+1 + PHA + LDA RETADR + PHA + LDY #0 + LDA (ADDR1),Y ; GET STR1 LENGTH + TAX ; RETURN IN X + LDA (ADDR2),Y ; STR2 LENGTH + TAY ; RETURN IN Y + RTS diff --git a/disks/disk5_strings/T.STRINGS.DEMO b/disks/disk5_strings/T.STRINGS.DEMO index 0627365..8e1fbe9 100644 --- a/disks/disk5_strings/T.STRINGS.DEMO +++ b/disks/disk5_strings/T.STRINGS.DEMO @@ -3,9 +3,9 @@ * * * -< STRINGS DEMO >- * * * -* VERSION 00.02.00 * +* VERSION 00.03.00 * * * -* 21-DEC-2018 * +* 20-JAN-2019 * * * ******************************** * * @@ -17,9 +17,9 @@ ** ASSEMBLER DIRECTIVES * CYC AVE + TR ON EXP ONLY DSK STRINGS.DEMO -* OBJ $BFE0 ORG $6000 * @@ -27,10 +27,10 @@ * TOP INCLUDES (PUTS, MACROS) * *,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,* * - USE REQUIRED.MAC - PUT REQUIRED.HOOKS -* - USE STRINGS.MAC + PUT REQUIRED.VARS + USE REQUIRED.MAC.MIN + PUT REQUIRED.HOOKS.MIN + USE STRINGS.MAC.MIN PUT STRINGS.HOOKS * * @@ -193,16 +193,32 @@ CONT2 * JMP REENTRY * +ASTR STR "A" +BSTR STR "B" +LSTR STR "THIS IS A STRING." +* *``````````````````````````````* * BOTTOM INCLUDES * *,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,* * ** BOTTOM INCLUDES * - PUT STRINGS.LIB - PUT SUBSTRINGS.LIB - PUT REQUIRED.LIB + PUT REQUIRED.LIB.MIN +* +** INDIVIDUAL SUBROUTINE INCLUDES +* +** STRING SUBROUTINES +* + PUT NUM2STR.SUB.MIN + PUT PRNSTR.SUB.MIN + PUT STRCAT.SUB.MIN + PUT STRCOMP.SUB.MIN + PUT STR2NUM.SUB.MIN +* +** SUBSTRING SUBROUTINES +* + PUT SUBCOPY.SUB.MIN + PUT SUBDEL.SUB.MIN + PUT SUBINS.SUB.MIN + PUT SUBPOS.SUB.MIN * -ASTR STR "A" -BSTR STR "B" -LSTR STR "THIS IS A STRING." diff --git a/disks/disk5_strings/T.STRINGS.LIB b/disks/disk5_strings/T.STRINGS.LIB deleted file mode 100644 index 9b72bc7..0000000 --- a/disks/disk5_strings/T.STRINGS.LIB +++ /dev/null @@ -1,853 +0,0 @@ -* - JMP STRINGSX -* -*-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=* -* * -* STRINGS ROUTINE LIBRARY * -* * -* AUTHOR: NATHAN RIGGS * -* CONTACT: NATHAN.RIGGS@ * -* OUTLOOK.COM * -* * -* VERSION: 0.2.0 * -* DATE: 30-OCT-2018 * -* ASSEMBLER: MERLIN 8 PRO * -* OS: DOS 3.3 * -* LICENSE: APACHE 2.0 * -* * -* THIS IS A STANDARD LIBRARY * -* FOR STRING MANIPULATION. * -* * -*------------------------------* -* * -* LIST OF ROUTINES * -* * -* STRCOMP : STRING COMPARE * -* STRCAT : CONCATENATE STRING * -* PRNSTR : PRINT STRING * -* NUM2STR : NUMBER TO STRING * -* STR2NUM : STRING TO NUMBER * -* * -*=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-* -* -*``````````````````````````````* -* STRCMP :: STRING COMPARE * -*- -* -* COMPARE TWO STRINGS AND * -* DETERMINE IF THEY ARE * -* IDENTICAL; IF NOT, DETERMINE * -* WHICH IS THE SHORTEST AND * -* WHICH IS THE LONGEST. * -* * -* Z FLAG = 1 IF IDENTICAL * -* Z FLAG = 0 IF NOT * -* CARRY = 1 IF STR2 > STR1 LEN * -* CARRY = 0 IF STR1 > STR2 LEN * -*- -* -* CLOBBERS: * -* * -* FLAGS: ????---- REG: AXYM * -*- -* -* CYCLES: ??? * -* SIZE: * -*- -* -* USAGE: * -* * -* LDA #>STR1 * -* PHA * -* LDA #STR2 * -* PHA * -* LDA # STR1 LENGTH -** CARRY = 1 IF STR1 LENGTH >= STR2 LENGTH -* -:EXIT -* -** RESTORE RETURN ADDRESS -* - LDA RETADR+1 - PHA - LDA RETADR - PHA -* - LDY #0 - LDA (ADDR1),Y ; GET STR1 LENGTH - TAX ; RETURN IN X - LDA (ADDR2),Y ; STR2 LENGTH - TAY ; RETURN IN Y -* - RTS -* -*``````````````````````````````* -* STRCAT :: STRING CONCATENATE * -*- -* -* CONCATENATE TWO STRINGS INTO * -* A SINGLE STRING STORE WHERE * -* THE FIRST STRING IS LOCATED. * -* ADDITIONALLY COPIES CONCAT'D * -* STRING TO [RETURN]. * -*- -* -* CLOBBERS: * -* * -* FLAGS: ????---- REG: AXYM * -*- -* -* CYCLES: ??? * -* SIZE: * -*- -* -* USAGE: * -* * -* LDA #>CATSTR * -* PHA * -* LDA #CATSTR2 * -* PHA * -* LDA # 255 - CMP :MLEN ; CHECK AGAINST MAX LENGTH - BEQ :LENOK ; BR IF LENGTH < MAX - BCC :LENOK -* -** RESULTING STRING WILL BE TOO LONG SO -** INDICATE A STRING OVERFLOW, __SOVF = 0FF -** SET NUMBER OF CHARS TO CONCAT = MLEN - S1LEN -** SET LENGTH OF STRING 1 TO MAX LENGTH -* -:TOOLONG - LDA #$0FF - STA :SOVF ; INDICATE OVERFLOW - LDA :MLEN - SEC - SBC :S1LEN - BCC :EXIT - ; EXIT IF MLEN < S1LEN - STA :SCNT ; ORIG STR WAS TOO LONG - LDA :MLEN - STA :S1LEN ; SET STR1 LENGTH TO MAX - JMP :DOCAT -* -** RESULTING LENGTH DOES NOT EXCEED MAX -** LENGTH OF STRING 1 = S1LEN + S2LEN -** INDICATE NO OVERFLOW, __SOVF = 0 -** SET NUM OF CHARS TO CONCAT TO LENGTH OF STR 2 -* -:LENOK - STA :S1LEN - LDA #0 ; SAVE SUM OF 2 LENGTHS - STA :SOVF ; INDICATE NO OVERFLOW - LDA :S2LEN - STA :SCNT ; COUNT = LENGTH OF STRING 2 -* -** CONCAT STRINGS -* -:DOCAT - LDA :SCNT - BEQ :EXIT ; EXIT IF NO BYTES LEFT -* -:CATLP - LDY :S2IND - LDA (ADDR2),Y ; GET NEXT BYTE FROM S2 - LDY :S1IND - STA (ADDR1),Y ; MOVE IT TO END OF STR 1 - INC :S1IND ;INC STRING 1 INDEX - INC :S2IND ; INC STRING 2 INDEX - DEC :SCNT ; DECREMENT COUNTER - BNE :CATLP ; CONT UNTIL __SCNT = 0 -* -:EXIT -* -** UPDATE STRING1 LENGTH -* - LDA :S1LEN - LDY #0 - STA (ADDR1),Y - LDA :SOVF - ROR A -* -** RESTORE RETURN ADDRESS -* - LDA RETADR+1 - PHA - LDA RETADR - PHA -* -** COPY TO [RETURN] -* - LDY #0 - LDA (ADDR1),Y ; LENGTH OF STRING - STA RETLEN - LDA #1 -:RLP - LDA (ADDR1),Y - STA RETURN,Y - CPY RETLEN - INY - BNE :RLP - LDA RETLEN - LDY #0 - STA (ADDR1),Y -* - LDX :S3LEN ; RETURN FINAL LENGTH -* - RTS -* -** DATA -* -:S3LEN DS 1 -:S1LEN DS 1 -:S1IND DS 1 -:S2LEN DS 1 -:S2IND DS 1 -:MLEN DS 1 -:SCNT DS 1 -:SOVF DS 1 -* -*``````````````````````````````* -* PRNSTR :: PRINT INDEXED STR * -*- -* -* PRINT A STRING WITH LENGTH * -* THAT PRECEDES START OF STR * -*- -* -* CLOBBERS: * -* * -* FLAGS: ????---- REG: AXYM * -*- -* -* CYCLES: ??? * -* SIZE: * -*- -* -* USAGE: * -* * -* LDA #>STR ; STRING ADDRESS * -* PHA * -* LDA #11111 ; VALUE TO * -* PHA ; CONVERT * -* LDA #<11111 * -* PHA * -* JSR NUM2STR * -*- -* -* ENTRY * -* * -* TOP OF STACK * -* * -* LOW BYTE OF RETURN ADDRESS * -* HI BYTE OF RETURN ADDRESS * -* LO BYTE VALUE TO CONVERT * -* HI BYTE VALUE TO CONVERT * -*- -* -* EXIT * -* * -* TOP OF STACK * -* * -* LOW BYTE OF RETURN ADDRESS * -* HI BYTE OF RETURN ADDRESS * -* * -* .Y = COUNTER; TRASH * -* .X = COUNTER; TRASH * -* .A = LOW BYTE OF RET ADDR * -* * -* [RETURN] = STRING VALUE * -* [RETLEN] = LENGTH OF STRING * -*- -* -* ADAPTED FROM LEVANTHAL AND * -* WINTHROP'S /6502 ASSEMBLY * -* LANGUAGE ROUTINES/. * -*,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,* -* -NUM2STR -* -** SAVE RETURN ADDRESS -* - PLA - STA RETADR - PLA - STA RETADR+1 -* -** GET PARAMETERS -* - PLA - STA :VALSTR - PLA - STA :VALSTR+1 -* - STA :NGFLAG - BPL :GETBP ; BR IF VAL IS POS - LDA #0 - SEC - SBC :VALSTR - STA :VALSTR - LDA #0 - SBC :VALSTR+1 - STA :VALSTR+1 -* -:GETBP - LDA #RETURN+1 - STA ADDR1+1 - LDA #0 ; SET BUFFER TO EMPTY - LDY #0 - STA (ADDR1),Y ; BUFFER(0) = 0 -* -** CONVERT VAL TO STRING -* -:CNVERT -* -** VALUE = VALUE DIV 10 -** MOD10 = VALUE MOD 10 -* - LDA #0 - STA :MOD10 - STA :MOD10+1 - LDX #16 - CLC ; CLEAR CARRY -* -:DVLOOP - ROL :VALSTR ; SHIFT CARRY INTO DIVBIT 0 - ROL :VALSTR+1 ; WHICH WILL BE THE QUOTIENT - ROL :MOD10 ; + SHIFT DIV AT SAME TIME - ROL :MOD10+1 -* -** A,Y = DIVIDEND - DIVISOR -* - SEC - LDA :MOD10 - SBC #10 - TAY ; SAVE LOWB IN REG Y - LDA :MOD10+1 - SBC #0 ; SUBTRACT CARRY - BCC :DECCNT ; BR IF DEND < DIVISOR - STY :MOD10 ; ELSE - STA :MOD10+1 ; NXT BIT OF Q IS A ONE AND SET - ; DIVIDEND = DEND - DIVISOR -:DECCNT - DEX - BNE :DVLOOP - ROL :VALSTR ; SHIFT IN LAST CARRY FOR Q - ROL :VALSTR+1 -* -** CONCAT NEXT CHAR -* -:CONCH - LDA :MOD10 - CLC - ADC #$B0 -* -** ADC #'0' ; CONVERT 0..9 TO ASCII 0-9 -* - JSR :CONCAT -* -** IF VALUE <> 0 THEN CONTINUE -* - LDA :VALSTR - ORA :VALSTR+1 - BNE :CNVERT ; BR IF VALUE != 0 -* -:EXIT - LDA :NGFLAG - BPL :POS ; BR IF ORIG VAL POS - LDA #173 ; ELSE - JSR :CONCAT ; PUT A MINUS SIGN IN FRONT -* -:POS -* -** RESTORE RETURN ADDRESS -* - LDA RETADR+1 - PHA - LDA RETADR - PHA -* - RTS ; RETURN -* -******************************** -* CONCAT SUBROUTINE -******************************** -* -:CONCAT - PHA ; SAVE CHAR ON STACK -* -** MOVE BUFFER RIGHT ONE CHAR -* - LDY #0 - LDA (ADDR1),Y ; GET CURRENT LENGTH - TAY - BEQ :EXITMR ; BR IF LENGTH=0 -* -:MVELP - LDA (ADDR1),Y ; GET NEXT CHAR - INY - STA (ADDR1),Y ; STORE IT - DEY - DEY - BNE :MVELP ; CONT UNTIL DONE -* -:EXITMR - PLA ; GET CHAR BACK FROM STACK - LDY #1 - STA (ADDR1),Y ; STORE THE CHAR - LDY #0 - LDA (ADDR1),Y ; GET LENGTH BYTE - CLC - ADC #1 ; INC LENGTH BY ONE - STA (ADDR1),Y ; UPDATE LENGTH -* - RTS -* -** DATA -* -:NGFLAG DS 1 -:VALSTR DS 2 -:MOD10 DS 2 -* -*``````````````````````````````* -* STR2NUM :: STRING TO NUMBER * -*- -* -* CONVERTS A STRING TO THE * -* EQUIVALENT 16BIT NUMBER. * -*- -* -* CLOBBERS: * -* * -* FLAGS: ????---- REG: AXYM * -*- -* -* CYCLES: ??? * -* SIZE: * -*- -* -* USAGE: * -* * -* LDA #>$300 ; STRING ADDR * -* PHA * -* LDA #<$300 * -* PHA * -* JSR STR2NUM * -*- -* -* ENTRY * -* * -* TOP OF STACK * -* * -* LOW BYTE OF RETURN ADDRESS * -* HI BYTE OF RETURN ADDRESS * -* LO BYTE OF STRING ADDRESS * -* HI BYTE OF STRING ADDRESS * -*- -* -* EXIT * -* * -* TOP OF STACK * -* * -* LOW BYTE OF RETURN ADDRESS * -* HI BYTE OF RETURN ADDRESS * -* * -* .Y = LO BYTE OF NUMBER * -* .X = HI BYTE OF NUMBER * -* .A = LOW BYTE OF RET ADDR * -* * -* [RETURN] = NUMBER VALUE WORD * -* [RETLEN] = 2 (NUM OF BYTES) * -*- -* -* ADAPTED FROM LEVANTHAL AND * -* WINTHROP'S /6502 ASSEMBLY * -* LANGUAGE ROUTINES/. * -*,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,* -* -STR2NUM -* -** SAVE RETURN ADDRESS -* - PLA - STA RETADR - PLA - STA RETADR+1 -* -** GET PARAMETERS -* - PLA - STA ADDR1 ; ADRESS OF STRING - PLA ; TO CNVERT - STA ADDR1+1 -* -** INITIALIZE -* - LDY #0 - LDA (ADDR1),Y - TAX ; GET LENGITH; TO REGX - LDA #1 - STA :NINDEX ; INDEX = 1 - LDA #0 - STA :NACCUM ; ACCUM = 0 - STA :NACCUM+1 - STA :SNGFLAG ; SIGN IS POSITIVE -* -** CHECK THAT BUFFER IS NOT ZERO -* - TXA - BNE :INIT1 ; EXIT WITH ACCUM = 0 - ; IF BUFFER IS EMPTY - JMP :EREXIT ; ERROR EXIT IF NOTHING - ; IN BUFFER -:INIT1 - LDY :NINDEX - LDA (ADDR1),Y - CMP #173 - BNE :PLUS ; BR IF NOT - - LDA #$0FF - STA :SNGFLAG ; ELSE SIGN IS NEGATIVE - INC :NINDEX - DEX ; DECREMENT COUNT - BEQ :EREXIT ; ERROR EXIT IF ONLY - ; - IN BUFFER - JMP :CNVERT -:PLUS - CMP #'+' - BNE :CHKDIG ; START CONVERSION IF 1ST - ; CHARACTER IS NOT A + - INC :NINDEX - DEX ; DEC COUNT; IGNORE + SIGN - BEQ :EREXIT ; ERROR EXIT IF ONLY - ; + IN THE BUFFER -:CNVERT - LDY :NINDEX - LDA (ADDR1),Y - ; GET NEXT CHAR -:CHKDIG - CMP #$B0 ; "0" - BMI :EREXIT ; ERROR IF NOT A NUMERAL - CMP #$BA ; '9'+1; TECHNICALLY : - BPL :EREXIT ; ERR IF > 9 (NOT NUMERAL) - PHA ; PUSH DIGIT TO STACK -* -** VALID DECIMAL DIGIT SO -** ACCUM = ACCUM * 10 -** = * (8+2) -** = (ACCUM * 8) + (ACCUM * 2) -* - ASL :NACCUM - ROL :NACCUM+1 ; TIMES 2 - LDA :NACCUM - LDY :NACCUM+1 ; SAVE ACCUM * 2 - ASL :NACCUM - ROL :NACCUM+1 - ASL :NACCUM - ROL :NACCUM+1 ; TIMES 8 - CLC - ADC :NACCUM ; SUM WITH * 2 - STA :NACCUM - TYA - ADC :NACCUM+1 - STA :NACCUM+1 ; ACCUM=ACCUM * 10 -* -** ADD IN THE NEXT DIGIT -** ACCUM = ACCUM + DIGIT -* - PLA ; GET THE DIGIT NACK - SEC - SBC #$B0 - CLC ; CONVERT STR TO BIN - ADC :NACCUM - STA :NACCUM - BCC :D2B1 ; BRANCH IF NO CARRY TO HBYTE - INC :NACCUM+1 ; ELSE INC HIGH BYTE -:D2B1 - INC :NINDEX ;INC TO NEXT CHARACTER - DEX - BNE :CNVERT ; CONTINUE CONVERSION - LDA :SNGFLAG - BPL :OKEXIT ; BR IF VAL IS POSITIVE - LDA #0 ; ELSE REPLACE WITH -RESULT - SEC - SBC :NACCUM - STA :NACCUM - LDA #0 - SBC :NACCUM+1 - STA :NACCUM+1 -* -** GET THE BINARY VALUE AND RETURN -* -:OKEXIT - CLC - BCC :EXIT -:EREXIT - SEC -:EXIT -* -** RESTORE RETURN ADDRESS -* - LDA RETADR+1 - PHA - LDA RETADR - PHA -* - LDX :NACCUM+1 - LDY :NACCUM - STY RETURN - STX RETURN+1 - LDA #2 - STA RETLEN - LDA :NINDEX -* - RTS -* -** DATA -* -:NACCUM DS 2 -:SNGFLAG DS 1 -:NINDEX DS 1 -* -STRINGSX -* diff --git a/disks/disk5_strings/T.STRINGS.MAC.MIN b/disks/disk5_strings/T.STRINGS.MAC.MIN new file mode 100644 index 0000000..f910b05 --- /dev/null +++ b/disks/disk5_strings/T.STRINGS.MAC.MIN @@ -0,0 +1,65 @@ +SCMP MAC + _ISSTR ]1 + _ISSTR ]2 + JSR STRCMP + <<< +SCAT MAC + _ISSTR ]1 + _ISSTR ]2 + LDA ]3 ; MAX SIZE; BYTE + PHA + JSR STRCAT + <<< +SPRN MAC + LDA #>]1 ; ADDRESS OF STRING + PHA + LDA #<]1 + PHA + JSR PRNSTR + <<< +TOSTR MAC + _ISLIT ]1 + JSR NUM2STR + <<< +TONUM MAC + _ISSTR ]1 + JSR STR2NUM + <<< +SPOS MAC + _ISSTR ]1 + _ISSTR ]2 + JSR SUBPOS + <<< +SCPY MAC + _ISSTR ]1 + LDA ]2 ; STARTING INDEX + PHA + LDA ]3 ; SUBSTRING LENGTH + PHA + LDA ]4 ; MAX LENGTH OF SUBSTR + PHA + JSR SUBCOPY + <<< +SDEL MAC + LDA #>]1 ; STRING ADDRESS + PHA + LDA #<]1 + PHA + LDA ]2 ; INDEX BYTE + PHA + LDA ]3 ; LENGTH + PHA + JSR SUBDEL + <<< +SINS MAC + LDA #>]1 ; PARENT STRING + PHA + LDA #<]1 + PHA + LDA ]2 ; INDEX + PHA + LDA ]3 ; MAXIMUM LENGTH + PHA + _ISSTR ]4 + JSR SUBINS + <<< diff --git a/disks/disk5_strings/T.STRINGS.MIN b/disks/disk5_strings/T.STRINGS.MIN deleted file mode 100644 index 33597de..0000000 --- a/disks/disk5_strings/T.STRINGS.MIN +++ /dev/null @@ -1,379 +0,0 @@ - JMP STRINGSX -* -STRCMP -* - PLA - STA RETADR - PLA - STA RETADR+1 - PLA - STA ADDR2 - PLA - STA ADDR2+1 - PLA - STA ADDR1 - PLA - STA ADDR1+1 - LDY #0 - LDA (ADDR1),Y - CMP (ADDR2),Y - BCC :BEGCMP - LDA (ADDR2),Y -:BEGCMP - TAX - BEQ :TSTLEN - LDY #1 -:CMPLP - LDA (ADDR1),Y - CMP (ADDR2),Y - BNE :EXIT - INY - DEX - BNE :CMPLP -:TSTLEN - LDY #0 - LDA (ADDR1),Y - CMP (ADDR2),Y -:EXIT - LDA RETADR+1 - PHA - LDA RETADR - PHA - LDY #0 - LDA (ADDR1),Y - TAX - LDA (ADDR2),Y - TAY - RTS -* -STRCAT -* - PLA - STA RETADR - PLA - STA RETADR+1 - PLA - STA :MLEN - PLA - STA ADDR2 - PLA - STA ADDR2+1 - PLA - STA ADDR1 - PLA - STA ADDR1+1 - LDY #0 - LDA (ADDR1),Y - STA :S1LEN - STA :S1IND - INC :S1IND - LDA (ADDR2),Y - STA :S2LEN - LDA #1 - STA :S2IND - LDA :S2LEN - CLC - ADC :S1LEN - STA :S3LEN - BCS :TOOLONG - CMP :MLEN - BEQ :LENOK - BCC :LENOK -:TOOLONG - LDA #$0FF - STA :SOVF - LDA :MLEN - SEC - SBC :S1LEN - BCC :EXIT - STA :SCNT - LDA :MLEN - STA :S1LEN - JMP :DOCAT -:LENOK - STA :S1LEN - LDA #0 - STA :SOVF - LDA :S2LEN - STA :SCNT -:DOCAT - LDA :SCNT - BEQ :EXIT -:CATLP - LDY :S2IND - LDA (ADDR2),Y - LDY :S1IND - STA (ADDR1),Y - INC :S1IND - INC :S2IND - DEC :SCNT - BNE :CATLP -:EXIT - LDA :S1LEN - LDY #0 - STA (ADDR1),Y - LDA :SOVF - ROR A - LDA RETADR+1 - PHA - LDA RETADR - PHA - LDY #0 - LDA (ADDR1),Y - STA RETLEN - LDA #1 -:RLP - LDA (ADDR1),Y - STA RETURN,Y - CPY RETLEN - INY - BNE :RLP - LDA RETLEN - LDY #0 - STA (ADDR1),Y - LDX :S3LEN - RTS -:S3LEN DS 1 -:S1LEN DS 1 -:S1IND DS 1 -:S2LEN DS 1 -:S2IND DS 1 -:MLEN DS 1 -:SCNT DS 1 -:SOVF DS 1 -* -PRNSTR -* - PLA - STA RETADR - PLA - STA RETADR+1 - PLA - STA ADDR1 - PLA - STA ADDR1+1 - LDY #0 - LDA (ADDR1),Y - STA :S1LEN -:LP - INY - LDA (ADDR1),Y - JSR SCOUT1 - CPY :S1LEN - BNE :LP - LDY #0 - LDA (ADDR1),Y - LDA RETADR+1 - PHA - LDA RETADR - PHA - LDY #0 - LDA (ADDR1),Y - LDY ADDR1 - LDX ADDR1+1 - RTS -:S1LEN DS 1 -* -NUM2STR -* - PLA - STA RETADR - PLA - STA RETADR+1 - PLA - STA :VALSTR - PLA - STA :VALSTR+1 - STA :NGFLAG - BPL :GETBP - LDA #0 - SEC - SBC :VALSTR - STA :VALSTR - LDA #0 - SBC :VALSTR+1 - STA :VALSTR+1 -:GETBP - LDA #RETURN+1 - STA ADDR1+1 - LDA #0 - LDY #0 - STA (ADDR1),Y -:CNVERT - LDA #0 - STA :MOD10 - STA :MOD10+1 - LDX #16 - CLC -:DVLOOP - ROL :VALSTR - ROL :VALSTR+1 - ROL :MOD10 - ROL :MOD10+1 - SEC - LDA :MOD10 - SBC #10 - TAY - LDA :MOD10+1 - SBC #0 - BCC :DECCNT - STY :MOD10 - STA :MOD10+1 -:DECCNT - DEX - BNE :DVLOOP - ROL :VALSTR - ROL :VALSTR+1 -:CONCH - LDA :MOD10 - CLC - ADC #$B0 - JSR :CONCAT - LDA :VALSTR - ORA :VALSTR+1 - BNE :CNVERT -:EXIT - LDA :NGFLAG - BPL :POS - LDA #173 - JSR :CONCAT -:POS - LDA RETADR+1 - PHA - LDA RETADR - PHA - RTS -:CONCAT - PHA - LDY #0 - LDA (ADDR1),Y - TAY - BEQ :EXITMR -:MVELP - LDA (ADDR1),Y - INY - STA (ADDR1),Y - DEY - DEY - BNE :MVELP -:EXITMR - PLA - LDY #1 - STA (ADDR1),Y - LDY #0 - LDA (ADDR1),Y - CLC - ADC #1 - STA (ADDR1),Y - RTS -:NGFLAG DS 1 -:VALSTR DS 2 -:MOD10 DS 2 -* -STR2NUM -* - PLA - STA RETADR - PLA - STA RETADR+1 - PLA - STA ADDR1 - PLA - STA ADDR1+1 - LDY #0 - LDA (ADDR1),Y - TAX - LDA #1 - STA :NINDEX - LDA #0 - STA :NACCUM - STA :NACCUM+1 - STA :SNGFLAG - TXA - BNE :INIT1 - JMP :EREXIT -:INIT1 - LDY :NINDEX - LDA (ADDR1),Y - CMP #173 - BNE :PLUS - LDA #$0FF - STA :SNGFLAG - INC :NINDEX - DEX - BEQ :EREXIT - JMP :CNVERT -:PLUS - CMP #'+' - BNE :CHKDIG - INC :NINDEX - DEX - BEQ :EREXIT -:CNVERT - LDY :NINDEX - LDA (ADDR1),Y -:CHKDIG - CMP #$B0 ; "0" - BMI :EREXIT - CMP #$BA - BPL :EREXIT - PHA - ASL :NACCUM - ROL :NACCUM+1 - LDA :NACCUM - LDY :NACCUM+1 - ASL :NACCUM - ROL :NACCUM+1 - ASL :NACCUM - ROL :NACCUM+1 - CLC - ADC :NACCUM - STA :NACCUM - TYA - ADC :NACCUM+1 - STA :NACCUM+1 - PLA - SEC - SBC #$B0 - CLC - ADC :NACCUM - STA :NACCUM - BCC :D2B1 - INC :NACCUM+1 -:D2B1 - INC :NINDEX - DEX - BNE :CNVERT - LDA :SNGFLAG - BPL :OKEXIT - LDA #0 - SEC - SBC :NACCUM - STA :NACCUM - LDA #0 - SBC :NACCUM+1 - STA :NACCUM+1 -:OKEXIT - CLC - BCC :EXIT -:EREXIT - SEC -:EXIT - LDA RETADR+1 - PHA - LDA RETADR - PHA - LDX :NACCUM+1 - LDY :NACCUM - STY RETURN - STX RETURN+1 - LDA #2 - STA RETLEN - LDA :NINDEX - RTS -:NACCUM DS 2 -:SNGFLAG DS 1 -:NINDEX DS 1 -STRINGSX diff --git a/disks/disk5_strings/T.SUBCOPY.MIN b/disks/disk5_strings/T.SUBCOPY.MIN deleted file mode 100644 index 88141d9..0000000 --- a/disks/disk5_strings/T.SUBCOPY.MIN +++ /dev/null @@ -1,100 +0,0 @@ -* -SUBCOPY -* - PLA - STA RETADR - PLA - STA RETADR+1 - PLA - STA :MLEN - PLA - STA :SCNT - STA RETLEN - PLA - STA :SINDEX - PLA - STA ADDR1 - PLA - STA ADDR1+1 - LDA #RETURN - STA ADDR2+1 - LDA RETADR+1 - PHA - LDA RETADR - PHA - LDA #0 - STA :S2LEN - STA :SCERR - LDA :SCNT - BEQ :OKEXIT - LDA :MLEN - BEQ :EREXIT - LDA :SINDEX - BEQ :EREXIT - LDY #0 - LDA (ADDR1),Y - STA :S1LEN - CMP :SINDEX - BCC :EREXIT - LDA :SINDEX - CLC - ADC :SCNT - BCS :RECALC - TAX - DEX - CPX :S1LEN - BCC :CNT10K - BEQ :CNT10K -:RECALC - LDA :S1LEN - SEC - SBC :SINDEX - STA :SCNT - INC :SCNT - LDA #$0FF - STA :SCERR -:CNT10K - LDA :SCNT - CMP :MLEN - BCC :CNT20K - BEQ :CNT20K - LDA :MLEN - STA :SCNT - LDA #$0FF - STA :SCERR -:CNT20K - LDX :SCNT - BEQ :EREXIT - LDA #1 - STA :S2LEN -:MVLP - LDY :SINDEX - LDA (ADDR1),Y - LDY :S2LEN - STA (ADDR2),Y - INC :SINDEX - INC :S2LEN - DEX - BNE :MVLP - DEC :S2LEN - LDA :SCERR - BNE :EREXIT -:OKEXIT - CLC - BCC :EXIT -:EREXIT - SEC -:EXIT - LDA :S2LEN - LDY #0 - STA (ADDR2),Y - STA RETLEN - RTS -:S1LEN DS 1 -:S2LEN DS 1 -:MLEN DS 1 -:SCNT DS 1 -:SINDEX DS 1 -:SCERR DS 1 diff --git a/disks/disk5_strings/T.SUBCOPY b/disks/disk5_strings/T.SUBCOPY.SUB similarity index 99% rename from disks/disk5_strings/T.SUBCOPY rename to disks/disk5_strings/T.SUBCOPY.SUB index fd444b4..99e1631 100644 --- a/disks/disk5_strings/T.SUBCOPY +++ b/disks/disk5_strings/T.SUBCOPY.SUB @@ -1,4 +1,3 @@ -* *``````````````````````````````* * SUBCOPY :: COPY SUBSTRING * *- -* diff --git a/disks/disk5_strings/T.SUBCOPY.SUB.MIN b/disks/disk5_strings/T.SUBCOPY.SUB.MIN new file mode 100644 index 0000000..8afe83d --- /dev/null +++ b/disks/disk5_strings/T.SUBCOPY.SUB.MIN @@ -0,0 +1,99 @@ +SUBCOPY + PLA + STA RETADR + PLA + STA RETADR+1 + PLA + STA :MLEN + PLA + STA :SCNT + STA RETLEN + PLA + STA :SINDEX + PLA + STA ADDR1 + PLA + STA ADDR1+1 + LDA #RETURN + STA ADDR2+1 + LDA RETADR+1 + PHA + LDA RETADR + PHA + LDA #0 + STA :S2LEN ; DESTINATION LENGTH = 0 + STA :SCERR ; ASSUME NO ERRORS + LDA :SCNT + BEQ :OKEXIT ; BR IF 0 BYTES TO COPY, + LDA :MLEN + BEQ :EREXIT ; ERROR EXIT IF SUBSTR HAS + LDA :SINDEX + BEQ :EREXIT ; ERROR EXIT IF START IDX = 0 + LDY #0 + LDA (ADDR1),Y ; + STA :S1LEN ; GET LENGTH OF SOURCE STRING + CMP :SINDEX ; COMPARE TO STARTING INDEX + BCC :EREXIT ; ERROR EXIT IF INDEX TOO BIG + LDA :SINDEX + CLC + ADC :SCNT + BCS :RECALC + TAX ; BR IF INDEX + COUNT > 255 + DEX + CPX :S1LEN + BCC :CNT10K ; BR IF IND + CNT - 1 < S1LEN + BEQ :CNT10K ; OR EQUAL +:RECALC + LDA :S1LEN ; RECALCULATE COUNT + SEC + SBC :SINDEX + STA :SCNT + INC :SCNT ; CNT = S1LEN - IND + 1 + LDA #$0FF + STA :SCERR ; INDICATE TRUNCATION +:CNT10K + LDA :SCNT + CMP :MLEN ; IF CNT > M SUBSTR LEN ? + BCC :CNT20K ; BR IF CNT < MAXLEN + BEQ :CNT20K ; BR IF CNT = MAXLEN + LDA :MLEN + STA :SCNT ; ELSE CNT = MAXLEN + LDA #$0FF + STA :SCERR ; INDICATE DEST STR OVERFLOW +:CNT20K + LDX :SCNT ; REG X WILL BE COUNTER + BEQ :EREXIT ; ERR IF 0 + LDA #1 ; START WITH 1ST CHAR IN DEST + STA :S2LEN ; RUNNING DEST INDEX + ; __SINDEX IS SRC INDEX +:MVLP + LDY :SINDEX + LDA (ADDR1),Y ; GET NEXT SRC CHAR + LDY :S2LEN + STA (ADDR2),Y ; MOVE NEXT CHAR TO DEST + INC :SINDEX ; INC SRC INDEX + INC :S2LEN ; INC DEST INDEX + DEX ; DECREMENT COUNTER + BNE :MVLP ; CONT UNTIL CNT = 0 + DEC :S2LEN ; SUBSTR LEN=FINAL DEST IND-1 + LDA :SCERR ; CHECK FOR ANY ERRORS + BNE :EREXIT ; BR IF STR TRUNCATED OR OVERFLOW +:OKEXIT + CLC + BCC :EXIT +:EREXIT + SEC +:EXIT + LDA :S2LEN + LDY #0 + STA (ADDR2),Y + STA RETLEN + RTS +:S1LEN DS 1 +:S2LEN DS 1 +:MLEN DS 1 +:SCNT DS 1 +:SINDEX DS 1 +:SCERR DS 1 diff --git a/disks/disk5_strings/T.SUBDEL b/disks/disk5_strings/T.SUBDEL.SUB similarity index 99% rename from disks/disk5_strings/T.SUBDEL rename to disks/disk5_strings/T.SUBDEL.SUB index 78dddd6..90e2944 100644 --- a/disks/disk5_strings/T.SUBDEL +++ b/disks/disk5_strings/T.SUBDEL.SUB @@ -1,4 +1,3 @@ -* *``````````````````````````````* * SUBDEL :: DELETE SUBSTRING * *- -* diff --git a/disks/disk5_strings/T.SUBDEL.MIN b/disks/disk5_strings/T.SUBDEL.SUB.MIN similarity index 55% rename from disks/disk5_strings/T.SUBDEL.MIN rename to disks/disk5_strings/T.SUBDEL.SUB.MIN index 0de82b5..977f395 100644 --- a/disks/disk5_strings/T.SUBDEL.MIN +++ b/disks/disk5_strings/T.SUBDEL.SUB.MIN @@ -1,6 +1,4 @@ -* SUBDEL -* PLA TAY PLA @@ -20,51 +18,51 @@ SUBDEL LDY #0 STY :SCERR LDA (ADDR1),Y - STA :S1LEN + STA :S1LEN ; GET STRING LENGTH LDA :SCNT BEQ :OKEXIT LDA :SINDEX - BEQ :ERREXIT + BEQ :ERREXIT ; ERR EXIT IF START = 0 LDA :S1LEN CMP :SINDEX BCC :ERREXIT LDA :SINDEX CLC ADC :SCNT - BCS :TRUNC - STA :SIDX - TAX + BCS :TRUNC ;TRUNCATE IF INDEX + STA :SIDX ; SAVE INDEX + COUNT AS + TAX ; X = INDEX + COUNT DEX CPX :S1LEN - BCC :CNTOK - BEQ :TRUNC + BCC :CNTOK ; BR IF IND + CNT - 1 + BEQ :TRUNC ; TRUNC BUT NO ERROR-- LDA #$0FF - STA :SCERR + STA :SCERR ; INDICATE ERROR - NOT :TRUNC - LDX :SINDEX + LDX :SINDEX ; STRING LENGTH = DEX STX :S1LEN LDA :SCERR BEQ :OKEXIT BNE :ERREXIT :CNTOK - LDA :S1LEN + LDA :S1LEN ; GET STR LENGTH SEC - SBC :SIDX + SBC :SIDX ; SUBTRACT START INDEX TAX INX - BEQ :OKEXIT + BEQ :OKEXIT ; ADD 1 TO INCLUDE LAST :MVLP LDY :SIDX - LDA (ADDR1),Y + LDA (ADDR1),Y ; GET NEXT CHAR LDY :SINDEX - STA (ADDR1),Y + STA (ADDR1),Y ;MOVE IT DOWN INC :SINDEX - INC :SIDX + INC :SIDX ; INC DEST, SRC INDEXES DEX - BNE :MVLP + BNE :MVLP ; CONT UNTIL CNT = 0 LDX :SINDEX - DEX + DEX ; START LENGTH = FINAL STX :S1LEN :OKEXIT CLC @@ -74,7 +72,7 @@ SUBDEL :EXIT LDA :S1LEN LDY #0 - STA (ADDR1),Y + STA (ADDR1),Y ; SET LENGTH OF STRING RTS :S1LEN DS 1 :SCNT DS 1 diff --git a/disks/disk5_strings/T.SUBINS.MIN b/disks/disk5_strings/T.SUBINS.MIN deleted file mode 100644 index c0210b9..0000000 --- a/disks/disk5_strings/T.SUBINS.MIN +++ /dev/null @@ -1,121 +0,0 @@ -* -SUBINS -* - PLA - TAY - PLA - TAX - PLA - STA ADDR2 - PLA - STA ADDR2+1 - PLA - STA :MLEN - PLA - STA :SINDEX - PLA - STA ADDR1 - PLA - STA ADDR1+1 - TXA - PHA - TYA - PHA - LDA #0 - STA :SCERR - LDY #0 - LDA (ADDR1),Y - STA :S1LEN - LDA (ADDR2),Y - STA :S2LEN - BNE :IDX0 - JMP :OKEXIT -:IDX0 - LDA :SINDEX - BNE :CHKLEN - JMP :EREXIT -:CHKLEN - LDA :S2LEN - CLC - ADC :S1LEN - BCS :TRUNC - CMP :MLEN - BCC :IDXLEN - BEQ :IDXLEN -:TRUNC - LDA :MLEN - SEC - SBC :S1LEN - BCC :EREXIT - BEQ :EREXIT - STA :S2LEN - LDA #$0FF - STA :SCERR -:IDXLEN - LDA :S1LEN - CMP :SINDEX - BCS :LENOK - LDX :S1LEN - INX - STX :SINDEX - LDA #$0FF - STA :SCERR - LDA :S1LEN - CLC - ADC :S2LEN - STA :S1LEN - JMP :MVESUB -:LENOK - LDA :S1LEN - SEC - SBC :SINDEX - TAX - INX - LDA :S1LEN - STA :SIDX - CLC - ADC :S2LEN - STA :SBIDX - STA :S1LEN -:OPNLP - LDY :SIDX - LDA (ADDR1),Y - LDY :SBIDX - STA (ADDR1),Y - DEC :SIDX - DEC :SBIDX - DEX - BNE :OPNLP -:MVESUB - LDA #1 - STA :SIDX - LDX :S2LEN -:MVELP - LDY :SIDX - LDA (ADDR2),Y - LDY :SINDEX - STA (ADDR1),Y - INC :SIDX - INC :SINDEX - DEX - BNE :MVELP - LDA :SCERR - BNE :EREXIT -:OKEXIT - CLC - BCC :EXIT -:EREXIT - SEC -:EXIT - LDA :S1LEN - LDY #0 - STA (ADDR1),Y - RTS -:S1LEN DS 1 -:S2LEN DS 1 -:SUBLEN DS 1 -:MLEN DS 1 -:SINDEX DS 1 -:SIDX DS 1 -:SBIDX DS 1 -:SCERR DS 1 diff --git a/disks/disk5_strings/T.SUBINS b/disks/disk5_strings/T.SUBINS.SUB similarity index 99% rename from disks/disk5_strings/T.SUBINS rename to disks/disk5_strings/T.SUBINS.SUB index 79736f1..c43ed71 100644 --- a/disks/disk5_strings/T.SUBINS +++ b/disks/disk5_strings/T.SUBINS.SUB @@ -1,4 +1,3 @@ -* *``````````````````````````````* * SUBINS :: INSERT SUBSTRING * *- -* diff --git a/disks/disk5_strings/T.SUBINS.SUB.MIN b/disks/disk5_strings/T.SUBINS.SUB.MIN new file mode 100644 index 0000000..84b4dd2 --- /dev/null +++ b/disks/disk5_strings/T.SUBINS.SUB.MIN @@ -0,0 +1,120 @@ +SUBINS + PLA + TAY + PLA + TAX + PLA + STA ADDR2 + PLA + STA ADDR2+1 + PLA + STA :MLEN + PLA + STA :SINDEX + PLA + STA ADDR1 + PLA + STA ADDR1+1 + TXA + PHA + TYA + PHA + LDA #0 + STA :SCERR ; ASSUME NO ERR WILL BE FOUND + LDY #0 + LDA (ADDR1),Y + STA :S1LEN ; GET LENGTH OF STRING + LDA (ADDR2),Y + STA :S2LEN ; GET LENGTH OF SUB + BNE :IDX0 + JMP :OKEXIT ; EXIT OF NO INSERT/ERR +:IDX0 + LDA :SINDEX + BNE :CHKLEN ; BR OF INDEX NOT 0 + JMP :EREXIT ; ELSE ERROR EXIT +:CHKLEN + LDA :S2LEN ; GET SUBSTR LENGTH + CLC + ADC :S1LEN + BCS :TRUNC ;TRUN IF S1+S2 LENGTH > 255 + CMP :MLEN ; + BCC :IDXLEN ; BR IF S1+S2 LEN < MAX LENGTH + BEQ :IDXLEN ; BR IF EQUAL +:TRUNC + LDA :MLEN ; SUBSTR LEN = MLEN - STR LEN + SEC + SBC :S1LEN + BCC :EREXIT + BEQ :EREXIT ; ERR IF MLEN < STR LEN OR 0 + STA :S2LEN + LDA #$0FF + STA :SCERR ; INDICATE SUBSTR WAS TRUNCATED +:IDXLEN + LDA :S1LEN + CMP :SINDEX ; + BCS :LENOK ; BR IF INDEX WITHIN STR + LDX :S1LEN ; ELSE CONCAT SUB AT END OF STR + INX + STX :SINDEX ; START RIGHT AFTER END OF STR + LDA #$0FF + STA :SCERR ; INDICATE ERR IN INSERT + LDA :S1LEN + CLC + ADC :S2LEN + STA :S1LEN ; ADD LENGTHS TOGETHER + JMP :MVESUB ; PERFORM MOVE, NOTHING ELSE TODO +:LENOK + LDA :S1LEN + SEC + SBC :SINDEX + TAX + INX ; X= NUM OF CHARS TO MOV + LDA :S1LEN + STA :SIDX ; SRC ENDS AT ORIG STR END + CLC + ADC :S2LEN + STA :SBIDX ; DEST ENDS FURTHER BY SUB LEN + STA :S1LEN ; SET NEW LENGTH TO THIS ALSO +:OPNLP + LDY :SIDX + LDA (ADDR1),Y + LDY :SBIDX + STA (ADDR1),Y ; MOVE IT UP IN MEM + DEC :SIDX + DEC :SBIDX ; DE DEST IDX, COUNTER + DEX + BNE :OPNLP ; CONT UNTIL COUNTER = 0 +:MVESUB + LDA #1 + STA :SIDX + ; START AT INDEX IN THE STRING + LDX :S2LEN ; X = NUM OF CHARS TO MOVE +:MVELP + LDY :SIDX + LDA (ADDR2),Y ; GET NEXT CHAR + LDY :SINDEX + STA (ADDR1),Y + INC :SIDX ; INC SUBSTR INDEX + INC :SINDEX ; INC STR INDEX + DEX ; DEC COUNTER + BNE :MVELP ; CONT UNTIL COUNTER = 0 + LDA :SCERR ; GET ERROR FLAG + BNE :EREXIT ; BR IF SUBSTR WAS TRUNCED +:OKEXIT + CLC + BCC :EXIT +:EREXIT + SEC ; ERROR EXIT +:EXIT + LDA :S1LEN + LDY #0 + STA (ADDR1),Y + RTS +:S1LEN DS 1 +:S2LEN DS 1 +:SUBLEN DS 1 +:MLEN DS 1 +:SINDEX DS 1 +:SIDX DS 1 +:SBIDX DS 1 +:SCERR DS 1 diff --git a/disks/disk5_strings/T.SUBPOS.MIN b/disks/disk5_strings/T.SUBPOS.MIN deleted file mode 100644 index eb193dc..0000000 --- a/disks/disk5_strings/T.SUBPOS.MIN +++ /dev/null @@ -1,78 +0,0 @@ -* -SUBPOS -* - PLA - STA RETADR - PLA - STA RETADR+1 - PLA - STA ADDR2 - PLA - STA ADDR2+1 - PLA - STA ADDR1 - PLA - STA ADDR1+1 - LDA RETADR+1 - PHA - LDA RETADR - PHA -:POS - LDY #0 - LDA (ADDR1),Y - BEQ :NOTFND - STA :SLEN - LDA (ADDR2),Y - BEQ :NOTFND - STA :SUBLEN - LDA :SUBLEN - CMP :SLEN - BEQ :LENOK - BCS :NOTFND -:LENOK - LDA #1 - STA :SINDEX - LDA :SLEN - SEC - SBC :SUBLEN - STA :SCOUNT - INC :SCOUNT -:SLP1 - LDA :SINDEX - STA :SIDX - LDA #1 - STA :SUBIDX -:CMPLP - LDY :SIDX - LDA (ADDR1),Y - LDY :SUBIDX - CMP (ADDR2),Y - BNE :SLP2 - LDY :SUBIDX - CPY :SUBLEN - BEQ :FOUND - INY - STY :SUBIDX - INC :SIDX - JMP :CMPLP -:SLP2 - INC :SINDEX - DEC :SCOUNT - BNE :SLP1 - BEQ :NOTFND -:FOUND - LDA :SINDEX - JMP :EXIT -:NOTFND - LDA #0 -:EXIT - STA RETURN - LDY #1 - STY RETLEN - RTS -:SLEN DS 1 -:SUBLEN DS 1 -:SINDEX DS 1 -:SUBIDX DS 1 -:SCOUNT DS 1 -:SIDX DS 1 diff --git a/disks/disk5_strings/T.SUBPOS b/disks/disk5_strings/T.SUBPOS.SUB similarity index 99% rename from disks/disk5_strings/T.SUBPOS rename to disks/disk5_strings/T.SUBPOS.SUB index b7a1fc5..60d3469 100644 --- a/disks/disk5_strings/T.SUBPOS +++ b/disks/disk5_strings/T.SUBPOS.SUB @@ -1,4 +1,3 @@ -* *``````````````````````````````* * SUBPOS :: SUBSTRING POSITION * *- -* diff --git a/disks/disk5_strings/T.SUBPOS.SUB.MIN b/disks/disk5_strings/T.SUBPOS.SUB.MIN new file mode 100644 index 0000000..4e15875 --- /dev/null +++ b/disks/disk5_strings/T.SUBPOS.SUB.MIN @@ -0,0 +1,78 @@ +SUBPOS + PLA + STA RETADR + PLA + STA RETADR+1 + PLA + STA ADDR2 + PLA + STA ADDR2+1 + PLA + STA ADDR1 + PLA + STA ADDR1+1 + LDA RETADR+1 + PHA + LDA RETADR + PHA +:POS + LDY #0 + LDA (ADDR1),Y ; GET LENGTH OF STRING + BEQ :NOTFND ; EXIT IF LENGTH = 0 + STA :SLEN + LDA (ADDR2),Y ; GET SUBSTR LENGTH + BEQ :NOTFND ; EXIT IF SUB LENGTH = 0 + STA :SUBLEN + LDA :SUBLEN + CMP :SLEN + BEQ :LENOK + BCS :NOTFND ; CANNOT FIND SUBSTR IF +:LENOK + LDA #1 + STA :SINDEX ; START LOOKING AT FIRST + ; CHARACTER OF STRING + LDA :SLEN ; CONT UNTIL REMAINING STR + ; TOO SHORT + SEC ; COUNT=STR LEN - SUB LEN+1 + SBC :SUBLEN + STA :SCOUNT + INC :SCOUNT +:SLP1 + LDA :SINDEX + STA :SIDX ; START STR AT INDEX + LDA #1 + STA :SUBIDX ; START SUB IND AT 1 +:CMPLP + LDY :SIDX + LDA (ADDR1),Y ; GET NEXT CHAR FROM STR + LDY :SUBIDX + CMP (ADDR2),Y ; COMPARE TO NEXT SUB CHAR + BNE :SLP2 ; BR IF SUB NOT HERE + LDY :SUBIDX + CPY :SUBLEN ; TEST IF WE ARE DONE + BEQ :FOUND ; BR IF ALL CHARS WERE EQUAL + INY ; ELSE INC TO NEXT CHAR + STY :SUBIDX + INC :SIDX + JMP :CMPLP ; CONTINUE +:SLP2 + INC :SINDEX ; INCREMENT INDEX + DEC :SCOUNT ; DEC COUNT + BNE :SLP1 ; BR IF NOT DONE + BEQ :NOTFND ; ELSE EXIT TO NOT FOUND +:FOUND + LDA :SINDEX ; FOUND, A = STARTING IDX + JMP :EXIT +:NOTFND + LDA #0 ; SUB NOT FOUND, A=0 +:EXIT + STA RETURN + LDY #1 + STY RETLEN + RTS +:SLEN DS 1 +:SUBLEN DS 1 +:SINDEX DS 1 +:SUBIDX DS 1 +:SCOUNT DS 1 +:SIDX DS 1 diff --git a/disks/disk5_strings/T.SUBSTRINGS.LIB b/disks/disk5_strings/T.SUBSTRINGS.LIB deleted file mode 100644 index 2b02914..0000000 --- a/disks/disk5_strings/T.SUBSTRINGS.LIB +++ /dev/null @@ -1,844 +0,0 @@ -* - JMP SUBSTRINGSX -* -*-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=* -* * -* SUBSTRING ROUTINE LIBRARY * -* * -* AUTHOR: NATHAN RIGGS * -* CONTACT: NATHAN.RIGGS@ * -* OUTLOOK.COM * -* * -* VERSION: 0.2.0 * -* DATE: 30-OCT-2018 * -* ASSEMBLER: MERLIN 8 PRO * -* OS: DOS 3.3 * -* LICENSE: APACHE 2.0 * -* * -* THIS IS A LIBRARY FOR USING * -* SUBSTRING OPERATIONS. * -* * -*------------------------------* -* * -* LIST OF ROUTINES * -* * -* SUBPOS : FIND POS OF SUBSTR * -* SUBCOPY : COPY SUBSTRING * -* SUBDEL : DELETE SUBSTRING * -* SUBINS : INSERT SUBSTRING * -* * -*=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-* -* -*``````````````````````````````* -* SUBPOS :: SUBSTRING POSITION * -*- -* -* FIND THE POSITION OF A SUB- * -* STRING WITHIN ANOTHER STRING * -*- -* -* CLOBBERS: * -* * -* FLAGS: ????---- REG: AXYM * -*- -* -* CYCLES: ??? * -* SIZE: * -*- -* -* USAGE: * -* * -* LDA #>STR ; STRING ADDR * -* PHA * -* LDA #SUB ; SUBSTR ADDR * -* PHA * -* LDA #STR ; SOURCE STRING * -* PHA * -* LDA #RETURN - STA ADDR2+1 -* -** RESTORE RETURN ADDRESS -* - LDA RETADR+1 - PHA - LDA RETADR - PHA -* - LDA #0 - STA :S2LEN ; DESTINATION LENGTH = 0 - STA :SCERR ; ASSUME NO ERRORS -* -** CHECK FOR ZERO BYTES TO COPY OR ZERO MAX SUBSTR LENGTH -* - LDA :SCNT - BEQ :OKEXIT ; BR IF 0 BYTES TO COPY, - ; S2A WILL JUST HAVE ZERO LENGTH - LDA :MLEN - BEQ :EREXIT ; ERROR EXIT IF SUBSTR HAS - ; ZERO MAX LENGTH - LDA :SINDEX - BEQ :EREXIT ; ERROR EXIT IF START IDX = 0 -* -** CHECK IF SRC STR REACHES STARTING INDEX -* - LDY #0 - LDA (ADDR1),Y ; - STA :S1LEN ; GET LENGTH OF SOURCE STRING - CMP :SINDEX ; COMPARE TO STARTING INDEX - BCC :EREXIT ; ERROR EXIT IF INDEX TOO BIG -* -** CHECK THAT WE DO NOT COPY BEYOND THE END OF -** THE SOURCE STRING. -** IF INDEX + COUNT -1 > SLEN THEN -** COUNT = SLEN - SINDEX + 1 -* - LDA :SINDEX - CLC - ADC :SCNT - BCS :RECALC - TAX ; BR IF INDEX + COUNT > 255 - DEX - CPX :S1LEN - BCC :CNT10K ; BR IF IND + CNT - 1 < S1LEN - BEQ :CNT10K ; OR EQUAL -* -** THE CALLER ASKED FOR TOO MANY CHARS SO -** JUST RETURN EVERYTHING BETWEEN INDEX AND -** END OF STRING. SO CNT = S1LEN - INDEX + 1 -* -:RECALC - LDA :S1LEN ; RECALCULATE COUNT - SEC - SBC :SINDEX - STA :SCNT - INC :SCNT ; CNT = S1LEN - IND + 1 - LDA #$0FF - STA :SCERR ; INDICATE TRUNCATION -* -** CHECK IF COUNT IS <= THE MAXIMUM LENGTH -** OF THE DEST STRING. IF NOT, THEN SET COUNT TO -** MAX LENGTH. -** IF COUNT > MAXLEN THEN -** COUNT = MAXLEN -* -:CNT10K - LDA :SCNT - CMP :MLEN ; IF CNT > M SUBSTR LEN ? - BCC :CNT20K ; BR IF CNT < MAXLEN - BEQ :CNT20K ; BR IF CNT = MAXLEN - LDA :MLEN - STA :SCNT ; ELSE CNT = MAXLEN - LDA #$0FF - STA :SCERR ; INDICATE DEST STR OVERFLOW -* -** EVERYTHING IS SET UP SO MOVE THE -** SUBSTRING TO THE DESTINATION STRING -* -:CNT20K - LDX :SCNT ; REG X WILL BE COUNTER - BEQ :EREXIT ; ERR IF 0 - LDA #1 ; START WITH 1ST CHAR IN DEST - STA :S2LEN ; RUNNING DEST INDEX - ; __SINDEX IS SRC INDEX -:MVLP - LDY :SINDEX - LDA (ADDR1),Y ; GET NEXT SRC CHAR - LDY :S2LEN - STA (ADDR2),Y ; MOVE NEXT CHAR TO DEST - INC :SINDEX ; INC SRC INDEX - INC :S2LEN ; INC DEST INDEX - DEX ; DECREMENT COUNTER - BNE :MVLP ; CONT UNTIL CNT = 0 - DEC :S2LEN ; SUBSTR LEN=FINAL DEST IND-1 - LDA :SCERR ; CHECK FOR ANY ERRORS - BNE :EREXIT ; BR IF STR TRUNCATED OR OVERFLOW -* -** GOOD EXIT -* -:OKEXIT - CLC - BCC :EXIT -* -** ERROR EXIT -* -:EREXIT - SEC -* -** STORE LENGTH BYTE IN FRONT OF SUBSTR -* -:EXIT - LDA :S2LEN - LDY #0 - STA (ADDR2),Y - STA RETLEN - RTS -* -** DATA -* -:S1LEN DS 1 -:S2LEN DS 1 -:MLEN DS 1 -:SCNT DS 1 -:SINDEX DS 1 -:SCERR DS 1 -* -*``````````````````````````````* -* SUBDEL :: DELETE SUBSTRING * -*- -* -* DELETE A SUBSTRING FROM A * -* STRING. * -*- -* -* CLOBBERS: * -* * -* FLAGS: ????---- REG: AXYM * -*- -* -* CYCLES: ??? * -* SIZE: * -*- -* -* USAGE: * -* * -* LDA #>STR ; STRING ADDRESS * -* PHA * -* LDA # 255 - STA :SIDX ; SAVE INDEX + COUNT AS - ; THE SOURCE INDEX - TAX ; X = INDEX + COUNT - DEX - CPX :S1LEN - BCC :CNTOK ; BR IF IND + CNT - 1 - ; < __S1LEN - ; ELSE JUST TRUNC STRING - BEQ :TRUNC ; TRUNC BUT NO ERROR-- - ; EXACTLY ENOUGH CHARS - LDA #$0FF - STA :SCERR ; INDICATE ERROR - NOT - ; ENOUGH CHARS TO DELETE -* -** TRUNCATE THE STRING - NO COMPACTING NECESSARY -* -:TRUNC - LDX :SINDEX ; STRING LENGTH = - ; START INDEX - 1 - DEX - STX :S1LEN - LDA :SCERR - BEQ :OKEXIT - BNE :ERREXIT -* -** DELETE THE SUBSTRING BY COMPACTING -** MOVE ALL CHARS ABOVE THE DELETED AREA DOWN -* -:CNTOK -* -** CALCULATE NUMBER OF CHARS TO MOVE -** (SLEN - SIDX + 1) -* - LDA :S1LEN ; GET STR LENGTH - SEC - SBC :SIDX ; SUBTRACT START INDEX - TAX - INX - BEQ :OKEXIT ; ADD 1 TO INCLUDE LAST - ; CHAR; BR IF CNT = 0 -:MVLP - LDY :SIDX - LDA (ADDR1),Y ; GET NEXT CHAR - LDY :SINDEX - STA (ADDR1),Y ;MOVE IT DOWN - INC :SINDEX - INC :SIDX ; INC DEST, SRC INDEXES - DEX - BNE :MVLP ; CONT UNTIL CNT = 0 - LDX :SINDEX - DEX ; START LENGTH = FINAL - ; DEST INDEX -1 - STX :S1LEN -* -** GOOD EXIT -* -:OKEXIT - CLC - BCC :EXIT -:ERREXIT - SEC -* -:EXIT - LDA :S1LEN - LDY #0 - STA (ADDR1),Y ; SET LENGTH OF STRING - RTS -* -** DATA -* -:S1LEN DS 1 -:SCNT DS 1 -:SINDEX DS 1 -:SIDX DS 1 -:SCERR DS 1 -* -*``````````````````````````````* -* SUBINS :: INSERT SUBSTRING * -*- -* -* INSERT A SUBSTRING INTO * -* ANOTHER STRING. * -*- -* -* CLOBBERS: * -* * -* FLAGS: ????---- REG: AXYM * -*- -* -* CYCLES: ??? * -* SIZE: * -*- -* -* USAGE: * -* * -* LDA #STR ; STRING TO INS TO * -* PHA * -* LDA #SUB ; SUBSTRING TO INS * -* PHA * -* LDA # 255 - CMP :MLEN ; - BCC :IDXLEN ; BR IF S1+S2 LEN < MAX LENGTH - BEQ :IDXLEN ; BR IF EQUAL -* -** SUBSTRING DOES NOT FIT, SO TRUNCATE IT -* -:TRUNC - LDA :MLEN ; SUBSTR LEN = MLEN - STR LEN - SEC - SBC :S1LEN - BCC :EREXIT - BEQ :EREXIT ; ERR IF MLEN < STR LEN OR 0 - ; (ORIGINAL STRING WAS TOO LONG) - STA :S2LEN - LDA #$0FF - STA :SCERR ; INDICATE SUBSTR WAS TRUNCATED -* -** CHECK THAT INDEX IS WITHIN STRING. IF NOT, CONCAT -** SUBSTR ONTO THE END OF THE STRING. -* -:IDXLEN - LDA :S1LEN - CMP :SINDEX ; - BCS :LENOK ; BR IF INDEX WITHIN STR - LDX :S1LEN ; ELSE CONCAT SUB AT END OF STR - INX - STX :SINDEX ; START RIGHT AFTER END OF STR - LDA #$0FF - STA :SCERR ; INDICATE ERR IN INSERT - LDA :S1LEN - CLC - ADC :S2LEN - STA :S1LEN ; ADD LENGTHS TOGETHER - JMP :MVESUB ; PERFORM MOVE, NOTHING ELSE TODO -* -** OPEN UP A SPACE IN THE SOURCE STRING FOR THE -** SUBSTRING BY MOVING THE CHARACTERS FROM THE END -** OF THE SOURCE STRING DOWN TO INDEX, UP BY -** THE SIZE OF THE STRING. -* -:LENOK -* -** CALC NUMBER OF CHARS TO MOVE -** COUNT = STR LEN - START INDEX + 1 -* - LDA :S1LEN - SEC - SBC :SINDEX - TAX - INX ; X= NUM OF CHARS TO MOV -* -** SET THE SOURCE INDEX AND CALC DEST INDEX -* - LDA :S1LEN - STA :SIDX ; SRC ENDS AT ORIG STR END - CLC - ADC :S2LEN - STA :SBIDX ; DEST ENDS FURTHER BY SUB LEN - STA :S1LEN ; SET NEW LENGTH TO THIS ALSO -* -:OPNLP - LDY :SIDX - LDA (ADDR1),Y - LDY :SBIDX - STA (ADDR1),Y ; MOVE IT UP IN MEM - DEC :SIDX - DEC :SBIDX ; DE DEST IDX, COUNTER - DEX - BNE :OPNLP ; CONT UNTIL COUNTER = 0 -* -** MOVE THE SUBSTR INTO THE OPEN AREA -* -:MVESUB - LDA #1 - STA :SIDX - ; START AT ONE IN THE SUBSTR - ; START AT INDEX IN THE STRING - LDX :S2LEN ; X = NUM OF CHARS TO MOVE -* -:MVELP - LDY :SIDX - LDA (ADDR2),Y ; GET NEXT CHAR - LDY :SINDEX - STA (ADDR1),Y - INC :SIDX ; INC SUBSTR INDEX - INC :SINDEX ; INC STR INDEX - DEX ; DEC COUNTER - BNE :MVELP ; CONT UNTIL COUNTER = 0 - LDA :SCERR ; GET ERROR FLAG - BNE :EREXIT ; BR IF SUBSTR WAS TRUNCED -* -:OKEXIT - CLC - BCC :EXIT -:EREXIT - SEC ; ERROR EXIT -:EXIT - LDA :S1LEN - LDY #0 - STA (ADDR1),Y - RTS -* -** DATA -* -:S1LEN DS 1 -:S2LEN DS 1 -:SUBLEN DS 1 -:MLEN DS 1 -:SINDEX DS 1 -:SIDX DS 1 -:SBIDX DS 1 -:SCERR DS 1 -* -SUBSTRINGSX -* diff --git a/disks/disk5_strings/T.SUBSTRINGS.MIN b/disks/disk5_strings/T.SUBSTRINGS.MIN deleted file mode 100644 index 7393dbe..0000000 --- a/disks/disk5_strings/T.SUBSTRINGS.MIN +++ /dev/null @@ -1,384 +0,0 @@ - JMP SUBSTRINGSX -* -SUBPOS -* - PLA - STA RETADR - PLA - STA RETADR+1 - PLA - STA ADDR2 - PLA - STA ADDR2+1 - PLA - STA ADDR1 - PLA - STA ADDR1+1 - LDA RETADR+1 - PHA - LDA RETADR - PHA -:POS - LDY #0 - LDA (ADDR1),Y - BEQ :NOTFND - STA :SLEN - LDA (ADDR2),Y - BEQ :NOTFND - STA :SUBLEN - LDA :SUBLEN - CMP :SLEN - BEQ :LENOK - BCS :NOTFND -:LENOK - LDA #1 - STA :SINDEX - LDA :SLEN - SEC - SBC :SUBLEN - STA :SCOUNT - INC :SCOUNT -:SLP1 - LDA :SINDEX - STA :SIDX - LDA #1 - STA :SUBIDX -:CMPLP - LDY :SIDX - LDA (ADDR1),Y - LDY :SUBIDX - CMP (ADDR2),Y - BNE :SLP2 - LDY :SUBIDX - CPY :SUBLEN - BEQ :FOUND - INY - STY :SUBIDX - INC :SIDX - JMP :CMPLP -:SLP2 - INC :SINDEX - DEC :SCOUNT - BNE :SLP1 - BEQ :NOTFND -:FOUND - LDA :SINDEX - JMP :EXIT -:NOTFND - LDA #0 -:EXIT - STA RETURN - LDY #1 - STY RETLEN - RTS -:SLEN DS 1 -:SUBLEN DS 1 -:SINDEX DS 1 -:SUBIDX DS 1 -:SCOUNT DS 1 -:SIDX DS 1 -* -SUBCOPY -* - PLA - STA RETADR - PLA - STA RETADR+1 - PLA - STA :MLEN - PLA - STA :SCNT - STA RETLEN - PLA - STA :SINDEX - PLA - STA ADDR1 - PLA - STA ADDR1+1 - LDA #RETURN - STA ADDR2+1 - LDA RETADR+1 - PHA - LDA RETADR - PHA - LDA #0 - STA :S2LEN - STA :SCERR - LDA :SCNT - BEQ :OKEXIT - LDA :MLEN - BEQ :EREXIT - LDA :SINDEX - BEQ :EREXIT - LDY #0 - LDA (ADDR1),Y - STA :S1LEN - CMP :SINDEX - BCC :EREXIT - LDA :SINDEX - CLC - ADC :SCNT - BCS :RECALC - TAX - DEX - CPX :S1LEN - BCC :CNT10K - BEQ :CNT10K -:RECALC - LDA :S1LEN - SEC - SBC :SINDEX - STA :SCNT - INC :SCNT - LDA #$0FF - STA :SCERR -:CNT10K - LDA :SCNT - CMP :MLEN - BCC :CNT20K - BEQ :CNT20K - LDA :MLEN - STA :SCNT - LDA #$0FF - STA :SCERR -:CNT20K - LDX :SCNT - BEQ :EREXIT - LDA #1 - STA :S2LEN -:MVLP - LDY :SINDEX - LDA (ADDR1),Y - LDY :S2LEN - STA (ADDR2),Y - INC :SINDEX - INC :S2LEN - DEX - BNE :MVLP - DEC :S2LEN - LDA :SCERR - BNE :EREXIT -:OKEXIT - CLC - BCC :EXIT -:EREXIT - SEC -:EXIT - LDA :S2LEN - LDY #0 - STA (ADDR2),Y - STA RETLEN - RTS -:S1LEN DS 1 -:S2LEN DS 1 -:MLEN DS 1 -:SCNT DS 1 -:SINDEX DS 1 -:SCERR DS 1 -* -SUBDEL -* - PLA - TAY - PLA - TAX - PLA - STA :SCNT - PLA - STA :SINDEX - PLA - STA ADDR1 - PLA - STA ADDR1+1 - TXA - PHA - TYA - PHA - LDY #0 - STY :SCERR - LDA (ADDR1),Y - STA :S1LEN - LDA :SCNT - BEQ :OKEXIT - LDA :SINDEX - BEQ :ERREXIT - LDA :S1LEN - CMP :SINDEX - BCC :ERREXIT - LDA :SINDEX - CLC - ADC :SCNT - BCS :TRUNC - STA :SIDX - TAX - DEX - CPX :S1LEN - BCC :CNTOK - BEQ :TRUNC - LDA #$0FF - STA :SCERR -:TRUNC - LDX :SINDEX - DEX - STX :S1LEN - LDA :SCERR - BEQ :OKEXIT - BNE :ERREXIT -:CNTOK - LDA :S1LEN - SEC - SBC :SIDX - TAX - INX - BEQ :OKEXIT -:MVLP - LDY :SIDX - LDA (ADDR1),Y - LDY :SINDEX - STA (ADDR1),Y - INC :SINDEX - INC :SIDX - DEX - BNE :MVLP - LDX :SINDEX - DEX - STX :S1LEN -:OKEXIT - CLC - BCC :EXIT -:ERREXIT - SEC -:EXIT - LDA :S1LEN - LDY #0 - STA (ADDR1),Y - RTS -:S1LEN DS 1 -:SCNT DS 1 -:SINDEX DS 1 -:SIDX DS 1 -:SCERR DS 1 -* -SUBINS -* - PLA - TAY - PLA - TAX - PLA - STA ADDR2 - PLA - STA ADDR2+1 - PLA - STA :MLEN - PLA - STA :SINDEX - PLA - STA ADDR1 - PLA - STA ADDR1+1 - TXA - PHA - TYA - PHA - LDA #0 - STA :SCERR - LDY #0 - LDA (ADDR1),Y - STA :S1LEN - LDA (ADDR2),Y - STA :S2LEN - BNE :IDX0 - JMP :OKEXIT -:IDX0 - LDA :SINDEX - BNE :CHKLEN - JMP :EREXIT -:CHKLEN - LDA :S2LEN - CLC - ADC :S1LEN - BCS :TRUNC - CMP :MLEN - BCC :IDXLEN - BEQ :IDXLEN -:TRUNC - LDA :MLEN - SEC - SBC :S1LEN - BCC :EREXIT - BEQ :EREXIT - STA :S2LEN - LDA #$0FF - STA :SCERR -:IDXLEN - LDA :S1LEN - CMP :SINDEX - BCS :LENOK - LDX :S1LEN - INX - STX :SINDEX - LDA #$0FF - STA :SCERR - LDA :S1LEN - CLC - ADC :S2LEN - STA :S1LEN - JMP :MVESUB -:LENOK - LDA :S1LEN - SEC - SBC :SINDEX - TAX - INX - LDA :S1LEN - STA :SIDX - CLC - ADC :S2LEN - STA :SBIDX - STA :S1LEN -:OPNLP - LDY :SIDX - LDA (ADDR1),Y - LDY :SBIDX - STA (ADDR1),Y - DEC :SIDX - DEC :SBIDX - DEX - BNE :OPNLP -:MVESUB - LDA #1 - STA :SIDX - LDX :S2LEN -:MVELP - LDY :SIDX - LDA (ADDR2),Y - LDY :SINDEX - STA (ADDR1),Y - INC :SIDX - INC :SINDEX - DEX - BNE :MVELP - LDA :SCERR - BNE :EREXIT -:OKEXIT - CLC - BCC :EXIT -:EREXIT - SEC -:EXIT - LDA :S1LEN - LDY #0 - STA (ADDR1),Y - RTS -:S1LEN DS 1 -:S2LEN DS 1 -:SUBLEN DS 1 -:MLEN DS 1 -:SINDEX DS 1 -:SIDX DS 1 -:SBIDX DS 1 -:SCERR DS 1 -SUBSTRINGSX