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

⟦12319e64e⟧ TextFile

    Length: 224 (0xe0)
    Types: TextFile
    Notes: Mikados_K
    Names: »TEST1.K«

Derivation

└─⟦1f7cb7eb5⟧ Bits:30009019 ARRAY0 + nulfiler
    └─⟦this⟧ »TEST1.K«

Mikados K File

0090 INTEGER X
0100 DIM A(100)
0110 FOR X=1 TO 11
0120 A(X)=-2
0130 PRINT A(X)
0140 NEXT X
0150 CALL "DDE:ARRAYP"
0160 FOR X=1 TO 11
0170 PRINT A(X)
0180 NEXT X
0190 STOP

Full view