20 lines
255 B
ArmAsm
20 lines
255 B
ArmAsm
|
|
//
|
|
// GFX/TXT mode switch handling within CHROUT
|
|
//
|
|
|
|
|
|
chrout_screen_GFX:
|
|
|
|
lda VIC_YMCSB
|
|
and #$02 // to upper case
|
|
!:
|
|
sta VIC_YMCSB
|
|
jmp chrout_screen_done
|
|
|
|
chrout_screen_TXT:
|
|
|
|
lda VIC_YMCSB
|
|
ora #$02 // to lower case
|
|
bne !- // branch always
|