|
DataMuseum.dkPresents historical artifacts from the history of: RC4000/8000/9000 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about RC4000/8000/9000 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 1536 (0x600)
Types: TextFile
Names: »radiodriftd «
└─⟦110021343⟧ Bits:30007476 RC8000 Backup tape fra HT's bus-radio system
└─⟦a957ba283⟧
└─ ⟦this⟧ »radiodriftd «
c2=assign c ;lookup nytabelfil ;if ok.yes ;(gltabelfil=move tabelfil ;scope project gltabelfil ;flyttabel fra.nytabelfil til.tabelfil filnr.1033 ;flyttabel fra.tabelfil til.nytabelfil, ; filnr.1025.1026.1027.1028.1029.1030.1031.1032.1033.1034.1035.1036.1037.1038 ;tabelfil=move nytabelfil ;scope temp nytabelfil ;clear temp nytabelfil) mode 10.yes ok.yes backup fil.driftlog inc.60 backup fil.radiolog inc.60 backup fil.billede inc.30 driftlog=set 1 radiolog=set 1 disc1 billede=set 1 disc1 scope project driftlog radiolog billede (o radiotestud driftlog=oo buskom1 testbit.22.27 if warning.yes mode 10.no if ok.no skip 64.1) skip 64.2 @ oo o c2 driftlog=changeentry driftlog driftlog d.0.0 radiolog=changeentry radiolog radiolog d.0.0 spoolfilx=move spoolfil spoolfilx=changeentry spoolfilx spoolfilx billede scope project spoolfilx backup fil.driftlog inc.60 backup fil.radiolog inc.60 backup fil.billede inc.30 backup fil.spoolfilx inc.10 ;if 10.no ;replace dummyradio end skip 64.1 @ oo o c2 driftlog=changeentry driftlog driftlog d.0.0 radiolog=changeentry radiolog radiolog d.0.0 spoolfilx=move spoolfil spoolfilx=changeentry spoolfilx spoolfilx billede scope project spoolfilx backup fil.driftlog inc.60 backup fil.radiolog inc.60 backup fil.billede inc.30 backup fil.spoolfilx inc.10 end ▶EOF◀