disable cursor blink when CDA is active.

This commit is contained in:
Kelvin Sherlock 2021-09-26 19:46:10 -04:00
parent 39429e4e09
commit 11d62bb333

View File

@ -93,11 +93,18 @@ enable_cursor ent
cursor_vector ent
jml cursor_int
NumInts equ $e01d67
cursor_int
* cursor interrupt - blink the cursor.
mx %11
* check if CDA active.
* $ff = inactive, $00 = active
lda >NumInts
bpl :rts
ldy cursor_offset
lda cursor_state