From 164125be7efe6d26a17c505617930e09b6cf6662 Mon Sep 17 00:00:00 2001
From: Phil Budne <phil@ultimate.com>
Date: Mon, 21 Mar 2016 00:51:49 -0400
Subject: [PATCH] sys comments

---
 src/sys/s3.s |  4 ++--
 src/sys/s7.s | 10 +++++-----
 2 files changed, 7 insertions(+), 7 deletions(-)

diff --git a/src/sys/s3.s b/src/sys/s3.s
index c686a6e..9bf9cc9 100644
--- a/src/sys/s3.s
+++ b/src/sys/s3.s
@@ -283,11 +283,11 @@ rkbdi:
    lmq
    and o155
    sad o55
-   jmp 1f
+   jmp 1f			" -/=? map to =?-/ ???
    lacq
    and o137
    sad o134
-   skp
+   skp				" \| map to Ll ???
    jmp 2f
 1:
    lacq
diff --git a/src/sys/s7.s b/src/sys/s7.s
index 6f3ea7d..f6b2a7a 100644
--- a/src/sys/s7.s
+++ b/src/sys/s7.s
@@ -77,18 +77,18 @@ cnop:			" fetched as constant in iread
 1: lds				" load display status (see 03-scope.pdf pg 25)
    sma ral			" display trap set? (and rotate left)
    jmp 1f			"  not set
-   cdf				" clear display flags
+   cdf				" display done executing; clear display flags
    lac .dspb
    sna
-   jmp piret
+   jmp piret			" return now if .dspb == 0
    tad dm3
    sna
-   jmp dsprestart
-   dac .dspb
+   jmp dsprestart		" start display if .dspb == 3
+   dac .dspb			" otherwise, .dspb -= 3 and return
    jmp piret
 dsprestart:
    lac d1
-   dac .dspb			" set .dsbp = 1
+   dac .dspb			" set .dspb = 1
    lac dspbufp			" load display buf pointer
    beg				" start display processor
    -10