|
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: »CHECK_WCS.FIU«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─ ⟦this⟧ »CHECK_WCS.FIU«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─ ⟦this⟧ »CHECK_WCS.FIU«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─ ⟦this⟧ »CHECK_WCS.FIU«
10 ; --------------------------------------------------------------------------------------
10 ; Hash 56fb78508af3bf1d (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 2d .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0 ; P11OF0 DESCENDING
; P11OF1 ERROR
12 R2_:
12 18 .DATA 0x18
13 R3_:
13 1b .DATA 0x1b
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 69 .CODE 0x69
19 58 .CODE 0x58
1a 5f .CODE 0x5f
1b 4f .DATA 0x4f ; P1BOS6 BAD_DATA
1c 5f .DATA 0x5f
1d 7f .DATA 0x7f
1e 7f .DATA 0x7f
1f 4f .DATA 0x4f
20 4f .DATA 0x4f
21 5f .DATA 0x5f
22 cf .DATA 0xcf
23 40 .DATA 0x40 ; P23OS2 ADDRESS
24 00 .DATA 0x0
25 40 .DATA 0x40
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 EXPERIMENT:
2d 18 CALL 0x69
2e 08 REPEAT #0x08
2f c4 00 13 WFSM.L #0x00,{13}
32 16 UNTIL
33 bc 39 FSM {39}
35 56 23 33 DJNZ.W 0x23,0x33
38 18 CALL 0x69
39 19 CALL 0x58
3a 1a CALL 0x5f
3b 1a CALL 0x5f
3c 19 CALL 0x58
3d 1a CALL 0x5f
3e ae 86 27 VINV [0x6],0x27
41 38 4e JMP PT,0x4e
43 bc 3d FSM {3d}
45 84 23 INC.W 0x23
47 56 25 39 DJNZ.W 0x25,0x39
4a 64 SET PT
4b ae 86 27 VINV [0x6],0x27
4e 5a 23 38 DJNN.W 0x23,0x38
51 5c END
52 66 SET PX
53 da 82 1b 14 CHN_RCV {F.UIR:14},0x1b
57 5c END
58 ; --------------------------------------------------------------------------------------
58 ; Subroutine
58 ; --------------------------------------------------------------------------------------
58 bc 3a FSM {3a}
5a da 86 27 14 52 CHN_CMP NE,0x27,{F.UIR:14},0x52
5f ; --------------------------------------------------------------------------------------
5f ; Subroutine
5f ; --------------------------------------------------------------------------------------
5f ae 86 27 VINV [0x6],0x27
62 da 80 27 13 CHN_SND 0x27,{F.UIR:13}
66 bc 38 FSM {38}
68 2c RET
69 ; --------------------------------------------------------------------------------------
69 ; Subroutine
69 ; --------------------------------------------------------------------------------------
69 da 70 21 10 CHN_SND 0x21,{F.MDREG:10}
6d 70 1b LD R2,0x1b
6f 08 REPEAT #0x08
70 bf 13 WP1_FSM R2,{13}
72 74 INC R2
73 16 UNTIL
74 bc 3c FSM {3c}
76 2c RET
P11OF1 ERROR\r P11OF0 DESCENDING\r P23OS2 ADDRESS\r P1BOS6 BAD_DATA\r \r 2D\r 00\r 18\r 1B\r 00\r 00\r 00\r 00\r \r 69\r 58\r 5F\r 4F\r 5F\r 7F\r 7F\r 4F\r 4F\r 5F\r CF\r 40\r 00\r 40\r 00\r 00\r 00\r 00\r 00\r 00\r 00\r 18\r 08\r C4\r 00\r 13\r 16\r BC\r 39\r 56\r 23\r 33\r 18\r 19\r 1A\r 1A\r 19\r 1A\r AE\r 86\r 27\r 38\r 4E\r BC\r 3D\r 84\r 23\r 56\r 25\r 39\r 64\r AE\r 86\r 27\r 5A\r 23\r 38\r 5C\r 66\r DA\r 82\r 1B\r 14\r 5C\r BC\r 3A\r DA\r 86\r 27\r 14\r 52\r AE\r 86\r 27\r DA\r 80\r 27\r 13\r BC\r 38\r 2C\r DA\r 70\r 21\r 10\r 70\r 1B\r 08\r BF\r 13\r 74\r 16\r BC\r 3C\r 2C\r «nul»