DataMuseum.dk

Presents historical artifacts from the history of:

CR80 Hard and Floppy Disks

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about CR80 Hard and Floppy Disks

Excavated with: AutoArchaeologist - Free & Open Source Software.

top - download

⟦402354cd2⟧ TextFile

    Length: 298 (0x12a)
    Types: TextFile
    Names: »TEST«

Derivation

└─⟦881c1028e⟧ Bits:30005102 8" CR80 Floppy CR80FD_0061 ( VOL: SCC.V NSC Directory: Queue_test.D )
    └─⟦4f56469eb⟧ 
        └─ ⟦this⟧ »QUEUE_TEST.D!TEST«

TextFile

MAINMODULE TEST;
%LIST
%LIST
BEGIN

  WHILE R2-1 >= 0 DO
    BEGIN
      R3 => R5;
    END;
  WHILE R3-1 >= 0 DO
      R3 => R6;

  WHILE R2-1 >= 0 DO
    BEGIN
      R3 => R5;
    END;
  "END WHILE";
 WHILE R3-1 >= 0 DO
   R3 => R5;

 WHILE R4-1 >= 0 DO
  R3 => R5;
 "END WHILE";

END;
ENDMODULE «stx»