|
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 - metrics - download
Length: 1024 (0x400)
Types: TextFile, VAL
Names: »TEST_WDR_TO_UIR.VAL«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─⟦this⟧ »TEST_WDR_TO_UIR.VAL«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─⟦this⟧ »TEST_WDR_TO_UIR.VAL«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─⟦this⟧ »TEST_WDR_TO_UIR.VAL«
10 ; --------------------------------------------------------------------------------------
10 ; Hash 43af039e45fa873d (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 2c .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0 ; P11OF0 WDR_TO_UIR_PASSED
; P11OF1 SECOND_PATTERN
12 R2_:
12 27 .DATA 0x27
13 R3_:
13 27 .DATA 0x27
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 3c .CODE 0x3c
19 00 .DATA 0x0
1a 00 .DATA 0x0
1b 00 .DATA 0x0
1c 00 .DATA 0x0
1d 00 .DATA 0x0
1e 00 .DATA 0x0
1f 00 .DATA 0x0
20 00 .DATA 0x0
21 00 .DATA 0x0
22 00 .DATA 0x0
23 0f .DATA 0xf
24 c0 .DATA 0xc0
25 07 .DATA 0x7
26 fe .DATA 0xfe
27 ff .DATA 0xff ; P27OS5 BAD_BITS
28 f0 .DATA 0xf0
29 3f .DATA 0x3f
2a f8 .DATA 0xf8
2b 01 .DATA 0x1
2c EXPERIMENT:
2c d8 FSM2
2d 18 CALL 0x3c
2e 66 SET PX
2f b0 45 22 27 VMOV [0x5],0x22,0x27
33 ae 85 22 VINV [0x5],0x22
36 ae 89 19 VINV [0x9],0x19
39 18 CALL 0x3c
3a 64 SET PT
3b 5c END
3c ; --------------------------------------------------------------------------------------
3c ; Subroutine
3c ; --------------------------------------------------------------------------------------
3c da 30 19 38 CHN_SND 0x19,{TV.WDR:38}
40 da 41 3b CHN_SND @R2,{V.UIR:3b}
43 08 REPEAT #0x08
44 bc 3e FSM {3e}
46 16 UNTIL
47 da 43 3c CHN_RCV {V.UIR:3c},@R3
4a b0 c5 22 27 VXOR [0x5],0x22,0x27
4e ae 25 27 3b VJMP NZ,[0x5],0x27,0x3b
52 2c RET
P11OF0 WDR_TO_UIR_PASSED\r P11OF1 SECOND_PATTERN\r P27OS5 BAD_BITS\r \r 2C\r 00\r 27\r 27\r 00\r 00\r 00\r 00\r \r 3C\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 0F\r C0\r 07\r FE\r FF\r F0\r 3F\r F8\r 01\r D8\r 18\r 66\r B0\r 45\r 22\r 27\r AE\r 85\r 22\r AE\r 89\r 19\r 18\r 64\r 5C\r DA\r 30\r 19\r 38\r DA\r 41\r 3B\r 08\r BC\r 3E\r 16\r DA\r 43\r 3C\r B0\r C5\r 22\r 27\r AE\r 25\r 27\r 3B\r 2C\r «nul»