00000000: 3B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |;---------------|
00000010: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000020: 2D 2D 2D 2D 2D 2D 2D 3B 0D 3B 20 CD C3 C9 20 44 |-------;.; ... D|
00000030: 49 53 50 4C 41 59 45 52 2E 20 CB 49 54 41 4E 41 |ISPLAYER. .ITANA|
00000040: 20 37 2F 32 2F 39 36 0D 3B 2D 2D 2D 2D 2D 2D 2D | 7/2/96.;-------|
00000050: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000060: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000070: 0D 20 20 20 20 20 20 20 20 20 2A 3D 20 24 30 38 |. *= $08|
00000080: 31 30 0D 0D 20 20 20 20 20 20 20 20 20 53 45 49 |10.. SEI|
00000090: 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 24 |. LDA #$|
000000A0: 33 35 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 |35. STA |
000000B0: 24 30 31 0D 20 20 20 20 20 20 20 20 20 4C 44 41 |$01. LDA|
000000C0: 20 23 24 30 30 0D 20 20 20 20 20 20 20 20 20 53 | #$00. S|
000000D0: 54 41 20 24 44 30 32 30 0D 20 20 20 20 20 20 20 |TA $D020. |
000000E0: 20 20 53 54 41 20 24 44 30 32 31 0D 20 20 20 20 | STA $D021. |
000000F0: 20 20 20 20 20 4C 44 58 20 23 24 30 30 0D 4C 4F | LDX #$00.LO|
00000100: 4F 50 31 20 20 20 20 4C 44 41 20 24 45 34 30 30 |OP1 LDA $E400|
00000110: 2C 58 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 |,X. STA |
00000120: 24 44 38 30 30 2C 58 0D 20 20 20 20 20 20 20 20 |$D800,X. |
00000130: 20 4C 44 41 20 24 45 35 30 30 2C 58 0D 20 20 20 | LDA $E500,X. |
00000140: 20 20 20 20 20 20 53 54 41 20 24 44 39 30 30 2C | STA $D900,|
00000150: 58 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 24 |X. LDA $|
00000160: 45 36 30 30 2C 58 0D 20 20 20 20 20 20 20 20 20 |E600,X. |
00000170: 53 54 41 20 24 44 41 30 30 2C 58 0D 20 20 20 20 |STA $DA00,X. |
00000180: 20 20 20 20 20 4C 44 41 20 24 45 37 30 30 2C 58 | LDA $E700,X|
00000190: 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 24 44 |. STA $D|
000001A0: 42 30 30 2C 58 0D 20 20 20 20 20 20 20 20 20 49 |B00,X. I|
000001B0: 4E 58 0D 20 20 20 20 20 20 20 20 20 42 4E 45 20 |NX. BNE |
000001C0: 4C 4F 4F 50 31 0D 20 20 20 20 20 20 20 20 20 4C |LOOP1. L|
000001D0: 44 58 20 23 24 30 30 0D 4C 4F 4F 50 32 20 20 20 |DX #$00.LOOP2 |
000001E0: 20 4C 44 41 20 24 39 43 30 30 2C 58 0D 20 20 20 | LDA $9C00,X. |
000001F0: 20 20 20 20 20 20 53 54 41 20 24 38 43 30 30 2C | STA $8C00,|
00000200: 58 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 24 |X. LDA $|
00000210: 39 44 30 30 2C 58 0D 20 20 20 20 20 20 20 20 20 |9D00,X. |
00000220: 53 54 41 20 24 38 44 30 30 2C 58 0D 20 20 20 20 |STA $8D00,X. |
00000230: 20 20 20 20 20 4C 44 41 20 24 39 45 30 30 2C 58 | LDA $9E00,X|
00000240: 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 24 38 |. STA $8|
00000250: 45 30 30 2C 58 0D 20 20 20 20 20 20 20 20 20 4C |E00,X. L|
00000260: 44 41 20 24 39 46 30 30 2C 58 0D 20 20 20 20 20 |DA $9F00,X. |
00000270: 20 20 20 20 53 54 41 20 24 38 46 30 30 2C 58 0D | STA $8F00,X.|
00000280: 20 20 20 20 20 20 20 20 20 49 4E 58 0D 20 20 20 | INX. |
00000290: 20 20 20 20 20 20 42 4E 45 20 4C 4F 4F 50 32 0D | BNE LOOP2.|
000002A0: 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 24 |. LDA #$|
000002B0: 33 39 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 |39. STA |
000002C0: 24 44 30 31 38 0D 20 20 20 20 20 20 20 20 20 4C |$D018. L|
000002D0: 44 41 20 23 24 44 38 0D 20 20 20 20 20 20 20 20 |DA #$D8. |
000002E0: 20 53 54 41 20 24 44 30 31 36 0D 20 20 20 20 20 | STA $D016. |
000002F0: 20 20 20 20 4C 44 41 20 23 24 43 31 0D 20 20 20 | LDA #$C1. |
00000300: 20 20 20 20 20 20 53 54 41 20 24 44 44 30 30 0D | STA $DD00.|
00000310: 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 24 33 | LDA #$3|
00000320: 42 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 24 |B. STA $|
00000330: 44 30 31 31 0D 20 20 20 20 20 20 20 20 20 4C 44 |D011. LD|
00000340: 41 20 23 24 37 46 0D 20 20 20 20 20 20 20 20 20 |A #$7F. |
00000350: 53 54 41 20 24 44 43 30 44 0D 20 20 20 20 20 20 |STA $DC0D. |
00000360: 20 20 20 4C 44 41 20 23 24 30 30 0D 20 20 20 20 | LDA #$00. |
00000370: 20 20 20 20 20 53 54 41 20 24 44 43 30 45 0D 20 | STA $DC0E. |
00000380: 20 20 20 20 20 20 20 20 4C 44 41 20 23 24 30 31 | LDA #$01|
00000390: 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 24 44 |. STA $D|
000003A0: 30 31 41 0D 20 20 20 20 20 20 20 20 20 4C 44 41 |01A. LDA|
000003B0: 20 23 24 32 30 0D 20 20 20 20 20 20 20 20 20 53 | #$20. S|
000003C0: 54 41 20 24 44 30 31 32 0D 20 20 20 20 20 20 20 |TA $D012. |
000003D0: 20 20 4C 44 41 20 23 3C 49 52 51 31 0D 20 20 20 | LDA #<IRQ1. |
000003E0: 20 20 20 20 20 20 53 54 41 20 24 30 33 31 34 0D | STA $0314.|
000003F0: 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 3E 49 | LDA #>I|
00000400: 52 51 31 0D 20 20 20 20 20 20 20 20 20 53 54 41 |RQ1. STA|
00000410: 20 24 30 33 31 35 0D 20 20 20 20 20 20 20 20 20 | $0315. |
00000420: 49 4E 43 20 24 30 31 0D 20 20 20 20 20 20 20 20 |INC $01. |
00000430: 20 43 4C 49 0D 20 20 20 20 20 20 20 20 20 4A 4D | CLI. JM|
00000440: 50 20 2A 0D 3B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |P *.;-----------|
00000450: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000460: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D 49 52 51 |------------.IRQ|
00000470: 31 20 20 20 20 20 49 4E 43 20 24 44 30 31 39 0D |1 INC $D019.|
00000480: 20 20 20 20 20 20 20 20 20 44 45 43 20 24 30 31 | DEC $01|
00000490: 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 24 44 |. LDA $D|
000004A0: 30 31 38 0D 20 20 20 20 20 20 20 20 20 45 4F 52 |018. EOR|
000004B0: 20 23 24 42 39 0D 20 20 20 20 20 20 20 20 20 53 | #$B9. S|
000004C0: 54 41 20 24 44 30 31 38 0D 20 20 20 20 20 20 20 |TA $D018. |
000004D0: 20 20 4C 44 41 20 24 44 30 31 36 0D 20 20 20 20 | LDA $D016. |
000004E0: 20 20 20 20 20 45 4F 52 20 23 24 30 31 0D 20 20 | EOR #$01. |
000004F0: 20 20 20 20 20 20 20 53 54 41 20 24 44 30 31 36 | STA $D016|
00000500: 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 24 44 |. LDA $D|
00000510: 44 30 30 0D 20 20 20 20 20 20 20 20 20 45 4F 52 |D00. EOR|
00000520: 20 23 24 30 31 0D 20 20 20 20 20 20 20 20 20 53 | #$01. S|
00000530: 54 41 20 24 44 44 30 30 0D 20 20 20 20 20 20 20 |TA $DD00. |
00000540: 20 20 49 4E 43 20 24 30 31 0D 20 20 20 20 20 20 | INC $01. |
00000550: 20 20 20 4A 4D 50 20 24 45 41 33 31 0D 3B 2D 2D | JMP $EA31.;--|
00000560: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000570: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000580: 2D 2D 2D 2D 2D 0D 0D |-----.. |
;--------------------------------------;
.; MCI DISPLAYER. KITANA 7/2/96.;-------
--------------------------------.
*= $0810.. SEI. LDA #$
35. STA $01. LDA #$00.
STA $D020. STA $D021.
LDX #$00.LOOP1 LDA $E400,X.
STA $D800,X. LDA $E500,X.
STA $D900,X. LDA $E600,X.
STA $DA00,X. LDA $E700,X
. STA $DB00,X. INX.
BNE LOOP1. LDX #$00.LOOP2
LDA $9C00,X. STA $8C00,X.
LDA $9D00,X. STA $8D00,X.
LDA $9E00,X. STA $8E00,X.
LDA $9F00,X. STA $8F00,X.
INX. BNE LOOP2..
LDA #$39. STA $D018. L
DA #$D8. STA $D016. LDA
#$C1. STA $DD00. LDA #$3
B. STA $D011. LDA #$7F.
STA $DC0D. LDA #$00.
STA $DC0E. LDA #$01.
STA $D01A. LDA #$20. S
TA $D012. LDA #<IRQ1. ST
A $0314. LDA #>IRQ1. STA
$0315. INC $01. CLI.
JMP *.;---------------------------
------------.IRQ1 INC $D019.
DEC $01. LDA $D018. EOR
#$B9. STA $D018. LDA $D
016. EOR #$01. STA $D016
. LDA $DD00. EOR #$01.
STA $DD00. INC $01.
JMP $EA31.;--------------------------
-------------..
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL