From 40fcf6b7a9f8fcc5e2527f77ccad1d1cf07087cc Mon Sep 17 00:00:00 2001
From: Sebastian Rasmussen <sebras@gmail.com>
Date: Fri, 18 Oct 2019 20:00:18 +0200
Subject: [PATCH] fix typos and add pagination comments to ttt{1,2}.s and un.s

---
 scans/ttt1.s | 14 +++++++++++++-
 scans/ttt2.s |  7 ++++++-
 scans/un.s   |  1 +
 3 files changed, 20 insertions(+), 2 deletions(-)

diff --git a/scans/ttt1.s b/scans/ttt1.s
index bb27931..e0bd760 100644
--- a/scans/ttt1.s
+++ b/scans/ttt1.s
@@ -1,3 +1,4 @@
+"** 14-148-165.pdf page 1
 " ttt1.s
 
 t = 0
@@ -61,6 +62,7 @@ unwind:
    jmp 1b
 t = t+1
 
+"** 14-148-165.pdf page 2
 move: 0
    lac dspflg
    sza
@@ -121,6 +123,7 @@ lphit:
    tad sbufp
    dac 9f+t
    lac noblink
+"** 14-148-165.pdf page 3
    dac blk1 i
    dac blk2 i
    dac 9f+t i
@@ -182,6 +185,7 @@ must: 0
    jmp 2f
    -4
    tad 8
+"** 14-148-165.pdf page 4
    dac 9
    cla
    xct 9 i
@@ -243,6 +247,7 @@ done:
 1:
    lac 9 i
    cma
+"** 14-148-165.pdf page 5
    tad boardp
    cma
    alss 4
@@ -304,6 +309,7 @@ mark: 0
    lac 9f+t
    and o2
    tad o60
+"** 14-148-165.pdf page 6
    dac 0f+2
    jms messg; 0:0;0;0;0
    jmp mark i
@@ -365,6 +371,7 @@ try: 0
    isz maxin
    jmp 1f
    -1
+"** 14-148-165.pdf page 7
    dac maxin
    isz try
    jmp try i
@@ -426,6 +433,7 @@ try: 0
    dac 9f+t+2 i
    lac o1000
    dac 9f+t+1 i
+"** 14-148-165.pdf page 8
    jms try; jmp prnt
    dzm 9f+t+1 i
    dzm 9f+t+2 i
@@ -487,6 +495,7 @@ t = t+5
 
 heur: 0
    jms addpri
+"** 14-148-165.pdf page 9
    -2
    tad force
    dac lforce
@@ -548,6 +557,7 @@ heur: 0
    jmp heiur i
 4:
    lac 9f+t+1
+"** 14-148-165.pdf page 10
    jsm mark; 1
    jmp heur i
 t = t+2
@@ -609,6 +619,7 @@ pstrat:
    jmp 3b i
 1:
    isz 3b
+"** 14-148-165.pdf page 11
    lacq
    tad 3b i
    lmq
@@ -669,8 +680,9 @@ dsboard: 0
    isz 9f+t+2
    isz 9f+t
    jmp 8b
+"** 14-148-165.pdf page 12
    -1
-   dac 11i
+   dac 11 i
    lac blinkpar
    dac blk1 i
    dac blk2 i
diff --git a/scans/ttt2.s b/scans/ttt2.s
index 7cadd6b..941c70d 100644
--- a/scans/ttt2.s
+++ b/scans/ttt2.s
@@ -1,3 +1,4 @@
+"** 14-148-165.pdf page 13
 " ttt2
 
 boardp: board
@@ -59,7 +60,8 @@ tb = tad board-1
    tb+14; tb+30; tb+46; tb+62
    tb+15; tb+27; tb+39; tb+51
    tb+53; tb+54; tb+55; tb+56
-   tb+13; tb+31; tb+47; tb+63
+   tb+15; tb+31; tb+47; tb+63
+"** 14-148-165.pdf page 14
    tb+16; tb+28; tb+40; tb+52
    tb+16; tb+27; tb+38; tb+49
    tb+16; tb+31; tb+46; tb+61
@@ -122,6 +124,7 @@ plane:
    tb+5; tb+6; tb+7; tb+8; tb+21; tb+22; tb+23; tb+24
    tb+37; tb+38; tb+39; tb+40; tb+53; tb+54; tb+55; tb+56
 
+"** 14-148-165.pdf page 15
    tb+1; tb+2; tb+3; tb+4; tb+17; tb+18; tb+19; tb+20
    tb+33; tb+34; tb+35; tb+36; tb+49; tb+50; tb+51; tb+52
 
@@ -182,6 +185,7 @@ oh:
    vy 040 v
    vx m 0140
    vy 0 v
+"** 14-148-165.pdf page 16
    vx m 040
    vy m 040 v
    dnop
@@ -243,6 +247,7 @@ sbuf: .=.+1050
 board: .=.+64
 maxin: .=.+1
 force: .=.+1
+"** 14-148-165.pdf page 17
 pri: .=.+1
 lpri: .=.+1
 lforce: .=.+1
diff --git a/scans/un.s b/scans/un.s
index b521b9b..368dedd 100644
--- a/scans/un.s
+++ b/scans/un.s
@@ -1,3 +1,4 @@
+"** 14-148-165.pdf page 18
 " un
 
    sys open; n.out; 0