diff options
| author | B. Watson <yalhcru@gmail.com> | 2016-01-20 06:02:46 -0500 |
|---|---|---|
| committer | B. Watson <yalhcru@gmail.com> | 2016-01-20 06:02:46 -0500 |
| commit | 6ed92fecc6eebcde1f8e855f76fa6a0d6afa749c (patch) | |
| tree | b4bb45959ad641c4286dd4e8bc5d70ea895229e4 /timed_getch.s | |
| parent | 12114dbef93e85bb7b5832f60410bd73855883dd (diff) | |
| download | taipan-6ed92fecc6eebcde1f8e855f76fa6a0d6afa749c.tar.gz | |
fix and simplify cprintfancy, allow Delete key and K/M for 1000/1M when entering numbers
Diffstat (limited to 'timed_getch.s')
| -rw-r--r-- | timed_getch.s | 10 |
1 files changed, 9 insertions, 1 deletions
diff --git a/timed_getch.s b/timed_getch.s index f52f50c..ba3b0a9 100644 --- a/timed_getch.s +++ b/timed_getch.s @@ -53,6 +53,8 @@ _agetc: ; special cases cmp #$9b ; enter key, return as-is beq ok + cmp #$9c ; delete key, return as-is + beq ok cmp #$7e ; backspace beq ok @@ -92,10 +94,16 @@ _numgetc: jsr _agetc cmp #$9b beq ok - cmp #$7e + cmp #$7e ; backspace beq ok cmp #$61 ; allow 'a' for "all" beq ok + cmp #$6b ; allow 'k' for 1000 + beq ok + cmp #$6d ; allow 'm' for 1 million + beq ok + cmp #$9c ; shift-del + beq ok cmp #'0' bcc _numgetc cmp #'9'+1 |