diff options
| author | B. Watson <yalhcru@gmail.com> | 2021-05-13 17:19:22 -0400 |
|---|---|---|
| committer | B. Watson <yalhcru@gmail.com> | 2021-05-13 17:19:22 -0400 |
| commit | 9b2fa6472b78828f4af74ecc6992fb75a290b2f5 (patch) | |
| tree | 38ea34eb012a965a5e9f2abb900dbe329e2f829c | |
| parent | 0b6f897c4551d1af18f88f84f6390af39d62284f (diff) | |
| download | taipan-9b2fa6472b78828f4af74ecc6992fb75a290b2f5.tar.gz | |
Uppercase Y/N, costs 2 bytes (now 8836)
| -rw-r--r-- | timed_getch.s | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/timed_getch.s b/timed_getch.s index 1ee158f..eb29a29 100644 --- a/timed_getch.s +++ b/timed_getch.s @@ -175,6 +175,7 @@ _numgetc: _yngetc: sta FR0 ; stash default arg ora #$80 ; show user the default (or a regular cursor if none) + and #$bf ; (uppercase) jsr putchar jsr _agetc_no_cursor ora #$50 ; lowercase |