|
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: IOC, TextFile
Names: »POUND_WCS.IOC«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─ ⟦this⟧ »POUND_WCS.IOC«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─ ⟦this⟧ »POUND_WCS.IOC«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─ ⟦this⟧ »POUND_WCS.IOC«
10 ; --------------------------------------------------------------------------------------
10 ; Hash 2e88bb2e8a8a2f5a (no python module)
10 ; --------------------------------------------------------------------------------------
10 PC_:
10 27 .CODE EXPERIMENT
11 R1_:
11 00 .DATA 0x0 ; P11OF0 PASSED
; P11OF1 ASCENDING
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 71 .CODE 0x71
19 58 .CODE 0x58
1a 66 .CODE 0x66
1b 40 .DATA 0x40
1c 00 .DATA 0x0
1d 40 .DATA 0x40
1e 00 .DATA 0x0
1f 00 .DATA 0x0 ; P1FOS2 EXPECTED
20 00 .DATA 0x0
21 00 .DATA 0x0 ; P21OS2 RESULT
22 00 .DATA 0x0
23 00 .DATA 0x0
24 01 .DATA 0x1
25 00 .DATA 0x0 ; P25OS2 ADDRESS
26 00 .DATA 0x0
27 EXPERIMENT:
27 18 CALL 0x71
28 d2 00 10 FSM_8X #0x00,{10}
2b d2 00 11 FSM_8X #0x00,{11}
2e bc 61 FSM {61}
30 56 1b 2e DJNZ.W 0x1b,0x2e
33 91 40 00 1b MOV.W #0x4000,0x1b
37 18 CALL 0x71
38 19 CALL 0x58
39 1a CALL 0x66
3a 1a CALL 0x66
3b 19 CALL 0x58
3c 1a CALL 0x66
3d 8c 1f INV.W 0x1f
3f 3a 4f JMP PX,0x4f
41 bc 39 FSM {39}
43 84 25 INC.W 0x25
45 56 1b 38 DJNZ.W 0x1b,0x38
48 66 SET PX
49 8c 1f INV.W 0x1f
4b 91 40 00 1b MOV.W #0x4000,0x1b
4f bc 3a FSM {3a}
51 88 25 DEC.W 0x25
53 56 1b 38 DJNZ.W 0x1b,0x38
56 64 SET PT
57 5c END
58 ; --------------------------------------------------------------------------------------
58 ; Subroutine
58 ; --------------------------------------------------------------------------------------
58 bc 50 FSM {50}
5a d4 80 12 21 RCV_P1 #0x80,{12},0x21
5e d4 40 14 22 RCV_P1 #0x40,{14},0x22
62 52 1f 21 57 JMP.W NE,0x1f,0x21,0x57
66 ; --------------------------------------------------------------------------------------
66 ; Subroutine
66 ; --------------------------------------------------------------------------------------
66 8c 1f INV.W 0x1f
68 d0 1f 10 FSM_8X 0x1f,{10}
6b d0 20 11 FSM_8X 0x20,{11}
6e bc 60 FSM {60}
70 2c RET
71 ; --------------------------------------------------------------------------------------
71 ; Subroutine
71 ; --------------------------------------------------------------------------------------
71 d2 a0 10 FSM_8X #0xa0,{10}
74 d2 00 11 FSM_8X #0x00,{11}
77 da d0 1f 20 CHN_SND 0x1f,{I.DUMMY:20}
7b bc 48 FSM {48}
7d 2c RET
P11OF0 PASSED\r P11OF1 ASCENDING\r P25OS2 ADDRESS\r P1FOS2 EXPECTED\r P21OS2 RESULT\r \r 27\r 00\r 18\r 18\r 00\r 00\r 00\r 00\r \r 71\r 58\r 66\r 40\r 00\r 40\r 00\r 00\r 00\r 00\r 00\r 00\r 01\r 00\r 00\r 18\r D2\r 00\r 10\r D2\r 00\r 11\r BC\r 61\r 56\r 1B\r 2E\r 91\r 40\r 00\r 1B\r 18\r 19\r 1A\r 1A\r 19\r 1A\r 8C\r 1F\r 3A\r 4F\r BC\r 39\r 84\r 25\r 56\r 1B\r 38\r 66\r 8C\r 1F\r 91\r 40\r 00\r 1B\r BC\r 3A\r 88\r 25\r 56\r 1B\r 38\r 64\r 5C\r BC\r 50\r D4\r 80\r 12\r 21\r D4\r 40\r 14\r 22\r 52\r 1F\r 21\r 57\r 8C\r 1F\r D0\r 1F\r 10\r D0\r 20\r 11\r BC\r 60\r 2C\r D2\r A0\r 10\r D2\r 00\r 11\r DA\r D0\r 1F\r 20\r BC\r 48\r 2C\r «nul»