|
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_MAR_DRIVER.FIU«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─ ⟦this⟧ »TEST_MAR_DRIVER.FIU«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─ ⟦this⟧ »TEST_MAR_DRIVER.FIU«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─ ⟦this⟧ »TEST_MAR_DRIVER.FIU«
10 ; --------------------------------------------------------------------------------------
10 ; Hash b9c4e9169c4cd77f (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 39 .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0 ; P11OF0 PASS_MDRV_TEST
12 R2_:
12 27 .DATA 0x27
13 R3_:
13 1f .DATA 0x1f
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 51 .CODE 0x51
19 40 .DATA 0x40
1a 3f .DATA 0x3f
1b c3 .DATA 0xc3
1c cf .DATA 0xcf
1d 7c .DATA 0x7c
1e 03 .DATA 0x3
1f 00 .DATA 0x0 ; P1FOS8 BAD_BITS
20 00 .DATA 0x0
21 00 .DATA 0x0
22 00 .DATA 0x0
23 00 .DATA 0x0
24 00 .DATA 0x0
25 00 .DATA 0x0
26 00 .DATA 0x0
27 ff .DATA 0xff
28 ff .DATA 0xff
29 ff .DATA 0xff
2a ff .DATA 0xff
2b ff .DATA 0xff
2c ff .DATA 0xff
2d ff .DATA 0xff
2e ff .DATA 0xff
2f ff .DATA 0xff
30 ff .DATA 0xff
31 ff .DATA 0xff
32 ff .DATA 0xff
33 ff .DATA 0xff
34 01 .DATA 0x1
35 ff .DATA 0xff
36 ff .DATA 0xff
37 ff .DATA 0xff
38 3f .DATA 0x3f
39 EXPERIMENT:
39 64 SET PT
3a da 80 19 13 CHN_SND 0x19,{F.UIR:13}
3e 18 CALL 0x51
3f ae 88 28 VINV [0x8],0x28
42 18 CALL 0x51
43 82 2f INC 0x2f
45 18 CALL 0x51
46 a6 08 28 LEFT.0 #0x1,0x28,[0x8]
49 18 CALL 0x51
4a 54 38 46 DJNZ 0x38,0x46
4d 36 50 JMP 0x50
4f 68 CLR PT
50 5c END
51 ; --------------------------------------------------------------------------------------
51 ; Subroutine
51 ; --------------------------------------------------------------------------------------
51 da 61 18 CHN_SND @R2,{F.MAR:18}
54 bc 3f FSM {3f}
56 da 73 11 CHN_RCV {F.MDREG:11},@R3
59 07 REPEAT #0x07
5a a8 04 23 SR.0 #0x1,0x23,[0x4]
5d 16 UNTIL
5e af 88 VINV [0x8],R3
60 b0 c8 28 1f VXOR [0x8],0x28,0x1f
64 b0 88 30 1f VAND [0x8],0x30,0x1f
68 ae 28 1f 4f VJMP NZ,[0x8],0x1f,0x4f
6c 2c RET
P11OF0 PASS_MDRV_TEST P1FOS8 BAD_BITS 39 00 27 1F 00 00 00 00 51 40 3F C3 CF 7C 03 00 00 00 00 00 00 00 00 FF FF FF FF FF FF FF FF FF FF FF FF FF 01 FF FF FF 3F 64 DA 80 19 13 18 AE 88 28 18 82 2F 18 A6 08 28 18 54 38 46 36 50 68 5C DA 61 18 BC 3F DA 73 11 07 A8 04 23 16 AF 88 B0 C8 28 1F B0 88 30 1F AE 28 1F 4F 2C«nul»