And here it is, annotated. You can also look at tapes with my disassembler, included in the regular distribution, which is more informative than an octal dump.
* BIN loader that is typically loaded by an initial RIM: (digital-1-3-s-mb_ddt.bin)
*
* 7751: 730002 rpb read tape
* 7752: 327760 dio 7760 will be a 'dio startaddr' or a 'jmp progstart', deposit to 7760
* 7753: 107760 xct 7760 execute what we just read; if a jmp, we're done otherwise it's meaningless
* 7754: 327776 dio 7776 initialize checksum
* 7755: 730002 rpb read tape
* 7756: 327777 dio 7777 deposit to 7777, will be 'dio endaddr + 1'
* 7757: 730002 rpb read tape, top of loading loop
* 7760: 60aaaa dio cur_addr put word in current pc location
* 7761: 217760 lac i 7760 add the word we stored to the checksum
* 7762: 407776 add 7776 add to checksum
* 7763: 247776 dac 7776 update checksum
* 7764: 447760 idx 7760 7760++, makes the dio point to the next adress to store in
* 7765: 527777 sas 7777 skip if AC == 'dio endaddr + 1'
* 7766: 607757 jmp 7757 not done, loop
* 7767: 207776 lac 7776 add 'dio endaddr + 1' to checksum
* 7770: 407777 add 7777 the computed checksum is is now in the AC
* 7771: 730002 rpb read tape, is checksum from tape
* 7772: 327776 dio 7776 deposit to 7776
* 7773: 527776 sas 7776 skip if AC == 7776
* 7774: 760400 hlt bad checksum
* 7775: 607751 jmp 7751 ready for another block or a jmp, back to top
* 7776: checksum
* 7777: 32aaaa dio endaddr + 1
*
Bill