|
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: 283 (0x11b)
Types: TextFile, VAL
Names: »READ_CURRENT_WCS.VAL«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─⟦this⟧ »READ_CURRENT_WCS.VAL«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─⟦this⟧ »READ_CURRENT_WCS.VAL«
10 ; --------------------------------------------------------------------------------------
10 ; Hash 472d752a54b3d11f (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 23 .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0 ; P11OF0 PARITY_IS_BAD
12 R2_:
12 18 .DATA 0x18
13 R3_:
13 18 .DATA 0x18
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 00 .DATA 0x0 ; P18OS5 WCS
19 00 .DATA 0x0
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
22 00 .DATA 0x0
23 EXPERIMENT:
23 d8 FSM2
24 da 42 1e 3c CHN_RCV {V.UIR:3c},0x1e
28 d6 FSM8
29 bc 48 FSM {48}
2b 5e 00 28 LOOPE #0x00,0x28 ; P2CIS1 LOOP
2e da 42 18 3c CHN_RCV {V.UIR:3c},0x18
32 08 REPEAT #0x08
33 bc 3d FSM {3d}
35 16 UNTIL
36 a1 ff f0 18 XOR.W #0xfff0,0x18
3a 9f 3e 1a XOR #0x3e,0x1a
3d b7 05 18 2f ODDPAR #0x05,0x18,#0x2f
41 da 40 1e 3b CHN_SND 0x1e,{V.UIR:3b}
45 44 1d 49 JMP Z,0x1d,0x49
48 64 SET PT
49 5c END
P2CIS1 LOOP\r P18OS5 WCS\r P11OF0 PARITY_IS_BAD\r \r 23\r 00\r 18\r 18\r 00\r 00\r 00\r 00\r \r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r D8\r DA\r 42\r 1E\r 3C\r D6\r BC\r 48\r 5E\r 00\r 28\r DA\r 42\r 18\r 3C\r 08\r BC\r 3D\r 16\r A1\r FF\r F0\r 18\r 9F\r 3E\r 1A\r B7\r 05\r 18\r 2F\r DA\r 40\r 1E\r 3B\r 44\r 1D\r 49\r 64\r 5C\r