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

⟦497e1a08c⟧ TextFile

    Length: 768 (0x300)
    Types: TextFile
    Names: »j«

Derivation

└─⟦a41ae585a⟧ Bits:30001842 SW-save af projekt 1000, Alarm-system
    └─⟦72244f0ef⟧ 
        └─⟦this⟧ »j«

TextFile

job hj 4 200 time 11 0 area 10 size 100000
( message   nc supervisor
  source = copy 25.1
  ncsuplst = set 1 disc1
  ncsuplst = indent source mark lc
  listc = cross ncsuplst
  o errors
  message    nc supervisor
  pascal80 spacing.800 codesize.800 alarmenv source
  o c
  lookup pass6code
  if ok.yes
  ( ncsupbin = set 1 disc1
    ncsupbin = move pass6code
    scope user ncsupbin
  )
  ncsuplst = copy listc errors
  scope user ncsuplst
  convert errors
 finis
)
\f


▶EOF◀