mirror of
https://github.com/bobbimanners/Applecorn.git
synced 2024-09-28 07:55:27 +00:00
Back to new WRTMAIN/WRTAUX. Fixed //e bug that prevented this.
This commit is contained in:
parent
6609426f8a
commit
216ba57305
BIN
applecorn.po
BIN
applecorn.po
Binary file not shown.
@ -149,7 +149,7 @@ IENTMAIN MAC
|
||||
|
||||
* Enable writing to main memory (for code running in aux)
|
||||
WRTMAIN MAC
|
||||
* PHP
|
||||
PHP
|
||||
SEI ; Keeps IRQ handler easy
|
||||
STA $C004 ; Write to main memory
|
||||
EOM
|
||||
@ -157,8 +157,7 @@ WRTMAIN MAC
|
||||
* Go back to writing to aux (for code running in aux)
|
||||
WRTAUX MAC
|
||||
STA $C005 ; Write to aux memory
|
||||
CLI
|
||||
* PLP ; Normal service resumed
|
||||
PLP ; Normal service resumed
|
||||
EOM
|
||||
|
||||
* Manually enable AltZP (for code running in main)
|
||||
|
10
auxmem.vdu.s
10
auxmem.vdu.s
@ -364,12 +364,14 @@ PRCHR4 JSR CHARADDR ; Find character address
|
||||
>>> WRTMAIN
|
||||
STA [VDUADDR],Y
|
||||
>>> WRTAUX
|
||||
BRA PRCHR8
|
||||
BRA PRCHR7
|
||||
PRCHR5 BCC PRCHR6 ; Aux memory
|
||||
>>> WRTMAIN
|
||||
PRCHR6 STA (VDUADDR),Y ; Store it
|
||||
PRCHR7 >>> WRTAUX
|
||||
PRCHR8 PLA
|
||||
STA (VDUADDR),Y ; Store in main
|
||||
>>> WRTAUX
|
||||
BRA PRCHR7
|
||||
PRCHR6 STA (VDUADDR),Y ; Store in aux
|
||||
PRCHR7 PLA
|
||||
BIT VDUSCREEN
|
||||
BPL GETCHROK
|
||||
JMP PRCHRSOFT ; Write character to graphics
|
||||
|
Loading…
Reference in New Issue
Block a user