Programming instructions

BLOCK FORMAT LOADER
The block format loader will read a block format binary tape of the following
format:
dac A
A is the address of the first data word
-N
/complement of number of data words in block
N data words /data words
Check sum /sum of every word in block, except check sum
The routine occupies register 7737 to 7761, and uses the read-in loader
subroutine to read each binary word. Upon completing a block, the com-
puted check sum is compared with the read check sum and the loader
halts if these differ. The block may be re-read by pulling the tape back to
the beginning of the block and pressing the CONTINUE switch on the
console.
LOCATION
MNEMONIC
77371
rsb
a,
jms r
dac s
xct s
dac cks
jms r
dac out
b,
add cks
dac cks
jms r
isz out
Mp s
sad cks
b-m a
hlt
jmpa- 1
S,
xx
isz s
b-w b
cks = 7777
REMARKS
/block format loader
/toop
/check count, last word read is check sum
/sum checks, continue
/stop on check sum error
/out
66