|
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: »WRITE_REG.VAL«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─⟦this⟧ »WRITE_REG.VAL«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─⟦this⟧ »WRITE_REG.VAL«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─⟦this⟧ »WRITE_REG.VAL«
10 ; --------------------------------------------------------------------------------------
10 ; Hash a6601ff11b278cef (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 3b .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0
12 R2_:
12 1c .DATA 0x1c
13 R3_:
13 25 .DATA 0x25
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 6f .CODE 0x6f
19 00 .DATA 0x0 ; P19IS8 VALUE.VAL
1a 00 .DATA 0x0
1b 00 .DATA 0x0
1c 00 .DATA 0x0
1d 00 .DATA 0x0
1e 00 .DATA 0x0
1f 00 .DATA 0x0
20 00 .DATA 0x0
21 00 .DATA 0x0 ; P21IS1 VALUE.VPAR
22 00 .DATA 0x0 ; P22IS2 REG_NUMBER
23 00 .DATA 0x0
24 00 .DATA 0x0
25 00 .DATA 0x0
26 00 .DATA 0x0
27 00 .DATA 0x0
28 00 .DATA 0x0
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 00 .DATA 0x0
32 00 .DATA 0x0
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 00 .DATA 0x0
3b EXPERIMENT:
3b 8c 22 INV.W 0x22
3d da 43 3c CHN_RCV {V.UIR:3c},@R3
40 da 32 2a 39 CHN_RCV {TV.WDR:39},0x2a
44 18 CALL 0x6f
45 bc 5d FSM {5d}
47 da 32 33 39 CHN_RCV {TV.WDR:39},0x33
4b 18 CALL 0x6f
4c da 31 38 CHN_SND @R2,{TV.WDR:38}
4f bc 33 FSM {33}
51 18 CALL 0x6f
52 da 30 19 38 CHN_SND 0x19,{TV.WDR:38}
56 bc 5a FSM {5a}
58 5e 00 56 LOOPE #0x00,0x56 ; P59IS1 LOOP_VAR
5b 18 CALL 0x6f
5c da 30 33 38 CHN_SND 0x33,{TV.WDR:38}
60 bc 33 FSM {33}
62 da 40 25 3b CHN_SND 0x25,{V.UIR:3b}
66 da 30 2a 38 CHN_SND 0x2a,{TV.WDR:38}
6a c8 ff ff 2b WFSM.W #0xffff,{2b}
6e 5c END
6f ; --------------------------------------------------------------------------------------
6f ; Subroutine
6f ; --------------------------------------------------------------------------------------
6f bc 2c FSM {2c}
71 bc 48 FSM {48}
73 2c RET
P22IS2 REG_NUMBER\r P19IS8 VALUE.VAL\r P21IS1 VALUE.VPAR\r P59IS1 LOOP_VAR\r \r 3B\r 00\r 1C\r 25\r 00\r 00\r 00\r 00\r \r 6F\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 8C\r 22\r DA\r 43\r 3C\r DA\r 32\r 2A\r 39\r 18\r BC\r 5D\r DA\r 32\r 33\r 39\r 18\r DA\r 31\r 38\r BC\r 33\r 18\r DA\r 30\r 19\r 38\r BC\r 5A\r 5E\r 00\r 56\r 18\r DA\r 30\r 33\r 38\r BC\r 33\r DA\r 40\r 25\r 3B\r DA\r 30\r 2A\r 38\r C8\r FF\r FF\r 2B\r 5C\r BC\r 2C\r BC\r 48\r 2C\r «nul»