moved MEGA65 native cursor blink to KERNAL_C segment
This commit is contained in:
1 parent
51b49796da
commit
52f20a41b6
5 files changed
+21
-5
No files matched your search
@@ -20,7 +20,21 @@ default_irq_handler:
|
||||
jsr M65_MODEGET
|
||||
bcs @2
|
||||
|
||||
jsr m65_cursor_blink
|
||||
; Map KERNAL_C segment
|
||||
|
||||
lda VIC_CTRLA
|
||||
pha
|
||||
ora #%00100000
|
||||
sta VIC_CTRLA
|
||||
|
||||
; Call the native mode blink routine
|
||||
|
||||
jsr (VKC__m65_cursor_blink)
|
||||
|
||||
; Restore mapping and quit
|
||||
|
||||
pla
|
||||
sta VIC_CTRLA
|
||||
|
||||
bra default_irq_handler_common
|
||||
@2:
|
||||
|
||||
Reference in new issue
Block a user