|
|
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: 269 (0x10d)
Types: FIU, TextFile
Names: »TEST_MAR_TO_UIR.FIU«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─⟦this⟧ »TEST_MAR_TO_UIR.FIU«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─⟦this⟧ »TEST_MAR_TO_UIR.FIU«
10 ; --------------------------------------------------------------------------------------
10 ; Hash 89cad4a98af96e72 (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 1a .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0 ; P11OF0 PASS_MAR_UIR
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 01 .DATA 0x1 ; P18OS1 PATTERN
19 00 .DATA 0x0 ; P19OS1 RESULT
1a EXPERIMENT:
1a d0 18 18 FSM_8X 0x18,{18}
1d bc 1d FSM {1d}
1f d4 80 14 19 RCV_P1 #0x80,{14},0x19
23 4e 19 18 58 JMP NE,0x19,0x18,0x58
27 bc 15 FSM {15}
29 d4 40 14 19 RCV_P1 #0x40,{14},0x19
2d 4e 19 18 58 JMP NE,0x19,0x18,0x58
31 bc 15 FSM {15}
33 d4 20 14 19 RCV_P1 #0x20,{14},0x19
37 4e 19 18 58 JMP NE,0x19,0x18,0x58
3b bc 15 FSM {15}
3d d4 10 14 19 RCV_P1 #0x10,{14},0x19
41 4e 19 18 58 JMP NE,0x19,0x18,0x58
45 bc 15 FSM {15}
47 d4 08 14 19 RCV_P1 #0x08,{14},0x19
4b 4e 19 18 58 JMP NE,0x19,0x18,0x58
4f bc 15 FSM {15}
51 a6 01 18 LEFT.0 #0x1,0x18,[0x1]
54 46 18 1a JMP NZ,0x18,EXPERIMENT
57 64 SET PT
58 5c END
P11OF0 PASS_MAR_UIR P18OS1 PATTERN P19OS1 RESULT 1A 00 18 18 00 00 00 00 01 00 D0 18 18 BC 1D D4 80 14 19 4E 19 18 58 BC 15 D4 40 14 19 4E 19 18 58 BC 15 D4 20 14 19 4E 19 18 58 BC 15 D4 10 14 19 4E 19 18 58 BC 15 D4 08 14 19 4E 19 18 58 BC 15 A6 01 18 46 18 1A 64 5C