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

⟦9431114ee⟧ TextFile

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

Derivation

└─⟦6b1c9961a⟧ Bits:30008989 INDPERM P1
    └─⟦this⟧ »ISFHEAD.K« 
└─⟦a3d38fea3⟧ Bits:30008985 PRODUKTION NBT.
    └─⟦this⟧ »ISFHEAD.K«

Mikados K File

CONST  LÆS  = 0;
       SKRIV= 1;
TYPE  ISF = FILE OF ARRAY (1..232) OF INTEGER;
      AR  = ARRAY (-4..-4) OF INTEGER;
      FILNAVN=PACKED ARRAY (1..8) OF CHAR;
      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;
               FILENAME:FILNAVN
            END;

Mikados K File

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…07c Line {l1=0x26, l2=»      AR  = ARRAY (-4..-4) OF INTEGER;«, l3=0x26}
0x07c…0a8 Line {l1=0x2a, l2=»      FILNAVN=PACKED ARRAY (1..8) OF CHAR;«, l3=0x2a}
0x0a8…0c0 Line {l1=0x16, l2=»      ISFHEAD = RECORD«, l3=0x16}
0x0c0…0e0 Line {l1=0x1e, l2=»               NBUC,NBLK,NREC,«, l3=0x1e}
0x0e0…10c Line {l1=0x2a, l2=»               BLKPRBUC,RECPRBUC,RECPRBLK,«, l3=0x2a}
0x10c…125 Line {l1=0x17, l2=»               KEYFLDS,«, l3=0x17}
0x125…166 Line {l1=0x3f, l2=»               FLHSIZE,BUTSIZE,BLTSIZE,BLKSIZE,RECSIZE,KEYSIZE,«, l3=0x3f}
0x166…1a4 Line {l1=0x3c, l2=»               SEGINFLH,SEGINBUT,SEGINBUC,SEGINBLT,SEGINBLK,«, l3=0x3c}
0x1a4…1d8 Line {l1=0x32, l2=»               INITREC,BUCINUSE,BLKINUSE,RECINUSE,«, l3=0x32}
0x1d8…206 Line {l1=0x2c, l2=»               BUCINZONE,BLKINZONE,BLKENTRY,«, l3=0x2c}
0x206…22e Line {l1=0x26, l2=»               UPSTAT,IRPRBUC,IRPRBLK,«, l3=0x26}
0x22e…270 Line {l1=0x40, l2=»               BUT,BLT,BLK,KEY1,KEY2,ENTRYSIZE         :INTEGER;«, l3=0x40}
0x270…2b2 Line {l1=0x40, l2=»               FILEINIT,FILEOPEN,BUTCHG,BLTCHG,BLKCHG  :BOOLEAN;«, l3=0x40}
0x2b2…2f2 Line {l1=0x3e, l2=»               KEYPOS,KEYLNG,KEYSGN : ARRAY (1..9) OF INTEGER;«, l3=0x3e}
0x2f2…308 Line {l1=0x14, l2=»               Z:AR;«, l3=0x14}
0x308…329 Line {l1=0x1f, l2=»               FILENAME:FILNAVN«, l3=0x1f}
0x329…33b Line {l1=0x10, l2=»            END;«, l3=0x10}
0x33b…340 00 00 00 00 00                                                                                    ┆     ┆
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   ┆                                ┆
          […0xc…]

Reduced view