improved tape support with Mega65 native mode
This commit is contained in:
1 parent
11aa1f114a
commit
ffdc67d5ca
8 files changed
+49
-50
No files matched your search
@@ -60,38 +60,19 @@ m65_scrmodeset_internal: // entry point for M65_MODE65
|
||||
stx VIC_SCRNPTR+1
|
||||
stx M65_SCRTXTBASE+1
|
||||
|
||||
// Set flags for 40/80 columns and 25/50 rows
|
||||
// Set flags/varaibles for 40/80 columns and 25/50 rows
|
||||
|
||||
asl
|
||||
tax
|
||||
lda VIC_SCFLAGS
|
||||
jsr_ind_x m65_scrmodeset_flagtab
|
||||
|
||||
lda m65_scrtab_vic_ctrlb,x
|
||||
sta VIC_CTRLB
|
||||
|
||||
rts
|
||||
|
||||
m65_scrmodeset_flagtab:
|
||||
|
||||
.word m65_scrmodeset_40x25
|
||||
.word m65_scrmodeset_80x25
|
||||
.word m65_scrmodeset_80x50
|
||||
|
||||
|
||||
m65_scrmodeset_40x25:
|
||||
m65_scrtab_vic_ctrlb:
|
||||
|
||||
and #$77
|
||||
bra !+
|
||||
|
||||
m65_scrmodeset_80x25:
|
||||
|
||||
and #$F7
|
||||
ora #$80
|
||||
skip_2_bytes_trash_nvz
|
||||
|
||||
// FALLTROUGH
|
||||
|
||||
m65_scrmodeset_80x50:
|
||||
|
||||
ora #$88
|
||||
!:
|
||||
sta VIC_SCFLAGS
|
||||
rts
|
||||
.byte %00000000 // 40x25
|
||||
.byte %10000000 // 80x25
|
||||
.byte %10000100 // 80x50
|
||||
Reference in new issue
Block a user