From 9aeab0b425e7210585f7f356e9d6c171c1718ce2 Mon Sep 17 00:00:00 2001
From: Kelvin Sherlock <ksherlock@gmail.com>
Date: Sat, 5 Sep 2015 09:56:38 -0400
Subject: [PATCH] fix bugs with newline read

---
 read.aii | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/read.aii b/read.aii
index b98b9e2..c79451c 100644
--- a/read.aii
+++ b/read.aii
@@ -57,7 +57,7 @@ nl_mask		ds.w 1
 
 		endr
 
-data		record 0
+data		record
 
 nl_table	ds.b 256
 		endr
@@ -623,8 +623,8 @@ done
 	;
 	; builds a new-line table, if necessary.
 	; returns:
-	; c = 1 if new_line mode enabled.
-	; c = 0 if new_line mode disabled.
+	; c = 0 if new_line mode enabled.
+	; c = 1 if new_line mode disabled.
 
 build_nl_table	procname
 
@@ -705,7 +705,7 @@ slow_read	procname
 	adc io_buffer
 	sta ptr
 	lda #0
-	adc io_buffer
+	adc io_buffer+2
 	sta ptr+2
 
 	; count = (1024 - mark) & 1023
@@ -730,7 +730,7 @@ aligned
 	lda io_buffer
 	sta ptr
 	lda io_buffer+2
-	sta ptr
+	sta ptr+2
 
 @loop
 	; read aligned blocks.