Trailing-Edge
-
PDP-10 Archives
-
BB-H348C-RM_1982
-
swskit-v21/debugging-tools/dmpimg.mac
There are no other files named dmpimg.mac in the archive.
TITLE DMPIMG DUMP 8 BIT BYTES
SEARCH MONSYM,MACSYM
T1=1
T2=2
T3=3
T4=4
START: RESET
TMSG <IMAGE file to dump: >
MOVX T1,<GJ%SHT+GJ%OLD+GJ%FNS>
MOVE T2,[.PRIIN,,.PRIOU]
GTJFN
HALTF
HRRZ 11,T1
MOVX T2,<^D8B5+OF%RD>
OPENF
HALTF
LOOP: MOVE T4,[-4,,0]
XLOOP: MOVE T1,11
BIN
ERJMP EOF
MOVEI T1,.PRIOU
MOVEI T3,^D8
NOUT
HALTF
MOVEI T2," "
BOUT
AOBJN T4,XLOOP
MOVEI T2,15
BOUT
MOVEI T2,12
BOUT
JRST LOOP
EOF: HALTF
END START