From ba74870f179b665dc38360d25b463608512ce81c Mon Sep 17 00:00:00 2001
From: David Stancu <dstancu@nyu.edu>
Date: Wed, 31 Jan 2018 23:47:06 -0500
Subject: [PATCH] working cursor move l/r!

---
 src/main.S | 77 +++++++++++++++++++++++++++++++++++++++++-------------
 1 file changed, 59 insertions(+), 18 deletions(-)

diff --git a/src/main.S b/src/main.S
index 70414fd..8f20886 100644
--- a/src/main.S
+++ b/src/main.S
@@ -26,37 +26,33 @@
 *            rep   #$30
 
 ; show the current char on screen
-; first check and discard to clear strobe, then enter loop
-
-
-
-
+; read keyboard then hit strobe to reset
             ldx   #0
-eloop       stal  $000480,X
-            ldal  $00C010
+eloop       ldal  $00C000
+skip        stal  $000400,X
             clc
             bit   %1
             jsr   handlekey
+            ldal  $00C010
             jmp   eloop
 
 handlekey   cmp   #$1088
-            beq   down
+            beq   left
             cmp   #$1095
-            beq   up
+            beq   right
 outkey      rts
 
-up          clc
-            cpx   #39
-            bcs   outkey
-            inx
-            jmp   outkey
-
-down        clc
+left        clc
             cpx   #0
-            bcs   outkey
+            beq   outkey
             dex
-            jmp   outkey
+            rts
 
+right       clc
+            cpx   #39
+            beq   outkey
+            inx
+            rts
 
 ; working text blit
 *            ldx   #hithere+2 ; strl, first two bytes are strlen, # denotes immediate addr val
@@ -112,6 +108,51 @@ brkboi      brk
 
 
 
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+