|
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: 1024 (0x400)
Types: TextFile, VAL
Names: »TEST_COUNT_LOOP_COUNTER.VAL«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─⟦this⟧ »TEST_COUNT_LOOP_COUNTER.VAL«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─⟦this⟧ »TEST_COUNT_LOOP_COUNTER.VAL«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─⟦this⟧ »TEST_COUNT_LOOP_COUNTER.VAL«
10 ; --------------------------------------------------------------------------------------
10 ; Hash c1d980cabe94472c (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 30 .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0 ; P11OF0 LOOP_COUNT_PASS
; P11OF1 DIAG_MODE
12 R2_:
12 28 .DATA 0x28
13 R3_:
13 30 .DATA 0x30
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 66 .CODE 0x66
19 00 .DATA 0x0
1a 0a .DATA 0xa
1b 3f .DATA 0x3f
1c 87 .DATA 0x87
1d ff .DATA 0xff
1e a0 .DATA 0xa0
1f 0a .DATA 0xa
20 7f .DATA 0x7f
21 87 .DATA 0x87
22 fd .DATA 0xfd
23 00 .DATA 0x0
24 0a .DATA 0xa
25 7f .DATA 0x7f
26 8f .DATA 0x8f
27 ff .DATA 0xff
28 ff .DATA 0xff ; P28OS8 EXPECT
29 ff .DATA 0xff
2a ff .DATA 0xff
2b ff .DATA 0xff
2c ff .DATA 0xff
2d ff .DATA 0xff
2e ff .DATA 0xff
2f ff .DATA 0xff
30 EXPERIMENT:
30 c3 2b WP12_FSM R2,{2b} ; P30OS8 RESULT
32 da 40 23 3b CHN_SND 0x23,{V.UIR:3b}
36 bc 4c FSM {4c}
38 8f 97 26 MOV #0x97,0x26
3b da 40 23 3b CHN_SND 0x23,{V.UIR:3b}
3f bc 4b FSM {4b}
41 0b REPEAT #0x0b
42 c3 2b WP12_FSM R2,{2b}
44 da 31 38 CHN_SND @R2,{TV.WDR:38}
47 da 40 19 3b CHN_SND 0x19,{V.UIR:3b}
4b bc 33 FSM {33}
4d 18 CALL 0x66
4e bc 13 FSM {13}
50 88 2e DEC.W 0x2e
52 18 CALL 0x66
53 bc 13 FSM {13}
55 84 2e INC.W 0x2e
57 18 CALL 0x66
58 a6 08 28 LEFT.0 #0x1,0x28,[0x8]
5b 16 UNTIL
5c 66 SET PX
5d 10 REPEAT #0x10
5e bc 34 FSM {34}
60 84 2e INC.W 0x2e
62 18 CALL 0x66
63 16 UNTIL
64 64 SET PT
65 5c END
66 ; --------------------------------------------------------------------------------------
66 ; Subroutine
66 ; --------------------------------------------------------------------------------------
66 9b fc 2e OR #0xfc,0x2e
69 da 40 1e 3b CHN_SND 0x1e,{V.UIR:3b}
6d bc 25 FSM {25}
6f da 33 39 CHN_RCV {TV.WDR:39},@R3
72 b1 28 65 VJMP NE,[0x8],R2,R3,0x65
75 2c RET
P11OF0 LOOP_COUNT_PASS\r P11OF1 DIAG_MODE\r P30OS8 RESULT\r P28OS8 EXPECT\r \r 30\r 00\r 28\r 30\r 00\r 00\r 00\r 00\r \r 66\r 00\r 0A\r 3F\r 87\r FF\r A0\r 0A\r 7F\r 87\r FD\r 00\r 0A\r 7F\r 8F\r FF\r FF\r FF\r FF\r FF\r FF\r FF\r FF\r FF\r C3\r 2B\r DA\r 40\r 23\r 3B\r BC\r 4C\r 8F\r 97\r 26\r DA\r 40\r 23\r 3B\r BC\r 4B\r 0B\r C3\r 2B\r DA\r 31\r 38\r DA\r 40\r 19\r 3B\r BC\r 33\r 18\r BC\r 13\r 88\r 2E\r 18\r BC\r 13\r 84\r 2E\r 18\r A6\r 08\r 28\r 16\r 66\r 10\r BC\r 34\r 84\r 2E\r 18\r 16\r 64\r 5C\r 9B\r FC\r 2E\r DA\r 40\r 1E\r 3B\r BC\r 25\r DA\r 33\r 39\r B1\r 28\r 65\r 2C\r «nul»