|
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: 136 (0x88)
Types: TextFile, VAL
Names: »INIT_WCS_INC_PATTERN.VAL«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─ ⟦this⟧ »INIT_WCS_INC_PATTERN.VAL«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─ ⟦this⟧ »INIT_WCS_INC_PATTERN.VAL«
10 ; --------------------------------------------------------------------------------------
10 ; Hash 010eb78f917e7d18 (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 21 .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0
12 R2_:
12 1d .DATA 0x1d
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
19 00 .DATA 0x0
1a 00 .DATA 0x0
1b 00 .DATA 0x0
1c 01 .DATA 0x1
1d 00 .DATA 0x0
1e 00 .DATA 0x0
1f 00 .DATA 0x0
20 03 .DATA 0x3
21 EXPERIMENT:
21 c3 2b WP12_FSM R2,{2b}
23 da 40 18 3b CHN_SND 0x18,{V.UIR:3b}
27 bc 4b FSM {4b}
29 84 1d INC.W 0x1d
2b 82 1c INC 0x1c
2d 0e REPEAT #0x0e
2e c3 2b WP12_FSM R2,{2b}
30 da 40 18 3b CHN_SND 0x18,{V.UIR:3b}
34 bc 4b FSM {4b}
36 a6 02 1d LEFT.0 #0x1,0x1d,[0x2]
39 82 1c INC 0x1c
3b 16 UNTIL
3c 5c END
21 00 1D 18 00 00 00 00 00 00 00 00 01 00 00 00 03 C3 2B DA 40 18 3B BC 4B 84 1D 82 1C 0E C3 2B DA 40 18 3B BC 4B A6 02 1D 82 1C 16 5C