From 6e410e9d9f656f2198ebd3b6332dabff30be67f0 Mon Sep 17 00:00:00 2001 From: Sebastian Rasmussen Date: Fri, 1 Nov 2019 02:35:43 +0100 Subject: [PATCH 1/2] Add page comments to dmabs.s --- scans/dmabs.s | 7 ++++++- src/cmd/dmabs.s | 5 +++++ 2 files changed, 11 insertions(+), 1 deletion(-) diff --git a/scans/dmabs.s b/scans/dmabs.s index fce7825..f788149 100644 --- a/scans/dmabs.s +++ b/scans/dmabs.s @@ -1,3 +1,4 @@ +"** 07-13-19.pdf page 23 " dmabs lac o17 @@ -60,6 +61,7 @@ dump2: dump3: -1 tad bufp +"** 07-13-19.pdf page 24 dac 8 -64 dac c1 @@ -121,6 +123,7 @@ dump4: done: lac tracmd jms put +"** 07-13-19.pdf page 25 cla jms put lac oldsum @@ -182,6 +185,7 @@ boot: 2: jms get1-boot+org dac cmd-boot+org +"** 07-13-19.pdf page 26 jms get1-boot+org cma dac cnt-boot+org @@ -243,6 +247,7 @@ punout: ;;;040040 o17: 017 fi: 0 +"** 07-13-19.pdf page 27 fo: 0 count: 0 oldsum: 0 @@ -253,4 +258,4 @@ initcmd: dac 0 c1: 0 buf: -iot = 0700000 \ No newline at end of file +iot = 0700000 diff --git a/src/cmd/dmabs.s b/src/cmd/dmabs.s index 7621f33..6da1dd8 100644 --- a/src/cmd/dmabs.s +++ b/src/cmd/dmabs.s @@ -1,3 +1,4 @@ +"** 07-13-19.pdf page 23 " dmabs " takes a list of files on command line and punches out each @@ -74,6 +75,7 @@ dump2: " (label not used) dump3: " block loop -1 " reset i8 to buffer tad bufp +"** 07-13-19.pdf page 24 dac 8 -64 " get count dac c1 @@ -135,6 +137,7 @@ dump4: " end of block done: " here at end of input file lac tracmd " get transfer command (jmp) jms put " write to tape +"** 07-13-19.pdf page 25 cla " write a zero word jms put lac oldsum " get checksum @@ -196,6 +199,7 @@ boot: 2: jms get1-boot+org " get command word from tape dac cmd-boot+org +"** 07-13-19.pdf page 26 jms get1-boot+org " get count from tape cma dac cnt-boot+org " store complemented (incremented below) @@ -257,6 +261,7 @@ punout: ;;;040040 o17: 017 fi: 0 +"** 07-13-19.pdf page 27 fo: 0 count: 0 oldsum: 0 From 8876fcf79b38425324ea1a213028a3a481a1b2b5 Mon Sep 17 00:00:00 2001 From: Sebastian Rasmussen Date: Fri, 1 Nov 2019 02:37:37 +0100 Subject: [PATCH 2/2] Fix typo in dmabs.s after manual review. --- scans/dmabs.s | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/scans/dmabs.s b/scans/dmabs.s index f788149..a030ed4 100644 --- a/scans/dmabs.s +++ b/scans/dmabs.s @@ -235,7 +235,7 @@ mes: comand: 0 tracmd: 0 d1: 1 -.17777: 017777 +o17777: 017777 o77: 077 o200: 0200 o300: 0300