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

⟦754ef80a2⟧ TextFile

    Length: 480 (0x1e0)
    Types: TextFile
    Notes: Mikados_K
    Names: »START.K«

Derivation

└─⟦a3d38fea3⟧ Bits:30008985 PRODUKTION NBT.
    └─⟦this⟧ »START.K«

Mikados K File

PROGRAM START;
VAR QUQ:^INTEGER;
BEGIN
  CHAIN('L       *1','HOVED:P2,0',QUQ);
  IF IORESULT<>0 THEN WRITELN('IORESULT ',IORESULT)
END.

Mikados K File

0x000…010 Line {l1=0x0e, l2=»PROGRAM START;«, l3=0x0e}
0x010…023 Line {l1=0x11, l2=»VAR QUQ:^INTEGER;«, l3=0x11}
0x023…02a Line {l1=0x05, l2=»BEGIN«, l3=0x05}
0x02a…053 Line {l1=0x27, l2=»  CHAIN('L       *1','HOVED:P2,0',QUQ);«, l3=0x27}
0x053…088 Line {l1=0x33, l2=»  IF IORESULT<>0 THEN WRITELN('IORESULT ',IORESULT)«, l3=0x33}
0x088…08e Line {l1=0x04, l2=»END.«, l3=0x04}
0x08e…0a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00                                             ┆                  ┆
0x0a0…0c0 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   ┆                                ┆
          […0x1…]
0x0e0…100 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┆
          […0x6…]
0x1c0…1e0 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 00   ┆ccccccccccccccccccccccccccccccc ┆

Reduced view