toggling character sets now works in MEGA65 native mode too
This commit is contained in:
1 parent
1d4c953cee
commit
c1b3026976
9 files changed
+123
-31
No files matched your search
@@ -92,10 +92,5 @@ m65_chrout_screen_TAB_SET_CLR:
|
||||
m65_chrout_screen_ESC:
|
||||
nop
|
||||
m65_chrout_screen_BELL:
|
||||
nop
|
||||
m65_chrout_screen_GFX:
|
||||
nop
|
||||
m65_chrout_screen_TXT:
|
||||
nop
|
||||
|
||||
jmp m65_chrout_screen_done
|
||||
@@ -62,6 +62,22 @@ m65_chrout_screen_HOME:
|
||||
jsr M65_HOME
|
||||
jmp_8 m65_chrout_screen_ctrl2_end
|
||||
|
||||
// Character set switching
|
||||
|
||||
m65_chrout_screen_GFX:
|
||||
|
||||
lda VIC_CHARPTR+1
|
||||
ora #%00001000
|
||||
!:
|
||||
sta VIC_CHARPTR+1
|
||||
jmp_8 m65_chrout_screen_ctrl2_end
|
||||
|
||||
m65_chrout_screen_TXT:
|
||||
|
||||
lda VIC_CHARPTR+1
|
||||
and #%11110111
|
||||
jmp_8 !-
|
||||
|
||||
// INS key
|
||||
|
||||
m65_chrout_screen_INS:
|
||||
|
||||
@@ -87,6 +87,16 @@ m65_scrmodeset_internal: // entry point for M65_MODE65
|
||||
stx VIC_COLPTR+0
|
||||
stx VIC_COLPTR+1
|
||||
|
||||
// Set the following location:
|
||||
// - VIC_CHARPTR - for character generator location
|
||||
|
||||
lda #<MEMCONF_CHRBASE
|
||||
sta VIC_CHARPTR+0
|
||||
lda #>MEMCONF_CHRBASE
|
||||
sta VIC_CHARPTR+1
|
||||
lda #$01
|
||||
sta VIC_CHARPTR+2
|
||||
|
||||
// Set the following locations:
|
||||
// - M65_SCRGUARD, M65_COLGUARD - guards for virtual screen end
|
||||
// - M65_COLVIEWMAX - guard for viewport start
|
||||
|
||||
Reference in new issue
Block a user