|
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: »SIMPLE_WCS_ADDRESS_FRU.SEQ«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─ ⟦this⟧ »SIMPLE_WCS_ADDRESS_FRU.SEQ«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─ ⟦this⟧ »SIMPLE_WCS_ADDRESS_FRU.SEQ«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─ ⟦this⟧ »SIMPLE_WCS_ADDRESS_FRU.SEQ«
10 ; --------------------------------------------------------------------------------------
10 ; Hash bb186329960fe724 (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 26 .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 62 .CODE 0x62
19 62 .CODE 0x62
1a 5b .CODE 0x5b
1b 0f .DATA 0xf
1c ff .DATA 0xff ; P1COS2 ZERO_ADDRESS
1d ff .DATA 0xff
1e 00 .DATA 0x0 ; P1EOS2 FAILURE_ADDRESS
1f 00 .DATA 0x0
20 ff .DATA 0xff ; P20OS6 BAD_BITS
21 ff .DATA 0xff
22 ff .DATA 0xff
23 ff .DATA 0xff
24 ff .DATA 0xff
25 ff .DATA 0xff
26 EXPERIMENT:
26 18 CALL 0x62
27 bc 50 FSM {50}
29 af 82 VINV [0x2],R3
2b 19 CALL 0x62
2c 70 1e LD R2,0x1e
2e b1 c2 VXOR [0x2],R2,R3
30 af 82 VINV [0x2],R3
32 0f REPEAT #0x0f
33 1a CALL 0x5b
34 bc 38 FSM {38}
36 da ad 32 44 CHN_TST Z,{S.UIR:32},0x44
3a 52 1e 1c 5a JMP.W NE,0x1e,0x1c,0x5a
3e bc 38 FSM {38}
40 da ab 32 5a CHN_TST ????,{S.UIR:32},0x5a
44 a7 02 LEFT.0 #0x1,R3,[0x2]
46 b7 02 1e 0f ODDPAR #0x02,0x1e,#0xf
4a 16 UNTIL
4b 70 1c LD R2,0x1c
4d 18 CALL 0x62
4e a6 02 1c LEFT.0 #0x1,0x1c,[0x2]
51 b7 02 1c 0f ODDPAR #0x02,0x1c,#0xf
55 19 CALL 0x62
56 54 1b 2c DJNZ 0x1b,0x2c
59 66 SET PX
5a 5c END
5b ; --------------------------------------------------------------------------------------
5b ; Subroutine
5b ; --------------------------------------------------------------------------------------
5b bf 59 WP1_FSM R2,{59}
5d 74 INC R2
5e bf 58 WP1_FSM R2,{58}
60 78 DEC R2
61 2c RET
62 ; --------------------------------------------------------------------------------------
62 ; Subroutine
62 ; --------------------------------------------------------------------------------------
62 1a CALL 0x5b
63 08 REPEAT #0x08
64 c4 ff' 41 WFSM.L #0xff,{41} ; P65OS1 LAST_WRITE
67 16 UNTIL
68 8a 65 INV 0x65
6a bc 48 FSM {48}
6c 2c RET
P11OF1 WALK_WCS_PASSED P1EOS2 FAILURE_ADDRESS P1COS2 ZERO_ADDRESS P65OS1 LAST_WRITE P20OS6 BAD_BITS 26 00 1E 1E 00 00 00 00 62 62 5B 0F FF FF 00 00 FF FF FF FF FF FF 18 BC 50 AF 82 19 70 1E B1 C2 AF 82 0F 1A BC 38 DA AD 32 44 52 1E 1C 5A BC 38 DA AB 32 5A A7 02 B7 02 1E 0F 16 70 1C 18 A6 02 1C B7 02 1C 0F 19 54 1B 2C 66 5C BF 59 74 BF 58 78 2C 1A 08 C4 FF 41 16 8A 65 BC 48 2C«nul»