|
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: 332 (0x14c)
Types: FIU, TextFile
Names: »WCS_ADDRESS_TEST.FIU«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─ ⟦this⟧ »WCS_ADDRESS_TEST.FIU«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─ ⟦this⟧ »WCS_ADDRESS_TEST.FIU«
10 ; --------------------------------------------------------------------------------------
10 ; Hash fce86fc17d2da74d (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 23 .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0 ; P11OF0 PASS_FWCS_ADDR
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 6a .CODE 0x6a
19 00 .DATA 0x0
1a 3f .DATA 0x3f
1b f3 .DATA 0xf3
1c 0c .DATA 0xc
1d 7f .DATA 0x7f
1e 03 .DATA 0x3
1f 20 .DATA 0x20
20 00 .DATA 0x0
21 20 .DATA 0x20
22 00 .DATA 0x0
23 EXPERIMENT:
23 18 CALL 0x6a
24 d2 ff 13 FSM_8X #0xff,{13}
27 bc 38 FSM {38}
29 48 21 31 JMP.W Z,0x21,0x31
2c a8 02 21 SR.0 #0x1,0x21,[0x2]
2f 36 23 JMP EXPERIMENT
31 90 1f 21 MOV.W 0x1f,0x21
34 18 CALL 0x6a
35 d2 00 13 FSM_8X #0x00,{13}
38 bc 38 FSM {38}
3a 91 20' 00 21 MOV.W #0x2000,0x21
3e 18 CALL 0x6a
3f bc 3a FSM {3a}
41 50 3b 1f 4a JMP.W EQ,0x3b,0x1f,0x4a
45 da 8d 14 4f CHN_TST Z,{F.UIR:14},0x4f
49 5c END
4a da 89 14 4f CHN_TST NZ,{F.UIR:14},0x4f
4e 5c END
4f 48 3b 57 JMP.W Z,0x3b,0x57
52 a8 02 3b SR.0 #0x1,0x3b,[0x2]
55 36 3a JMP 0x3a
57 48 1f 68 JMP.W Z,0x1f,0x68
5a 90 1f 21 MOV.W 0x1f,0x21
5d 18 CALL 0x6a
5e d2 ff 13 FSM_8X #0xff,{13}
61 bc 38 FSM {38}
63 a8 02 1f SR.0 #0x1,0x1f,[0x2]
66 36 31 JMP 0x31
68 64 SET PT
69 5c END
6a ; --------------------------------------------------------------------------------------
6a ; Subroutine
6a ; --------------------------------------------------------------------------------------
6a da 70 1f 10 CHN_SND 0x1f,{F.MDREG:10}
6e da 80 19 13 CHN_SND 0x19,{F.UIR:13}
72 bc 48 FSM {48}
74 bc 3c FSM {3c}
76 2c RET
P11OF0 PASS_FWCS_ADDR 23 00 18 18 00 00 00 00 6A 00 3F F3 0C 7F 03 20 00 20 00 18 D2 FF 13 BC 38 48 21 31 A8 02 21 36 23 90 1F 21 18 D2 00 13 BC 38 91 20 00 21 18 BC 3A 50 3B 1F 4A DA 8D 14 4F 5C DA 89 14 4F 5C 48 3B 57 A8 02 3B 36 3A 48 1F 68 90 1F 21 18 D2 FF 13 BC 38 A8 02 1F 36 31 64 5C DA 70 1F 10 DA 80 19 13 BC 48 BC 3C 2C