DataMuseum.dk

Presents historical artifacts from the history of:

RC4000/8000/9000

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

See our Wiki for more about RC4000/8000/9000

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - metrics - download

⟦ff12ce73e⟧ TextFile

    Length: 19200 (0x4b00)
    Types: TextFile
    Names: »ijob«

Derivation

└─⟦621cfb9a2⟧ Bits:30002817 RC8000 Dump tape fra HCØ.  Detaljer om "HC8000" projekt.
    └─⟦0364f57e3⟧ 
        └─⟦this⟧ »ijob« 
└─⟦667bb35d6⟧ Bits:30007480 RC8000 Dump tape fra HCØ.
    └─⟦4334b4c0b⟧ 
        └─⟦this⟧ »ijob« 

TextFile

submit
#
; time.5.0
mode list.yes 
lookup rydterm
if ok.yes
o rydterm
message call m atinit.seq.time.list
lookup rydgen1
if ok.no
(rydgen1=set 200
scope day rydgen1
lkj=lookup rydgen1txt
if ok.no
extract from.cryprog rydgen1txt
rydgen1=algol rydgen1txt list.no message.no
if ok.no
finisb
)
lookup ryfmg1dat
if ok.yes
(
scope temp ryfmg1dat
clear temp ryfmg1dat
)
lookup mg1seqdat
if ok.no
contract from.crydat mg1seqdat
if ok.no
finisb
rydgen1 mg1seqdat list.no  nsmax.25.1
scope day ryfmg1dat
lookup ryfmg1dat ryfmg1dia ryfmg1dip
finisb
mode list.no
#
▶EOF◀