|
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: 513 (0x201)
Types: MEM, TextFile
Names: »PAUSE_COUNTER.MEM«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─ ⟦this⟧ »PAUSE_COUNTER.MEM«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─ ⟦this⟧ »PAUSE_COUNTER.MEM«
10 ; --------------------------------------------------------------------------------------
10 ; Hash a2cb80a3c21dcb01 (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 6b .CODE 0x6b
19 4e .CODE 0x4e
1a 5b .CODE 0x5b
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 0x6b
21 82 1d INC 0x1d
23 84 1b INC.W 0x1b
25 19 CALL 0x4e
26 91 0f fe 1b MOV.W #0x0ffe,0x1b
2a 19 CALL 0x4e
2b 84 1b INC.W 0x1b
2d 66 SET PX
2e 19 CALL 0x4e
2f 91 0f fe 1b MOV.W #0x0ffe,0x1b
33 19 CALL 0x4e
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 0x6b
3f 82 1d INC 0x1d
41 88 1b DEC.W 0x1b
43 1a CALL 0x5b
44 88 1b DEC.W 0x1b
46 1a CALL 0x5b
47 91 00 ff 1b MOV.W #0x00ff,0x1b
4b 1a CALL 0x5b
4c 64 SET PT
4d 5c END
4e ; --------------------------------------------------------------------------------------
4e ; Subroutine
4e ; --------------------------------------------------------------------------------------
4e 0c REPEAT #0x0c
4f c3 58 WP12_FSM R2,{58}
51 18 CALL 0x6b
52 a6 02 1b LEFT.0 #0x1,0x1b,[0x2]
55 3e 59 JMP NPX,0x59
57 84 1b INC.W 0x1b
59 16 UNTIL
5a 2c RET
5b ; --------------------------------------------------------------------------------------
5b ; Subroutine
5b ; --------------------------------------------------------------------------------------
5b 90 1b 20 MOV.W 0x1b,0x20
5e 10 REPEAT #0x10
5f c3 58 WP12_FSM R2,{58}
61 bc 59 FSM {59}
63 84 1b INC.W 0x1b
65 18 CALL 0x6b
66 9c 20 1b OR.W 0x20,0x1b
69 16 UNTIL
6a 2c RET
6b ; --------------------------------------------------------------------------------------
6b ; Subroutine
6b ; --------------------------------------------------------------------------------------
6b 60 PAUSE
6c cf 4c RFSM.W {4c},R3
6e 8c 1e INV.W EXPERIMENT
70 b0 c2 1b 1e VXOR [0x2],0x1b,EXPERIMENT
74 99 0f ff 1e AND.W #0x0fff,EXPERIMENT
78 60 PAUSE
79 4a 1e 4d JMP.W NZ,EXPERIMENT,0x4d
7c 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 6B\r 4E\r 5B\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 5C\r 0C\r C3\r 58\r 18\r A6\r 02\r 1B\r 3E\r 59\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 60\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 60\r 4A\r 1E\r 4D\r 2C\r