|
DataMuseum.dkPresents historical artifacts from the history of: MIKADOS |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about MIKADOS Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 2528 (0x9e0)
Types: TextFile
Notes: Mikados_K
Names: »ISFHEAD1.K«
└─⟦5630b2e42⟧ Bits:30009005 START APRIL 1985 aft april 1985 (PASCAL kildetekster)
└─⟦this⟧ »ISFHEAD1.K«
└─⟦6c21327e0⟧ Bits:30008986 LINIMATIC K-FILER (IKKE HELT UPTODTATE)
└─⟦this⟧ »ISFHEAD1.K«
ISF =FILE OF ARRAY (1..232) OF INTEGER;
ACCMODE =(LUKKET,LÆS,SKRIV,XCLUSIV,XXCLUSIV);
FILNAVN =STRING(18);
ISFHEAD =RECORD
A:AR;
NBUC,NBLK,NREC,
BLKPRBUC,RECPRBUC,RECPRBLK,
KEYFLDS,
AZSIZE,BUTSIZE,BLTSIZE,BLKSIZE,RECSIZE,KEYSIZE,
SEGINFLH,SEGINBUT,SEGINBUC,SEGINBLT,SEGINBLK,
INITREC,BUCINUSE,BLKINUSE,RECINUSE,
BUCINZONE,BLKINZONE,BLKENTRY,
IRPRBUC,IRPRBLK,
BUT,BLT,BLK,KEY1,KEY2,ENTRYSIZE :INTEGER;
FILEINIT,FILEOPEN,BUTCHG,BLTCHG,BLKCHG :BOOLEAN;
KEYPOS,KEYLNG,KEYSGN : ARRAY (1..9) OF INTEGER;
FILENAME:FILNAVN;
KEYS:ARRAY (KEYADR) OF INTEGER
(*SKAL FYLDE ET HELT ANTAL ISF'S*)
END;
0x000…02d Line {l1=0x2b, l2=»ISF =FILE OF ARRAY (1..232) OF INTEGER;«, l3=0x2b}
0x02d…05c Line {l1=0x2d, l2=»ACCMODE =(LUKKET,LÆS,SKRIV,XCLUSIV,XXCLUSIV);«, l3=0x2d}
0x05c…072 Line {l1=0x14, l2=»FILNAVN =STRING(18);«, l3=0x14}
0x072…083 Line {l1=0x0f, l2=»ISFHEAD =RECORD«, l3=0x0f}
0x083…095 Line {l1=0x10, l2=» A:AR;«, l3=0x10}
0x095…0b1 Line {l1=0x1a, l2=» NBUC,NBLK,NREC,«, l3=0x1a}
0x0b1…0d9 Line {l1=0x26, l2=» BLKPRBUC,RECPRBUC,RECPRBLK,«, l3=0x26}
0x0d9…0ee Line {l1=0x13, l2=» KEYFLDS,«, l3=0x13}
0x0ee…12a Line {l1=0x3a, l2=» AZSIZE,BUTSIZE,BLTSIZE,BLKSIZE,RECSIZE,KEYSIZE,«, l3=0x3a}
0x12a…164 Line {l1=0x38, l2=» SEGINFLH,SEGINBUT,SEGINBUC,SEGINBLT,SEGINBLK,«, l3=0x38}
0x164…194 Line {l1=0x2e, l2=» INITREC,BUCINUSE,BLKINUSE,RECINUSE,«, l3=0x2e}
0x194…1be Line {l1=0x28, l2=» BUCINZONE,BLKINZONE,BLKENTRY,«, l3=0x28}
0x1be…1db Line {l1=0x1b, l2=» IRPRBUC,IRPRBLK,«, l3=0x1b}
0x1db…219 Line {l1=0x3c, l2=» BUT,BLT,BLK,KEY1,KEY2,ENTRYSIZE :INTEGER;«, l3=0x3c}
0x219…257 Line {l1=0x3c, l2=» FILEINIT,FILEOPEN,BUTCHG,BLTCHG,BLKCHG :BOOLEAN;«, l3=0x3c}
0x257…293 Line {l1=0x3a, l2=» KEYPOS,KEYLNG,KEYSGN : ARRAY (1..9) OF INTEGER;«, l3=0x3a}
0x293…2b1 Line {l1=0x1c, l2=» FILENAME:FILNAVN;«, l3=0x1c}
0x2b1…2dc Line {l1=0x29, l2=» KEYS:ARRAY (KEYADR) OF INTEGER«, l3=0x29}
0x2dc…30b Line {l1=0x2d, l2=» (*SKAL FYLDE ET HELT ANTAL ISF'S*)«, l3=0x2d}
0x30b…31a Line {l1=0x0d, l2=» END;«, l3=0x0d}
0x31a…320 00 00 63 63 63 63 ┆ cccc┆
0x320…340 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 63 ┆cccccccccccccccccccccccccccccccc┆
[…0x35…]