From 8580a918e2029c695ee9bf33c0f69e05298c2c65 Mon Sep 17 00:00:00 2001
From: FeralChild64 <you@example.com>
Date: Mon, 30 Nov 2020 23:29:45 +0100
Subject: [PATCH] small optimization in keyboard code

---
 src/kernal/keyboard_m65/mega65_scnkey.s | 11 +++++++----
 1 file changed, 7 insertions(+), 4 deletions(-)

diff --git a/src/kernal/keyboard_m65/mega65_scnkey.s b/src/kernal/keyboard_m65/mega65_scnkey.s
index 5c625098..0fbdd401 100644
--- a/src/kernal/keyboard_m65/mega65_scnkey.s
+++ b/src/kernal/keyboard_m65/mega65_scnkey.s
@@ -21,8 +21,8 @@ m65_scnkey:
 
 m65_scnkey_loop:
 
-	stx KBSCN_SELECT
-	lda KBSCN_PEEK
+	stx $D614
+	lda $D613
 	eor #$FF                           ; let bit 1 mean 'pressed', not the otherwise
 	sta M65_KB_COLSCAN, x
 	ora M65_KB_COLSUM
@@ -116,8 +116,7 @@ m65_scnkey_loop_2:
 	asl
 	asl
 	asl
-	clc
-	adc M65_KB_PRESSED+0
+	adc M65_KB_PRESSED+0               ; Carry already cleared by ASL
 	sta M65_KB_PRESSED+0
 
 	bra m65_scnkey_loop_2
@@ -184,3 +183,7 @@ m65_scnkey_no_key:
 	; XXX
 
 	rts
+
+
+
+m65_scnkey_is_new: