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 - download

⟦caa03c260⟧ TextFile

    Length: 2560 (0xa00)
    Types: TextFile
    Names: »REA22«

Derivation

└─⟦954fa3634⟧ Bits:30001792 SG0012 Floppy
    └─ ⟦this⟧ »/REA22«

TextFile

         .TITL   RELPT 
         .NREL 
         .RDXO   10 
         .RDX    10 
         .TXTM   1 
         .TXTN   1 
PGDS:    1B0+1B5+1B15 
         LAB00 
         0 
         PCDS-PGDS 
         .TXT    'RELPT' 
LAB00: 
LPZON:   .TXT      'AMX<0><0>'
         Z 
         0 
         1 
         65535 
         TOTE 
         1 
         1 
         0 
         LPS0 
         83 
         0 
         0 
         LPB0*2 
         LPB0*2 
         LPS0 
         152 
         0 
         .BLK    ZAUX 
LPS0:    0 
         0 
         0 
         0 
         LPS0 
         0 
         LPB0*2 
LPB0:    .BLK    76 
LPZO1:   LPZON 
TOTE:    LDA     2,CUR 
         RETUR 
         JMP     DEAD 
BIRTH:   LDA     2,LPZO1 
         LDA     0,INITF 
         OPEN 
         LDA     2,CUR 
DEAD:    SUB     1,1 
         MOVZL   0,0,SNC 
         STA     1,RESER,2 
L11:     NEXTO 
         SETRE 
         JMP     L15 
L12:     LDA     1,ADDRE,2 
         GETBY 
         MOV     0,1 
         LDA     2,LPZO1 
         LDA     0,.10 
         SEQ     0,1 
         JMP     UD 
         OUTCH 
         LDA     1,.13 
         OUTCH 
         LDA     1,.128 
         OUTEN 
         JMP     .+2 
UD:      OUTCH 
         LDA     2,CUR 
         ISZ     ADDRE,2 
         DSZ     COUNT,2 
         JMP     L12 
L13:     LDA     1,.128 
         LDA     2,LPZO1 
         OUTEN 
         LDA     2,CUR 
         SUB     0,0 
         RETUR 
         JMP     L11 
L15:     SETCO 
         JMP     L13 
INITF:   15*256+7 
BUFF1:   .+0 
         .-1 
         BUFF2 
         10 
         PCDS 
         0 
         0 
         0 
         0 
         0 
BUFF2:   .+0 
         .-1 
         0 
         10 
         PCDS 
         0 
         0 
         0 
         0 
         0 
PCDS:    .+0 
         .-1 
         0 
         0 
         .TXT    'LPT<0><0>' 
         .+0 
         .-1 
         BUFF1 
         PGDS 
         0 
         0 
         16 
         DEAD 
         0 
         0 
         0 
         0 
         BIRTH*2 
         0 
         0 
         0 
         0 
         0 
         0 
         0 
         0 
         .END    PCDS 
«ff»
«nul»