DataMuseum.dk

Presents historical artifacts from the history of:

RegneCentralen RC3600/RC7000

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

See our Wiki for more about RegneCentralen RC3600/RC7000

Excavated with: AutoArchaeologist - Free & Open Source Software.

top - metrics - download

⟦7a5da91f0⟧ TextFile

    Length: 427 (0x1ab)
    Types: TextFile
    Notes: @.LAGTRM, ASS2::@.LAGTRM
    Names: »@.LAGTRM«

Derivation

└─⟦714f3848e⟧ Bits:30006597 ALM Copy 24.9.79
    └─⟦this⟧ »ASS2::@.LAGTRM«

TextFile

«ff»
  0012 REM PL 11.12.79 TRMINALOMRÅDE-UDKRIFT TIL @.LAGSPC  «so»@.LAGTRM
  0360 LET D$=" "; Y=X MOD 256; X=X DIV 256
  0370 IF ADR MOD 5=0 THEN LET D$=CHR(34+ADR MOD 10)
  0380 LET D$=D$,CHR(32+(X DIV 100)*14-(X DIV 200)*2),CHR(48+X MOD 100 DIV 10),CHR(48+X MOD 10)
  0390 LET D$=D$,CHR(32+(Y DIV 100)*14-(Y DIV 200)*2),CHR(48+Y MOD 100 DIV 10),CHR(48+Y MOD 10)
  0395 LET D$=D$,"     "
  0400 GOTO 0630
  0410 IF X THEN