|
DataMuseum.dkPresents historical artifacts from the history of: RegneCentralen RC3600/RC7000 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about RegneCentralen RC3600/RC7000 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 2560 (0xa00) Types: TextFile Names: »REA22«
└─⟦954fa3634⟧ Bits:30001792 SG0012 Floppy └─⟦this⟧
.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»