|
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_VI_PARITY.FIU«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─ ⟦this⟧ »TEST_VI_PARITY.FIU«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─ ⟦this⟧ »TEST_VI_PARITY.FIU«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─ ⟦this⟧ »TEST_VI_PARITY.FIU«
10 ; --------------------------------------------------------------------------------------
10 ; Hash fbbe1370e4cd010d (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 28 .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0 ; P11OF0 PASS_VI_PARITY
; P11OF1 PARITY_OK
12 R2_:
12 18 .DATA 0x18
13 R3_:
13 18 .DATA 0x18
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 48 .CODE 0x48
19 00 .DATA 0x0
1a 3f .DATA 0x3f
1b c3 .DATA 0xc3
1c 2e .DATA 0x2e
1d 7e .DATA 0x7e
1e 03 .DATA 0x3
1f 00 .DATA 0x0 ; P1FOS8 DATA
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 01 .DATA 0x1
27 00 .DATA 0x0
28 EXPERIMENT:
28 da 80 19 13 CHN_SND 0x19,{F.UIR:13}
2c 00 40 REPEAT #0x40
2e da 70 1f 10 CHN_SND 0x1f,{F.MDREG:10}
32 d2 ff 50 FSM_8X #0xff,{50}
35 bc 60 FSM {60}
37 18 CALL 0x48
38 3e 47 JMP NPX,0x47
3a d2 ff 50 FSM_8X #0xff,{50}
3d bc 61 FSM {61}
3f 18 CALL 0x48
40 3a 47 JMP PX,0x47
42 a6 08 1f LEFT.0 #0x1,0x1f,[0x8]
45 16 UNTIL
46 64 SET PT
47 5c END
48 ; --------------------------------------------------------------------------------------
48 ; Subroutine
48 ; --------------------------------------------------------------------------------------
48 d4 08 51 27 RCV_P1 #0x08,{51},0x27
4c 97 80 27 AND #0x80,0x27
4f 66 SET PX
50 46 27 54 JMP NZ,0x27,0x54
53 6a CLR PX
54 2c RET
P11OF0 PASS_VI_PARITY P11OF1 PARITY_OK P1FOS8 DATA 28 00 18 18 00 00 00 00 48 00 3F C3 2E 7E 03 00 00 00 00 00 00 00 01 00 DA 80 19 13 00 40 DA 70 1F 10 D2 FF 50 BC 60 18 3E 47 D2 FF 50 BC 61 18 3A 47 A6 08 1F 16 64 5C D4 08 51 27 97 80 27 66 46 27 54 6A 2C«nul»