> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0A 08 0A 00 9E 39 39 39 00 13 08 14 00 2E |.......999......|
00000010: 4D 45 4D 00 3C 08 1E 00 AC B2 24 43 30 30 30 3A |MEM.<.....$C000:|
00000020: 4C 5A 20 B2 20 24 41 36 3A 48 5A 20 B2 20 24 46 |LZ . $A6:HZ . $F|
00000030: 37 3A 54 45 4D 50 20 B2 20 24 41 33 00 44 08 23 |7:TEMP . $A3.D.#|
00000040: 00 53 45 49 00 86 08 28 00 4C 44 41 20 24 44 44 |.SEI...(.LDA $DD|
00000050: 30 30 3A AF 20 23 24 46 3A 53 54 41 20 51 51 31 |00:. #$F:STA QQ1|
00000060: AA 31 3A 45 B0 20 23 24 31 30 3A 53 54 41 20 51 |.1:E. #$10:STA Q|
00000070: 51 32 AA 31 3A 45 B0 20 23 24 33 30 3A 53 54 41 |Q2.1:E. #$30:STA|
00000080: 20 24 44 44 30 30 00 AE 08 32 00 45 B0 20 23 24 | $DD00...2.E. #$|
00000090: 42 30 3A 53 54 41 20 51 51 34 AA 31 3A 45 B0 20 |B0:STA QQ4.1:E. |
000000A0: 23 24 35 30 3A 53 54 41 20 51 51 36 AA 31 00 D9 |#$50:STA QQ6.1..|
000000B0: 08 3C 00 54 59 41 3A 50 48 41 3A 4A 53 52 20 53 |.<.TYA:PHA:JSR S|
000000C0: 59 4E 43 3A 54 58 41 3A 4A 53 52 20 53 42 3A 50 |YNC:TXA:JSR SB:P|
000000D0: 4C 41 3A 4A 53 52 20 53 42 00 E6 08 46 00 4A 53 |LA:JSR SB...F.JS|
000000E0: 52 20 53 59 4E 43 00 16 09 50 00 4D 41 49 4E 33 |R SYNC...P.MAIN3|
000000F0: 20 4C 44 58 20 23 35 3A AB 20 4A 53 52 20 4D 31 | LDX #5:. JSR M1|
00000100: 31 3A 53 54 41 20 48 5A AA 33 2C 58 3A 44 45 58 |1:STA HZ.3,X:DEX|
00000110: 3A 42 4E 45 20 AB 00 5A 09 90 01 4D 41 49 4E 34 |:BNE ..Z...MAIN4|
00000120: 20 54 58 41 3A 4C 44 58 20 23 34 3A AB 20 53 54 | TXA:LDX #4:. ST|
00000130: 41 20 4C 5A 2C 58 3A 44 45 58 3A 42 50 4C 20 AB |A LZ,X:DEX:BPL .|
00000140: 3A AB 20 4A 53 52 20 4D 31 3A 49 4E 58 3A 42 43 |:. JSR M1:INX:BC|
00000150: 43 20 4D 32 3A 42 45 51 20 AA 00 7F 09 9A 01 4A |C M2:BEQ ......J|
00000160: 53 52 20 4D 31 3A AA 20 52 4F 4C 20 4C 5A AA 32 |SR M1:. ROL LZ.2|
00000170: 3A 52 4F 4C 20 4C 5A AA 33 3A 42 50 4C 20 AB 00 |:ROL LZ.3:BPL ..|
00000180: C7 09 A4 01 4D 32 20 53 45 43 3A 4C 44 41 20 48 |....M2 SEC:LDA H|
00000190: 5A AA 37 3A 53 42 43 20 4C 5A AA 32 3A 53 54 41 |Z.7:SBC LZ.2:STA|
000001A0: 20 48 5A AA 37 3A 4C 44 41 20 48 5A AA 38 3A 53 | HZ.7:LDA HZ.8:S|
000001B0: 42 43 20 4C 5A AA 33 3A 53 54 41 20 48 5A AA 38 |BC LZ.3:STA HZ.8|
000001C0: 3A 4A 53 52 20 4D 33 00 F7 09 B8 01 4C 44 41 20 |:JSR M3.....LDA |
000001D0: 23 31 3A 4A 53 52 20 4D 31 3A 42 43 53 20 4D 35 |#1:JSR M1:BCS M5|
000001E0: 3A 41 44 43 20 23 31 3A 49 4E 43 20 4C 5A AA 34 |:ADC #1:INC LZ.4|
000001F0: 3A 42 4E 45 20 4D 34 00 1D 0A C2 01 4D 35 20 4A |:BNE M4.....M5 J|
00000200: 53 52 20 4D 31 3A 42 43 43 20 AA 3A 4A 53 52 20 |SR M1:BCC .:JSR |
00000210: 4D 31 3A 52 4F 4C 3A 42 50 4C 20 4D 35 00 56 0A |M1:ROL:BPL M5.V.|
00000220: CC 01 AA 20 41 44 43 20 23 32 3A 4D 34 20 53 54 |... ADC #2:M4 ST|
00000230: 41 20 4C 5A AA 32 3A 4A 53 52 20 4D 31 3A 52 4F |A LZ.2:JSR M1:RO|
00000240: 4C 20 4C 5A AA 34 3A 4A 53 52 20 4D 31 3A 52 4F |L LZ.4:JSR M1:RO|
00000250: 4C 20 4C 5A AA 34 00 70 0A D6 01 4D 37 20 4C 44 |L LZ.4.p...M7 LD|
00000260: 59 20 4C 5A AA 34 3A 4C 44 58 20 54 42 31 2C 59 |Y LZ.4:LDX TB1,Y|
00000270: 00 97 0A E0 01 AB 20 4A 53 52 20 4D 31 3A 52 4F |...... JSR M1:RO|
00000280: 4C 20 4C 5A 3A 52 4F 4C 20 4C 5A AA 31 3A 44 45 |L LZ:ROL LZ.1:DE|
00000290: 58 3A 42 4E 45 20 AB 00 D8 0A EA 01 4C 44 41 20 |X:BNE ......LDA |
000002A0: 4C 5A AA 34 3A AF 20 23 33 3A 42 45 51 20 4D 36 |LZ.4:. #3:BEQ M6|
000002B0: 3A 49 4E 43 20 4C 5A 3A 42 4E 45 20 AA 3A 49 4E |:INC LZ:BNE .:IN|
000002C0: 43 20 4C 5A AA 31 3A AA 20 44 45 43 20 4C 5A AA |C LZ.1:. DEC LZ.|
000002D0: 34 3A 42 50 4C 20 4D 37 00 F0 0A 08 02 4D 36 20 |4:BPL M7.....M6 |
000002E0: 4A 53 52 20 4D 39 3A 42 4D 49 20 4D 41 49 4E 34 |JSR M9:BMI MAIN4|
000002F0: 00 2D 0B 12 02 4D 31 30 20 4C 44 59 20 48 5A AA |.-...M10 LDY HZ.|
00000300: 37 3A 42 45 51 20 4D 32 30 3A AB 20 44 45 43 20 |7:BEQ M20:. DEC |
00000310: 48 5A AA 37 3A 50 48 41 3A 4A 53 52 20 4D 31 31 |HZ.7:PHA:JSR M11|
00000320: 3A 53 54 41 20 48 5A AA 34 3A 50 4C 41 00 5A 0B |:STA HZ.4:PLA.Z.|
00000330: 1C 02 53 45 43 3A 2E 42 59 54 20 24 32 34 3A 4D |..SEC:.BYT $24:M|
00000340: 31 20 43 4C 43 3A 52 4F 4C 20 48 5A AA 34 3A 42 |1 CLC:ROL HZ.4:B|
00000350: 45 51 20 4D 31 30 3A 52 54 53 00 7A 0B 26 02 4D |EQ M10:RTS.z.&.M|
00000360: 32 30 20 43 50 59 20 48 5A AA 38 3A 44 45 43 20 |20 CPY HZ.8:DEC |
00000370: 48 5A AA 38 3A 42 43 43 20 AB 00 90 0B 30 02 50 |HZ.8:BCC ....0.P|
00000380: 4C 41 3A 50 4C 41 3A 4A 4D 50 20 4D 41 49 4E 33 |LA:PLA:JMP MAIN3|
00000390: 00 C9 0B 3A 02 4D 39 20 4C 44 41 20 48 5A AA 35 |...:.M9 LDA HZ.5|
000003A0: 3A 41 44 43 20 4C 5A 3A 53 54 41 20 48 5A 3A 4C |:ADC LZ:STA HZ:L|
000003B0: 44 41 20 48 5A AA 36 3A 41 44 43 20 4C 5A AA 31 |DA HZ.6:ADC LZ.1|
000003C0: 3A 53 54 41 20 48 5A AA 31 00 13 0C 4E 02 4D 33 |:STA HZ.1...N.M3|
000003D0: 20 4C 44 59 20 4C 5A AA 32 3A 42 45 51 20 4D 31 | LDY LZ.2:BEQ M1|
000003E0: 32 3A 4C 44 41 20 48 5A AA 35 3A 53 45 43 3A 53 |2:LDA HZ.5:SEC:S|
000003F0: 42 43 20 4C 5A AA 32 3A 53 54 41 20 48 5A AA 35 |BC LZ.2:STA HZ.5|
00000400: 3A 42 43 53 20 4D 31 35 3A AB 20 44 45 43 20 48 |:BCS M15:. DEC H|
00000410: 5A AA 36 00 26 0C 58 02 4D 31 35 20 44 45 59 3A |Z.6.&.X.M15 DEY:|
00000420: 4A 53 52 20 4D 38 00 70 0C 59 02 50 48 41 3A 4C |JSR M8.p.Y.PHA:L|
00000430: 44 41 20 23 24 33 30 3A 53 54 41 20 24 30 31 3A |DA #$30:STA $01:|
00000440: 50 4C 41 3A 53 54 41 20 28 48 5A AA 35 29 2C 59 |PLA:STA (HZ.5),Y|
00000450: 3A 4C 44 41 20 23 24 33 37 3A 53 54 41 20 24 30 |:LDA #$37:STA $0|
00000460: 31 3A 43 50 59 20 23 30 3A 42 4E 45 20 4D 31 35 |1:CPY #0:BNE M15|
00000470: 00 94 0C 62 02 4D 31 32 20 44 45 43 20 48 5A AA |...b.M12 DEC HZ.|
00000480: 31 3A 44 45 43 20 4C 5A AA 33 3A 42 50 4C 20 AB |1:DEC LZ.3:BPL .|
00000490: 3A 52 54 53 00 A7 0C 76 02 4D 38 20 54 58 41 3A |:RTS...v.M8 TXA:|
000004A0: 42 4E 45 20 4D 31 31 00 E4 0C 7B 02 4C 44 41 20 |BNE M11...{.LDA |
000004B0: 23 24 33 30 3A 53 54 41 20 24 30 31 3A 4C 44 41 |#$30:STA $01:LDA|
000004C0: 20 28 48 5A 29 2C 59 3A 50 48 41 3A 4C 44 41 20 | (HZ),Y:PHA:LDA |
000004D0: 23 24 33 37 3A 53 54 41 20 24 30 31 3A 50 4C 41 |#$37:STA $01:PLA|
000004E0: 3A 52 54 53 00 0F 0D 80 02 4D 31 31 20 53 54 59 |:RTS.....M11 STY|
000004F0: 20 54 45 4D 50 AA 31 3A 4A 53 52 20 52 42 3A 43 | TEMP.1:JSR RB:C|
00000500: 4D 50 20 23 24 41 43 3A 42 4E 45 20 47 42 32 00 |MP #$AC:BNE GB2.|
00000510: 4D 0D 81 02 4A 53 52 20 52 42 3A 43 4D 50 20 23 |M...JSR RB:CMP #|
00000520: 24 41 43 3A 42 45 51 20 47 42 32 3A 43 4D 50 20 |$AC:BEQ GB2:CMP |
00000530: 23 24 46 46 3A 42 45 51 20 47 42 33 3A 43 4D 50 |#$FF:BEQ GB3:CMP|
00000540: 20 23 24 46 37 3A 42 45 51 20 47 42 34 00 8B 0D | #$F7:BEQ GB4...|
00000550: 82 02 4A 53 52 20 53 59 4E 43 3A 42 45 51 20 4D |..JSR SYNC:BEQ M|
00000560: 31 31 AA 32 3A 47 42 33 20 43 4C 43 3A 47 42 34 |11.2:GB3 CLC:GB4|
00000570: 20 50 4C 41 3A 50 4C 41 3A 47 42 32 20 4C 44 59 | PLA:PLA:GB2 LDY|
00000580: 20 54 45 4D 50 AA 31 3A 52 54 53 00 AC 0D 85 02 | TEMP.1:RTS.....|
00000590: 52 42 20 54 58 41 3A 50 48 41 3A 4C 44 58 20 23 |RB TXA:PHA:LDX #|
000005A0: 38 3A 51 51 34 20 4C 44 59 20 23 30 00 E8 0D 88 |8:QQ4 LDY #0....|
000005B0: 02 AB 20 4C 44 41 20 24 44 44 30 30 3A 53 54 59 |.. LDA $DD00:STY|
000005C0: 20 24 44 44 30 30 3A 41 53 4C 3A 52 B0 20 54 45 | $DD00:ASL:R. TE|
000005D0: 4D 50 AA 32 3A 4E 4F 50 3A 54 59 41 3A 45 B0 20 |MP.2:NOP:TYA:E. |
000005E0: 23 24 35 30 3A 54 41 59 00 0A 0E 89 02 44 45 58 |#$50:TAY.....DEX|
000005F0: 3A 42 4E 45 20 AB 3A 50 4C 41 3A 54 41 58 3A 4C |:BNE .:PLA:TAX:L|
00000600: 44 41 20 24 41 35 3A 52 54 53 00 3A 0E 94 02 53 |DA $A5:RTS.:...S|
00000610: 59 4E 43 20 4C 44 59 20 23 24 33 32 3A AB 20 44 |YNC LDY #$32:. D|
00000620: 45 59 3A 42 4E 45 20 AB 3A AB 20 42 49 54 20 24 |EY:BNE .:. BIT $|
00000630: 44 44 30 30 3A 42 56 43 20 AB 00 6A 0E 9E 02 51 |DD00:BVC ..j...Q|
00000640: 51 36 20 4C 44 41 20 23 30 3A 53 54 41 20 24 44 |Q6 LDA #0:STA $D|
00000650: 44 30 30 3A 4C 44 59 20 23 35 3A AB 20 44 45 59 |D00:LDY #5:. DEY|
00000660: 3A 42 4E 45 20 AB 3A 52 54 53 00 94 0E A8 02 53 |:BNE .:RTS.....S|
00000670: 42 20 53 54 41 20 54 45 4D 50 AA 32 3A 4A 53 52 |B STA TEMP.2:JSR|
00000680: 20 51 51 32 3A 4A 53 52 20 51 51 32 3A 4A 53 52 | QQ2:JSR QQ2:JSR|
00000690: 20 51 51 32 00 D8 0E B2 02 51 51 32 20 4C 44 41 | QQ2.....QQ2 LDA|
000006A0: 20 23 30 3A 4C 53 52 20 54 45 4D 50 AA 32 3A 42 | #0:LSR TEMP.2:B|
000006B0: 43 43 20 AA 3A B0 41 20 23 24 32 30 3A AA 20 53 |CC .:.A #$20:. S|
000006C0: 54 41 20 24 44 44 30 30 3A 4E 4F 50 3A 4E 4F 50 |TA $DD00:NOP:NOP|
000006D0: 3A 4E 4F 50 3A 4E 4F 50 00 18 0F BC 02 51 51 31 |:NOP:NOP.....QQ1|
000006E0: 20 4C 44 41 20 23 30 3A 4C 53 52 20 54 45 4D 50 | LDA #0:LSR TEMP|
000006F0: AA 32 3A 42 43 43 20 AA 3A B0 41 20 23 24 32 30 |.2:BCC .:.A #$20|
00000700: 3A AA 20 53 54 41 20 24 44 44 30 30 3A 4E 4F 50 |:. STA $DD00:NOP|
00000710: 3A 4E 4F 50 3A 52 54 53 00 35 0F E7 03 54 42 31 |:NOP:RTS.5...TB1|
00000720: 20 2E 42 59 54 20 35 2C 32 2C 32 2C 33 2C 34 2C | .BYT 5,2,2,3,4,|
00000730: 32 2C 32 2C 32 00 00 00 |2,2,2... |
.......999......MEM.<.....$C000:LZ . $A6
:HZ . $F7:TEMP . $A3.D.#.SEI...(.LDA $DD
00:. #$F:STA QQ1.1:E. #$10:STA QQ2.1:E.
#$30:STA $DD00...2.E. #$B0:STA QQ4.1:E.
#$50:STA QQ6.1.Y.<.TYA:PHA:JSR SYNC:TXA:
JSR SB:PLA:JSR SB...F.JSR SYNC...P.MAIN3
LDX #5:. JSR M11:STA HZ.3,X:DEX:BNE ..Z
...MAIN4 TXA:LDX #4:. STA LZ,X:DEX:BPL .
:. JSR M1:INX:BCC M2:BEQ .....JSR M1:.
ROL LZ.2:ROL LZ.3:BPL ..G...M2 SEC:LDA H
Z.7:SBC LZ.2:STA HZ.7:LDA HZ.8:SBC LZ.3:
STA HZ.8:JSR M3.....LDA #1:JSR M1:BCS M5
:ADC #1:INC LZ.4:BNE M4...B.M5 JSR M1:BC
C .:JSR M1:ROL:BPL M5.V.L.. ADC #2:M4 ST
A LZ.2:JSR M1:ROL LZ.4:JSR M1:ROL LZ.4.P
.V.M7 LDY LZ.4:LDX TB1,Y...... JSR M1:RO
L LZ:ROL LZ.1:DEX:BNE ..X...LDA LZ.4:. #
3:BEQ M6:INC LZ:BNE .:INC LZ.1:. DEC LZ.
4:BPL M7.....M6 JSR M9:BMI MAIN4.-...M10
LDY HZ.7:BEQ M20:. DEC HZ.7:PHA:JSR M11
:STA HZ.4:PLA.Z...SEC:.BYT $24:M1 CLC:RO
L HZ.4:BEQ M10:RTS.Z.&.M20 CPY HZ.8:DEC
HZ.8:BCC ....0.PLA:PLA:JMP MAIN3.I.:.M9
LDA HZ.5:ADC LZ:STA HZ:LDA HZ.6:ADC LZ.1
:STA HZ.1...N.M3 LDY LZ.2:BEQ M12:LDA HZ
.5:SEC:SBC LZ.2:STA HZ.5:BCS M15:. DEC H
Z.6.&.X.M15 DEY:JSR M8.P.Y.PHA:LDA #$30:
STA $01:PLA:STA (HZ.5),Y:LDA #$37:STA $0
1:CPY #0:BNE M15...B.M12 DEC HZ.1:DEC LZ
.3:BPL .:RTS...V.M8 TXA:BNE M11...{.LDA
#$30:STA $01:LDA (HZ),Y:PHA:LDA #$37:STA
$01:PLA:RTS.....M11 STY TEMP.1:JSR RB:C
MP #$AC:BNE GB2.M...JSR RB:CMP #$AC:BEQ
GB2:CMP #$FF:BEQ GB3:CMP #$F7:BEQ GB4...
..JSR SYNC:BEQ M11.2:GB3 CLC:GB4 PLA:PLA
:GB2 LDY TEMP.1:RTS.....RB TXA:PHA:LDX #
8:QQ4 LDY #0...... LDA $DD00:STY $DD00:A
SL:R. TEMP.2:NOP:TYA:E. #$50:TAY.....DEX
:BNE .:PLA:TAX:LDA $A5:RTS.:...SYNC LDY
#$32:. DEY:BNE .:. BIT $DD00:BVC ..J...Q
Q6 LDA #0:STA $DD00:LDY #5:. DEY:BNE .:R
TS.....SB STA TEMP.2:JSR QQ2:JSR QQ2:JSR
QQ2.X...QQ2 LDA #0:LSR TEMP.2:BCC .:.A
#$20:. STA $DD00:NOP:NOP:NOP:NOP.....QQ1
LDA #0:LSR TEMP.2:BCC .:.A #$20:. STA $
DD00:NOP:NOP:RTS.5...TB1 .BYT 5,2,2,3,4,
2,2,2...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL