|
DataMuseum.dkPresents historical artifacts from the history of: CR80 Hard and Floppy Disks |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about CR80 Hard and Floppy Disks Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 1452 (0x5ac)
Types: TextFile
Names: »MSBAS3.S«
└─⟦93791531c⟧ Bits:30005105 8" CR80 Floppy CR80FD_0064 ( VOL:SCC.V MSS Directory: MS1.D )
└─⟦185cc4db7⟧
└─ ⟦this⟧ »MS1.D!MSBAS3.S«
MESSAGE <:MSBAS3.S V810303:>
;-----------------------------------------------------------------------
; BASE RECORDS AND BUFFERS DECLARATION.
;
; THE MSS BASE RECORDS AND BUFFERS ARE DECLARED HERE.
;-----------------------------------------------------------------------
USE BASE ;
XLOC= LOC ;BEGIN RECORDS AND BUFFERS:
; RECORDS:
; IO CONTROL BLOCKS (IOCB'S):
SRCIO: LOC=LOC+IOELGT ; SOURCE FILE DESCRIPTOR
OBJIO: LOC=LOC+IOELGT ; OBJECT FILE DESCRIPTOR
TEMPIO: LOC=LOC+IOELGT ; ADDRESS LIST FILE DESCRIPTOR
; BINARY HEADERS:
IBINHD: LOC=LOC+BHELGT/2 ; SOURCE BINARY HEADER
OBINHD: LOC=LOC+BHELGT/2 ; OBJECT BINARY HEADER
; BUFFERS:
; GENERAL:
TABBUF: LOC=LOC+11 ; ADDRESS TABLE LOOKUP BUFFER
; FILE NAMES:
FNFILS: LOC=LOC+8 ; FILESYSTEM NAME
FNVOL: LOC=LOC+8 ; VOLUME NAME
FNMD: LOC=LOC+8 ; MAIN DIRECTORY NAME
; IOCB BUFFERS:
SRCBUF: LOC=LOC+IOBFLT ; SRCIO ASSOCIATED BUFFER
OBJBUF: LOC=LOC+IOBFLT ; OBJIO ASSOCIATED BUFFER
TMPBUF: LOC=LOC+IOBFLT ; TEMPIO ASSOCIATED BUFFER
; END DATA LAYOUT
YLOC= LOC-XLOC ; CALCULATE DATA LENGTH
LOC= XLOC ;
0,REPEAT (YLOC-1) ; FILL SPACE WITH ZEROES
MSCNTZ= LOC-MS1STZ ; COUNT OF CLEAR LOCATIONS
;END RECORDS AND BUFFERS