|
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: 885 (0x375)
Types: M32, TextFile
Names: »TEST_TAGSTORE_PARITY_1.M32«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─ ⟦this⟧ »TEST_TAGSTORE_PARITY_1.M32«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─ ⟦this⟧ »TEST_TAGSTORE_PARITY_1.M32«
10 ; --------------------------------------------------------------------------------------
10 ; Hash 1ec48db98823742d (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 45 .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0 ; P11OF0 PASSED
; P11OF1 CHECK_GOOD
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 b0 .CODE 0xb0
19 b8 .CODE 0xb8
1a 55 .DATA 0x55
1b a4 .DATA 0xa4
1c aa .DATA 0xaa
1d 85 .DATA 0x85
1e ff .DATA 0xff
1f fe .DATA 0xfe
20 00 .DATA 0x0
21 5e .DATA 0x5e
22 a4 .DATA 0xa4
23 55 .DATA 0x55
24 85 .DATA 0x85
25 aa .DATA 0xaa
26 fe .DATA 0xfe
27 ff .DATA 0xff
28 fe .DATA 0xfe
29 ff .DATA 0xff
2a a4 .DATA 0xa4
2b 85 .DATA 0x85
2c fe .DATA 0xfe
2d 54 .DATA 0x54
2e 4a .DATA 0x4a
2f 45 .DATA 0x45
30 ef .DATA 0xef
31 ab .DATA 0xab
32 80 .DATA 0x80
33 00 .DATA 0x0
34 00 .DATA 0x0
35 00 .DATA 0x0
36 00 .DATA 0x0
37 00 .DATA 0x0
38 00 .DATA 0x0
39 00 .DATA 0x0
3a 80 .DATA 0x80
3b 00 .DATA 0x0 ; P3BOS1 EXPECTED_PLANEB_PARITY
3c 00 .DATA 0x0 ; P3COS1 ERROR
3d 00 .DATA 0x0 ; P3DOS1 GENERATED_PLANEA_PARITY
3e 00 .DATA 0x0 ; P3EOS1 GENERATED_PLANEB_PARITY
3f 00 .DATA 0x0
40 12 .DATA 0x12
41 00 .DATA 0x0
42 08 .DATA 0x8
43 00 .DATA 0x0 ; P43OS1 TEST_PHASE
44 00 .DATA 0x0 ; P44OS1 EXPECTED_PLANEA_PARITY
45 EXPERIMENT:
45 8f 80 44 MOV #0x80,0x44
48 8f 80 3d MOV #0x80,0x3d
4b 66 SET PX
4c 18 CALL 0xb0
4d a8 01 44 SR.0 #0x1,0x44,[0x1]
50 6a CLR PX
51 18 CALL 0xb0
52 a8 01 3d SR.0 #0x1,0x3d,[0x1]
55 66 SET PX
56 18 CALL 0xb0
57 46 3d 4d JMP NZ,0x3d,0x4d
5a 82 43 INC 0x43
5c c6 ff 30 WFSM.H #0xff,{30}
5f c6 ff b0 WFSM.H #0xff,{b0}
62 b8 41 IDENT 0x41
64 19 CALL 0xb8
65 a8 08 32 SR.0 #0x1,0x32,[0x8]
68 54 42 64 DJNZ 0x42,0x64
6b a8 01 3a SR.0 #0x1,0x3a,[0x1]
6e 8f 08 42 MOV #0x08,0x42
71 46 3a 64 JMP NZ,0x3a,0x64
74 82 43 INC 0x43
76 b0 c8 32 32 VXOR [0x8],0x32,0x32
7a 8f 00 3a MOV #0x00,0x3a
7d 19 CALL 0xb8
7e 8f 55 3a MOV #0x55,0x3a
81 6a CLR PX
82 19 CALL 0xb8
83 b0 48 1a 32 VMOV [0x8],0x1a,0x32
87 66 SET PX
88 19 CALL 0xb8
89 b0 48 22 32 VMOV [0x8],0x22,0x32
8d 6a CLR PX
8e 19 CALL 0xb8
8f 8a 3a INV 0x3a
91 66 SET PX
92 19 CALL 0xb8
93 b0 48 2a 32 VMOV [0x8],0x2a,0x32
97 6a CLR PX
98 19 CALL 0xb8
99 8f ff 3a MOV #0xff,0x3a
9c 66 SET PX
9d 19 CALL 0xb8
9e 64 SET PT
9f cc 3c 44 RFSM.H {3c},0x44
a2 cc 3c 3d RFSM.H {3c},0x3d
a5 cc bc 3b RFSM.H {bc},0x3b
a8 cc bc 3e RFSM.H {bc},0x3e
ab c6 f8 a2 WFSM.H #0xf8,{a2}
ae d8 FSM2
af 5c END
b0 ; --------------------------------------------------------------------------------------
b0 ; Subroutine
b0 ; --------------------------------------------------------------------------------------
b0 c0 44 89 WP2_FSM 0x44,{89}
b3 c0 3d 89 WP2_FSM 0x3d,{89}
b6 36 e2 JMP 0xe2
b8 ; --------------------------------------------------------------------------------------
b8 ; Subroutine
b8 ; --------------------------------------------------------------------------------------
b8 da 20 32 05 CHN_SND 0x32,{M.DREG_VAL_PAR:05}
bc bc 23 FSM {23}
be 8e 41 3f MOV 0x41,0x3f
c1 08 REPEAT #0x08
c2 c0 40 04 WP2_FSM 0x40,{04}
c5 c0 3f 04 WP2_FSM 0x3f,{04}
c8 c6 88 a2 WFSM.H #0x88,{a2}
cb bc 02 FSM {02}
cd c6 f8 a2 WFSM.H #0xf8,{a2}
d0 93 10 3f ADD #0x10,0x3f
d3 16 UNTIL
d4 c6 00 89 WFSM.H #0x00,{89}
d7 c6 00 89 WFSM.H #0x00,{89}
da c6 b8 a2 WFSM.H #0xb8,{a2}
dd bc 02 FSM {02}
df c6 f8 a2 WFSM.H #0xf8,{a2}
e2 46 43 ea JMP NZ,0x43,0xea
e5 cc aa 3c RFSM.H {aa},0x3c
e8 36 ed JMP 0xed
ea cc 0a 3c RFSM.H {0a},0x3c
ed 3e f4 JMP NPX,0xf4
ef 43 0c 3c 9f TEST NZ,#0x0c,0x3c,0x9f
f3 2c RET
f4 42 0c 3c 9f TEST Z,#0x0c,0x3c,0x9f
f8 2c RET
P11OF0 PASSED P43OS1 TEST_PHASE P11OF1 CHECK_GOOD P44OS1 EXPECTED_PLANEA_PARITY P3DOS1 GENERATED_PLANEA_PARITY P3BOS1 EXPECTED_PLANEB_PARITY P3EOS1 GENERATED_PLANEB_PARITY P3COS1 ERROR 45 00 18 18 00 00 00 00 B0 B8 55 A4 AA 85 FF FE 00 5E A4 55 85 AA FE FF FE FF A4 85 FE 54 4A 45 EF AB 80 00 00 00 00 00 00 00 80 00 00 00 00 00 12 00 08 00 00 8F 80 44 8F 80 3D 66 18 A8 01 44 6A 18 A8 01 3D 66 18 46 3D 4D 82 43 C6 FF 30 C6 FF B0 B8 41 19 A8 08 32 54 42 64 A8 01 3A 8F 08 42 46 3A 64 82 43 B0 C8 32 32 8F 00 3A 19 8F 55 3A 6A 19 B0 48 1A 32 66 19 B0 48 22 32 6A 19 8A 3A 66 19 B0 48 2A 32 6A 19 8F FF 3A 66 19 64 CC 3C 44 CC 3C 3D CC BC 3B CC BC 3E C6 F8 A2 D8 5C C0 44 89 C0 3D 89 36 E2 DA 20 32 05 BC 23 8E 41 3F 08 C0 40 04 C0 3F 04 C6 88 A2 BC 02 C6 F8 A2 93 10 3F 16 C6 00 89 C6 00 89 C6 B8 A2 BC 02 C6 F8 A2 46 43 EA CC AA 3C 36 ED CC 0A 3C 3E F4 43 0C 3C 9F 2C 42 0C 3C 9F 2C