Apple-2-SW
/
Applecorn
mirror of https://github.com/bobbimanners/Applecorn.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

Reverted previous fix to #142.

This commit is contained in:
Bobbi Webber-Manners 2022-09-24 16:19:16 -04:00
parent 9ce495efb9
commit ca9e62a583
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
auxmem.chario.s
View File

@ -154,7 +154,7 @@ INKEY1 LDA CURSOR ; Add cursor
LDA CURSORCP
INKEY2 JSR PUTCHRC ; Toggle cursor
INKEY3 LDA ESCFLAG
BMI INKEYXXX ; Escape pending, return it
BMI INKEYOK ; Escape pending, return it
INKEY4 JSR KEYREAD ; Test for input, all can be trashed
PLY
BCC INKEYOK ; Char returned, return it
@ -182,7 +182,7 @@ INKEYOUT PLA ; Drop stacked Y
*
INKEYOK PHA ; Save key or timeout
PHP ; Save CC=key, CS=timeout
INKEYXXX LDA OLDCHAR ; Prepare for main cursor
LDA OLDCHAR ; Prepare for main cursor
BIT VDUSTATUS
BVC INKEYOFF2 ; No editing cursor
JSR PUTCHRC ; Remove cursor