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.

Full view