fix typos and add pagination comments to ttt{1,2}.s and un.s

This commit is contained in:
Sebastian Rasmussen
2019-10-19 02:55:13 +02:00
parent 507ae91711
commit 40fcf6b7a9
3 changed files with 20 additions and 2 deletions
+13 -1
View File
@@ -1,3 +1,4 @@
"** 14-148-165.pdf page 1
" ttt1.s " ttt1.s
t = 0 t = 0
@@ -61,6 +62,7 @@ unwind:
jmp 1b jmp 1b
t = t+1 t = t+1
"** 14-148-165.pdf page 2
move: 0 move: 0
lac dspflg lac dspflg
sza sza
@@ -121,6 +123,7 @@ lphit:
tad sbufp tad sbufp
dac 9f+t dac 9f+t
lac noblink lac noblink
"** 14-148-165.pdf page 3
dac blk1 i dac blk1 i
dac blk2 i dac blk2 i
dac 9f+t i dac 9f+t i
@@ -182,6 +185,7 @@ must: 0
jmp 2f jmp 2f
-4 -4
tad 8 tad 8
"** 14-148-165.pdf page 4
dac 9 dac 9
cla cla
xct 9 i xct 9 i
@@ -243,6 +247,7 @@ done:
1: 1:
lac 9 i lac 9 i
cma cma
"** 14-148-165.pdf page 5
tad boardp tad boardp
cma cma
alss 4 alss 4
@@ -304,6 +309,7 @@ mark: 0
lac 9f+t lac 9f+t
and o2 and o2
tad o60 tad o60
"** 14-148-165.pdf page 6
dac 0f+2 dac 0f+2
jms messg; 0:0;0;0;0 jms messg; 0:0;0;0;0
jmp mark i jmp mark i
@@ -365,6 +371,7 @@ try: 0
isz maxin isz maxin
jmp 1f jmp 1f
-1 -1
"** 14-148-165.pdf page 7
dac maxin dac maxin
isz try isz try
jmp try i jmp try i
@@ -426,6 +433,7 @@ try: 0
dac 9f+t+2 i dac 9f+t+2 i
lac o1000 lac o1000
dac 9f+t+1 i dac 9f+t+1 i
"** 14-148-165.pdf page 8
jms try; jmp prnt jms try; jmp prnt
dzm 9f+t+1 i dzm 9f+t+1 i
dzm 9f+t+2 i dzm 9f+t+2 i
@@ -487,6 +495,7 @@ t = t+5
heur: 0 heur: 0
jms addpri jms addpri
"** 14-148-165.pdf page 9
-2 -2
tad force tad force
dac lforce dac lforce
@@ -548,6 +557,7 @@ heur: 0
jmp heiur i jmp heiur i
4: 4:
lac 9f+t+1 lac 9f+t+1
"** 14-148-165.pdf page 10
jsm mark; 1 jsm mark; 1
jmp heur i jmp heur i
t = t+2 t = t+2
@@ -609,6 +619,7 @@ pstrat:
jmp 3b i jmp 3b i
1: 1:
isz 3b isz 3b
"** 14-148-165.pdf page 11
lacq lacq
tad 3b i tad 3b i
lmq lmq
@@ -669,8 +680,9 @@ dsboard: 0
isz 9f+t+2 isz 9f+t+2
isz 9f+t isz 9f+t
jmp 8b jmp 8b
"** 14-148-165.pdf page 12
-1 -1
dac 11i dac 11 i
lac blinkpar lac blinkpar
dac blk1 i dac blk1 i
dac blk2 i dac blk2 i
+6 -1
View File
@@ -1,3 +1,4 @@
"** 14-148-165.pdf page 13
" ttt2 " ttt2
boardp: board boardp: board
@@ -59,7 +60,8 @@ tb = tad board-1
tb+14; tb+30; tb+46; tb+62 tb+14; tb+30; tb+46; tb+62
tb+15; tb+27; tb+39; tb+51 tb+15; tb+27; tb+39; tb+51
tb+53; tb+54; tb+55; tb+56 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+28; tb+40; tb+52
tb+16; tb+27; tb+38; tb+49 tb+16; tb+27; tb+38; tb+49
tb+16; tb+31; tb+46; tb+61 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+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 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+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 tb+33; tb+34; tb+35; tb+36; tb+49; tb+50; tb+51; tb+52
@@ -182,6 +185,7 @@ oh:
vy 040 v vy 040 v
vx m 0140 vx m 0140
vy 0 v vy 0 v
"** 14-148-165.pdf page 16
vx m 040 vx m 040
vy m 040 v vy m 040 v
dnop dnop
@@ -243,6 +247,7 @@ sbuf: .=.+1050
board: .=.+64 board: .=.+64
maxin: .=.+1 maxin: .=.+1
force: .=.+1 force: .=.+1
"** 14-148-165.pdf page 17
pri: .=.+1 pri: .=.+1
lpri: .=.+1 lpri: .=.+1
lforce: .=.+1 lforce: .=.+1
+1
View File
@@ -1,3 +1,4 @@
"** 14-148-165.pdf page 18
" un " un
sys open; n.out; 0 sys open; n.out; 0