From 6d80cb2343b5ed72f7ef807dc12cf6f1f3ee16e6 Mon Sep 17 00:00:00 2001
From: David Stancu <dstancu@nyu.edu>
Date: Thu, 8 Feb 2018 00:32:04 -0500
Subject: [PATCH] fully working buffer editor + count! some small bugs but
 otherwise wow 24 hour progress!!

---
 src/main.S | 104 +++++++++++++++++++++++++++++++++++++++++++++++++++--
 1 file changed, 101 insertions(+), 3 deletions(-)

diff --git a/src/main.S b/src/main.S
index 94f4541..f1d077e 100644
--- a/src/main.S
+++ b/src/main.S
@@ -54,7 +54,7 @@ keydown     cmp   #$8B        ; up
             cmp   #$FF        ; backspace
             beq   backspace
             cmp   #$8D        ; return
-            beq   down
+            beq   return
             jsr   drawchar
             jmp   colinc
 finkey      ldal  $00C010     ; clear strobe bit
@@ -79,7 +79,8 @@ colinc      cpx   #39
             jmp   finkey
 :rolcol     ldx   #0
             jmp   down
-
+return      ldx   #0
+            jmp   down
 backspace   lda   #$A0
             jsr   drawchar
             jmp   left
@@ -114,7 +115,98 @@ drawpos     pha
             pla
             rts
 
-drawchar    stal  $000400,X   ; display the character
+drawchar    cpy   #0
+            beq   :row0
+            cpy   #1
+            beq   :row1
+            cpy   #2
+            beq   :row2
+            cpy   #3
+            beq   :row3
+            cpy   #4
+            beq   :row4
+            cpy   #5
+            beq   :row5
+            cpy   #6
+            beq   :row6
+            cpy   #7
+            beq   :row7
+            cpy   #8
+            beq   :row8
+            cpy   #9
+            beq   :row9
+            cpy   #10
+            beq   :row10
+            cpy   #11
+            beq   :row11
+            cpy   #12
+            beq   :row12
+            cpy   #13
+            beq   :row13
+            cpy   #14
+            beq   :row14
+            cpy   #15
+            beq   :row15
+            cpy   #16
+            beq   :row16
+            cpy   #17
+            beq   :row17
+            cpy   #18
+            beq   :row18
+            cpy   #19
+            beq   :row19
+            cpy   #20
+            beq   :row20
+            cpy   #21
+            beq   :row21
+            cpy   #22
+            beq   :row22
+            rts
+:row0       stal  $000400,X
+            rts
+:row1       stal  $000480,X
+            rts
+:row2       stal  $000500,X
+            rts
+:row3       stal  $000580,X
+            rts
+:row4       stal  $000600,X
+            rts
+:row5       stal  $000680,X
+            rts
+:row6       stal  $000700,X
+            rts
+:row7       stal  $000780,X
+            rts
+:row8       stal  $000428,X
+            rts
+:row9       stal  $0004A8,X
+            rts
+:row10      stal  $000528,X
+            rts
+:row11      stal  $0005A8,X
+            rts
+:row12      stal  $000628,X
+            rts
+:row13      stal  $0006A8,X
+            rts
+:row14      stal  $000728,X
+            rts
+:row15      stal  $0007A8,X
+            rts
+:row16      stal  $000450,X
+            rts
+:row17      stal  $0004D0,X
+            rts
+:row18      stal  $000550,X
+            rts
+:row19      stal  $0005D0,X
+            rts
+:row20      stal  $000650,X
+            rts
+:row21      stal  $0006D0,X
+            rts
+:row22      stal  $000750,X
             rts
 
 tencount    ldx   #0
@@ -246,6 +338,12 @@ bufbase     da    #40
 
 
 
+
+
+
+
+
+