|
|
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 - metrics - download
Length: 2186 (0x88a)
Types: TextFile
Names: »MSBAS2.S«
└─⟦93791531c⟧ Bits:30005105 8" CR80 Floppy CR80FD_0064 ( VOL:SCC.V MSS Directory: MS1.D )
└─⟦185cc4db7⟧
└─⟦this⟧ »MS1.D!MSBAS2.S«
MESSAGE <:MSBAS2.S V810325:>
;-----------------------------------------------------------------------
XLOC= LOC ;BEGIN VARIABLES 2
; BINARY HEADER GENERATION RELATED:
ACTIME: LOC=LOC+2 ; ACCEPTANCE TIME (SECONDS SINCE 1980)
AIDREF: LOC=LOC+1 ; MSG-ID REFERENCE
AADREF: LOC=LOC+1 ; ADDRESS LIST REFERENCE
AMSGRF: LOC=LOC+1 ; SIGNAL HEADER LENGTH
AMSGLT: LOC=LOC+1 ; MESSAGE LENGTH
AROUM: LOC=LOC+2 ; ROUTING MASK
; BINARY HEADER DECODING RELATED:
IIDREF: LOC=LOC+1 ; MSG-ID REFERENCE
IADREF: LOC=LOC+1 ; ADDRESS LIST REFERENCE
IMSGRF: LOC=LOC+1 ; SIGNAL HEADER LENGTH
; MESSAGE PRECEDENCE RELATED:
APRECE: LOC=LOC+1 ; MESSAGE PRECEDENCE
PRCCNT: LOC=LOC+1 ; DOWN COUNTER FOR FL2 DETECTION
PRCWND: LOC=LOC+1 ; WINDOW FOR FL2 DETECTION
; MESSAGE ROUTING INDICATOR RELATED:
RICHR1: LOC=LOC+1 ; 1ST SIGNIFICANT RI CHARACTER (4TH CHAR)
RICHR2: LOC=LOC+1 ; 2ND SIGNIFICANT RI CHARACTER (5TH CHAR)
ANO: LOC=LOC+1 ; FIKS ANO
; MESSAGE CLASSIFICATION RELATED:
ASECUR: LOC=LOC+1 ; MESSAGE SECURITY
SECCNT: LOC=LOC+1 ; UP COUNTER FOR FL4 DETECTION
SCCHR1: LOC=LOC+1 ; 1ST CHARACTER OF SEQUENCE IN FL4 DETECTION
SECCHR: LOC=LOC+1 ; DETECTED SEQUENCE CHARACTER IN FL4
; MISC OTHER ACP127 DETECTION RELATED:
SPUCNT: LOC=LOC+1 ; UP COUNTER FOR SPURIOUS PROCESSING
FORMLN: LOC=LOC+1 ; CURRENT FORMAT LINE (WHERE APPLICABLE)
; STATE EVENT RELATED:
STATE: LOC=LOC+1 ; CURRENT STATE SERIAL NUMBER
GROUP: LOC=LOC+1 ; CURRENT GROUP DESIGNATOR (0,4,8,12)
; MISCELLANEOUS:
WK1000: LOC=LOC+1 ; IO PROCEDURE WORK AREA
WK4000: LOC=LOC+1 ; WRITEINTEGER WORK AREA
WK5000: LOC=LOC+1 ; COPY WORK AREA
INPID: LOC=LOC+4 ; SOURCE MSG-ID (INTERNAL CONVERSION)
STACK: LOC=LOC+7 ; REGISTER STACK
; END DATA LAYOUT
YLOC= LOC-XLOC ; CALCULATE VARIABLES LENGTH
LOC= XLOC ;
0,REPEAT (YLOC-1) ; FILL SPACE WITH ZEROES
;END VARIABLES 2