|
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: 443 (0x1bb)
Types: FIU, TextFile
Names: »SPECIAL_WCS.FIU«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─⟦this⟧ »SPECIAL_WCS.FIU«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─⟦this⟧ »SPECIAL_WCS.FIU«
10 ; --------------------------------------------------------------------------------------
10 ; Hash 011a361b090d5dc7 (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 6b .CODE 0x6b
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 0x6b
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 0x6b
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 0x6b
3f bc 3a FSM {3a}
41 60 PAUSE
42 50 3b 1f 4b JMP.W EQ,0x3b,0x1f,0x4b
46 da 8d 14 50 CHN_TST Z,{F.UIR:14},0x50
4a 5c END
4b da 89 14 50 CHN_TST NZ,{F.UIR:14},0x50
4f 5c END
50 48 3b 58 JMP.W Z,0x3b,0x58
53 a8 02 3b SR.0 #0x1,0x3b,[0x2]
56 36 3a JMP 0x3a
58 48 1f 69 JMP.W Z,0x1f,0x69
5b 90 1f 21 MOV.W 0x1f,0x21
5e 18 CALL 0x6b
5f d2 ff 13 FSM_8X #0xff,{13}
62 bc 38 FSM {38}
64 a8 02 1f SR.0 #0x1,0x1f,[0x2]
67 36 31 JMP 0x31
69 64 SET PT
6a 5c END
6b ; --------------------------------------------------------------------------------------
6b ; Subroutine
6b ; --------------------------------------------------------------------------------------
6b da 70 1f 10 CHN_SND 0x1f,{F.MDREG:10}
6f da 80 19 13 CHN_SND 0x19,{F.UIR:13}
73 bc 48 FSM {48}
75 bc 3c FSM {3c}
77 2c RET
P11OF0 PASS_FWCS_ADDR\r \r 23\r 00\r 18\r 18\r 00\r 00\r 00\r 00\r \r 6B\r 00\r 3F\r F3\r 0C\r 7F\r 03\r 20\r 00\r 20\r 00\r 18\r D2\r FF\r 13\r BC\r 38\r 48\r 21\r 31\r A8\r 02\r 21\r 36\r 23\r 90\r 1F\r 21\r 18\r D2\r 00\r 13\r BC\r 38\r 91\r 20\r 00\r 21\r 18\r BC\r 3A\r 60\r 50\r 3B\r 1F\r 4B\r DA\r 8D\r 14\r 50\r 5C\r DA\r 89\r 14\r 50\r 5C\r 48\r 3B\r 58\r A8\r 02\r 3B\r 36\r 3A\r 48\r 1F\r 69\r 90\r 1F\r 21\r 18\r D2\r FF\r 13\r BC\r 38\r A8\r 02\r 1F\r 36\r 31\r 64\r 5C\r DA\r 70\r 1F\r 10\r DA\r 80\r 19\r 13\r BC\r 48\r BC\r 3C\r 2C\r