|
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: SEQ, TextFile
Names: »CUR_UADR_PARITY_FRU.SEQ«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─ ⟦this⟧ »CUR_UADR_PARITY_FRU.SEQ«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─ ⟦this⟧ »CUR_UADR_PARITY_FRU.SEQ«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─ ⟦this⟧ »CUR_UADR_PARITY_FRU.SEQ«
10 ; --------------------------------------------------------------------------------------
10 ; Hash 9daa93f0c98f65d3 (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 27 .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0 ; P11OF0 PASSED
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 3f .CODE 0x3f
19 01 .DATA 0x1 ; P19OS2 COUNT
1a 00 .DATA 0x0
1b 00 .DATA 0x0 ; P1BOS2 UADR_WORD
1c 00 .DATA 0x0
1d 00 .DATA 0x0 ; P1DOS1 CALC_PARITY
1e 00 .DATA 0x0 ; P1EOS2 MICRO_ADDR
1f 00 .DATA 0x0
20 00 .DATA 0x0
21 00 .DATA 0x0
22 00 .DATA 0x0
23 00 .DATA 0x0
24 00 .DATA 0x0 ; P24OS1 GEN_PARITY
25 00 .DATA 0x0
26 00 .DATA 0x0
27 EXPERIMENT:
27 9e 1d 1d XOR 0x1d,0x1d
2a b7 01 1b 11 ODDPAR #0x01,0x1b,#0x11
2e b7 01 1c 0a ODDPAR #0x01,0x1c,#0xa
32 18 CALL 0x3f
33 82 1b INC 0x1b
35 82 1c INC 0x1c
37 97 3f 1b AND #0x3f,0x1b
3a 56 19 27 DJNZ.W 0x19,EXPERIMENT
3d 64 SET PT
3e 5c END
3f ; --------------------------------------------------------------------------------------
3f ; Subroutine
3f ; --------------------------------------------------------------------------------------
3f be 1b 59 WP1_FSM 0x1b,{59}
42 be 1c 58 WP1_FSM 0x1c,{58}
45 bc 60 FSM {60}
47 da c2 1e 36 CHN_RCV {S.MISC:36},0x1e
4b 97 60 24 AND #0x60,0x24
4e 4e 1d 24 3e JMP NE,0x1d,0x24,0x3e
52 2c RET
P11OF0 PASSED P19OS2 COUNT P1EOS2 MICRO_ADDR P1BOS2 UADR_WORD P24OS1 GEN_PARITY P1DOS1 CALC_PARITY 27 00 18 18 00 00 00 00 3F 01 00 00 00 00 00 00 00 00 00 00 00 00 00 9E 1D 1D B7 01 1B 11 B7 01 1C 0A 18 82 1B 82 1C 97 3F 1B 56 19 27 64 5C BE 1B 59 BE 1C 58 BC 60 DA C2 1E 36 97 60 24 4E 1D 24 3E 2C«nul»