DataMuseum.dk

Presents historical artifacts from the history of:

RegneCentralen RC850

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

See our Wiki for more about RegneCentralen RC850

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - metrics - download

⟦932c7baab⟧ TextFile

    Length: 1024 (0x400)
    Types: TextFile
    Names: »MENU.CMD«

Derivation

└─⟦8808ef982⟧ Bits:30005860 DBase II 2.4 & QUICKCODE
    └─⟦this⟧ »MENU.CMD« 

TextFile

* menu.cmd
store ' ' to valg
store t to altid
do while altid
erase
text
                 D I S K E T T E - M E N U
                ---------------------------



                1.  SALGS-ORDRE-STYRING

                2.  SIKKERHEDSKOPIERING

                3.  FILE OVERFØRSEL TIL RC8000










ENDTEXT
ACCEPT 'Tast menu-valg : ' to valg
if valg='1'
   quit to 'b:vips b:sa','a:dbase'
endif
if valg='2'
   erase
   ? 'gør klar til back-up'
endif
if valg='3'
   erase
   ? 'Klar til fil-transport '
endif
? '**** beklager menu-valget findes ikke pt.'
accept 'Tast return' to valg
loop
enddo

«eof»