DataMuseum.dk Presents historical artifacts from the history of: MIKADOS

This is an automatic "excavation" of a thematic subset of artifacts from Datamuseum.dk's BitArchive. See our Wiki for more about MIKADOS Excavated with: AutoArchaeologist - Free & Open Source Software.

top - download

⟦94221adef⟧ TextFile

    Length: 1248 (0x4e0)
    Types: TextFile
    Notes: Mikados_K
    Names: »ISFHEAD.K«

Derivation

└─⟦5630b2e42⟧ Bits:30009005 START APRIL 1985 aft april 1985 (PASCAL kildetekster)
    └─⟦this⟧ »ISFHEAD.K« 
└─⟦6c21327e0⟧ Bits:30008986 LINIMATIC K-FILER (IKKE HELT UPTODTATE)
    └─⟦this⟧ »ISFHEAD.K« 

TYPE
ISF     =FILE OF ARRAY (1..232) OF INTEGER;
ACCMODE =(LUKKET,LÆS,SKRIV,XCLUSIV,XXCLUSIV);
FILNAVN =PACKED ARRAY (1..8) OF CHAR;
ISFHEAD =RECORD
           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
         END;

0x000…006 Line {l1=0x04, l2=»TYPE«, l3=0x04}
0x006…033 Line {l1=0x2b, l2=»ISF     =FILE OF ARRAY (1..232) OF INTEGER;«, l3=0x2b}
0x033…062 Line {l1=0x2d, l2=»ACCMODE =(LUKKET,LÆS,SKRIV,XCLUSIV,XXCLUSIV);«, l3=0x2d}
0x062…089 Line {l1=0x25, l2=»FILNAVN =PACKED ARRAY (1..8) OF CHAR;«, l3=0x25}
0x089…09a Line {l1=0x0f, l2=»ISFHEAD =RECORD«, l3=0x0f}
0x09a…0b6 Line {l1=0x1a, l2=»           NBUC,NBLK,NREC,«, l3=0x1a}
0x0b6…0de Line {l1=0x26, l2=»           BLKPRBUC,RECPRBUC,RECPRBLK,«, l3=0x26}
0x0de…0f3 Line {l1=0x13, l2=»           KEYFLDS,«, l3=0x13}
0x0f3…12f Line {l1=0x3a, l2=»           AZSIZE,BUTSIZE,BLTSIZE,BLKSIZE,RECSIZE,KEYSIZE,«, l3=0x3a}
0x12f…169 Line {l1=0x38, l2=»           SEGINFLH,SEGINBUT,SEGINBUC,SEGINBLT,SEGINBLK,«, l3=0x38}
0x169…199 Line {l1=0x2e, l2=»           INITREC,BUCINUSE,BLKINUSE,RECINUSE,«, l3=0x2e}
0x199…1c3 Line {l1=0x28, l2=»           BUCINZONE,BLKINZONE,BLKENTRY,«, l3=0x28}
0x1c3…1e0 Line {l1=0x1b, l2=»           IRPRBUC,IRPRBLK,«, l3=0x1b}
0x1e0…21e Line {l1=0x3c, l2=»           BUT,BLT,BLK,KEY1,KEY2,ENTRYSIZE         :INTEGER;«, l3=0x3c}
0x21e…25c Line {l1=0x3c, l2=»           FILEINIT,FILEOPEN,BUTCHG,BLTCHG,BLKCHG  :BOOLEAN;«, l3=0x3c}
0x25c…298 Line {l1=0x3a, l2=»           KEYPOS,KEYLNG,KEYSGN : ARRAY (1..9) OF INTEGER;«, l3=0x3a}
0x298…2b5 Line {l1=0x1b, l2=»           FILENAME:FILNAVN«, l3=0x1b}
0x2b5…2c4 Line {l1=0x0d, l2=»         END;«, l3=0x0d}
0x2c4…2e0 00 00 00 20 45 4e 44 3b 10 00 00 2c 4b 45 59 53 47 4e 20 3a 20 41 52 52 41 59 20 28               ┆    END;   ,KEYSGN : ARRAY (┆
0x2e0…300 31 2e 2e 39 29 20 4f 46 20 49 4e 54 45 47 45 52 3b 3e 14 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆1..9) OF INTEGER;>              ┆
0x300…320 20 20 5a 3a 41 52 3b 14 1f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 46 49 4c 45 4e 41 4d 45   ┆  Z:AR;                 FILENAME┆
0x320…340 3a 46 49 4c 4e 41 56 4e 1f 10 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 10 00 00 00 00 00   ┆:FILNAVN              END;      ┆
0x340…360 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
          […0xb…]
0x4c0…4e0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 63   ┆                               c┆

Reduced view