mirror of
https://github.com/DoctorWkt/pdp7-unix.git
synced 2026-02-17 21:27:43 +00:00
58c2fa1ded
Comparison of st?.s and space-travel-?.s revealed where the two transcriptions differed. Typos were corrected in st?.s, and space-travel-?.s removed.
76 lines
749 B
ArmAsm
76 lines
749 B
ArmAsm
"** 12-92-119.pdf page 19
|
|
" space travel 5
|
|
|
|
dsplanet: 0
|
|
tad points
|
|
dac 9f+t
|
|
lac i 9f+t
|
|
dac i clistp
|
|
lac o246256
|
|
dac i clistp
|
|
lac o253052
|
|
dac i clistp
|
|
lac o246036
|
|
dac i clistp
|
|
jmp dsplanet i
|
|
|
|
dispname: 0
|
|
tad names
|
|
dac 9f+t
|
|
lac i 9f+t
|
|
tad dm1
|
|
dac 8
|
|
law namedsp-1
|
|
dac 9
|
|
-10
|
|
dac 9f+t
|
|
1:
|
|
lac i 8
|
|
sna
|
|
jmp 2f
|
|
dac 9f+t+1
|
|
lrss 9
|
|
dac i 9
|
|
isz 9f+t
|
|
skp
|
|
jmp i dispname
|
|
lac 9f+t+1
|
|
and o177
|
|
sna
|
|
jmp 2f
|
|
dac i 9
|
|
isz 9f+t
|
|
jmp 1b
|
|
jmp i dispname
|
|
2:
|
|
dzm i 9
|
|
isz 9f+t
|
|
jmp 2b
|
|
jmp i dispname
|
|
|
|
t = t+2
|
|
|
|
dspsca: 0
|
|
lac scale
|
|
sma
|
|
jmp 1f
|
|
lac o55 "-
|
|
dac dssca
|
|
-1
|
|
tad scale
|
|
cma
|
|
jmp 2f
|
|
1:
|
|
"** 12-92-119.pdf page 20
|
|
lac o53 "+
|
|
dac dssca
|
|
lac scale
|
|
2:
|
|
cll; idiv; 10
|
|
tad o60
|
|
dac dssca+2
|
|
lacq
|
|
tad o60
|
|
dac dssca+1
|
|
jmp i dspsca
|