Trailing-Edge
-
PDP-10 Archives
-
BB-H348C-RM_1982
-
swskit-v21/debugging-tools/dmmacy.mac
There are no other files named dmmacy.mac in the archive.
TITLE DMMACY DUMP MACY11 FORMAT FILES AS OCTAL BYTES
SEARCH MONSYM,MACSYM
T1=1
T2=2
T3=3
T4=4
START: RESET
TMSG <MACY11 file to dump: >
MOVX T1,<GJ%SHT+GJ%OLD+GJ%FNS>
MOVE T2,[.PRIIN,,.PRIOU]
GTJFN
HALTF
HRRZ 11,T1
MOVX T2,<^D36B5+OF%RD>
OPENF
HALTF
LOOP: MOVE T1,11
BIN
ERJMP EOF
LDB 5,[POINT 8,T2,17]
LDB 6,[POINT 8,T2,9]
LDB 7,[POINT 8,T2,35]
LDB 10,[POINT 8,T2,27]
MOVEI T1,.PRIOU
MOVEI T3,^D8
MOVE T2,5
NOUT
JFCL
MOVEI T2,40
BOUT
MOVE T2,6
NOUT
JFCL
MOVEI T2,40
BOUT
MOVE T2,7
NOUT
JFCL
MOVEI T2,40
BOUT
MOVE T2,10
NOUT
JFCL
MOVEI T2,15
BOUT
MOVEI T2,12
BOUT
JRST LOOP
EOF: HALTF
END START