|
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: 491 (0x1eb)
Types: TextFile, VAL
Names: »TEST_FIU_BUS.VAL«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─⟦this⟧ »TEST_FIU_BUS.VAL«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─⟦this⟧ »TEST_FIU_BUS.VAL«
10 ; --------------------------------------------------------------------------------------
10 ; Hash b4b5374dc61fd069 (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 31 .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0 ; P11OF0 FIU_BUS_PASS
12 R2_:
12 28 .DATA 0x28
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 6a .CODE 0x6a
19 64 .CODE 0x64
1a 00 .DATA 0x0
1b 0a .DATA 0xa
1c 7f .DATA 0x7f
1d 87 .DATA 0x87
1e fc .DATA 0xfc
1f 00 .DATA 0x0 ; P1FOS8 RESULT.VAL
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 00 .DATA 0x0 ; P27OS1 RESULT.VPAR
28 ff .DATA 0xff ; P28OS8 EXPECTED.VAL
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 ; P30OS1 EXPECTED.VPAR
31 EXPERIMENT:
31 64 SET PT
32 d8 FSM2
33 da 40 1a 3b CHN_SND 0x1a,{V.UIR:3b}
37 da 31 38 CHN_SND @R2,{TV.WDR:38}
3a 18 CALL 0x6a
3b b1 29 62 VJMP NE,[0x9],R2,R3,0x62
3e ae 88 28 VINV [0x8],0x28
41 da 31 38 CHN_SND @R2,{TV.WDR:38}
44 18 CALL 0x6a
45 b1 29 62 VJMP NE,[0x9],R2,R3,0x62
48 ae 48 28 VINC [0x8],0x28
4b 19 CALL 0x64
4c da 31 38 CHN_SND @R2,{TV.WDR:38}
4f 18 CALL 0x6a
50 b1 29 62 VJMP NE,[0x9],R2,R3,0x62
53 00 3f REPEAT #0x3f
55 a6 08 28 LEFT.0 #0x1,0x28,[0x8]
58 19 CALL 0x64
59 da 31 38 CHN_SND @R2,{TV.WDR:38}
5c 18 CALL 0x6a
5d b1 29 62 VJMP NE,[0x9],R2,R3,0x62
60 16 UNTIL
61 5c END
62 68 CLR PT
63 5c END
64 ; --------------------------------------------------------------------------------------
64 ; Subroutine
64 ; --------------------------------------------------------------------------------------
64 b4 28 30 EVNPAR [0x8],0x28,0x30
67 8a 30 INV 0x30
69 2c RET
6a ; --------------------------------------------------------------------------------------
6a ; Subroutine
6a ; --------------------------------------------------------------------------------------
6a bc 25 FSM {25}
6c da 33 39 CHN_RCV {TV.WDR:39},@R3
6f 2c RET
P11OF0 FIU_BUS_PASS\r P1FOS8 RESULT.VAL\r P27OS1 RESULT.VPAR\r P28OS8 EXPECTED.VAL\r P30OS1 EXPECTED.VPAR\r \r 31\r 00\r 28\r 1F\r 00\r 00\r 00\r 00\r \r 6A\r 64\r 00\r 0A\r 7F\r 87\r FC\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r FF\r FF\r FF\r FF\r FF\r FF\r FF\r FF\r FF\r 64\r D8\r DA\r 40\r 1A\r 3B\r DA\r 31\r 38\r 18\r B1\r 29\r 62\r AE\r 88\r 28\r DA\r 31\r 38\r 18\r B1\r 29\r 62\r AE\r 48\r 28\r 19\r DA\r 31\r 38\r 18\r B1\r 29\r 62\r 00\r 3F\r A6\r 08\r 28\r 19\r DA\r 31\r 38\r 18\r B1\r 29\r 62\r 16\r 5C\r 68\r 5C\r B4\r 28\r 30\r 8A\r 30\r 2C\r BC\r 25\r DA\r 33\r 39\r 2C\r