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

⟦935212f4a⟧ TextFile

    Length: 374 (0x176)
    Types: TextFile
    Notes: NULSTIL , OPDATER::NULSTIL
    Names: »NULSTIL«

Derivation

└─⟦bb49f20ac⟧ Bits:30007876 (DELPROCEDURER DISKETTE 80.28.06 Områder: OPDATER, FORSØM, BREV ELEVRET, KLLISTE, FOR.LIST)
    └─⟦this⟧ »OPDATER::NULSTIL«

TextFile

«ff»
  5540 REM -----------------------------------------------------------------------
  5550 PROC NULSTIL
  5560   FOR I=1 TO LEN(KLKODE$)-2 STEP 4
  5570     CONNECT KLKODE$(I+2,I+3),1
  5580     OPEN FILE(1,0)"NUMERISK"
  5590     FOR J=1 TO 30
  5600       WRITE FILE(1,J)0,0,0,0
  5610     NEXT J
  5620     CLOSE FILE(1)
  5630   NEXT I
  5640 ENDPROC NULSTIL