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

⟦8c332a155⟧ TextFile

    Length: 1664 (0x680)
    Types: TextFile
    Names: »BRLIST.MEN«

Derivation

└─⟦ac5a365ea⟧ Bits:30005990 VISTA med database skema over brugere
    └─⟦this⟧ »BRLIST.MEN« 

TextFile

 ▶ee◀▶a0◀ ▶e1◀▶a0◀▶a0◀▶a0◀ ▶e1◀▶7f◀3▶a0◀ ▶ee◀▶a0◀▶a0◀ ▶ee◀▶a0◀▶a0◀ ▶ee◀▶a0◀▶a0◀ ▶ee◀▶a0◀▶a0◀ ▶ee◀▶a0◀▶a0◀ ▶ee◀▶a0◀▶a0◀ ▶ee◀▶a0◀▶a0◀   ▶e1◀▶7f◀%▶a0◀▶7f◀. 
▶7f◀p 
▶7f◀p 
▶7f◀p 
▶7f◀p 
▶7f◀p 
▶7f◀p 
▶7f◀p 
▶7f◀p 
▶7f◀p 
▶7f◀p 
▶7f◀p 
▶7f◀p 
▶7f◀p 
▶7f◀p 
▶7f◀p 
▶7f◀p 
▶7f◀p 
▶7f◀p 
▶7f◀p 
▶7f◀p 
▶7f◀p 
▶7f◀p 
'21's=201,              .gem antal forekomster i listen
'9's'              B R U G E R E :',    .udskriv tekst på printer
'3's'10r1',             .linieskift
'9's'-----------------------------',
'3's'10r2',             .linieskift
'9's'AFD INIT NAVN                 ØS  PRO S/O RES PLS ANLÆGSNR:',
'3'S'10R1',
'6's                    .rewind pointer i listen-start=1
'0'=202,                .nulstil linie-tæller
!,                      .start loop
201-'1'=+,              .hvis ikke negativt, så
   '1,4,5,74,75,76,77,78,79,26,27,28'c=1=3=2=4=5=6=7=8=9=10=11=12,
   '23's,               .udskriv skærmbilled på printer
    d,                  .flyt pointer til næste dokument
   201-'1'=201,         .tæl 1 ned
   '1'+202=202,         .tæller for printet linie
   '60'-202=-,          .hvis antal printede linier > 40, så
        '3's'12r1',     .form feed
        '0'=202,        .nulstil linie-tæller
 '9's'              B R U G E R E :',    .udskriv tekst på printer
 '3's'10r1',             .linieskift
 '9's'-----------------------------',
 '3's'10r2',             .linieskift
 '9's'AFD INIT NAVN                 ØS  PRO S/O RES PLS ANLÆGSNR:',
 '3'S'10R1',
   ;,                   .endif
   <,                   .gå til start loop
;,                      .endif
'3's'12r2',             .form feed
'-8'=>                  .hop ud til vista-menu









Ø
«eof»