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

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

└─⟦48e849709⟧ Bits:30005353 TTY program version: 1/4-82
    └─⟦this⟧ »KODE.K«

PROGRAM KODE;
 
(* BR-04.12.84 *)
 
PROCEDURE KODENR; EXTERNAL;
 
BEGIN
  CLEARSCREEN;
  WRITELN('KODENR');
  KODENR;
END.