00000000: 00 0A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..**************|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000020: 2A 2A 0D 2A A0 A0 A0 62 61 73 65 A0 69 6E 74 65 |**.*...base.inte|
00000030: 72 72 75 70 74 A0 72 6F 75 74 69 6E 65 2E 62 6A |rrupt.routine.bj|
00000040: A0 A0 2A 0D 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..*.************|
00000050: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000060: 2A 2A 2A 2A 0D 20 73 65 69 0D 20 6C 64 61 20 23 |****. sei. lda #|
00000070: 24 30 64 0D 20 73 74 61 20 24 30 33 31 34 0D 20 |$0d. sta $0314. |
00000080: 6C 64 61 20 23 24 38 30 0D 20 73 74 61 20 24 30 |lda #$80. sta $0|
00000090: 33 31 35 0D 20 63 6C 69 0D 20 72 74 73 0D 2A 2A |315. cli. rts.**|
000000A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000000B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 0D 20 |**************. |
000000C0: 6C 64 61 20 31 39 37 0D 20 63 6D 70 20 23 34 0D |lda 197. cmp #4.|
000000D0: 20 62 65 71 20 6D 6F 76 65 31 0D 20 6A 6D 70 20 | beq move1. jmp |
000000E0: 65 6E 64 0D 6D 6F 76 65 31 20 6C 64 78 20 30 0D |end.move1 ldx 0.|
000000F0: 6C 6F 6F 70 31 20 6C 64 61 20 31 30 32 34 2C 78 |loop1 lda 1024,x|
00000100: 0D 20 73 74 61 20 34 39 31 35 32 2C 78 0D 20 63 |. sta 49152,x. c|
00000110: 70 78 20 32 35 35 0D 20 62 65 71 20 6D 6F 76 65 |px 255. beq move|
00000120: 32 0D 20 69 6E 78 0D 20 6A 6D 70 20 6C 6F 6F 70 |2. inx. jmp loop|
00000130: 31 0D 6D 6F 76 65 32 20 6C 64 78 20 30 0D 6C 6F |1.move2 ldx 0.lo|
00000140: 6F 70 32 20 6C 64 61 20 31 32 37 39 2C 78 0D 20 |op2 lda 1279,x. |
00000150: 73 74 61 20 34 39 34 30 37 2C 78 0D 20 63 70 78 |sta 49407,x. cpx|
00000160: 20 32 35 35 0D 20 62 65 71 20 6D 6F 76 65 33 0D | 255. beq move3.|
00000170: 20 69 6E 78 0D 20 6A 6D 70 20 6C 6F 6F 70 32 0D | inx. jmp loop2.|
00000180: 6D 6F 76 65 33 20 6C 64 78 20 30 0D 6C 6F 6F 70 |move3 ldx 0.loop|
00000190: 33 20 6C 64 61 20 31 35 33 34 2C 78 0D 20 73 74 |3 lda 1534,x. st|
000001A0: 61 20 34 39 36 36 32 2C 78 0D 20 63 70 78 20 32 |a 49662,x. cpx 2|
000001B0: 35 35 0D 20 62 65 71 20 6D 6F 76 65 34 0D 20 69 |55. beq move4. i|
000001C0: 6E 78 0D 20 6A 6D 70 20 6C 6F 6F 70 33 0D 6D 6F |nx. jmp loop3.mo|
000001D0: 76 65 34 20 6C 64 78 20 30 0D 6C 6F 6F 70 34 20 |ve4 ldx 0.loop4 |
000001E0: 6C 64 61 20 31 37 38 39 2C 78 0D 20 73 74 61 20 |lda 1789,x. sta |
000001F0: 34 39 39 31 37 2C 78 0D 20 63 70 78 20 32 33 34 |49917,x. cpx 234|
00000200: 0D 20 62 65 71 20 65 6E 64 0D 20 69 6E 78 0D 20 |. beq end. inx. |
00000210: 6A 6D 70 20 6C 6F 6F 70 34 0D 2A 2A 2A 2A 2A 2A |jmp loop4.******|
00000220: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000230: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 0D 65 6E 64 20 6A |**********.end j|
00000240: 6D 70 20 24 65 61 33 31 0D |mp $ea31. |
..********************************.* B
ASE INTERRUPT ROUTINE.BJ *.************
********************. SEI. LDA #$0D. STA
$0314. LDA #$80. STA $0315. CLI. RTS.**
******************************. LDA 197.
CMP #4. BEQ MOVE1. JMP END.MOVE1 LDX 0.
LOOP1 LDA 1024,X. STA 49152,X. CPX 255.
BEQ MOVE2. INX. JMP LOOP1.MOVE2 LDX 0.LO
OP2 LDA 1279,X. STA 49407,X. CPX 255. BE
Q MOVE3. INX. JMP LOOP2.MOVE3 LDX 0.LOOP
3 LDA 1534,X. STA 49662,X. CPX 255. BEQ
MOVE4. INX. JMP LOOP3.MOVE4 LDX 0.LOOP4
LDA 1789,X. STA 49917,X. CPX 234. BEQ EN
D. INX. JMP LOOP4.**********************
**********.END JMP $EA31.
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL