|
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: 395 (0x18b)
Types: SEQ, TextFile
Names: »DEC_ADDR_1_FRU.SEQ«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─ ⟦this⟧ »DEC_ADDR_1_FRU.SEQ«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─ ⟦this⟧ »DEC_ADDR_1_FRU.SEQ«
10 ; --------------------------------------------------------------------------------------
10 ; Hash ea333fe115f21f20 (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 6a .CODE 0x6a
19 6a .CODE 0x6a
1a 61 .CODE 0x61
1b 0b .DATA 0xb
1c fc .DATA 0xfc ; P1COS2 ZERO_ADDRESS
1d 00 .DATA 0x0
1e fc .DATA 0xfc ; 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 0x6a
26 bc 51 FSM {51}
28 19 CALL 0x6a
29 70 1e LD R2,0x1e
2b b1 c2 VXOR [0x2],R2,R3
2d 0b REPEAT #0x0b
2e 9b fc 1e OR #0xfc,0x1e
31 1a CALL 0x61
32 c4 ff 42 WFSM.L #0xff,{42}
35 bc 3b FSM {3b}
37 da bd 34 43 CHN_TST Z,{S.DECODER:34},0x43
3b 52 1e 1c 5c JMP.W NE,0x1e,0x1c,0x5c
3f da bf 34 5c CHN_TST ????,{S.DECODER:34},0x5c
43 a7 02 LEFT.0 #0x1,R3,[0x2]
45 b6 02 1e 0f EVNPAR #0x02,0x1e,#0xf
49 16 UNTIL
4a 70 1c LD R2,0x1c
4c 18 CALL 0x6a
4d a6 02 1c LEFT.0 #0x1,0x1c,[0x2]
50 9b fc 1c OR #0xfc,0x1c
53 b7 02 1c 0f ODDPAR #0x02,0x1c,#0xf
57 19 CALL 0x6a
58 54 1b 29 DJNZ 0x1b,0x29
5b 66 SET PX
5c da b2 20 34 CHN_RCV {S.DECODER:34},0x20
60 5c END
61 ; --------------------------------------------------------------------------------------
61 ; Subroutine
61 ; --------------------------------------------------------------------------------------
61 bf 59 WP1_FSM R2,{59}
63 74 INC R2
64 bf 58 WP1_FSM R2,{58}
66 78 DEC R2
67 bc 63 FSM {63}
69 2c RET
6a ; --------------------------------------------------------------------------------------
6a ; Subroutine
6a ; --------------------------------------------------------------------------------------
6a 1a CALL 0x61
6b 9b 20 23 OR #0x20,0x23
6e da b0 20 42 CHN_SND 0x20,{S.DECODER:42}
72 ae 85 20 VINV [0x5],0x20
75 bc 49 FSM {49}
77 2c RET
P11OF1 WALK_WCS_PASSED P1EOS2 FAILURE_ADDRESS P1COS2 ZERO_ADDRESS P20OS5 BAD_BITS 25 00 1E 1E 00 00 00 00 6A 6A 61 0B FC 00 FC 00 FF FF FF FF FF 18 BC 51 19 70 1E B1 C2 0B 9B FC 1E 1A C4 FF 42 BC 3B DA BD 34 43 52 1E 1C 5C DA BF 34 5C A7 02 B6 02 1E 0F 16 70 1C 18 A6 02 1C 9B FC 1C B7 02 1C 0F 19 54 1B 29 66 DA B2 20 34 5C BF 59 74 BF 58 78 BC 63 2C 1A 9B 20 23 DA B0 20 42 AE 85 20 BC 49 2C