|
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: 1024 (0x400)
Types: FIU, TextFile
Names: »TEST_RESTORE_RDR.FIU«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─ ⟦this⟧ »TEST_RESTORE_RDR.FIU«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─ ⟦this⟧ »TEST_RESTORE_RDR.FIU«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─ ⟦this⟧ »TEST_RESTORE_RDR.FIU«
10 ; --------------------------------------------------------------------------------------
10 ; Hash f1f804128f4ab064 (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 2e .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0 ; P11OF0 PASS_REST_RDR
; P11OF1 RESTORE_RDR
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 39 .CODE 0x39
19 00 .DATA 0x0
1a 3f .DATA 0x3f
1b c3 .DATA 0xc3
1c 2e .DATA 0x2e
1d 7e .DATA 0x7e
1e 03 .DATA 0x3
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 0c .DATA 0xc
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 EXPERIMENT:
2e 18 CALL 0x39
2f 3a 38 JMP PX,0x38
31 8f 1c 25 MOV #0x1c,0x25
34 18 CALL 0x39
35 3e 38 JMP NPX,0x38
37 64 SET PT
38 5c END
39 ; --------------------------------------------------------------------------------------
39 ; Subroutine
39 ; --------------------------------------------------------------------------------------
39 da 70 1e 10 CHN_SND 0x1e,{F.MDREG:10}
3d da 80 19 13 CHN_SND 0x19,{F.UIR:13}
41 bc 54 FSM {54}
43 da 80 1f 13 CHN_SND 0x1f,{F.UIR:13}
47 bc 3f FSM {3f}
49 da 72 26 11 CHN_RCV {F.MDREG:11},0x26
4d 97 40 2a AND #0x40,0x2a
50 66 SET PX
51 46 2a 55 JMP NZ,0x2a,0x55
54 6a CLR PX
55 2c RET
P11OF0 PASS_REST_RDR P11OF1 RESTORE_RDR 2E 00 18 18 00 00 00 00 39 00 3F C3 2E 7E 03 40 3F C3 3E 7D 03 0C 00 00 00 00 00 00 00 00 18 3A 38 8F 1C 25 18 3E 38 64 5C DA 70 1E 10 DA 80 19 13 BC 54 DA 80 1F 13 BC 3F DA 72 26 11 97 40 2A 66 46 2A 55 6A 2C«nul»