|
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_SIGN_EXTRACT.FIU«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─ ⟦this⟧ »TEST_SIGN_EXTRACT.FIU«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─ ⟦this⟧ »TEST_SIGN_EXTRACT.FIU«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─ ⟦this⟧ »TEST_SIGN_EXTRACT.FIU«
10 ; --------------------------------------------------------------------------------------
10 ; Hash fcbcc8495a07229c (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 42 .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0 ; P11OF0 PASS_SIGN_EXT
; P11OF1 EXPECTED_ZERO
12 R2_:
12 18 .DATA 0x18
13 R3_:
13 41 .DATA 0x41
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 6f .CODE 0x6f
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 00 .DATA 0x0
24 00 .DATA 0x0
25 00 .DATA 0x0
26 00 .DATA 0x0
27 00 .DATA 0x0
28 01 .DATA 0x1
29 00 .DATA 0x0
2a 3f .DATA 0x3f
2b 32 .DATA 0x32
2c 0c .DATA 0xc
2d 7f .DATA 0x7f
2e ff .DATA 0xff
2f 40 .DATA 0x40
30 3f .DATA 0x3f
31 32 .DATA 0x32
32 0a .DATA 0xa
33 7f .DATA 0x7f
34 ff .DATA 0xff
35 40 .DATA 0x40
36 3f .DATA 0x3f
37 c3 .DATA 0xc3
38 0f .DATA 0xf
39 7d .DATA 0x7d
3a ff .DATA 0xff
3b 7f .DATA 0x7f ; P3BOS1 BIT_NUMBER
3c 00 .DATA 0x0
3d c3 .DATA 0xc3
3e 0a .DATA 0xa
3f 7d .DATA 0x7d
40 ff .DATA 0xff
41 00 .DATA 0x0
42 EXPERIMENT:
42 6e INV PX
43 ae 90 19 VINV [0x10],0x19
46 da 70 19 10 CHN_SND 0x19,{F.MDREG:10}
4a 70 29 LD R2,0x29
4c 18 CALL 0x6f
4d da 70 21 10 CHN_SND 0x21,{F.MDREG:10}
51 70 2f LD R2,0x2f
53 18 CALL 0x6f
54 70 3b LD R2,0x3b
56 18 CALL 0x6f
57 70 35 LD R2,0x35
59 18 CALL 0x6f
5a 08 REPEAT #0x08
5b cb 12 RFSM.L {12},R3
5d 3a 61 JMP PX,0x61
5f 8a 41 INV 0x41
61 46 41 6e JMP NZ,0x41,0x6e
64 16 UNTIL
65 3a 42 JMP PX,EXPERIMENT
67 a6 10 19 LEFT.0 #0x1,0x19,[0x10]
6a 58 3b 42 DJNN 0x3b,EXPERIMENT
6d 64 SET PT
6e 5c END
6f ; --------------------------------------------------------------------------------------
6f ; Subroutine
6f ; --------------------------------------------------------------------------------------
6f da 81 13 CHN_SND @R2,{F.UIR:13}
72 bc 48 FSM {48}
74 2c RET
P11OF0 PASS_SIGN_EXT P11OF1 EXPECTED_ZERO P3BOS1 BIT_NUMBER 42 00 18 41 00 00 00 00 6F 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 01 00 3F 32 0C 7F FF 40 3F 32 0A 7F FF 40 3F C3 0F 7D FF 7F 00 C3 0A 7D FF 00 6E AE 90 19 DA 70 19 10 70 29 18 DA 70 21 10 70 2F 18 70 3B 18 70 35 18 08 CB 12 3A 61 8A 41 46 41 6E 16 3A 42 A6 10 19 58 3B 42 64 5C DA 81 13 BC 48 2C«nul»