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 - download

⟦4db04cb6a⟧ TextFile

    Length: 790 (0x316)
    Types: TextFile
    Names: »MS20C0.S«, »~ORPHAN_0x0037«

Derivation

└─⟦93791531c⟧ Bits:30005105 8" CR80 Floppy CR80FD_0064 ( VOL:SCC.V MSS Directory: MS1.D )
    └─⟦185cc4db7⟧ 
        └─ ⟦this⟧ »~ORPHAN_0x0037« 
└─⟦b5acf5c79⟧ Bits:30005104 8" CR80 Floppy CR80FD_0063 ( VOL: SCC.V MSS Directory: MS2.D )
    └─⟦f918199fd⟧ 
        └─ ⟦this⟧ »MS2.D!MS20C0.S«

TextFile

MESSAGE <:MS20C0.S V810311:>
;-----------------------------------------------------------------------
; SUBROUTINE MS20C0
; INITIALIZE IOCB FOR READ.
;
; REGISTERS          CALL               EXIT
; R4                 LINK               DEST
; R6                 REF(IOCB)          REF(IOCB)
; R0,R1,R2           -                  DEST
; R3,R5,R7           -                  UNCH
;
; INPUT:   IOCB DATA
; OUTPUT:  IOCB DATA
; EXIT TO: LINK+0    (DONE)
;-----------------------------------------------------------------------
MS20C0:                             ; INIT IOCB FOR READ:
        CLR   IOFNX. X6             ;   CLEAR FILE INDEX
        MOVC  1                 R0  ;
        MOV          R0  IOLINE.X6  ;   SET CURRENT LINE TO 1
        JMP              0.     X4  ;   RETURN