Apple-2-SW/Applecorn
1
0
Fork 0
mirror of https://github.com/bobbimanners/Applecorn.git synced 2025-02-03 12:30:41 +00:00
Code Issues Projects Releases Wiki Activity

More tidy up.

Browse Source
This commit is contained in:
Bobbi Webber-Manners 2022-12-11 18:11:19 -05:00
parent a339ce1bd5
commit 222bcc307d
2 changed files with 3 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
applecorn.po
View File

Binary file not shown.

9
auxmem.chario.s
View File

@ -320,6 +320,7 @@ ERRKEYUSED BRK
* 20/21 -> pointer to end of all strings
*
* Bobbi's initial scheme:
* NOTE - THIS WRITES TO AUX MEM AT THE MOMENT. SHOULD BE MAIN!!
KEYBUF EQU $400 ; *KEY buffer from $400-$7FF
; Beware of the screen holes!
KEYBUFFREE EQU KEYBUF + $20 ; Free space word
@ -381,9 +382,7 @@ BYTE12 LDX #120 ; 120 bytes in each half page
STX FXSOFTOK ; Soft keys being updated
* Bobbi's initial scheme
PHP
SEI ; Prevent IRQs while writing
STZ WRMAINRAM ; Write to main mem
>>> WRTMAIN
BYTE12LP STZ $0400-1,X ; Could be more efficient
STZ $0480-1,X
STZ $0500-1,X
@ -396,10 +395,8 @@ BYTE12LP STZ $0400-1,X ; Could be more efficient
BNE BYTE12LP
LDA #<KEYBUFFREE+2 ; Initialize start of *KEY free-space
STA KEYBUFFREE+0
LDA #>KEYBUFFREE
STA KEYBUFFREE+1
STA WRCARDRAM ; Restore writing to aux
PLP ; And restore IRQs
>>> WRTAUX
*
STX FXSOFTOK ; Soft keys updated
BYTE12OK RTS