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

⟦704fce552⟧ TextFile

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

Derivation

└─⟦71b125bce⟧ Bits:30004621 CREATE og ISFHEAD kildekode
    └─⟦this⟧ »ISFHEAD.K« 
└─⟦eb89399bc⟧ Bits:30008990 SOM ISFORIG, MEN KUN K-FILER
    └─⟦this⟧ »ISFHEAD.K« 

CONST  LÆS  = 0;
       SKRIV= 1;
TYPE  ISF = FILE OF ARRAY (1..232) OF INTEGER;
      AR  = ARRAY (0..0) OF INTEGER;
      ISFHEAD = RECORD
               NBUC,NBLK,NREC,
               BLKPRBUC,RECPRBUC,RECPRBLK,
               KEYFLDS,
               FLHSIZE,BUTSIZE,BLTSIZE,BLKSIZE,RECSIZE,KEYSIZE,
               SEGINFLH,SEGINBUT,SEGINBUC,SEGINBLT,SEGINBLK,
               INITREC,BUCINUSE,BLKINUSE,RECINUSE,
               BUCINZONE,BLKINZONE,BLKENTRY,
               UPSTAT,IRPRBUC,IRPRBLK,
               BUT,BLT,BLK,KEY1,KEY2,ENTRYSIZE         :INTEGER;
               FILEINIT,FILEOPEN,BUTCHG,BLTCHG,BLKCHG  :BOOLEAN;
               KEYPOS,KEYLNG,KEYSGN : ARRAY (1..9) OF INTEGER;
               Z:AR
            END;

0x000…012 Line {l1=0x10, l2=»CONST  LÆS  = 0;«, l3=0x10}
0x012…024 Line {l1=0x10, l2=»       SKRIV= 1;«, l3=0x10}
0x024…054 Line {l1=0x2e, l2=»TYPE  ISF = FILE OF ARRAY (1..232) OF INTEGER;«, l3=0x2e}
0x054…07a Line {l1=0x24, l2=»      AR  = ARRAY (0..0) OF INTEGER;«, l3=0x24}
0x07a…092 Line {l1=0x16, l2=»      ISFHEAD = RECORD«, l3=0x16}
0x092…0b2 Line {l1=0x1e, l2=»               NBUC,NBLK,NREC,«, l3=0x1e}
0x0b2…0de Line {l1=0x2a, l2=»               BLKPRBUC,RECPRBUC,RECPRBLK,«, l3=0x2a}
0x0de…0f7 Line {l1=0x17, l2=»               KEYFLDS,«, l3=0x17}
0x0f7…138 Line {l1=0x3f, l2=»               FLHSIZE,BUTSIZE,BLTSIZE,BLKSIZE,RECSIZE,KEYSIZE,«, l3=0x3f}
0x138…176 Line {l1=0x3c, l2=»               SEGINFLH,SEGINBUT,SEGINBUC,SEGINBLT,SEGINBLK,«, l3=0x3c}
0x176…1aa Line {l1=0x32, l2=»               INITREC,BUCINUSE,BLKINUSE,RECINUSE,«, l3=0x32}
0x1aa…1d8 Line {l1=0x2c, l2=»               BUCINZONE,BLKINZONE,BLKENTRY,«, l3=0x2c}
0x1d8…200 Line {l1=0x26, l2=»               UPSTAT,IRPRBUC,IRPRBLK,«, l3=0x26}
0x200…242 Line {l1=0x40, l2=»               BUT,BLT,BLK,KEY1,KEY2,ENTRYSIZE         :INTEGER;«, l3=0x40}
0x242…284 Line {l1=0x40, l2=»               FILEINIT,FILEOPEN,BUTCHG,BLTCHG,BLKCHG  :BOOLEAN;«, l3=0x40}
0x284…2c4 Line {l1=0x3e, l2=»               KEYPOS,KEYLNG,KEYSGN : ARRAY (1..9) OF INTEGER;«, l3=0x3e}
0x2c4…2d9 Line {l1=0x13, l2=»               Z:AR«, l3=0x13}
0x2d9…2eb Line {l1=0x10, l2=»            END;«, l3=0x10}
0x2eb…300 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00                                    ┆                     ┆
0x300…320 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   ┆                                ┆
          […0xe…]

Reduced view