diff options
| -rw-r--r-- | timed_getch.s | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/timed_getch.s b/timed_getch.s index f4c8431..1ee158f 100644 --- a/timed_getch.s +++ b/timed_getch.s @@ -174,7 +174,10 @@ _numgetc: ; extern unsigned char __fastcall__ yngetc(char dflt); _yngetc: sta FR0 ; stash default arg - jsr _lcgetc + ora #$80 ; show user the default (or a regular cursor if none) + jsr putchar + jsr _agetc_no_cursor + ora #$50 ; lowercase cmp #'y' ; return y or n immediately beq ok cmp #'n' |