00000000: 00 0A 20 6F 72 67 20 24 38 30 30 30 0D 69 72 71 |.. org $8000.irq|
00000010: 20 69 6E 63 20 24 64 30 31 39 0D 20 6C 64 61 20 | inc $d019. lda |
00000020: 23 24 39 36 0D 20 73 74 61 20 24 64 64 30 30 0D |#$96. sta $dd00.|
00000030: 20 6C 64 61 20 23 24 33 62 0D 20 73 74 61 20 24 | lda #$3b. sta $|
00000040: 64 30 31 31 0D 20 6C 64 61 20 23 24 38 30 0D 20 |d011. lda #$80. |
00000050: 73 74 61 20 24 64 30 31 38 0D 20 6C 64 61 20 23 |sta $d018. lda #|
00000060: 24 64 38 0D 20 73 74 61 20 24 64 30 31 62 0D 77 |$d8. sta $d01b.w|
00000070: 61 69 74 20 6C 64 61 20 23 24 66 30 0D 73 63 61 |ait lda #$f0.sca|
00000080: 6E 6C 69 6E 65 20 63 6D 70 20 24 64 30 31 32 0D |nline cmp $d012.|
00000090: 20 62 6E 65 20 77 61 69 74 0D 20 6C 64 61 20 23 | bne wait. lda #|
000000A0: 24 39 37 0D 20 73 74 61 20 24 64 64 30 30 0D 20 |$97. sta $dd00. |
000000B0: 6C 64 61 20 23 24 63 38 0D 20 73 74 61 20 24 64 |lda #$c8. sta $d|
000000C0: 30 31 36 0D 20 6C 64 61 20 23 24 31 62 0D 20 73 |016. lda #$1b. s|
000000D0: 74 61 20 24 64 30 31 31 0D 20 6C 64 61 20 23 24 |ta $d011. lda #$|
000000E0: 31 35 0D 20 73 74 61 20 24 64 30 31 38 0D 20 6A |15. sta $d018. j|
000000F0: 6D 70 20 24 65 61 33 31 0D |mp $ea31. |
.. ORG $8000.IRQ INC $D019. LDA #$96. ST
A $DD00. LDA #$3B. STA $D011. LDA #$80.
STA $D018. LDA #$D8. STA $D01B.WAIT LDA
#$F0.SCANLINE CMP $D012. BNE WAIT. LDA #
$97. STA $DD00. LDA #$C8. STA $D016. LDA
#$1B. STA $D011. LDA #$15. STA $D018. J
MP $EA31.
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL