|
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: FIU, TextFile
Names: »TEST_LFREG_VI.FIU«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─ ⟦this⟧ »TEST_LFREG_VI.FIU«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─ ⟦this⟧ »TEST_LFREG_VI.FIU«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─ ⟦this⟧ »TEST_LFREG_VI.FIU«
10 ; --------------------------------------------------------------------------------------
10 ; Hash 74d1ebb1e2ed3ab5 (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 32 .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0 ; P11OF0 PASS_LFRV_TEST
; P11OF1 EXPECT_FILL_SET
12 R2_:
12 24 .DATA 0x24
13 R3_:
13 2a .DATA 0x2a
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 72 .CODE 0x72
19 00 .DATA 0x0
1a 00 .DATA 0x0
1b 00 .DATA 0x0
1c 00 .DATA 0x0
1d 40 .DATA 0x40 ; P1DOS1 EXPECTED_LENGTH
1e 00 .DATA 0x0
1f 40 .DATA 0x40
20 43 .DATA 0x43
21 ce .DATA 0xce
22 7c .DATA 0x7c
23 03 .DATA 0x3
24 00 .DATA 0x0
25 3f .DATA 0x3f
26 03 .DATA 0x3
27 ce .DATA 0xce
28 7c .DATA 0x7c
29 03 .DATA 0x3
2a 00 .DATA 0x0
2b 00 .DATA 0x0
2c 00 .DATA 0x0
2d 00 .DATA 0x0
2e 00 .DATA 0x0
2f 00 .DATA 0x0 ; P2FOS1 BAD_BITS
30 00 .DATA 0x0
31 00 .DATA 0x0
32 EXPERIMENT:
32 64 SET PT
33 da 60 19 18 CHN_SND 0x19,{F.MAR:18}
37 da 81 13 CHN_SND @R2,{F.UIR:13}
3a bc 48 FSM {48}
3c bc 3f FSM {3f}
3e da 73 11 CHN_RCV {F.MDREG:11},@R3
41 af 88 VINV [0x8],R3
43 a6 02 2f LEFT.0 #0x1,0x2f,[0x2]
46 97 3f 2f AND #0x3f,0x2f
49 03 REPEAT #0x03
4a a6 01 2e LEFT.0 #0x1,0x2e,[0x1]
4d 16 UNTIL
4e 97 40 2e AND #0x40,0x2e
51 20 CALL PX,0x72
52 b0 a1 2e 2f VOR [0x1],0x2e,0x2f
56 86 1d DEC 0x1d
58 b0 c1 1d 2f VXOR [0x1],0x1d,0x2f
5c 46 2f 70 JMP NZ,0x2f,0x70
5f 46 1d 33 JMP NZ,0x1d,0x33
62 3a 71 JMP PX,0x71
64 66 SET PX
65 8f 3f 1d MOV #0x3f,0x1d
68 da 80 1e 13 CHN_SND 0x1e,{F.UIR:13}
6c bc 48 FSM {48}
6e 36 33 JMP 0x33
70 68 CLR PT
71 5c END
72 ; --------------------------------------------------------------------------------------
72 ; Subroutine
72 ; --------------------------------------------------------------------------------------
72 9f 40 2e XOR #0x40,0x2e
75 2c RET
P11OF0 PASS_LFRV_TEST P11OF1 EXPECT_FILL_SET P1DOS1 EXPECTED_LENGTH P2FOS1 BAD_BITS 32 00 24 2A 00 00 00 00 72 00 00 00 00 40 00 40 43 CE 7C 03 00 3F 03 CE 7C 03 00 00 00 00 00 00 00 00 64 DA 60 19 18 DA 81 13 BC 48 BC 3F DA 73 11 AF 88 A6 02 2F 97 3F 2F 03 A6 01 2E 16 97 40 2E 20 B0 A1 2E 2F 86 1D B0 C1 1D 2F 46 2F 70 46 1D 33 3A 71 66 8F 3F 1D DA 80 1E 13 BC 48 36 33 68 5C 9F 40 2E 2C«nul»