From 054913ed06b487b0945cf85d7fc6ec1911e53896 Mon Sep 17 00:00:00 2001
From: Paul Gardner-Stephen <paul@servalproject.org>
Date: Sat, 20 Apr 2019 01:04:48 +0930
Subject: [PATCH] roll another loop up

---
 c64/kernal/scan_keyboard.s | 44 ++++++--------------------------------
 1 file changed, 7 insertions(+), 37 deletions(-)

diff --git a/c64/kernal/scan_keyboard.s b/c64/kernal/scan_keyboard.s
index d4e7dcdb..60cb4699 100644
--- a/c64/kernal/scan_keyboard.s
+++ b/c64/kernal/scan_keyboard.s
@@ -184,47 +184,17 @@ scan_keyboard:
     ;; // Routine for Scanning a Matrix Row
 
 KeyInRow:
+	ldy #7
+*
 	asl
-	bcs nokey0
+	bcs nokey
 	jsr KeyFound
-nokey0:
+nokey:
 	inx
-        asl
-        bcs nokey1
-        jsr KeyFound
-nokey1:	
-        inx
-        asl
-        bcs nokey2
-        jsr KeyFound
-nokey2:	
-        inx
-        asl
-        bcs nokey3
-        jsr KeyFound
-nokey3:	
-        inx
-        asl
-        bcs nokey4
-        jsr KeyFound
-nokey4:	
-        inx
-        asl
-        bcs nokey5
-        jsr KeyFound
-nokey5:	
-        inx
-        asl
-        bcs nokey6
-        jsr KeyFound
-nokey6:	
-        inx
-        asl
-        bcs nokey7
-        jsr KeyFound
-nokey7:	
+	dey
+	bpl -
 
-    rts
+	rts
 
 
     ;; //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~