|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 DFS Tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 DFS Tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 1024 (0x400)
Types: SEQ, TextFile
Names: »DEC_ADDR_2_FRU.SEQ«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─ ⟦this⟧ »DEC_ADDR_2_FRU.SEQ«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─ ⟦this⟧ »DEC_ADDR_2_FRU.SEQ«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─ ⟦this⟧ »DEC_ADDR_2_FRU.SEQ«
10 ; --------------------------------------------------------------------------------------
10 ; Hash 1f6a5b2a559e930c (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 25 .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0 ; P11OF1 WALK_WCS_PASSED
12 R2_:
12 1e .DATA 0x1e
13 R3_:
13 1e .DATA 0x1e
14 R4_:
14 00 .DATA 0x0
15 R5_:
15 00 .DATA 0x0
16 R6_:
16 00 .DATA 0x0
17 R7_:
17 00 .DATA 0x0
18 66 .CODE 0x66
19 66 .CODE 0x66
1a 5d .CODE 0x5d
1b 0b .DATA 0xb
1c 00 .DATA 0x0 ; P1COS2 ZERO_ADDRESS
1d 00 .DATA 0x0
1e 00 .DATA 0x0 ; P1EOS2 FAILURE_ADDRESS
1f 00 .DATA 0x0
20 ff .DATA 0xff ; P20OS5 BAD_BITS
21 ff .DATA 0xff
22 ff .DATA 0xff
23 ff .DATA 0xff
24 ff .DATA 0xff
25 EXPERIMENT:
25 18 CALL 0x66
26 bc 51 FSM {51}
28 70 1c LD R2,0x1c
2a 19 CALL 0x66
2b 70 1e LD R2,0x1e
2d b1 c2 VXOR [0x2],R2,R3
2f 0b REPEAT #0x0b
30 1a CALL 0x5d
31 c4 00 42 WFSM.L #0x00,{42}
34 bc 3b FSM {3b}
36 da bd 34 42 CHN_TST Z,{S.DECODER:34},0x42
3a 52 1e 1c 58 JMP.W NE,0x1e,0x1c,0x58
3e da bf 34 58 CHN_TST ????,{S.DECODER:34},0x58
42 a7 02 LEFT.0 #0x1,R3,[0x2]
44 b7 02 1e 09 ODDPAR #0x02,0x1e,#0x9
48 16 UNTIL
49 70 1c LD R2,0x1c
4b 18 CALL 0x66
4c a6 02 1c LEFT.0 #0x1,0x1c,[0x2]
4f b7 02 1c 09 ODDPAR #0x02,0x1c,#0x9
53 19 CALL 0x66
54 54 1b 2b DJNZ 0x1b,0x2b
57 66 SET PX
58 da b2 20 34 CHN_RCV {S.DECODER:34},0x20
5c 5c END
5d ; --------------------------------------------------------------------------------------
5d ; Subroutine
5d ; --------------------------------------------------------------------------------------
5d bf 59 WP1_FSM R2,{59}
5f 74 INC R2
60 bf 58 WP1_FSM R2,{58}
62 78 DEC R2
63 bc 63 FSM {63}
65 2c RET
66 ; --------------------------------------------------------------------------------------
66 ; Subroutine
66 ; --------------------------------------------------------------------------------------
66 1a CALL 0x5d
67 97 df 23 AND #0xdf,0x23
6a da b0 20 42 CHN_SND 0x20,{S.DECODER:42}
6e ae 85 20 VINV [0x5],0x20
71 bc 49 FSM {49}
73 2c RET
P11OF1 WALK_WCS_PASSED P1EOS2 FAILURE_ADDRESS P1COS2 ZERO_ADDRESS P20OS5 BAD_BITS 25 00 1E 1E 00 00 00 00 66 66 5D 0B 00 00 00 00 FF FF FF FF FF 18 BC 51 70 1C 19 70 1E B1 C2 0B 1A C4 00 42 BC 3B DA BD 34 42 52 1E 1C 58 DA BF 34 58 A7 02 B7 02 1E 09 16 70 1C 18 A6 02 1C B7 02 1C 09 19 54 1B 2B 66 DA B2 20 34 5C BF 59 74 BF 58 78 BC 63 2C 1A 97 DF 23 DA B0 20 42 AE 85 20 BC 49 2C«nul»