|
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: TextFile, VAL
Names: »TEST_BUS_PARITY_CHECKERS.VAL«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─ ⟦this⟧ »TEST_BUS_PARITY_CHECKERS.VAL«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─ ⟦this⟧ »TEST_BUS_PARITY_CHECKERS.VAL«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─ ⟦this⟧ »TEST_BUS_PARITY_CHECKERS.VAL«
10 ; --------------------------------------------------------------------------------------
10 ; Hash 6f0b986a216380a8 (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 30 .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0 ; P11OF0 B_PCHEK_PASSED
; P11OF1 B_BUS_FAIL
12 R2_:
12 28 .DATA 0x28
13 R3_:
13 2f .DATA 0x2f
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 5f .CODE 0x5f
19 61 .CODE 0x61
1a 76 .CODE 0x76
1b 08 .DATA 0x8
1c 00 .DATA 0x0 ; P1COS1 RESULT_PARITY
1d 01 .DATA 0x1 ; P1DOS1 EXPECTED_PARITY
1e 00 .DATA 0x0
1f 0f .DATA 0xf
20 ff .DATA 0xff
21 87 .DATA 0x87
22 fe .DATA 0xfe
23 af .DATA 0xaf
24 ff .DATA 0xff
25 ff .DATA 0xff
26 b7 .DATA 0xb7
27 fe .DATA 0xfe
28 00 .DATA 0x0 ; P28OS8 WDR_PATTERN
29 00 .DATA 0x0
2a 00 .DATA 0x0
2b 00 .DATA 0x0
2c 00 .DATA 0x0
2d 00 .DATA 0x0
2e 00 .DATA 0x0
2f 00 .DATA 0x0
30 EXPERIMENT:
30 c8 ff fd 2b WFSM.W #0xfffd,{2b}
34 da 40 1e 3b CHN_SND 0x1e,{V.UIR:3b}
38 bc 4b FSM {4b}
3a 08 REPEAT #0x08
3b a7 01 LEFT.0 #0x1,R3,[0x1]
3d af 41 VINC [0x1],R3
3f da 31 38 CHN_SND @R2,{TV.WDR:38}
42 18 CALL 0x5f
43 16 UNTIL
44 af 61 VDEC [0x1],R3
46 da 31 38 CHN_SND @R2,{TV.WDR:38}
49 86 1d DEC 0x1d
4b 19 CALL 0x61
4c da 40 23 3b CHN_SND 0x23,{V.UIR:3b}
50 82 1d INC 0x1d
52 19 CALL 0x61
53 bc 48 FSM {48}
55 da 31 38 CHN_SND @R2,{TV.WDR:38}
58 18 CALL 0x5f
59 7a DEC R3
5a 54 1b 3a DJNZ 0x1b,0x3a
5d 64 SET PT
5e 5c END
5f ; --------------------------------------------------------------------------------------
5f ; Subroutine
5f ; --------------------------------------------------------------------------------------
5f bc 5a FSM {5a}
61 ; --------------------------------------------------------------------------------------
61 ; Subroutine
61 ; --------------------------------------------------------------------------------------
61 bc 25 FSM {25}
63 d4 08 41 1c RCV_P1 #0x08,{41},0x1c
67 a8 81 1c SR.0 #0x5,0x1c,[0x1]
6a 66 SET PX
6b 1a CALL 0x76
6c bc 25 FSM {25}
6e d4 08 41 1c RCV_P1 #0x08,{41},0x1c
72 a8 61 1c SR.0 #0x4,0x1c,[0x1]
75 6a CLR PX
76 ; --------------------------------------------------------------------------------------
76 ; Subroutine
76 ; --------------------------------------------------------------------------------------
76 97 01 1c AND #0x01,0x1c
79 4e 1c 1d 5e JMP NE,0x1c,0x1d,0x5e
7d 2c RET
P11OF0 B_PCHEK_PASSED\r P11OF1 B_BUS_FAIL\r P28OS8 WDR_PATTERN\r P1COS1 RESULT_PARITY\r P1DOS1 EXPECTED_PARITY\r \r 30\r 00\r 28\r 2F\r 00\r 00\r 00\r 00\r \r 5F\r 61\r 76\r 08\r 00\r 01\r 00\r 0F\r FF\r 87\r FE\r AF\r FF\r FF\r B7\r FE\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r C8\r FF\r FD\r 2B\r DA\r 40\r 1E\r 3B\r BC\r 4B\r 08\r A7\r 01\r AF\r 41\r DA\r 31\r 38\r 18\r 16\r AF\r 61\r DA\r 31\r 38\r 86\r 1D\r 19\r DA\r 40\r 23\r 3B\r 82\r 1D\r 19\r BC\r 48\r DA\r 31\r 38\r 18\r 7A\r 54\r 1B\r 3A\r 64\r 5C\r BC\r 5A\r BC\r 25\r D4\r 08\r 41\r 1C\r A8\r 81\r 1C\r 66\r 1A\r BC\r 25\r D4\r 08\r 41\r 1C\r A8\r 61\r 1C\r 6A\r 97\r 01\r 1C\r 4E\r 1C\r 1D\r 5E\r 2C\r «nul»