|
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: 525 (0x20d)
Types: MEM, TextFile
Names: »TEST_COUNTER.MEM«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─ ⟦this⟧ »TEST_COUNTER.MEM«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─ ⟦this⟧ »TEST_COUNTER.MEM«
10 ; --------------------------------------------------------------------------------------
10 ; Hash 0a5a387f3c028427 (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 1e .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0 ; P11OF0 PASSED
12 R2_:
12 1b .DATA 0x1b
13 R3_:
13 1e .DATA 0x1e
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 70 .CODE 0x70
19 53 .CODE 0x53
1a 60 .CODE 0x60
1b 00 .DATA 0x0 ; P1BOS2 EXPECTED_DATA
1c 00 .DATA 0x0
1d 00 .DATA 0x0 ; P1DOS1 TEST_PHASE
1e EXPERIMENT:
1e bc' 5b FSM {5b} ; P1EOS2 BAD_BITS
20 18' CALL 0x70
21 82 1d INC 0x1d
23 84 1b INC.W 0x1b
25 19 CALL 0x53
26 91 0f fe 1b MOV.W #0x0ffe,0x1b
2a 19 CALL 0x53
2b 84 1b INC.W 0x1b
2d 66 SET PX
2e 19 CALL 0x53
2f 91 0f fe 1b MOV.W #0x0ffe,0x1b
33 19 CALL 0x53
34 82 1d INC 0x1d
36 91 00 01 1b MOV.W #0x0001,0x1b
3a bc 5b FSM {5b}
3c bc 59 FSM {59}
3e 18 CALL 0x70
3f 82 1d INC 0x1d
41 88 1b DEC.W 0x1b
43 1a CALL 0x60
44 88 1b DEC.W 0x1b
46 1a CALL 0x60
47 91 00 ff 1b MOV.W #0x00ff,0x1b
4b 1a CALL 0x60
4c 64 SET PT
4d d8 FSM2
4e 99 0f ff 1b AND.W #0x0fff,0x1b
52 5c END
53 ; --------------------------------------------------------------------------------------
53 ; Subroutine
53 ; --------------------------------------------------------------------------------------
53 0c REPEAT #0x0c
54 c3 58 WP12_FSM R2,{58}
56 18 CALL 0x70
57 a6 02 1b LEFT.0 #0x1,0x1b,[0x2]
5a 3e 5e JMP NPX,0x5e
5c 84 1b INC.W 0x1b
5e 16 UNTIL
5f 2c RET
60 ; --------------------------------------------------------------------------------------
60 ; Subroutine
60 ; --------------------------------------------------------------------------------------
60 90 1b 20 MOV.W 0x1b,0x20
63 10 REPEAT #0x10
64 c3 58 WP12_FSM R2,{58}
66 bc 59 FSM {59}
68 84 1b INC.W 0x1b
6a 18 CALL 0x70
6b 9c 20 1b OR.W 0x20,0x1b
6e 16 UNTIL
6f 2c RET
70 ; --------------------------------------------------------------------------------------
70 ; Subroutine
70 ; --------------------------------------------------------------------------------------
70 cf 4c RFSM.W {4c},R3
72 8c 1e INV.W EXPERIMENT
74 b0 c2 1b 1e VXOR [0x2],0x1b,EXPERIMENT
78 99 0f ff 1e AND.W #0x0fff,EXPERIMENT
7c 4a 1e 4d JMP.W NZ,EXPERIMENT,0x4d
7f 2c RET
P11OF0 PASSED\r P1DOS1 TEST_PHASE\r P1BOS2 EXPECTED_DATA\r P1EOS2 BAD_BITS\r \r 1E\r 00\r 1B\r 1E\r 00\r 00\r 00\r 00\r \r 70\r 53\r 60\r 00\r 00\r 00\r BC\r 5B\r 18\r 82\r 1D\r 84\r 1B\r 19\r 91\r 0F\r FE\r 1B\r 19\r 84\r 1B\r 66\r 19\r 91\r 0F\r FE\r 1B\r 19\r 82\r 1D\r 91\r 00\r 01\r 1B\r BC\r 5B\r BC\r 59\r 18\r 82\r 1D\r 88\r 1B\r 1A\r 88\r 1B\r 1A\r 91\r 00\r FF\r 1B\r 1A\r 64\r D8\r 99\r 0F\r FF\r 1B\r 5C\r 0C\r C3\r 58\r 18\r A6\r 02\r 1B\r 3E\r 5E\r 84\r 1B\r 16\r 2C\r 90\r 1B\r 20\r 10\r C3\r 58\r BC\r 59\r 84\r 1B\r 18\r 9C\r 20\r 1B\r 16\r 2C\r CF\r 4C\r 8C\r 1E\r B0\r C2\r 1B\r 1E\r 99\r 0F\r FF\r 1E\r 4A\r 1E\r 4D\r 2C\r