diff --git a/c64/kernal/chrin.s b/c64/kernal/chrin.s
index 8a788811..42931962 100644
--- a/c64/kernal/chrin.s
+++ b/c64/kernal/chrin.s
@@ -1,3 +1,9 @@
-; Function defined on pp272-273 of C64 Programmers Reference Guide
+				; Function defined on pp272-273 of C64 Programmers Reference Guide
+	;; Compute's Mapping the 64, p228
+	;;  Reads a byte of input, unless from keyboard.
+	;; If from keyboard, then it gets a whole line of input, and returns the first char.
+	;; Repeated calls after that read out the successive bytes of the line of input.
 chrin:
+	lda #$00
+	clc
 	rts