DataMuseum.dk Presents historical artifacts from the history of: CP/M

This is an automatic "excavation" of a thematic subset of artifacts from Datamuseum.dk's BitArchive. See our Wiki for more about CP/M Excavated with: AutoArchaeologist - Free & Open Source Software.

top - download

⟦c77059532⟧

    Length: 256 (0x100)
    Names: »DISCO.CML«

Derivation

└─⟦960f61816⟧ Bits:30004222 Processstyring til ICL Comet
    └─ ⟦this⟧ »DISCO.CML« 

Hex Dump

0x000…020 31 30 30 30 20 45 58 45 43 20 53 54 41 52 54 0d 31 30 31 30 20 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f   ┆1000 EXEC START 1010 ///////////┆
0x020…040 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 0d 31 30 32 30 20 2f 2f 2f 2f 2f 20 44 49   ┆////////////////// 1020 ///// DI┆
0x040…060 53 43 4f 20 2d 20 4c 59 53 20 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 0d 31 30 33 30 20 52 41 4e 44 4f   ┆SCO - LYS /////////// 1030 RANDO┆
0x060…080 4d 20 0d 31 30 34 30 20 46 4f 52 20 49 47 45 4e 3a 3d 31 20 54 4f 20 31 30 30 20 44 4f 20 0d 31   ┆M  1040 FOR IGEN:=1 TO 100 DO  1┆
0x080…0a0 30 35 30 20 20 20 46 41 52 56 45 3a 3d 52 4e 44 28 31 2c 36 29 0d 31 30 36 30 20 20 20 45 58 45   ┆050   FARVE:=RND(1,6) 1060   EXE┆
0x0a0…0c0 43 20 53 45 54 28 46 41 52 56 45 29 0d 31 30 37 30 20 20 20 45 58 45 43 20 56 45 4e 54 28 30 2e   ┆C SET(FARVE) 1070   EXEC VENT(0.┆
0x0c0…0e0 31 29 0d 31 30 38 30 20 20 20 45 58 45 43 20 52 45 53 45 54 28 46 41 52 56 45 29 0d 31 30 39 30   ┆1) 1080   EXEC RESET(FARVE) 1090┆
0x0e0…100 20 4e 45 58 54 20 49 47 45 4e 0d 31 31 30 30 20 45 4e 44 20 0d 4f 20 31 30 30 20 44 4f 20 0d 75   ┆ NEXT IGEN 1100 END  O 100 DO  u┆