|
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: TYP, TextFile
Names: »TEST_FIU_BUS.TYP«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─⟦this⟧ »TEST_FIU_BUS.TYP«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─⟦this⟧ »TEST_FIU_BUS.TYP«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─⟦this⟧ »TEST_FIU_BUS.TYP«
10 ; --------------------------------------------------------------------------------------
10 ; Hash 2d0e77a52aba2489 (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 32 .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0 ; P11OF0 FIU_BUS_PASS
12 R2_:
12 29 .DATA 0x29
13 R3_:
13 20 .DATA 0x20
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 6b .CODE 0x6b
19 65 .CODE 0x65
1a 00 .DATA 0x0
1b 0f .DATA 0xf
1c e0 .DATA 0xe0
1d a7 .DATA 0xa7
1e fe .DATA 0xfe
1f 0d .DATA 0xd
20 00 .DATA 0x0 ; P20OS8 RESULT.TYP
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
28 00 .DATA 0x0 ; P28OS1 RESULT.TPAR
29 ff .DATA 0xff ; P29OS8 EXPECTED.TYP
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 ; P31OS1 EXPECTED.TPAR
32 EXPERIMENT:
32 64 SET PT
33 d8 FSM2
34 da 50 1a 3b CHN_SND 0x1a,{T.UIR:3b}
38 da 31 38 CHN_SND @R2,{TV.WDR:38}
3b 18 CALL 0x6b
3c b1 29 63 VJMP NE,[0x9],R2,R3,0x63
3f ae 88 29 VINV [0x8],0x29
42 da 31 38 CHN_SND @R2,{TV.WDR:38}
45 18 CALL 0x6b
46 b1 29 63 VJMP NE,[0x9],R2,R3,0x63
49 ae 48 29 VINC [0x8],0x29
4c 19 CALL 0x65
4d da 31 38 CHN_SND @R2,{TV.WDR:38}
50 18 CALL 0x6b
51 b1 29 63 VJMP NE,[0x9],R2,R3,0x63
54 00 3f REPEAT #0x3f
56 a6 08 29 LEFT.0 #0x1,0x29,[0x8]
59 19 CALL 0x65
5a da 31 38 CHN_SND @R2,{TV.WDR:38}
5d 18 CALL 0x6b
5e b1 29 63 VJMP NE,[0x9],R2,R3,0x63
61 16 UNTIL
62 5c END
63 68 CLR PT
64 5c END
65 ; --------------------------------------------------------------------------------------
65 ; Subroutine
65 ; --------------------------------------------------------------------------------------
65 b4 29 31 EVNPAR [0x8],0x29,0x31
68 8a 31 INV 0x31
6a 2c RET
6b ; --------------------------------------------------------------------------------------
6b ; Subroutine
6b ; --------------------------------------------------------------------------------------
6b bc 25 FSM {25}
6d da 33 39 CHN_RCV {TV.WDR:39},@R3
70 2c RET
P11OF0 FIU_BUS_PASS\r P20OS8 RESULT.TYP\r P28OS1 RESULT.TPAR\r P29OS8 EXPECTED.TYP\r P31OS1 EXPECTED.TPAR\r \r 32\r 00\r 29\r 20\r 00\r 00\r 00\r 00\r \r 6B\r 65\r 00\r 0F\r E0\r A7\r FE\r 0D\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 50\r 1A\r 3B\r DA\r 31\r 38\r 18\r B1\r 29\r 63\r AE\r 88\r 29\r DA\r 31\r 38\r 18\r B1\r 29\r 63\r AE\r 48\r 29\r 19\r DA\r 31\r 38\r 18\r B1\r 29\r 63\r 00\r 3F\r A6\r 08\r 29\r 19\r DA\r 31\r 38\r 18\r B1\r 29\r 63\r 16\r 5C\r 68\r 5C\r B4\r 29\r 31\r 8A\r 31\r 2C\r BC\r 25\r DA\r 33\r 39\r 2C\r «nul»