Add page comments to dmabs.s
This commit is contained in:
+6
-1
@@ -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
|
||||||
|
|||||||
@@ -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
|
||||||
|
|||||||
Reference in New Issue
Block a user