From 6ed92fecc6eebcde1f8e855f76fa6a0d6afa749c Mon Sep 17 00:00:00 2001
From: "B. Watson" <yalhcru@gmail.com>
Date: Wed, 20 Jan 2016 06:02:46 -0500
Subject: fix and simplify cprintfancy, allow Delete key and K/M for 1000/1M
 when entering numbers

---
 timed_getch.s | 10 +++++++++-
 1 file changed, 9 insertions(+), 1 deletion(-)

(limited to 'timed_getch.s')

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
-- 
cgit v1.2.3