mirror of
https://github.com/bobbimanners/Applecorn.git
synced 2024-06-02 11:41:30 +00:00
Re-enable alt charset. Turn off on *QUIT.
This commit is contained in:
parent
200d1123f1
commit
400b02094c
BIN
applecorn.po
BIN
applecorn.po
Binary file not shown.
|
@ -191,7 +191,7 @@ BYTE00 BEQ BYTE00A ; OSBYTE 0,0 - generate error
|
||||||
RTS ; %000x1xxx host type, 'A'pple
|
RTS ; %000x1xxx host type, 'A'pple
|
||||||
BYTE00A BRK
|
BYTE00A BRK
|
||||||
DB $F7
|
DB $F7
|
||||||
HELLO ASC 'Applecorn MOS 2021-10-25'
|
HELLO ASC 'Applecorn MOS 2021-10-27'
|
||||||
DB $00 ; Unify MOS messages
|
DB $00 ; Unify MOS messages
|
||||||
|
|
||||||
|
|
||||||
|
|
|
@ -604,7 +604,7 @@ VDU22 LDA VDUQ+8
|
||||||
STA $C00C,X ; Select 40col/80col
|
STA $C00C,X ; Select 40col/80col
|
||||||
STA $C051 ; Enable Text
|
STA $C051 ; Enable Text
|
||||||
STA $C055 ; PAGE2
|
STA $C055 ; PAGE2
|
||||||
* STA $C00F ; Enable alt charset
|
STA $C00F ; Enable alt charset
|
||||||
* Fall through into CLS
|
* Fall through into CLS
|
||||||
|
|
||||||
|
|
||||||
|
|
|
@ -867,6 +867,7 @@ CHKNOTFND CMP #$44 ; Convert ProDOS 'not found'
|
||||||
* Quit to ProDOS
|
* Quit to ProDOS
|
||||||
QUIT INC $3F4 ; Invalidate powerup byte
|
QUIT INC $3F4 ; Invalidate powerup byte
|
||||||
STA $C054 ; PAGE2 off
|
STA $C054 ; PAGE2 off
|
||||||
|
STA $C00E ; Turn off alt charset
|
||||||
JSR MLI
|
JSR MLI
|
||||||
DB QUITCMD
|
DB QUITCMD
|
||||||
DW QUITPL
|
DW QUITPL
|
||||||
|
|
Loading…
Reference in New Issue
Block a user