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

⟦f959372b0⟧ TextFile

    Length: 1032 (0x408)
    Types: TextFile
    Names: »MSD200.S«

Derivation

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

TextFile

MESSAGE <:MSD200.S V810218:>
;-----------------------------------------------------------------------
; SUBROUTINE MSD200
; SIMULATE MSC SETUP.
;
; REGISTERS          CALL               EXIT
; R0                 CONV.TYPE (0-5)    UNCH
; R1                 CONV. SERIAL NMB   UNCH
; R2                 P/Q SWITCH         UNCH
; R3                 -                  SCCID ('P' OR 'Q')
; R4                 LINK               -
; R5,R6,R7                              NOT USED
;
; INPUT:   -
; OUTPUT:  CONVTP,SERNO,SCCID
; EXIT TO: LINK+0    (OK)
;-----------------------------------------------------------------------
MSD200:                             ; SIMULATE MSC SETUP:
        MOVC  <:P:>             R3  ;   SCCID=DEFAULT P
        INE          R2  0          ;   IF SWITCH SET
        MOVC  <:Q:>             R3  ;   THEN SELECT Q
        MOV          R0  CONVTP     ;   INIT PROCEDURE PARAMETERS
        MOV          R1  SERNO      ;
        MOV          R3  SCCID      ;
        JMP              0.     X4  ;R  RETURN