DataMuseum.dk

Presents historical artifacts from the history of:

CR80 Hard and Floppy Disks

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about CR80 Hard and Floppy Disks

Excavated with: AutoArchaeologist - Free & Open Source Software. 

top - metrics - download

⟦5f8dc1773⟧ TextFile

    Length: 1004 (0x3ec)
    Types: TextFile
    Names: »MSD110.S«

Derivation

└─⟦b5acf5c79⟧ Bits:30005104 8" CR80 Floppy CR80FD_0063 ( VOL: SCC.V MSS Directory: MS2.D )
    └─⟦f918199fd⟧ 
        └─⟦this⟧ »MS2.D!MSD110.S«

TextFile

MESSAGE <:MSD110.S V810218:>
;-----------------------------------------------------------------------
; SUBROUTINE MSD110
; CONVERT PROG/BASE REL FN.
;
; REGISTERS          CALL               EXIT
; R4                 LINK               -
; R5                 PREF(FILENAME)     DEST
; R6                 BREF(FILENAME)     DEST
; R0,R1              -                  DEST
; R2,R3,R7                              NOT USED
;
; INPUT:   PREF
; OUTPUT:  BREF
; EXIT TO: LINK+0    (OK)
;-----------------------------------------------------------------------
MSD110:                             ; CONVERT PROG/BASE REL FN:
        MOVC  8                 R0  ;   SETUP TO MOVE 8 WORDS
MSD112:                             ; MOVE FIRST(NEXT) WORD:
        MVP          X5         R1  ;   GET WORD
        MOV          R1         X6  ;   COPY WORD
        INCD         R5         R6  ;   STEPUP INDICES
        SOB          R0  MSD112     ;   LOOPBACK TILL DONE
        JMP              0.     X4  ;R  RETURN -