mirror of
https://github.com/DoctorWkt/pdp7-unix.git
synced 2026-01-25 11:47:35 +00:00
Merge pull request #86 from sebras/tttun
fix typos and add pagination comments to ttt{1,2}.s and un.s
This commit is contained in:
commit
5b7bbc314b
14
scans/ttt1.s
14
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
|
||||
|
||||
@ -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
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
"** 14-148-165.pdf page 18
|
||||
" un
|
||||
|
||||
sys open; n.out; 0
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user