From 6afee2f6eadf0a341e92e1924fe3edd8d535089e Mon Sep 17 00:00:00 2001
From: Peter Ferrie <peter.ferrie@gmail.com>
Date: Mon, 3 Jun 2019 11:58:29 -0700
Subject: [PATCH] slightly faster key handling

---
 pt3_player/interrupt_handler.s |  2 +-
 pt3_player/keypress_minimal.s  | 11 +++++------
 2 files changed, 6 insertions(+), 7 deletions(-)

diff --git a/pt3_player/interrupt_handler.s b/pt3_player/interrupt_handler.s
index f7187d58..b5bfb733 100644
--- a/pt3_player/interrupt_handler.s
+++ b/pt3_player/interrupt_handler.s
@@ -178,7 +178,7 @@ done_time:
 check_keyboard:
 
 	jsr	get_key
-	lda	LASTKEY
+	cmp	#0
 	beq	exit_interrupt
 
 	;====================
diff --git a/pt3_player/keypress_minimal.s b/pt3_player/keypress_minimal.s
index 16d7c815..8b176a61 100644
--- a/pt3_player/keypress_minimal.s
+++ b/pt3_player/keypress_minimal.s
@@ -11,7 +11,7 @@ get_key:
 
 figure_out_key:
 	cmp	#' '+128		; the mask destroys space	; 2
-	beq	save_key		; so handle it specially	; 2nt/3
+	beq	return_key		; so handle it specially	; 2nt/3
 
 check_right_arrow:
 	cmp	#$95							; 2
@@ -32,15 +32,14 @@ check_down_arrow:
 check_escape:
 	and	#$5f			; mask, to make upper-case	; 2
         cmp	#$1B							; 2
-	bne	save_key						; 2nt/3
+	bne	return_key						; 2nt/3
 	lda	#'Q'							; 2
-	bne	save_key		; branch always			; 3
+	bne	return_key		; branch always			; 3
 
 no_key:
-	lda	#0			; no key, so save a zero	; 2
+	lda	#0			; no key, so return a zero	; 2
 
-save_key:
-	sta	LASTKEY			; save the key to our buffer	; 2
+return_key:
 	rts								; 6
 								;============