|
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: 414 (0x19e)
Types: FIU, TextFile
Names: »TEST_NAME_MATCH_1.FIU«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─ ⟦this⟧ »TEST_NAME_MATCH_1.FIU«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─ ⟦this⟧ »TEST_NAME_MATCH_1.FIU«
10 ; --------------------------------------------------------------------------------------
10 ; Hash f1db14595df5a23c (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 3a .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0 ; P11OF0 PASS_NAM_MATCH1
; P11OF1 NAME_MATCH
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 60 .CODE 0x60
19 00 .DATA 0x0
1a 3f .DATA 0x3f
1b 00 .DATA 0x0
1c 00 .DATA 0x0
1d 00 .DATA 0x0
1e 00 .DATA 0x0
1f 40 .DATA 0x40
20 3f .DATA 0x3f
21 c3 .DATA 0xc3
22 3e .DATA 0x3e
23 7d .DATA 0x7d
24 03 .DATA 0x3
25 01 .DATA 0x1 ; P25OS1 FAILING_MAR.SPACE
26 00 .DATA 0x0 ; P26OS4 FAILING_MAR.NAME
27 00 .DATA 0x0
28 00 .DATA 0x0
29 01 .DATA 0x1
2a 00 .DATA 0x0 ; P2AOS4 FAILING_MAR.OFFSET
2b 00 .DATA 0x0
2c 00 .DATA 0x0
2d 00 .DATA 0x0
2e 00 .DATA 0x0
2f 00 .DATA 0x0
30 c3 .DATA 0xc3
31 0e .DATA 0xe
32 7d .DATA 0x7d
33 03 .DATA 0x3
34 00 .DATA 0x0
35 3f .DATA 0x3f
36 c3 .DATA 0xc3
37 2e .DATA 0x2e
38 7e .DATA 0x7e
39 03 .DATA 0x3
3a EXPERIMENT:
3a da 80' 34 13 CHN_SND 0x34,{F.UIR:13}
3e da 70 26 10 CHN_SND 0x26,{F.MDREG:10}
42 bc 54 FSM {54}
44 da 60 25 18 CHN_SND 0x25,{F.MAR:18}
48 00 20 REPEAT #0x20
4a da 80 2e 13 CHN_SND 0x2e,{F.UIR:13}
4e bc 48 FSM {48}
50 18 CALL 0x60
51 3e 5f JMP NPX,0x5f
53 a6 04 26 LEFT.0 #0x1,0x26,[0x4]
56 da 60 25 18 CHN_SND 0x25,{F.MAR:18}
5a 18 CALL 0x60
5b 3a 5f JMP PX,0x5f
5d 16 UNTIL
5e 64 SET PT
5f 5c END
60 ; --------------------------------------------------------------------------------------
60 ; Subroutine
60 ; --------------------------------------------------------------------------------------
60 da 80 1f 13 CHN_SND 0x1f,{F.UIR:13}
64 bc 3f FSM {3f}
66 da 72 34 11 CHN_RCV {F.MDREG:11},0x34
6a 97 80 3b AND #0x80,0x3b
6d 6a CLR PX
6e 44 3b 72 JMP Z,0x3b,0x72
71 66 SET PX
72 2c RET
P11OF0 PASS_NAM_MATCH1 P11OF1 NAME_MATCH P25OS1 FAILING_MAR.SPACE P26OS4 FAILING_MAR.NAME P2AOS4 FAILING_MAR.OFFSET 3A 00 18 18 00 00 00 00 60 00 3F 00 00 00 00 40 3F C3 3E 7D 03 01 00 00 00 01 00 00 00 00 00 00 C3 0E 7D 03 00 3F C3 2E 7E 03 DA 80 34 13 DA 70 26 10 BC 54 DA 60 25 18 00 20 DA 80 2E 13 BC 48 18 3E 5F A6 04 26 DA 60 25 18 18 3A 5F 16 64 5C DA 80 1F 13 BC 3F DA 72 34 11 97 80 3B 6A 44 3B 72 66 2C