|
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: TextFile, VAL
Names: »TEST_Z_CNTR_FILLING.VAL«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─ ⟦this⟧ »TEST_Z_CNTR_FILLING.VAL«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─ ⟦this⟧ »TEST_Z_CNTR_FILLING.VAL«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─ ⟦this⟧ »TEST_Z_CNTR_FILLING.VAL«
10 ; --------------------------------------------------------------------------------------
10 ; Hash 84ab477642145390 (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 31 .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0 ; P11OF0 ZERO_COUNT_PASS
12 R2_:
12 20 .DATA 0x20
13 R3_:
13 28 .DATA 0x28
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 57 .CODE 0x57
19 a8 .DATA 0xa8
1a 0a .DATA 0xa
1b 7f .DATA 0x7f
1c 07 .DATA 0x7
1d 82 .DATA 0x82
1e 01 .DATA 0x1
1f 01 .DATA 0x1
20 00 .DATA 0x0 ; P20OS8 EXPECT
21 00 .DATA 0x0
22 00 .DATA 0x0
23 00 .DATA 0x0
24 00 .DATA 0x0
25 00 .DATA 0x0
26 00 .DATA 0x0
27 40 .DATA 0x40
28 00 .DATA 0x0 ; P28OS8 RESULT
29 00 .DATA 0x0
2a 00 .DATA 0x0
2b 00 .DATA 0x0
2c 00 .DATA 0x0
2d 00 .DATA 0x0
2e 00 .DATA 0x0
2f 00 .DATA 0x0
30 00 .DATA 0x0
31 EXPERIMENT:
31 c8 ff ff 2b WFSM.W #0xffff,{2b}
35 bc 13 FSM {13}
37 18 CALL 0x57
38 3e 47 JMP NPX,0x47
3a 66 SET PX
3b c8 ff fe 2b WFSM.W #0xfffe,{2b}
3f bc 13 FSM {13}
41 18 CALL 0x57
42 bc 13 FSM {13}
44 54 1e 3b DJNZ 0x1e,0x3b
47 82 1f INC 0x1f
49 8e 1f 1e MOV 0x1f,0x1e
4c c8 ff fc 2b WFSM.W #0xfffc,{2b}
50 bc 14 FSM {14}
52 58 27 31 DJNN 0x27,EXPERIMENT
55 64 SET PT
56 5c END
57 ; --------------------------------------------------------------------------------------
57 ; Subroutine
57 ; --------------------------------------------------------------------------------------
57 da 40 19 3b CHN_SND 0x19,{V.UIR:3b}
5b bc 25 FSM {25}
5d da 33 39 CHN_RCV {TV.WDR:39},@R3
60 af 88 VINV [0x8],R3
62 b1 28 56 VJMP NE,[0x8],R2,R3,0x56
65 2c RET
P11OF0 ZERO_COUNT_PASS\r P20OS8 EXPECT\r P28OS8 RESULT\r \r 31\r 00\r 20\r 28\r 00\r 00\r 00\r 00\r \r 57\r A8\r 0A\r 7F\r 07\r 82\r 01\r 01\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 40\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r C8\r FF\r FF\r 2B\r BC\r 13\r 18\r 3E\r 47\r 66\r C8\r FF\r FE\r 2B\r BC\r 13\r 18\r BC\r 13\r 54\r 1E\r 3B\r 82\r 1F\r 8E\r 1F\r 1E\r C8\r FF\r FC\r 2B\r BC\r 14\r 58\r 27\r 31\r 64\r 5C\r DA\r 40\r 19\r 3B\r BC\r 25\r DA\r 33\r 39\r AF\r 88\r B1\r 28\r 56\r 2C\r «nul»