|
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: 5120 (0x1400) Types: TextFile Names: »REA05«
└─⟦033e255c7⟧ Bits:30001790 SG0010 Floppy └─⟦this⟧ └─⟦8ae3926ab⟧ Bits:30001789 SG0009 Floppy └─⟦this⟧ └─⟦954fa3634⟧ Bits:30001792 SG0012 Floppy └─⟦this⟧
.TITL UR .NREL .RDXO 10 .RDX 10 .TXTM 1 .TXTN 1 PGDS: 1B0+1B5+1B15 LAB00 0 PCDS-PGDS .TXT 'UR<0><0><0>' LAB00: 32 T29: 29 DEAD: LDA 2,CUR STOPP JMP .-2 TXTIM: .+1 .TXT 'TIME<0><0>' STRAD:0 OTXT: STA 0,OT0 STA 1,OT1 STA 2,OT2 STA 3,OT3 STA 0,OT4 OT5: LDA 1,OT4 GETBY MOV 0,0,SNR JMP OT6 JSR OCHAR ISZ OT4 JMP OT5 OT6: LDA 0,OT0 LDA 1,OT1 LDA 2,OT2 LDA 3,OT3 JMP +0,3 OT0:0 OT1:0 OT2:0 OT3:0 OT4:0 CNT:0 TALUD: LDA 2,TABE ADD 1,2 LDA 2,+0,2 STA 3,GEM STA 0,YKO STA 2,TX LDA 0,.6 JSR OCHAR LDA 0,.7 STA 0,CNT LOP: LDA 0,YKO JSR OCHAR LDA 0,TX JSR OTXT LDA 2,TX LDA 1,T14 ADD 1,2 STA 2,TX DSZ CNT JMP LOP JMP @ GEM GEM:0 YKO:0 TX:0 T14: 14 TABE: .+1 TAL0*2 TAL1*2 TAL2*2 TAL3*2 TAL4*2 TAL5*2 TAL6*2 TAL7*2 TAL8*2 TAL9*2 INTX: .+1*2 .TXT '<12><6><71><11>##<6><71><13>##<0>' REF:0 BIRTH: LDA 1,PROCE LDA 2,TXTIM SEARCH MOV # 2,2,SNR JMP DEAD STA 2,STRAD DSZ STRAD LDA 0,INTX JSR OTXT LOOP: LDA 0,T29 JSR OCHAR LDA 2,.32 SUB 1,1 WAITI LDA @ 1,STRAD INC 1,1 INC 1,1 MOVZL 1,1 GETBY LDA 1,REF SNE 1,0 JMP LOOP STA 0,REF LDA @ 1,STRAD MOVZL 1,1 GETBY LDA 1,.48 SUB 1,0 MOV 0,1 LDA 0,TH10 JSR TALUD LDA @ 1,STRAD MOVZL 1,1 INC 1,1 GETBY LDA 1,.48 SUB 1,0 MOV 0,1 LDA 0,TH1 JSR TALUD LDA @ 1,STRAD INC 1,1 MOVZL 1,1 INC 1,1 GETBY LDA 1,.48 SUB 1,0 MOV 0,1 LDA 0,TM10 JSR TALUD LDA @ 1,STRAD INC 1,1 INC 1,1 MOVZL 1,1 GETBY LDA 1,.48 SUB 1,0 MOV 0,1 LDA 0,TM1 JSR TALUD JMP LOOP TH10: 104 TH1: 120 TM10: 78 TM1: 94 OCHAR: STA 3,OCHA0 STA 2,OC2 STA 1,OC1 STA 0,OC0 LDA 1,.255 ANDS 1,0 LDA 1,.128 ADD 1,0 STA 0,MES1 RETRY: LDA 1,BUFF LDA 2,TXAMX SENDM MOVZL # 2,2,SZC JMP RETRY WAITA MOV 0,0,SZR JMP RETRY LDA 2,OC2 LDA 1,OC1 LDA 0,OC0 JMP @ OCHA0 TXAMX: .+1 .TXT 'AMX<0><0><0>' OC0:0 OC1:0 OC2:0 OCHA0: 0 BUFF: .+1 9*256+7 1 .+2*2 0 MES1: 128 TAL0: .TXT '<9>##########<6><0>' .TXT '<10>## ##<6><0>' .TXT '<11>## ##<6><0>' .TXT '<12>## ##<6><0>' .TXT '<13>## ##<6><0>' .TXT '<14>## ##<6><0>' .TXT '<15>##########<0>' TAL1: .TXT '<9> ##<6><0>' .TXT '<10> ##<6><0>' .TXT '<11> ##<6><0>' .TXT '<12> ##<6><0>' .TXT '<13> ##<6><0>' .TXT '<14> ##<6><0>' .TXT '<15> ##<0>' TAL2: .TXT '<9>##########<6><0>' .TXT '<10> ##<6><0>' .TXT '<11> ##<6><0>' .TXT '<12>##########<6><0>' .TXT '<13>## <6><0>' .TXT '<14>## <6><0>' .TXT '<15>##########<0>' TAL3: .TXT '<9>##########<6><0>' .TXT '<10> ##<6><0>' .TXT '<11> ##<6><0>' .TXT '<12>##########<6><0>' .TXT '<13> ##<6><0>' .TXT '<14> ##<6><0>' .TXT '<15>##########<0>' TAL4: .TXT '<9>## ##<6><0>' .TXT '<10>## ##<6><0>' .TXT '<11>## ##<6><0>' .TXT '<12>##########<6><0>' .TXT '<13> ##<6><0>' .TXT '<14> ##<6><0>' .TXT '<15> ##<0>' TAL5: .TXT '<9>##########<6><0>' .TXT '<10>## <6><0>' .TXT '<11>## <6><0>' .TXT '<12>##########<6><0>' .TXT '<13> ##<6><0>' .TXT '<14> ##<6><0>' .TXT '<15>##########<0>' TAL6: .TXT '<9>##########<6><0>' .TXT '<10>## <6><0>' .TXT '<11>## <6><0>' .TXT '<12>##########<6><0>' .TXT '<13>## ##<6><0>' .TXT '<14>## ##<6><0>' .TXT '<15>##########<0>' TAL7: .TXT '<9>##########<6><0>' .TXT '<10> ##<6><0>' .TXT '<11> ##<6><0>' .TXT '<12> ##<6><0>' .TXT '<13> ##<6><0>' .TXT '<14> ##<6><0>' .TXT '<15> ##<0>' TAL8: .TXT '<9>##########<6><0>' .TXT '<10>## ##<6><0>' .TXT '<11>## ##<6><0>' .TXT '<12>##########<6><0>' .TXT '<13>## ##<6><0>' .TXT '<14>## ##<6><0>' .TXT '<15>##########<0>' TAL9: .TXT '<9>##########<6><0>' .TXT '<10>## ##<6><0>' .TXT '<11>## ##<6><0>' .TXT '<12>##########<6><0>' .TXT '<13> ##<6><0>' .TXT '<14> ##<6><0>' .TXT '<15> ##<0>' 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 'UR<0><0><0>' .+0 .-1 BUFF1 PGDS 0 0 1 DEAD 0 0 0 0 BIRTH*2 .END PCDS «ff» «nul»