|
|
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: 512 (0x200)
Types: TYP, TextFile
Names: »LOU2_BUS_PARITY.TYP«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─⟦this⟧ »LOU2_BUS_PARITY.TYP«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─⟦this⟧ »LOU2_BUS_PARITY.TYP«
10 ; --------------------------------------------------------------------------------------
10 ; Hash d34829937b48fbc1 (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 33 .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0 ; P11OF0 B_PCHEK_PASSED
; P11OF1 B_BUS_FAIL
12 R2_:
12 2b .DATA 0x2b
13 R3_:
13 32 .DATA 0x32
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 5c .CODE 0x5c
19 61 .CODE 0x61
1a 6c .CODE 0x6c
1b 6c .CODE 0x6c
1c 08 .DATA 0x8
1d 00 .DATA 0x0 ; P1DOS1 RESULT_PARITY
1e 01 .DATA 0x1 ; P1EOS1 EXPECTED_PARITY
1f 00 .DATA 0x0
20 0f .DATA 0xf
21 f0 .DATA 0xf0
22 ff .DATA 0xff
23 ff .DATA 0xff
24 0c .DATA 0xc
25 af .DATA 0xaf
26 ff .DATA 0xff
27 f0 .DATA 0xf0
28 ff .DATA 0xff
29 ff .DATA 0xff
2a 0c .DATA 0xc
2b 00 .DATA 0x0 ; P2BOS8 WDR_PATTERN
2c 00 .DATA 0x0
2d 00 .DATA 0x0
2e 00 .DATA 0x0
2f 00 .DATA 0x0
30 00 .DATA 0x0
31 00 .DATA 0x0
32 00 .DATA 0x0
33 EXPERIMENT:
33 c8 ff fd 2b WFSM.W #0xfffd,{2b}
37 da 50 1f 3b CHN_SND 0x1f,{T.UIR:3b}
3b bc 4b FSM {4b}
3d 08 REPEAT #0x08
3e a7 01 LEFT.0 #0x1,R3,[0x1]
40 af 41 VINC [0x1],R3
42 18 CALL 0x5c
43 16 UNTIL
44 af 61 VDEC [0x1],R3
46 da 31 38 CHN_SND @R2,{TV.WDR:38}
49 86 1e DEC 0x1e
4b 19 CALL 0x61
4c da 50 25 3b CHN_SND 0x25,{T.UIR:3b}
50 82 1e INC 0x1e
52 1a CALL 0x6c
53 bc 48 FSM {48}
55 18 CALL 0x5c
56 7a DEC R3
57 54 1c 3d DJNZ 0x1c,0x3d
5a 64 SET PT
5b 5c END
5c ; --------------------------------------------------------------------------------------
5c ; Subroutine
5c ; --------------------------------------------------------------------------------------
5c da 31 38 CHN_SND @R2,{TV.WDR:38}
5f bc 5a FSM {5a}
61 ; --------------------------------------------------------------------------------------
61 ; Subroutine
61 ; --------------------------------------------------------------------------------------
61 bc 25 FSM {25}
63 d4 08 41 1d RCV_P1 #0x08,{41},0x1d
67 a8 81 1d SR.0 #0x5,0x1d,[0x1]
6a 66 SET PX
6b 1b CALL 0x6c
6c ; --------------------------------------------------------------------------------------
6c ; Subroutine
6c ; --------------------------------------------------------------------------------------
6c 97 01 1d AND #0x01,0x1d
6f 4e 1d 1e 5b JMP NE,0x1d,0x1e,0x5b
73 2c RET
P11OF0 B_PCHEK_PASSED\r P11OF1 B_BUS_FAIL\r P2BOS8 WDR_PATTERN\r P1DOS1 RESULT_PARITY\r P1EOS1 EXPECTED_PARITY\r \r 33\r 00\r 2B\r 32\r 00\r 00\r 00\r 00\r \r 5C\r 61\r 6C\r 6C\r 08\r 00\r 01\r 00\r 0F\r F0\r FF\r FF\r 0C\r AF\r FF\r F0\r FF\r FF\r 0C\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 50\r 1F\r 3B\r BC\r 4B\r 08\r A7\r 01\r AF\r 41\r 18\r 16\r AF\r 61\r DA\r 31\r 38\r 86\r 1E\r 19\r DA\r 50\r 25\r 3B\r 82\r 1E\r 1A\r BC\r 48\r 18\r 7A\r 54\r 1C\r 3D\r 64\r 5C\r DA\r 31\r 38\r BC\r 5A\r BC\r 25\r D4\r 08\r 41\r 1D\r A8\r 81\r 1D\r 66\r 1B\r 97\r 01\r 1D\r 4E\r 1D\r 1E\r 5B\r 2C\r