Add page comments to dmabs.s

This commit is contained in:
Sebastian Rasmussen
2019-11-01 03:17:44 +01:00
parent 73dd17d3c6
commit 6e410e9d9f
2 changed files with 11 additions and 1 deletions
+6 -1
View File
@@ -1,3 +1,4 @@
"** 07-13-19.pdf page 23
" dmabs " dmabs
lac o17 lac o17
@@ -60,6 +61,7 @@ dump2:
dump3: dump3:
-1 -1
tad bufp tad bufp
"** 07-13-19.pdf page 24
dac 8 dac 8
-64 -64
dac c1 dac c1
@@ -121,6 +123,7 @@ dump4:
done: done:
lac tracmd lac tracmd
jms put jms put
"** 07-13-19.pdf page 25
cla cla
jms put jms put
lac oldsum lac oldsum
@@ -182,6 +185,7 @@ boot:
2: 2:
jms get1-boot+org jms get1-boot+org
dac cmd-boot+org dac cmd-boot+org
"** 07-13-19.pdf page 26
jms get1-boot+org jms get1-boot+org
cma cma
dac cnt-boot+org dac cnt-boot+org
@@ -243,6 +247,7 @@ punout: <pp>;<to>;<ut>;040040
o17: 017 o17: 017
fi: 0 fi: 0
"** 07-13-19.pdf page 27
fo: 0 fo: 0
count: 0 count: 0
oldsum: 0 oldsum: 0
@@ -253,4 +258,4 @@ initcmd: dac 0
c1: 0 c1: 0
buf: buf:
iot = 0700000 iot = 0700000
+5
View File
@@ -1,3 +1,4 @@
"** 07-13-19.pdf page 23
" dmabs " dmabs
" takes a list of files on command line and punches out each " takes a list of files on command line and punches out each
@@ -74,6 +75,7 @@ dump2: " (label not used)
dump3: " block loop dump3: " block loop
-1 " reset i8 to buffer -1 " reset i8 to buffer
tad bufp tad bufp
"** 07-13-19.pdf page 24
dac 8 dac 8
-64 " get count -64 " get count
dac c1 dac c1
@@ -135,6 +137,7 @@ dump4: " end of block
done: " here at end of input file done: " here at end of input file
lac tracmd " get transfer command (jmp) lac tracmd " get transfer command (jmp)
jms put " write to tape jms put " write to tape
"** 07-13-19.pdf page 25
cla " write a zero word cla " write a zero word
jms put jms put
lac oldsum " get checksum lac oldsum " get checksum
@@ -196,6 +199,7 @@ boot:
2: 2:
jms get1-boot+org " get command word from tape jms get1-boot+org " get command word from tape
dac cmd-boot+org dac cmd-boot+org
"** 07-13-19.pdf page 26
jms get1-boot+org " get count from tape jms get1-boot+org " get count from tape
cma cma
dac cnt-boot+org " store complemented (incremented below) dac cnt-boot+org " store complemented (incremented below)
@@ -257,6 +261,7 @@ punout: <pp>;<to>;<ut>;040040
o17: 017 o17: 017
fi: 0 fi: 0
"** 07-13-19.pdf page 27
fo: 0 fo: 0
count: 0 count: 0
oldsum: 0 oldsum: 0