From 7a034f505bd2690e4a05a166746e8be1cdfecfb7 Mon Sep 17 00:00:00 2001
From: Piotr Fusik <fox@scene.pl>
Date: Wed, 23 Jan 2019 19:02:26 +0100
Subject: [PATCH] Comment the ATASCII to screen code conversion.

---
 libsrc/atari/cputc.s | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/libsrc/atari/cputc.s b/libsrc/atari/cputc.s
index 6345983fe..7132fdca6 100644
--- a/libsrc/atari/cputc.s
+++ b/libsrc/atari/cputc.s
@@ -30,13 +30,13 @@ L4:     cmp     #$0A            ; LF
         cmp     #ATEOL          ; Atari-EOL?
         beq     newline
 
-        asl     a
-        adc     #$c0
-        bpl     intok
-        eor     #$40
-intok:  lsr
+        asl     a               ; shift out the inverse bit
+        adc     #$c0            ; grab the inverse bit; convert ATASCII to screen code
+        bpl     codeok          ; screen code ok?
+        eor     #$40            ; needs correction
+codeok: lsr     a               ; undo the shift
         bcc     cputdirect
-        eor     #$80
+        eor     #$80            ; restore the inverse bit
 
 cputdirect:                     ; accepts screen code
         jsr     putchar
-- 
2.39.5